16 whynot=$(t-restriction-$r)
23 1.?*) whynots="$whynots${whynots:+; }$whynot" ;;
24 *) fail "restriction $r for $t gave $rc $whynot !"
35 ?*) echo >&2 "SKIP $t $whynots" ;;
43 test-begin-gencontrol () {
45 dependencies='dgit, dgit-infrastructure, devscripts, debhelper (>=8), fakeroot, build-essential, chiark-utils-bin, bc'
48 restriction-gencontrol () {
52 gencontrol-add-deps () {
54 dependencies+="${dependencies:+, }$dep"
58 dependencies-gencontrol () {
59 for dep in "$deps"; do
61 NO-DGIT) dependencies='chiark-utils-bin' ;;
62 NO-DEFAULT) dependencies='' ;;
63 GDR) gencontrol-add-deps \
64 git-debrebase git-buildpackage faketime
66 *) gencontrol-add-deps "$dep" ;;
71 test-done-gencontrol () {
73 add_Depends="$dependencies" \
74 perl <debian/tests/control.in -wpe '
77 s{$}{ $ENV{"add_$h"} // "" }e;
80 case "$restrictions" in
81 ?*) echo "Restrictions:$restrictions" ;;
84 key=$(printf "%s" "$stanza" | sha256sum)
87 stanza_$key=\"\$stanza\"
88 tests_$key+=\" \${t#tests/tests/}\"
90 keys=" ${keys/ $key /}"
94 finish-gencontrol () {
100 printf "Tests:%s\n%s\n\n" "$tests" "$stanza"
108 /^: t-enumerate-tests-end$/q;
113 for t in $(run-parts --list tests/tests); do
115 for r in $(seddery 's/^t-restrict //p'); do
118 for deps in $(seddery 's/^t-dependencies //p'); do