@apple/tree-sitter-pkl 0.17.0 → 0.18.1

package/test/corpus/snippetTests/api/jsonRenderer3.json.txt

@@ -0,0 +1,334 @@
+===
+api/jsonRenderer3.json.pkl
+===
+
+class Person {
+  name: String
+  age: Int
+}
+
+res1 = "string"
+res2 = true
+res3 = 42
+res4 = 1.23
+res5 = 3.s
+res6 = 4.mb
+res8 = List("string", true, 42)
+res9 = Set("string", true, 42)
+res10 = Map("string", true, 42, 1.23)
+res11 = new Listing { "string"; true; 42 }
+res12 = new Mapping { ["name"] = "pigeon"; ["age"] = 30 }
+res13 = new Dynamic { name = "pigeon"; age = 30 }
+res14 = new Person { name = "pigeon"; age = 30 }
+res15 = null
+res16 = Pair(1, 2)
+res17 = IntSeq(1, 4)
+
+output {
+  renderer = new JsonRenderer {
+    converters {
+      [String] = (_) -> "converted"
+      [Boolean] = (_) -> "converted"
+      [Int] = (_) -> "converted"
+      [Float] = (_) -> "converted"
+      [Duration] = (_) -> "converted"
+      [DataSize] = (_) -> "converted"
+      [List] = (_) -> "converted"
+      [Set] = (_) -> "converted"
+      [Map] = (_) ->"converted"
+      [Listing] = (_) ->"converted"
+      [Mapping] = (_) ->"converted"
+      [Dynamic] = (_) ->"converted"
+      [Person] = (_) -> "converted"
+      [Null] = (_) -> "converted"
+      [Pair] = (_) -> "converted"
+      [IntSeq] = (_) -> "converted"
+    }
+  }
+}
+
+---
+
+(module
+  (clazz
+    (identifier)
+    (classBody
+      (classProperty
+        (identifier)
+        (typeAnnotation
+          (declaredType
+            (qualifiedIdentifier
+              (identifier)))))
+      (classProperty
+        (identifier)
+        (typeAnnotation
+          (declaredType
+            (qualifiedIdentifier
+              (identifier)))))))
+  (classProperty
+    (identifier)
+    (slStringLiteralExpr
+      (slStringLiteralPart)))
+  (classProperty
+    (identifier)
+    (trueLiteralExpr))
+  (classProperty
+    (identifier)
+    (intLiteralExpr))
+  (classProperty
+    (identifier)
+    (floatLiteralExpr))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (intLiteralExpr)
+      (identifier)))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (intLiteralExpr)
+      (identifier)))
+  (classProperty
+    (identifier)
+    (unqualifiedAccessExpr
+      (identifier)
+      (argumentList
+        (slStringLiteralExpr
+          (slStringLiteralPart))
+        (trueLiteralExpr)
+        (intLiteralExpr))))
+  (classProperty
+    (identifier)
+    (unqualifiedAccessExpr
+      (identifier)
+      (argumentList
+        (slStringLiteralExpr
+          (slStringLiteralPart))
+        (trueLiteralExpr)
+        (intLiteralExpr))))
+  (classProperty
+    (identifier)
+    (unqualifiedAccessExpr
+      (identifier)
+      (argumentList
+        (slStringLiteralExpr
+          (slStringLiteralPart))
+        (trueLiteralExpr)
+        (intLiteralExpr)
+        (floatLiteralExpr))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (objectElement
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (objectElement
+          (trueLiteralExpr))
+        (objectElement
+          (intLiteralExpr)))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (objectEntry
+          (slStringLiteralExpr
+            (slStringLiteralPart))
+          (intLiteralExpr)))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (objectProperty
+          (identifier)
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (objectProperty
+          (identifier)
+          (intLiteralExpr)))))
+  (classProperty
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody
+        (objectProperty
+          (identifier)
+          (slStringLiteralExpr
+            (slStringLiteralPart)))
+        (objectProperty
+          (identifier)
+          (intLiteralExpr)))))
+  (classProperty
+    (identifier)
+    (nullLiteralExpr))
+  (classProperty
+    (identifier)
+    (unqualifiedAccessExpr
+      (identifier)
+      (argumentList
+        (intLiteralExpr)
+        (intLiteralExpr))))
+  (classProperty
+    (identifier)
+    (unqualifiedAccessExpr
+      (identifier)
+      (argumentList
+        (intLiteralExpr)
+        (intLiteralExpr))))
+  (classProperty
+    (identifier)
+    (objectBody
+      (objectProperty
+        (identifier)
+        (newExpr
+          (declaredType
+            (qualifiedIdentifier
+              (identifier)))
+          (objectBody
+            (objectProperty
+              (identifier)
+              (objectBody
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))
+                (objectEntry
+                  (unqualifiedAccessExpr
+                    (identifier))
+                  (functionLiteralExpr
+                    (parameterList
+                      (blankIdentifier))
+                    (slStringLiteralExpr
+                      (slStringLiteralPart))))))))))))

