shithub: kwa

ref: 8f2d3879a9c66d2633ca7ec1c3b0495981feb04f
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'
}