shithub: kwa

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