package/test/corpus/snippetTests/api/jsonRenderer4.txt

@@ -0,0 +1,388 @@
+===
+api/jsonRenderer4.pkl
+===
+
+import "pkl:test"
+
+class Person {
+  name: String
+  age: Int
+}
+
+typealias Email = String
+
+local renderer = new JsonRenderer {}
+
+res1 = renderer.renderValue(123)
+res2 = renderer.renderValue(1.23)
+res3 = renderer.renderValue(false)
+res4 = renderer.renderValue("pigeon")
+res6 = renderer.renderValue(List("pigeon", "parrot"))
+res7 = renderer.renderValue(Set("pigeon", "parrot"))
+res8 = renderer.renderValue(Map("name", "pigeon", "age", 42))
+res9 = renderer.renderValue(new Listing { "pigeon"; "parrot" })
+res10 = renderer.renderValue(new Mapping { ["name"] = "pigeon"; ["age"] = 42 })
+res11 = renderer.renderValue(new Dynamic { name = "pigeon"; age = 42 })
+res12 = renderer.renderValue(new Person { name = "pigeon"; age = 42 })
+res13 = renderer.renderValue(null)
+
+res14 = test.catch(() -> renderer.renderValue(1.min))
+res15 = test.catch(() -> renderer.renderValue(Pair(1, 2)))
+res16 = test.catch(() -> renderer.renderValue(1.mb))
+res17 = test.catch(() -> renderer.renderValue(Person))
+res18 = test.catch(() -> renderer.renderValue(Email))
+res19 = test.catch(() -> renderer.renderValue((x) -> x))
+res20 = test.catch(() -> new JsonRenderer { converters { [Int] = (_) -> throw("ouch") } }.renderValue(42))
+res21 = test.catch(() -> renderer.renderValue(IntSeq(1, 4)))
+
+---
+
+(module
+  (importClause
+    (stringConstant
+      (slStringLiteralPart)))
+  (clazz
+    (identifier)
+    (classBody
+      (classProperty
+        (identifier)
+        (typeAnnotation
+          (declaredType
+            (qualifiedIdentifier
+              (identifier)))))
+      (classProperty
+        (identifier)
+        (typeAnnotation
+          (declaredType
+            (qualifiedIdentifier
+              (identifier)))))))
+  (typeAlias
+    (identifier)
+    (declaredType
+      (qualifiedIdentifier
+        (identifier))))
+  (classProperty
+    (modifier)
+    (identifier)
+    (newExpr
+      (declaredType
+        (qualifiedIdentifier
+          (identifier)))
+      (objectBody)))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (intLiteralExpr))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (floatLiteralExpr))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (falseLiteralExpr))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (slStringLiteralExpr
+          (slStringLiteralPart)))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (unqualifiedAccessExpr
+          (identifier)
+          (argumentList
+            (slStringLiteralExpr
+              (slStringLiteralPart))
+            (slStringLiteralExpr
+              (slStringLiteralPart)))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (unqualifiedAccessExpr
+          (identifier)
+          (argumentList
+            (slStringLiteralExpr
+              (slStringLiteralPart))
+            (slStringLiteralExpr
+              (slStringLiteralPart)))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (unqualifiedAccessExpr
+          (identifier)
+          (argumentList
+            (slStringLiteralExpr
+              (slStringLiteralPart))
+            (slStringLiteralExpr
+              (slStringLiteralPart))
+            (slStringLiteralExpr
+              (slStringLiteralPart))
+            (intLiteralExpr))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (newExpr
+          (declaredType
+            (qualifiedIdentifier
+              (identifier)))
+          (objectBody
+            (objectElement
+              (slStringLiteralExpr
+                (slStringLiteralPart)))
+            (objectElement
+              (slStringLiteralExpr
+                (slStringLiteralPart))))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (newExpr
+          (declaredType
+            (qualifiedIdentifier
+              (identifier)))
+          (objectBody
+            (objectEntry
+              (slStringLiteralExpr
+                (slStringLiteralPart))
+              (slStringLiteralExpr
+                (slStringLiteralPart)))
+            (objectEntry
+              (slStringLiteralExpr
+                (slStringLiteralPart))
+              (intLiteralExpr)))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (newExpr
+          (declaredType
+            (qualifiedIdentifier
+              (identifier)))
+          (objectBody
+            (objectProperty
+              (identifier)
+              (slStringLiteralExpr
+                (slStringLiteralPart)))
+            (objectProperty
+              (identifier)
+              (intLiteralExpr)))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (newExpr
+          (declaredType
+            (qualifiedIdentifier
+              (identifier)))
+          (objectBody
+            (objectProperty
+              (identifier)
+              (slStringLiteralExpr
+                (slStringLiteralPart)))
+            (objectProperty
+              (identifier)
+              (intLiteralExpr)))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (nullLiteralExpr))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (functionLiteralExpr
+          (parameterList)
+          (qualifiedAccessExpr
+            (unqualifiedAccessExpr
+              (identifier))
+            (identifier)
+            (argumentList
+              (qualifiedAccessExpr
+                (intLiteralExpr)
+                (identifier))))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (functionLiteralExpr
+          (parameterList)
+          (qualifiedAccessExpr
+            (unqualifiedAccessExpr
+              (identifier))
+            (identifier)
+            (argumentList
+              (unqualifiedAccessExpr
+                (identifier)
+                (argumentList
+                  (intLiteralExpr)
+                  (intLiteralExpr)))))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (functionLiteralExpr
+          (parameterList)
+          (qualifiedAccessExpr
+            (unqualifiedAccessExpr
+              (identifier))
+            (identifier)
+            (argumentList
+              (qualifiedAccessExpr
+                (intLiteralExpr)
+                (identifier))))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (functionLiteralExpr
+          (parameterList)
+          (qualifiedAccessExpr
+            (unqualifiedAccessExpr
+              (identifier))
+            (identifier)
+            (argumentList
+              (unqualifiedAccessExpr
+                (identifier))))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (functionLiteralExpr
+          (parameterList)
+          (qualifiedAccessExpr
+            (unqualifiedAccessExpr
+              (identifier))
+            (identifier)
+            (argumentList
+              (unqualifiedAccessExpr
+                (identifier))))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (functionLiteralExpr
+          (parameterList)
+          (qualifiedAccessExpr
+            (unqualifiedAccessExpr
+              (identifier))
+            (identifier)
+            (argumentList
+              (functionLiteralExpr
+                (parameterList
+                  (typedIdentifier
+                    (identifier)))
+                (unqualifiedAccessExpr
+                  (identifier)))))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (functionLiteralExpr
+          (parameterList)
+          (qualifiedAccessExpr
+            (newExpr
+              (declaredType
+                (qualifiedIdentifier
+                  (identifier)))
+              (objectBody
+                (objectProperty
+                  (identifier)
+                  (objectBody
+                    (objectEntry
+                      (unqualifiedAccessExpr
+                        (identifier))
+                      (functionLiteralExpr
+                        (parameterList
+                          (blankIdentifier))
+                        (throwExpr
+                          (slStringLiteralExpr
+                            (slStringLiteralPart)))))))))
+            (identifier)
+            (argumentList
+              (intLiteralExpr)))))))
+  (classProperty
+    (identifier)
+    (qualifiedAccessExpr
+      (unqualifiedAccessExpr
+        (identifier))
+      (identifier)
+      (argumentList
+        (functionLiteralExpr
+          (parameterList)
+          (qualifiedAccessExpr
+            (unqualifiedAccessExpr
+              (identifier))
+            (identifier)
+            (argumentList
+              (unqualifiedAccessExpr
+                (identifier)
+                (argumentList
+                  (intLiteralExpr)
+                  (intLiteralExpr))))))))))