@apple/tree-sitter-pkl 0.19.0 → 0.21.0

package/test/corpus/snippetTests/classes/constraints12.txt

@@ -1,204 +0,0 @@
-===
-classes/constraints12.pkl
-===
-
-import "pkl:test"
-
-abstract class Base {
-  x: Int = 1
-}
-
-class Derived extends Base {
-  y: Int(this > super.x) = 2
-
-  yy: Int(isValid1) = 2
-  yyy: Int(isValid2) = 2
-
-  local isValid1 = (n) -> n > x
-  hidden isValid2 = (n) -> n > x
-}
-
-res1 = new Derived {}
-
-res2 = (res1) {
-  y = 3
-  yy = 3
-  yyy = 3
-}
-
-res3 = (res2) {
-  x = 2
-}
-
-res4 = test.catch(() -> (res3) { y = 0 }.y)
-res5 = test.catch(() -> (res3) { yy = 0 }.yy)
-res6 = test.catch(() -> (res3) { yyy = 0 }.yyy)
-
----
-
-(module
-  (importClause
-    (stringConstant
-      (slStringLiteralPart)))
-  (clazz
-    (modifier)
-    (identifier)
-    (classBody
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (declaredType
-            (qualifiedIdentifier
-              (identifier))))
-        (intLiteralExpr))))
-  (clazz
-    (identifier)      (classExtendsClause
-      (qualifiedIdentifier
-        (identifier)))
-    (classBody
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (constrainedType
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (comparisonExpr
-              (thisExpr)
-              (superAccessExpr
-                (identifier)))))
-        (intLiteralExpr))
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (constrainedType
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (unqualifiedAccessExpr
-              (identifier))))
-        (intLiteralExpr))
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (constrainedType
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (unqualifiedAccessExpr
-              (identifier))))
-        (intLiteralExpr))
-      (classProperty
-        (modifier)
-        (identifier)
-        (functionLiteralExpr
-          (parameterList
-            (typedIdentifier
-              (identifier)))
-          (comparisonExpr
-            (unqualifiedAccessExpr
-              (identifier))
-            (unqualifiedAccessExpr
-              (identifier)))))
-      (classProperty
-        (modifier)
-        (identifier)
-        (functionLiteralExpr
-          (parameterList
-            (typedIdentifier
-              (identifier)))
-          (comparisonExpr
-            (unqualifiedAccessExpr
-              (identifier))
-            (unqualifiedAccessExpr
-              (identifier)))))))
-  (classProperty
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody)))
-  (classProperty
-    (identifier)
-    (amendExpr
-      (parenthesizedExpr
-        (unqualifiedAccessExpr
-          (identifier)))
-      (objectBody
-        (objectProperty
-          (identifier)
-          (intLiteralExpr))
-        (objectProperty
-          (identifier)
-          (intLiteralExpr))
-        (objectProperty
-          (identifier)
-          (intLiteralExpr)))))
-  (classProperty
-    (identifier)
-    (amendExpr
-      (parenthesizedExpr
-        (unqualifiedAccessExpr
-          (identifier)))
-      (objectBody
-        (objectProperty
-          (identifier)
-          (intLiteralExpr)))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (qualifiedAccessExpr
-            (amendExpr
-              (parenthesizedExpr
-                (unqualifiedAccessExpr
-                  (identifier)))
-              (objectBody
-                (objectProperty
-                  (identifier)
-                  (intLiteralExpr))))
-            (identifier))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (qualifiedAccessExpr
-            (amendExpr
-              (parenthesizedExpr
-                (unqualifiedAccessExpr
-                  (identifier)))
-              (objectBody
-                (objectProperty
-                  (identifier)
-                  (intLiteralExpr))))
-            (identifier))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (qualifiedAccessExpr
-            (amendExpr
-              (parenthesizedExpr
-                (unqualifiedAccessExpr
-                  (identifier)))
-              (objectBody
-                (objectProperty
-                  (identifier)
-                  (intLiteralExpr))))
-            (identifier)))))))

package/test/corpus/snippetTests/classes/constraints13.txt

