X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=t%2Ftap.sh;h=b82f203f5f7628cbdaca6d46d46974a2431ba826;hb=bd46218e36b09bc89497dd8aa5426d6610cd240c;hp=553128ffe01e9a55e5e58570acc07699f1dab1ea;hpb=7b53df56cc94695572fa6ea8b075cf7e89b3690c;p=zpackage

diff --git a/t/tap.sh b/t/tap.sh
index 553128f..b82f203 100755
--- a/t/tap.sh
+++ b/t/tap.sh
@@ -15,12 +15,30 @@ tryrun() {
 	printf 'ok %d - %s %s\n' $tn $program "$*"
 }
 
+require() {
+	note="$@"
+	program=$1
+	shift
+	$program "$@"
+	if [ $? -ne 0 ]; then
+		printf "bail out! fail[$?]: $@\n"
+		exit 255;
+	fi
+	tn=$((tn + 1))
+	printf 'ok %d - %s %s\n' $tn $program "$*"
+
+}
+
 shownote() {
 	if [ "$note" != "" ]; then
 		printf '# %s\n' "$note"
 	fi
 }
 
+diag() {
+	printf '# %s\n' "$@"
+}
+
 okexit() {
 	exitwith 0 "$*"
 }
@@ -42,7 +60,7 @@ exitwith() {
 	note=
 	if [ $rv -ne $1 ]; then
 		printf 'not ';
-		note=$(printf '# got "%d" expected "%d"' "$1" "$2")
+		note=$(printf '# got "%d" expected "%d"' "$rv" "$1")
 	fi
 	shift
 	tn=$((tn + 1))