parse options to regress.t
[barcat.git] / t / regress.t
index ef28f6f934e17160acb53972ef620ee0aa685eb3..099b944632d4166f22891e1bdc55fec56a727907 100755 (executable)
@@ -7,11 +7,24 @@ test_count=0
 COLUMNS=40
 diffcmd='diff --unchanged-line-format= --old-line-format=<%L --new-line-format=>%L'
 
+for option in "$@"
+do
+       case "$option" in
+       -*) echo "Usage: $0 [<files>...]"; exit 64;;
+       esac
+done
+
 for candidate in ${@:-t*.in}
 do
        test_count=$((test_count+1))
-       name="${candidate%.out}"
-       barcat <"$name.in" | $diffcmd "$name.out" - || printf 'not '
+       file="${candidate%.in}"
+       test -r "$file.in" || continue
+
+       name="$(echo ${file#*-} | tr _ \ )"
+       cmd="barcat $file.in"
+       case "$name" in *\ -*) cmd="$cmd -${name#* -}";; esac
+
+       $cmd 2>&1 | $diffcmd "$file.out" - || printf 'not '
        echo "ok $test_count - $name"
 done