logarithmic repeat markers multiply by 10
[barcat.git] / t / regress.t
index 508d3617bc7e6fe7c7562aed1c54f70745649426..f6877b1e85169cb126e0c60d1ef63186c444732a 100755 (executable)
@@ -26,7 +26,12 @@ do
        esac
 done
 
-for candidate in ${@:-t*.out}
+params="${@:-t*.out}"
+color 0\;36
+echo "1..$(echo $params | wc -w)"
+color 0
+
+for candidate in $params
 do
        test_count=$((test_count+1))
        file="${candidate%.out}"
@@ -68,8 +73,15 @@ do
 
        if test 0 != $?
        then
-               fail_count=$((fail_count+1))
-               color 1\;31
+               case "$name" in
+               *' #TODO')
+                       color 33
+                       ;;
+               *)
+                       fail_count=$((fail_count+1))
+                       color 1\;31
+               esac
+
                printf 'not '
        fi
        echo "ok $test_count - $name"
@@ -85,8 +97,6 @@ else
        echo "# failed $fail_count among $test_count test(s)"
        fail_count=1  # exit code
 fi
-
-color 0\;36
-echo "1..$test_count"
 color 0
+
 exit $fail_count