2019-06-23 05:13:57 -04:00
|
|
|
|
echo T.lilly: miscellaneous RE tests from Bruce Lilly
|
|
|
|
|
|
|
|
|
|
awk=${awk-../a.out}
|
|
|
|
|
|
|
|
|
|
rm -f foo
|
|
|
|
|
awk '
|
|
|
|
|
/./ {
|
|
|
|
|
print $0 >"foo"
|
|
|
|
|
close("foo")
|
|
|
|
|
print "###", NR, $0
|
|
|
|
|
system("awk -f foo <\"lilly.ifile\" ")
|
|
|
|
|
}' <lilly.progs >foo1 2>&1
|
|
|
|
|
|
|
|
|
|
rm -f foo
|
|
|
|
|
$awk '
|
|
|
|
|
/./ {
|
|
|
|
|
print $0 >"foo"
|
|
|
|
|
close("foo")
|
|
|
|
|
print "###", NR, $0
|
|
|
|
|
system("../a.out -f foo <\"lilly.ifile\" ")
|
|
|
|
|
}' <lilly.progs >foo2 2>&1
|
|
|
|
|
|
|
|
|
|
echo `cat lilly.progs | wc -l` tests
|
|
|
|
|
|
2019-11-08 07:36:37 -05:00
|
|
|
|
sed -e 's/awk://' -e 's/Syntax/syntax/' -e '/warning:/d' foo1 >glop1
|
2019-06-23 05:13:57 -04:00
|
|
|
|
sed 's/..\/a.out://' foo2 >glop2
|
|
|
|
|
diff glop1 glop2 >lilly.diff || echo 'bad: T.lilly is different'
|
|
|
|
|
echo
|