shithub: kwa

ref: d38caa1bee4fc59e86f2cc1de2787d319ac2bffe
dir: /test/Compare.p/

View raw version 
#!/bin/rc
rfork e
oldawk=awk
awk=kwa

for(i in p.*){
	echo -n $i:
	$oldawk -f $i test.countries test.countries >foo1 
	$awk -f $i test.countries test.countries >foo2 
	if(cmp -s foo1 foo2)
		echo
	if not
		echo BAD
	diff -b foo1 foo2 | sed 's/^/	/;10q'
}