1 files changed, 13 insertions, 0 deletions
diff --git a/test/typeof4.awk b/test/typeof4.awk
new file mode 100644
index 00000000..62c2905c
--- /dev/null
+++ b/test/typeof4.awk
@@ -0,0 +1,13 @@
+BEGIN{ a["x"]["y"]["z"]="scalar" ; walk_array(a, "a")}
+function walk_array(arr, name, i,	r)
+{
+	for (i in arr) {
+		r = typeof(arr[i])
+#		printf("typeof(%s[%s]) = %s\n", name, i, r) > "/dev/stderr"
+		if (r == "array") {
+			walk_array(arr[i], name "[" i "]")
+		} else {
+			printf "%s[%s] = %s\n", name, i, arr[i]
+		}
+	}
+}