Nested templated data: Difference between revisions

Content added Content deleted

Inline

@@ Line 178: / Line 178: @@
                   link a to a()
                   while k {
-                  select case type$(a(k^))
+                        select case type$(a(k^))
-                  case "mArray"
+                        case "mArray"
-                       Append res, (Lambda(array(a, k^)),)
+                             Append res, (Lambda(a(k^)),)
-                  Case "VarItem"   ' for more than one line need to place in a block
+                        Case "VarItem"   ' for more than one line need to place in a block
-                  {
+                        {
-                        Append res, ("Unused#pos"+trim$(str$(p)),)  ' one item tuple append to res
+                              Append res, ("Unused#pos"+trim$(str$(p)),)  ' one item tuple append to res
-                        append unused, p
+                              append unused, p
-                        p++
+                              p++
-                  }
+                        }
-                  else case
+                        else case
-                  {
+                        {
-                        Append res, ("Payload#"+trim$(str$(array(k))),)  ' one item tuple append to res
+                              Append res, ("Payload#"+trim$(str$(array(k))),)  ' one item tuple append to res
-                        p++
+                              p++
-                  }
+                        }
-                  end select
+                        end select
                   }
                   =res
@@ Line 244: / Line 244: @@
 Checkit
 report Clipboard$
 </lang>
 {{out}}
@@ Line 256: / Line 255: @@
 Unused: pos 1, pos 4
 </pre >
 =={{header|Perl}}==