PR4105: support up to 9 (up from 5) array index dimensions

* runtime/map-gen.c, pmap-gen.c: Hand-expand arity 6..9 cases throughout.
* testsuite/buildok/thirty.stp: New test.
* testsuite/buildko/two.stp: New test.

An Alan Smithee patch.

1 files changed, 49 insertions, 0 deletions

diff --git a/testsuite/buildok/thirty.stp b/testsuite/buildok/thirty.stp
new file mode 100644
index 00000000..042bae56
--- /dev/null
+++ b/testsuite/buildok/thirty.stp
@@ -0,0 +1,49 @@
+#! stap -p4
+
+# tests wide arrays
+global a1, a2, a3, a4, a5, a6, a7, a8, a9
+global b1, b2, b3, b4, b5, b6, b7, b8, b9
+global c1, c2, c3, c4, c5, c6, c7, c8, c9
+global d1, d2, d3, d4, d5, d6, d7, d8, d9
+
+probe begin {
+      a1[0]="a";
+      a2[0,"a"]="a";
+      a3[0,"a",0]="a";
+      a4[0,"a",0,"a"]="a";
+      a5[0,"a",0,"a",0]="a";
+      a6[0,"a",0,"a",0,"a"]="a";
+      a7[0,"a",0,"a",0,"a",0]="a";
+      a8[0,"a",0,"a",0,"a",0,"a"]="a";
+      a9[0,"a",0,"a",0,"a",0,"a",0]="a";
+
+      b1["b"]=0;
+      b2["b",0]=0;
+      b3["b",0,"b"]=0;
+      b4["b",0,"b",0]=0;
+      b5["b",0,"b",0,"b"]=0;
+      b6["b",0,"b",0,"b",0]=0;
+      b7["b",0,"b",0,"b",0,"b"]=0;
+      b8["b",0,"b",0,"b",0,"b",0]=0;
+      b9["b",0,"b",0,"b",0,"b",0,"b"]=0;
+
+      c1[0]<<<0;
+      c2[0,"a"]<<<0;
+      c3[0,"a",0]<<<0;
+      c4[0,"a",0,"a"]<<<0;
+      c5[0,"a",0,"a",0]<<<0;
+      c6[0,"a",0,"a",0,"a"]<<<0;
+      c7[0,"a",0,"a",0,"a",0]<<<0;
+      c8[0,"a",0,"a",0,"a",0,"a"]<<<0;
+      c9[0,"a",0,"a",0,"a",0,"a",0]<<<0;
+
+      d1["b"]<<<0;
+      d2["b",0]<<<0;
+      d3["b",0,"b"]<<<0;
+      d4["b",0,"b",0]<<<0;
+      d5["b",0,"b",0,"b"]<<<0;
+      d6["b",0,"b",0,"b",0]<<<0;
+      d7["b",0,"b",0,"b",0,"b"]<<<0;
+      d8["b",0,"b",0,"b",0,"b",0]<<<0;
+      d9["b",0,"b",0,"b",0,"b",0,"b"]<<<0;
+}