@apple/tree-sitter-pkl 0.19.0 → 0.21.0

package/test/corpus/snippetTests/listings/listing3.txt

@@ -1,490 +0,0 @@
-===
-listings/listing3.pkl
-===
-
-
-import "pkl:test"
-import "pkl:math"
-
-local x = new Listing {
-  "one"
-  "two"
-  "th" + "ree"
-}
-
-res1 = x[0]
-res2 = x[1]
-res3 = x[2]
-res4 = test.catch(() -> x[-1])
-res5 = test.catch(() -> x[3])
-res6 = test.catch(() -> x[math.minInt])
-res7 = test.catch(() -> x[math.maxInt])
-
-local y = new Listing {
-  new Listing {
-    "one"
-  }
- new Listing {
-    "two"
-    "th" + "ree"
-  }
-  new Mapping {
-    ["four"] = 4
-  }
-}
-
-res8 = y[0][0]
-res9 = y[1][0]
-res10 = y[1][1]
-res11 = y[2]["four"]
-res12 = test.catch(() -> y[3][0])
-res13 = test.catch(() -> y[1][2])
-res14 = test.catch(() -> y[2]["other"])
-
-res15 = new Listing {
-  "one"
-  this[0]
-  "two"
-  this[2]
-  this[1]
-}
-
-res16 = (res15) {
-  "three"
-  this[0]
-  this[5]
-}
-
-res17 = new Listing {
-  "item"
-  this[0] + "2"
-}
-
-res18 = (res17) {
-  [0] = "element"
-  this[0] + "3"
-}
-
-res19 = (res18) {
-  [0] = "object"
-  this[0] + "4"
-}
-
-res20 = (x) {
-  [0] = super[0] + "2"
-  [1] = super[0] + "3"
-  super[0] + "4"
-  this[0] + "4"
-}
-
-local err0 = new Listing {
-  "foo"
-  this[3]
-}
-res21 = test.catch(() -> err0[1])
-
-res22 = new Listing {
-  super[0]
-  super[3]
-}
-
-
-
----
-
-(module
-  (importClause
-    (stringConstant
-      (slStringLiteralPart)))
-  (importClause
-    (stringConstant
-      (slStringLiteralPart)))
-  (classProperty
-    (modifier)
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectElement
-          (slStringLiteralExpr
-            (slStringLiteralPart)))
-        (objectElement
-          (slStringLiteralExpr
-            (slStringLiteralPart)))
-        (objectElement
-          (additiveExpr
-            (slStringLiteralExpr
-              (slStringLiteralPart))
-            (slStringLiteralExpr
-              (slStringLiteralPart)))))))
-  (classProperty
-    (identifier)
-    (subscriptExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (intLiteralExpr)))
-  (classProperty
-    (identifier)
-    (subscriptExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (intLiteralExpr)))
-  (classProperty
-    (identifier)
-    (subscriptExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (intLiteralExpr)))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (subscriptExpr
-            (unqualifiedAccessExpr
-              (identifier))
-            (unaryMinusExpr
-              (intLiteralExpr)))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (subscriptExpr
-            (unqualifiedAccessExpr
-              (identifier))
-            (intLiteralExpr))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (subscriptExpr
-            (unqualifiedAccessExpr
-              (identifier))
-            (qualifiedAccessExpr
-              (unqualifiedAccessExpr
-                (identifier))
-              (identifier)))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (subscriptExpr
-            (unqualifiedAccessExpr
-              (identifier))
-            (qualifiedAccessExpr
-              (unqualifiedAccessExpr
-                (identifier))
-              (identifier)))))))
-  (classProperty
-    (modifier)
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectElement
-          (newExpr
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (objectBody
-              (objectElement
-                (slStringLiteralExpr
-                  (slStringLiteralPart))))))
-        (objectElement
-          (newExpr
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (objectBody
-              (objectElement
-                (slStringLiteralExpr
-                  (slStringLiteralPart)))
-              (objectElement
-                (additiveExpr
-                  (slStringLiteralExpr
-                    (slStringLiteralPart))
-                  (slStringLiteralExpr
-                    (slStringLiteralPart)))))))
-        (objectElement
-          (newExpr
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (objectBody
-              (objectEntry
-                (slStringLiteralExpr
-                  (slStringLiteralPart))
-                (intLiteralExpr))))))))
-  (classProperty
-    (identifier)
-    (subscriptExpr
-      (subscriptExpr
-        (unqualifiedAccessExpr
-          (identifier))
-        (intLiteralExpr))
-      (intLiteralExpr)))
-  (classProperty
-    (identifier)
-    (subscriptExpr
-      (subscriptExpr
-        (unqualifiedAccessExpr
-          (identifier))
-        (intLiteralExpr))
-      (intLiteralExpr)))
-  (classProperty
-    (identifier)
-    (subscriptExpr
-      (subscriptExpr
-        (unqualifiedAccessExpr
-          (identifier))
-        (intLiteralExpr))
-      (intLiteralExpr)))
-  (classProperty
-    (identifier)
-    (subscriptExpr
-      (subscriptExpr
-        (unqualifiedAccessExpr
-          (identifier))
-        (intLiteralExpr))
-      (slStringLiteralExpr
-        (slStringLiteralPart))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (subscriptExpr
-            (subscriptExpr
-              (unqualifiedAccessExpr
-                (identifier))
-              (intLiteralExpr))
-            (intLiteralExpr))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (subscriptExpr
-            (subscriptExpr
-              (unqualifiedAccessExpr
-                (identifier))
-              (intLiteralExpr))
-            (intLiteralExpr))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (subscriptExpr
-            (subscriptExpr
-              (unqualifiedAccessExpr
-                (identifier))
-              (intLiteralExpr))
-            (slStringLiteralExpr
-              (slStringLiteralPart)))))))
-  (classProperty
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectElement
-          (slStringLiteralExpr
-            (slStringLiteralPart)))
-        (objectElement
-          (subscriptExpr
-            (thisExpr)
-            (intLiteralExpr)))
-        (objectElement
-          (slStringLiteralExpr
-            (slStringLiteralPart)))
-        (objectElement
-          (subscriptExpr
-            (thisExpr)
-            (intLiteralExpr)))
-        (objectElement
-          (subscriptExpr
-            (thisExpr)
-            (intLiteralExpr))))))
-  (classProperty
-    (identifier)
-    (amendExpr
-      (parenthesizedExpr
-        (unqualifiedAccessExpr
-          (identifier)))
-      (objectBody
-        (objectElement
-          (slStringLiteralExpr
-            (slStringLiteralPart)))
-        (objectElement
-          (subscriptExpr
-            (thisExpr)
-            (intLiteralExpr)))
-        (objectElement
-          (subscriptExpr
-            (thisExpr)
-            (intLiteralExpr))))))
-  (classProperty
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectElement
-          (slStringLiteralExpr
-            (slStringLiteralPart)))
-        (objectElement
-          (additiveExpr
-            (subscriptExpr
-              (thisExpr)
-              (intLiteralExpr))
-            (slStringLiteralExpr
-              (slStringLiteralPart)))))))
-  (classProperty
-    (identifier)
-    (amendExpr
-      (parenthesizedExpr
-        (unqualifiedAccessExpr
-          (identifier)))
-      (objectBody
-        (objectEntry
-          (intLiteralExpr)
-          (slStringLiteralExpr
-            (slStringLiteralPart)))
-        (objectElement
-          (additiveExpr
-            (subscriptExpr
-              (thisExpr)
-              (intLiteralExpr))
-            (slStringLiteralExpr
-              (slStringLiteralPart)))))))
-  (classProperty
-    (identifier)
-    (amendExpr
-      (parenthesizedExpr
-        (unqualifiedAccessExpr
-          (identifier)))
-      (objectBody
-        (objectEntry
-          (intLiteralExpr)
-          (slStringLiteralExpr
-            (slStringLiteralPart)))
-        (objectElement
-          (additiveExpr
-            (subscriptExpr
-              (thisExpr)
-              (intLiteralExpr))
-            (slStringLiteralExpr
-              (slStringLiteralPart)))))))
-  (classProperty
-    (identifier)
-    (amendExpr
-      (parenthesizedExpr
-        (unqualifiedAccessExpr
-          (identifier)))
-      (objectBody
-        (objectEntry
-          (intLiteralExpr)
-          (additiveExpr
-            (superSubscriptExpr
-              (intLiteralExpr))
-            (slStringLiteralExpr
-              (slStringLiteralPart))))
-        (objectEntry
-          (intLiteralExpr)
-          (additiveExpr
-            (superSubscriptExpr
-              (intLiteralExpr))
-            (slStringLiteralExpr
-              (slStringLiteralPart))))
-        (objectElement
-          (additiveExpr
-            (superSubscriptExpr
-              (intLiteralExpr))
-            (slStringLiteralExpr
-              (slStringLiteralPart))))
-        (objectElement
-          (additiveExpr
-            (subscriptExpr
-              (thisExpr)
-              (intLiteralExpr))
-            (slStringLiteralExpr
-              (slStringLiteralPart)))))))
-  (classProperty
-    (modifier)
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectElement
-          (slStringLiteralExpr
-            (slStringLiteralPart)))
-        (objectElement
-          (subscriptExpr
-            (thisExpr)
-            (intLiteralExpr))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (subscriptExpr
-            (unqualifiedAccessExpr
-              (identifier))
-            (intLiteralExpr))))))
-  (classProperty
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectElement
-          (superSubscriptExpr
-            (intLiteralExpr)))
-        (objectElement
-          (superSubscriptExpr
-            (intLiteralExpr)))))))

