File: regtest

package info (click to toggle)
gawk 3.0.3-1
  • links: PTS
  • area: main
  • in suites: hamm, slink
  • size: 4,520 kB
  • ctags: 2,175
  • sloc: ansic: 20,481; awk: 2,476; yacc: 2,039; makefile: 877; sh: 409
file content (18 lines) | stat: -rwxr-xr-x 265 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
#! /bin/sh

case "$AWK" in
"")	AWK=../gawk ;;
esac
#AWK=${AWK:-../gawk}

for i in reg/*.awk
do
	it=`basename $i .awk`
	$AWK -f $i <reg/$it.in >reg/$it.out 2>&1
	if cmp -s reg/$it.out reg/$it.good
	then
		rm -f reg/$it.out
	else
		echo "regtest: $it fails"
	fi
done