shithub: kwa

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