1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
|
plan () {
tap_plan=$1
tap_ret=0
tap_n=0
echo "1..$tap_plan"
}
no_plan () {
tap_plan=0
tap_ret=0
tap_n=0
}
skip_all () {
echo "1..0 # SKIP $@"
exit 0
}
not () {
printf "not "
tap_ret=1
}
ok () {
tap_n=$(( $tap_n + 1 ))
echo "ok $tap_n $@"
}
skip () {
tap_skip_n=$1
shift
for tap_skip_i in `$SEQ 1 $tap_skip_n`; do
ok "# SKIP $@"
done
}
done_testing () {
echo "1..$tap_n"
}
end () {
exit $tap_ret
}
bail_out () {
echo "Bail out! $@"
tap_ret=255
end
}
note () {
if [ $# -eq 0 ]; then
while read l; do
printf '# %s\n' "$l"
done
else
echo "$@" | while read l; do
printf '# %s\n' "$l"
done
fi
}
diag () {
note "$@" 1>&2
}
|