@@ -1,86 +0,0 @@
-===
-classes/constraints13.pkl
-===
-
-import "pkl:test"
-
-const local isOddLengthOfBirds = (it: Listing<Bird>) -> it.length.isOdd
-
-class Bird
-
-class MyTest {
-  birds: Listing(isOddLengthOfBirds) = new {
-    1
-    2
-    3
-  }
-}
-
-res = test.catch(() -> new MyTest {}.birds)
-
----
-
-(module
-  (importClause
-    (stringConstant
-      (slStringLiteralPart)))
-  (classProperty
-    (modifier)
-    (modifier)
-    (identifier)
-    (functionLiteralExpr
-      (parameterList
-        (typedIdentifier
-          (identifier)
-          (typeAnnotation
-            (declaredType
-              (qualifiedIdentifier
-                (identifier))
-              (typeArgumentList
-                (declaredType
-                  (qualifiedIdentifier
-                    (identifier))))))))
-      (qualifiedAccessExpr
-        (qualifiedAccessExpr
-          (unqualifiedAccessExpr
-            (identifier))
-          (identifier))
-        (identifier))))
-  (clazz
-    (identifier))
-  (clazz
-    (identifier)
-    (classBody
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (constrainedType
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (unqualifiedAccessExpr
-              (identifier))))
-        (newExpr
-          (objectBody
-            (objectElement
-              (intLiteralExpr))
-            (objectElement
-              (intLiteralExpr))
-            (objectElement
-              (intLiteralExpr)))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (qualifiedAccessExpr
-            (newExpr
-              (declaredType
-                (qualifiedIdentifier
-                  (identifier)))
-              (objectBody))
-            (identifier)))))))

package/test/corpus/snippetTests/classes/constraints14.txt

@@ -1,39 +0,0 @@
-===
-classes/constraints14.pkl
-===
-
-amends ".../input-helper/classes/MyClass.pkl"
-
-myClass {
-  emails {
-    "foo@bar.com"
-  }
-}
-
-others {
-  import(".../input-helper/classes/myClass1.pkl")
-}
-
----
-
-(module
-  (moduleHeader
-      (extendsOrAmendsClause
-      (stringConstant
-        (slStringLiteralPart))))
-  (classProperty
-    (identifier)
-    (objectBody
-      (objectProperty
-        (identifier)
-        (objectBody
-          (objectElement
-            (slStringLiteralExpr
-              (slStringLiteralPart)))))))
-  (classProperty
-    (identifier)
-    (objectBody
-      (objectElement
-        (importExpr
-          (stringConstant
-            (slStringLiteralPart)))))))

package/test/corpus/snippetTests/classes/constraints15.txt

@@ -1,26 +0,0 @@
-===
-classes/constraints15.pkl
-===
-
-res1: String(length >= 3, length <= 5) = "abcd"
-
----
-
-(module
-  (classProperty
-    (identifier)
-    (typeAnnotation
-      (constrainedType
-        (declaredType
-          (qualifiedIdentifier
-            (identifier)))
-        (comparisonExpr
-          (unqualifiedAccessExpr
-            (identifier))
-          (intLiteralExpr))
-        (comparisonExpr
-          (unqualifiedAccessExpr
-            (identifier))
-          (intLiteralExpr))))
-    (slStringLiteralExpr
-      (slStringLiteralPart))))

package/test/corpus/snippetTests/classes/constraints2.txt

@@ -1,69 +0,0 @@
-===
-classes/constraints2.pkl
-===
-
-import "pkl:test"
-
-class Person {
-  age: Int(this > 0)
-}
-
-res1 = new Person {
-  age = 30
-}
-
-res2 = test.catch(() ->
-  new Person {
-    age = -30
-  }.age
-)
-
----
-
-(module
-  (importClause
-    (stringConstant
-      (slStringLiteralPart)))
-  (clazz
-    (identifier)
-    (classBody
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (constrainedType
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (comparisonExpr
-              (thisExpr)
-              (intLiteralExpr)))))))
-  (classProperty
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectProperty
-          (identifier)
-          (intLiteralExpr)))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (qualifiedAccessExpr
-            (newExpr
-              (declaredType
-                (qualifiedIdentifier
-                  (identifier)))
-              (objectBody
-                (objectProperty
-                  (identifier)
-                  (unaryMinusExpr
-                    (intLiteralExpr)))))
-            (identifier)))))))

package/test/corpus/snippetTests/classes/constraints3.txt

