1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
@load "filefuncs"
function foo()
{
print "foo!"
}
BEGIN {
f = FUNCTAB["foo"]
@f()
# Do the two stats one after the other, and use ".." instead
# of "." to avoid race conditions seen using ".".
ret1 = stat("..", data1)
f = "stat"
ret2 = @f("..", data2)
print "ret1 =", ret1
print "ret2 =", ret2
problem = 0
for (i in data1) {
if (! isarray(data1[i])) {
# print i, data1[i]
if (! (i in data2) || data1[i] != data2[i]) {
printf("mismatch element \"%s\"\n", i)
problems++
}
}
}
print(problems ? (problems+0) "encountered" : "no problems encountered")
}
|