diff options
Diffstat (limited to 'meta/recipes-devtools/tcltk/tcl/run-ptest')
| -rw-r--r-- | meta/recipes-devtools/tcltk/tcl/run-ptest | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/meta/recipes-devtools/tcltk/tcl/run-ptest b/meta/recipes-devtools/tcltk/tcl/run-ptest new file mode 100644 index 0000000..a5d6548 --- /dev/null +++ b/meta/recipes-devtools/tcltk/tcl/run-ptest @@ -0,0 +1,8 @@ +#!/bin/sh + +for i in `ls tests/*.test |awk -F/ '{print $2}'`; \ + do TCL_LIBRARY=library ./tcltest tests/all.tcl -file $i &>$i.tmp; \ + grep -q "^Files with failing tests:" $i.tmp; \ + if [ $? == 0 ]; then echo "FAIL: $i"; \ + else echo "PASS: $i"; rm -f $i.tmp; fi; \ +done |