@@ -1,97 +0,0 @@
-===
-classes/constraints3.pkl
-===
-
-import "pkl:test"
-
-class Person {
-  address: Address(street.endsWith("St."))
-}
-
-class Address {
-  street: String
-}
-
-res1 = new Person {
-  address {
-    street = "Hampton St."
-  }
-}
-
-res2 = test.catch(() ->
-  new Person {
-    address {
-      street = "Garlic Blvd."
-    }
-  }.address
-)
-
----
-
-(module
-  (importClause
-    (stringConstant
-      (slStringLiteralPart)))
-  (clazz
-    (identifier)
-    (classBody
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (constrainedType
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (qualifiedAccessExpr
-              (unqualifiedAccessExpr
-                (identifier))
-              (identifier)
-              (argumentList
-                (slStringLiteralExpr
-                  (slStringLiteralPart)))))))))
-  (clazz
-    (identifier)
-    (classBody
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (declaredType
-            (qualifiedIdentifier
-              (identifier)))))))
-  (classProperty
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectProperty
-          (identifier)
-          (objectBody
-            (objectProperty
-              (identifier)
-              (slStringLiteralExpr
-                (slStringLiteralPart))))))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (qualifiedAccessExpr
-            (newExpr
-              (declaredType
-                (qualifiedIdentifier
-                  (identifier)))
-              (objectBody
-                (objectProperty
-                  (identifier)
-                  (objectBody
-                    (objectProperty
-                      (identifier)
-                      (slStringLiteralExpr
-                        (slStringLiteralPart)))))))
-            (identifier)))))))

package/test/corpus/snippetTests/classes/constraints4.txt

@@ -1,86 +0,0 @@
-===
-classes/constraints4.pkl
-===
-
-import "pkl:test"
-
-class Gauge {
-  min: Int
-  max: Int(this >= min)
-}
-
-res1 = new Gauge {
-  min = 4
-  max = 6
-}
-
-res2 = test.catch(() ->
-  new Gauge {
-    min = 4
-    max = 3
-  }.max
-)
-
-
-
----
-
-(module
-  (importClause
-    (stringConstant
-      (slStringLiteralPart)))
-  (clazz
-    (identifier)
-    (classBody
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (declaredType
-            (qualifiedIdentifier
-              (identifier)))))
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (constrainedType
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (comparisonExpr
-              (thisExpr)
-              (unqualifiedAccessExpr
-                (identifier))))))))
-  (classProperty
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectProperty
-          (identifier)
-          (intLiteralExpr))
-        (objectProperty
-          (identifier)
-          (intLiteralExpr)))))
-  (classProperty
-    (identifier)
-    (qualifiedAccessExpr
-      (unqualifiedAccessExpr
-        (identifier))
-      (identifier)
-      (argumentList
-        (functionLiteralExpr
-          (parameterList)
-          (qualifiedAccessExpr
-            (newExpr
-              (declaredType
-                (qualifiedIdentifier
-                  (identifier)))
-              (objectBody
-                (objectProperty
-                  (identifier)
-                  (intLiteralExpr))
-                (objectProperty
-                  (identifier)
-                  (intLiteralExpr))))
-            (identifier)))))))

package/test/corpus/snippetTests/classes/constraints5.txt

@@ -1,71 +0,0 @@
-===
-classes/constraints5.pkl
-===
-
-class Gauge {
-  min: Int
-  max: Int(this >= min)
-}
-
-res1 = new Gauge {
-  min = 4
-  max = 6
-}
-
-res2 = new Gauge {
-  min = 4
-  max = 3
-}
-
-
-
-
----
-
-(module
-  (clazz
-    (identifier)
-    (classBody
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (declaredType
-            (qualifiedIdentifier
-              (identifier)))))
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (constrainedType
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (comparisonExpr
-              (thisExpr)
-              (unqualifiedAccessExpr
-                (identifier))))))))
-  (classProperty
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectProperty
-          (identifier)
-          (intLiteralExpr))
-        (objectProperty
-          (identifier)
-          (intLiteralExpr)))))
-  (classProperty
-    (identifier)
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (objectProperty
-          (identifier)
-          (intLiteralExpr))
-        (objectProperty
-          (identifier)
-          (intLiteralExpr))))))