package/test/corpus/snippetTests/listings/listing4.txt

@@ -1,156 +0,0 @@
-===
-listings/listing4.pkl
-===
-
-amends "../snippetTest.pkl"
-
-examples {
-  ["listings are lazy"] {
-    local listing = new Listing<String> {
-      "foo"
-      throw("uh oh")
-    }
-    listing[0]
-    module.catch(() -> listing[1])
-  }
-  ["listings are lazy with generator entries"] {
-    local listing = new Listing<String> {
-      when (false) {
-        "uh oh"
-      }
-      "foo"
-      throw("uh oh")
-    }
-    listing[0]
-  }
-  ["nested listings are also lazy"] {
-    local listing = new Listing<Listing<String>> {
-      new {
-        "bar"
-        throw("uh oh")
-      }
-    }
-    listing[0][0]
-  }
-}
-
----
-
-(module
-  (moduleHeader
-      (extendsOrAmendsClause
-      (stringConstant
-        (slStringLiteralPart))))
-  (classProperty
-    (identifier)
-    (objectBody
-      (objectEntry
-        (slStringLiteralExpr
-          (slStringLiteralPart))
-        (objectBody
-          (objectProperty
-            (modifier)
-            (identifier)
-            (newExpr
-              (declaredType
-                (qualifiedIdentifier
-                  (identifier))
-                (typeArgumentList
-                  (declaredType
-                    (qualifiedIdentifier
-                      (identifier)))))
-              (objectBody
-                (objectElement
-                  (slStringLiteralExpr
-                    (slStringLiteralPart)))
-                (objectElement
-                  (throwExpr
-                    (slStringLiteralExpr
-                      (slStringLiteralPart)))))))
-          (objectElement
-            (subscriptExpr
-              (unqualifiedAccessExpr
-                (identifier))
-              (intLiteralExpr)))
-          (objectElement
-            (qualifiedAccessExpr
-              (moduleExpr)
-              (identifier)
-              (argumentList
-                (functionLiteralExpr
-                  (parameterList)
-                  (subscriptExpr
-                    (unqualifiedAccessExpr
-                      (identifier))
-                    (intLiteralExpr))))))))
-      (objectEntry
-        (slStringLiteralExpr
-          (slStringLiteralPart))
-        (objectBody
-          (objectProperty
-            (modifier)
-            (identifier)
-            (newExpr
-              (declaredType
-                (qualifiedIdentifier
-                  (identifier))
-                (typeArgumentList
-                  (declaredType
-                    (qualifiedIdentifier
-                      (identifier)))))
-              (objectBody
-                (whenGenerator
-                  (falseLiteralExpr)
-                  (objectBody
-                    (objectElement
-                      (slStringLiteralExpr
-                        (slStringLiteralPart)))))
-                (objectElement
-                  (slStringLiteralExpr
-                    (slStringLiteralPart)))
-                (objectElement
-                  (throwExpr
-                    (slStringLiteralExpr
-                      (slStringLiteralPart)))))))
-          (objectElement
-            (subscriptExpr
-              (unqualifiedAccessExpr
-                (identifier))
-              (intLiteralExpr)))))
-      (objectEntry
-        (slStringLiteralExpr
-          (slStringLiteralPart))
-        (objectBody
-          (objectProperty
-            (modifier)
-            (identifier)
-            (newExpr
-              (declaredType
-                (qualifiedIdentifier
-                  (identifier))
-                (typeArgumentList
-                  (declaredType
-                    (qualifiedIdentifier
-                      (identifier))
-                    (typeArgumentList
-                      (declaredType
-                        (qualifiedIdentifier
-                          (identifier)))))))
-              (objectBody
-                (objectElement
-                  (newExpr
-                    (objectBody
-                      (objectElement
-                        (slStringLiteralExpr
-                          (slStringLiteralPart)))
-                      (objectElement
-                        (throwExpr
-                          (slStringLiteralExpr
-                            (slStringLiteralPart))))))))))
-          (objectElement
-            (subscriptExpr
-              (subscriptExpr
-                (unqualifiedAccessExpr
-                  (identifier))
-                (intLiteralExpr))
-              (intLiteralExpr))))))))