1 files changed, 30 insertions, 0 deletions
diff --git a/test/functab4.awk b/test/functab4.awk
new file mode 100644
index 00000000..196fcc6d
--- /dev/null
+++ b/test/functab4.awk
@@ -0,0 +1,30 @@
+@load "filefuncs"
+
+function foo()
+{
+	print "foo!"
+}
+
+BEGIN {
+	f = FUNCTAB["foo"]
+	@f()
+
+	ret1 = stat(".", data1)
+	print "ret1 =", ret1
+
+	f = "stat"
+	ret2 = @f(".", data2)
+	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")
+}