4
# WORK IN PROGRESS -- Do not use yet.
7
# ############################################################################
8
# Standard startup, find the branch's root directory
9
# ############################################################################
23
if [ -n "$PERCONA_TOOLKIT_BRANCH" ]; then
24
BRANCH=$PERCONA_TOOLKIT_BRANCH
26
while [ ! -f Makefile.PL ] && [ $(pwd) != "/" ]; do
29
if [ ! -f Makefile.PL ]; then
30
die "Cannot find the root directory of the Percona Toolkit branch"
35
# ############################################################################
37
# ############################################################################
39
DOCS=$BRANCH/docs/test-coverage
43
# ############################################################################
45
# ############################################################################
52
prove --perl "perl -MDevel::Cover=-silent,1,-db,$DB,-ignore,.+,-select,$file" $test_file
54
cover -report text $DB | $BRANCH/util/parse-cover-report > $DOCS/$file
55
echo "Wrote $DOCS/$file"
58
# ###########################################################################
60
# ###########################################################################