meta/recipes-devtools/tcltk/tcl/run-ptest


1
2
3
4
5
6
7
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 2>&1; \
    grep -q "^Files with failing tests:" $i.tmp; \
    if [ $? -eq 0 ]; then echo "FAIL: $i"; \
    else echo "PASS: $i"; rm -f $i.tmp; fi; \
done