shithub: kwa

ref: 246f891f014fe56d6778f3576b4fa6def8b19bf3
dir: /test/Compare.p/

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

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