@apple/tree-sitter-pkl 0.17.0 → 0.18.1

package/test/corpus/snippetTests/mappings2/mapping2.txt

@@ -0,0 +1,595 @@
+===
+mappings2/mapping2.pkl
+===
+
+import "pkl:test"
+
+res1 = new Mapping {
+  when (false) { [0] = 0 }
+  ["one"] = 1
+  ["two"] = 2
+}
+
+res2 = new Mapping {
+  when (false) { [0] = 0 }
+  ["one"] = 1
+  ["two"] = this["one"] + 1
+}
+
+res3 = new Mapping {
+  when (false) { [0] = 0 }
+  ["item one"] = 1
+  ["two"] = this["item one"] + 1
+}
+
+res4 = (res2) {
+  when (false) { [0] = 0 }
+  ["one"] = 2
+}
+
+res5 = new Mapping {
+  when (false) { [0] = 0 }
+  ["one"] = new Mapping {
+    ["a"] = new Mapping {
+      when (false) { [0] = 0 }
+      ["x"] = 1
+    }
+    ["b"] = new Mapping {
+      when (false) { [0] = 0 }
+      ["y"] = 2
+    }
+  }
+  ["two"] = new Mapping {
+    when (false) { [0] = 0 }
+    ["c"] = new Mapping {
+      when (false) { [0] = 0 }
+      ["z"] = 3
+    }
+  }
+}
+res5a = res5["one"]
+res5b = res5["one"]["a"]
+res5c = res5["one"]["a"]["x"]
+res5d = res5["one"]["b"]
+res5e = res5["one"]["b"]["y"]
+res5f = res5["two"]
+res5g = res5["two"]["c"]
+res5h = res5["two"]["c"]["z"]
+res5i = test.catch(() -> res5["three"])
+
+res6 = new Mapping {
+  when (false) { [0] = 0 }
+  ["one"] = List(1, 2, 3)
+  ["two"] = this["one"] + List(4, 5, 6)
+  ["three"] = 3
+}
+
+res7 = (res6) {
+  when (false) { [0] = 0 }
+  ["one"] = super["one"] + List(4, 5, 6)
+  ["three"] = super["three"] * 2
+}
+
+res8 = new Mapping {
+  when (false) { [0] = 0 }
+  default = (key) -> new Dynamic {
+    name = key
+    age = 42
+  }
+
+  ["pigeon"] {}
+  ["barn owl"] {}
+  ["parrot"] {}
+}
+
+res9 = new Mapping {
+  when (false) { [0] = 0 }
+  default = (key) -> new Dynamic {
+    name = key
+    age = 42
+  }
+
+  ["pigeon"] {}
+  ["barn owl"] {}
+  ["parrot"] {
+    age = 32
+  }
+}
+
+res10 = (res9) {
+  when (false) { [0] = 0 }
+  ["parrot"] {}
+  ["elf owl"] {}
+  ["barn owl"] {
+    age = 22
+  }
+}
+
+res11 = (res1) { when (false) { [0] = 0 } }
+
+---
+
+(module
+  (importClause
+    (stringConstant
+      (slStringLiteralPart)))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (intLiteralExpr))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (intLiteralExpr)))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (intLiteralExpr))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (additiveExpr
+            (subscriptExpr
+              (thisExpr)
+              (slStringLiteralExpr
+                (slStringLiteralPart)))
+            (intLiteralExpr))))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (intLiteralExpr))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (additiveExpr
+            (subscriptExpr
+              (thisExpr)
+              (slStringLiteralExpr
+                (slStringLiteralPart)))
+            (intLiteralExpr))))))
+  (classProperty
+    (identifier)
+    (amendExpr
+      (parenthesizedExpr
+        (unqualifiedAccessExpr
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (intLiteralExpr)))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (newExpr
+            (declaredType
+              (qualifiedIdentifier
+                (identifier)))
+            (objectBody
+              (objectEntry
+                (slStringLiteralExpr
+                  (slStringLiteralPart))
+                (newExpr
+                  (declaredType
+                    (qualifiedIdentifier
+                      (identifier)))
+                  (objectBody
+                    (whenGenerator
+                      (falseLiteralExpr)
+                      (objectBody
+                        (objectEntry
+                          (intLiteralExpr)
+                          (intLiteralExpr))))
+                    (objectEntry
+                      (slStringLiteralExpr
+                        (slStringLiteralPart))
+                      (intLiteralExpr)))))
+              (objectEntry
+                (slStringLiteralExpr
+                  (slStringLiteralPart))
+                (newExpr
+                  (declaredType
+                    (qualifiedIdentifier
+                      (identifier)))
+                  (objectBody
+                    (whenGenerator
+                      (falseLiteralExpr)
+                      (objectBody
+                        (objectEntry
+                          (intLiteralExpr)
+                          (intLiteralExpr))))
+                    (objectEntry
+                      (slStringLiteralExpr
+                        (slStringLiteralPart))
+                      (intLiteralExpr))))))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (newExpr
+            (declaredType
+              (qualifiedIdentifier
+                (identifier)))
+            (objectBody
+              (whenGenerator
+                (falseLiteralExpr)
+                (objectBody
+                  (objectEntry
+                    (intLiteralExpr)
+                    (intLiteralExpr))))
+              (objectEntry
+                (slStringLiteralExpr
+                  (slStringLiteralPart))
+                (newExpr
+                  (declaredType
+                    (qualifiedIdentifier
+                      (identifier)))
+                  (objectBody
+                    (whenGenerator
+                      (falseLiteralExpr)
+                      (objectBody
+                        (objectEntry
+                          (intLiteralExpr)
+                          (intLiteralExpr))))
+                    (objectEntry
+                      (slStringLiteralExpr
+                        (slStringLiteralPart))
+                      (intLiteralExpr)))))))))))
+  (classProperty
+    (identifier)
+    (subscriptExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (slStringLiteralExpr
+        (slStringLiteralPart))))
+  (classProperty
+    (identifier)
+    (subscriptExpr
+      (subscriptExpr
+        (unqualifiedAccessExpr
+          (identifier))
+        (slStringLiteralExpr
+          (slStringLiteralPart)))
+      (slStringLiteralExpr
+        (slStringLiteralPart))))
+  (classProperty
+    (identifier)
+    (subscriptExpr
+      (subscriptExpr
+        (subscriptExpr
+          (unqualifiedAccessExpr
+            (identifier))
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (slStringLiteralExpr
+          (slStringLiteralPart)))
+      (slStringLiteralExpr
+        (slStringLiteralPart))))
+  (classProperty
+    (identifier)
+    (subscriptExpr
+      (subscriptExpr
+        (unqualifiedAccessExpr
+          (identifier))
+        (slStringLiteralExpr
+          (slStringLiteralPart)))
+      (slStringLiteralExpr
+        (slStringLiteralPart))))
+  (classProperty
+    (identifier)
+    (subscriptExpr
+      (subscriptExpr
+        (subscriptExpr
+          (unqualifiedAccessExpr
+            (identifier))
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (slStringLiteralExpr
+          (slStringLiteralPart)))
+      (slStringLiteralExpr
+        (slStringLiteralPart))))
+  (classProperty
+    (identifier)
+    (subscriptExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (slStringLiteralExpr
+        (slStringLiteralPart))))
+  (classProperty
+    (identifier)
+    (subscriptExpr
+      (subscriptExpr
+        (unqualifiedAccessExpr
+          (identifier))
+        (slStringLiteralExpr
+          (slStringLiteralPart)))
+      (slStringLiteralExpr
+        (slStringLiteralPart))))
+  (classProperty
+    (identifier)
+    (subscriptExpr
+      (subscriptExpr
+        (subscriptExpr
+          (unqualifiedAccessExpr
+            (identifier))
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (slStringLiteralExpr
+          (slStringLiteralPart)))
+      (slStringLiteralExpr
+        (slStringLiteralPart))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (functionLiteralExpr
+          (parameterList)
+          (subscriptExpr
+            (unqualifiedAccessExpr
+              (identifier))
+            (slStringLiteralExpr
+              (slStringLiteralPart)))))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (unqualifiedAccessExpr
+            (identifier)
+            (argumentList
+              (intLiteralExpr)
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (additiveExpr
+            (subscriptExpr
+              (thisExpr)
+              (slStringLiteralExpr
+                (slStringLiteralPart)))
+            (unqualifiedAccessExpr
+              (identifier)
+              (argumentList
+                (intLiteralExpr)
+                (intLiteralExpr)
+                (intLiteralExpr)))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (intLiteralExpr)))))
+  (classProperty
+    (identifier)
+    (amendExpr
+      (parenthesizedExpr
+        (unqualifiedAccessExpr
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (additiveExpr
+            (superSubscriptExpr
+              (slStringLiteralExpr
+                (slStringLiteralPart)))
+            (unqualifiedAccessExpr
+              (identifier)
+              (argumentList
+                (intLiteralExpr)
+                (intLiteralExpr)
+                (intLiteralExpr)))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (multiplicativeExpr
+            (superSubscriptExpr
+              (slStringLiteralExpr
+                (slStringLiteralPart)))
+            (intLiteralExpr))))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectProperty
+          (identifier)
+          (functionLiteralExpr
+            (parameterList
+              (typedIdentifier
+                (identifier)))
+            (newExpr
+              (declaredType
+                (qualifiedIdentifier
+                  (identifier)))
+              (objectBody
+                (objectProperty
+                  (identifier)
+                  (unqualifiedAccessExpr
+                    (identifier)))
+                (objectProperty
+                  (identifier)
+                  (intLiteralExpr))))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (objectBody))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (objectBody))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (objectBody)))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectProperty
+          (identifier)
+          (functionLiteralExpr
+            (parameterList
+              (typedIdentifier
+                (identifier)))
+            (newExpr
+              (declaredType
+                (qualifiedIdentifier
+                  (identifier)))
+              (objectBody
+                (objectProperty
+                  (identifier)
+                  (unqualifiedAccessExpr
+                    (identifier)))
+                (objectProperty
+                  (identifier)
+                  (intLiteralExpr))))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (objectBody))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (objectBody))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (objectBody
+            (objectProperty
+              (identifier)
+              (intLiteralExpr)))))))
+  (classProperty
+    (identifier)
+    (amendExpr
+      (parenthesizedExpr
+        (unqualifiedAccessExpr
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (objectBody))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (objectBody))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (objectBody
+            (objectProperty
+              (identifier)
+              (intLiteralExpr)))))))
+  (classProperty
+    (identifier)
+    (amendExpr
+      (parenthesizedExpr
+        (unqualifiedAccessExpr
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))))))

package/test/corpus/snippetTests/mappings2/stringKeyNotFound.txt

@@ -0,0 +1,57 @@
+===
+mappings2/stringKeyNotFound.pkl
+===
+
+hidden x = new Mapping {
+  when (false) { [0] = 0 }
+  ["xfoo"] = "xfoo"
+  ["fooy"] = "fooy"
+  ["fozo"] = "fozo"
+  ["other"] = "other"
+}
+
+res1 = x["foo"]
+---
+
+(module
+  (classProperty
+    (modifier)
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (whenGenerator
+          (falseLiteralExpr)
+          (objectBody
+            (objectEntry
+              (intLiteralExpr)
+              (intLiteralExpr))))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (slStringLiteralExpr
+            (slStringLiteralPart))))))
+  (classProperty
+    (identifier)
+    (subscriptExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (slStringLiteralExpr
+        (slStringLiteralPart)))))