awk/testdir/t.do

15 lines
168 B
Plaintext
Raw Normal View History

2019-06-23 05:13:57 -04:00
NF > 0 {
t = $0
gsub(/[ \t]+/, "", t)
n = split($0, y)
if (n > 0) {
i = 1
s = ""
do {
s = s $i
} while (i++ < NF)
}
if (s != t)
print "bad at", NR
}