@apple/tree-sitter-pkl 0.19.0 → 0.21.0

package/test/corpus/snippetTests/generators/forGeneratorInMixins.txt

@@ -1,301 +0,0 @@
-===
-generators/forGeneratorInMixins.pkl
-===
-
-foo {
-  bar = new Listing {} |> mapEnv(new Dynamic {
-    res1Name = "res1Value"
-    res2Name = "res2Value"
-  })
-  baz = new Listing {} |> mapEnvLiteral(new Dynamic {
-    res3Name = "res3Value"
-    res4Name = "res4Value"
-  })
-}
-
-function mapEnv(_env: Dynamic) = new Mixin {
-  for (k, v in _env) {
-    new {
-      name = k
-      value = v
-    }
-  }
-  for (k, v in _env) {
-    new {
-      name = k + " 2"
-      value = v + " 2"
-    }
-  }
-}
-
-function mapEnvLiteral(_env: Dynamic) = (it) -> (it) {
-  for (k, v in _env) {
-    new {
-      name = k
-      value = v
-    }
-  }
-  for (k, v in _env) {
-    new {
-      name = k + " 2"
-      value = v + " 2"
-    }
-  }
-}
-
-function addElements(keys: List<String>): Mixin<Mapping<String, String>> = new {
-  for (key in keys) {
-    [key] = key
-  }
-}
-
-res = new Mapping<String, String> {
-  ["base"] = "alreadyThere"
-} |> addElements(List("newElement"))
-
----
-
-(module
-  (classProperty
-    (identifier)
-    (objectBody
-      (objectProperty
-        (identifier)
-        (pipeExpr
-          (newExpr
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (objectBody))
-          (unqualifiedAccessExpr
-            (identifier)
-            (argumentList
-              (newExpr
-                (declaredType
-                  (qualifiedIdentifier
-                    (identifier)))
-                (objectBody
-                  (objectProperty
-                    (identifier)
-                    (slStringLiteralExpr
-                      (slStringLiteralPart)))
-                  (objectProperty
-                    (identifier)
-                    (slStringLiteralExpr
-                      (slStringLiteralPart)))))))))
-      (objectProperty
-        (identifier)
-        (pipeExpr
-          (newExpr
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (objectBody))
-          (unqualifiedAccessExpr
-            (identifier)
-            (argumentList
-              (newExpr
-                (declaredType
-                  (qualifiedIdentifier
-                    (identifier)))
-                (objectBody
-                  (objectProperty
-                    (identifier)
-                    (slStringLiteralExpr
-                      (slStringLiteralPart)))
-                  (objectProperty
-                    (identifier)
-                    (slStringLiteralExpr
-                      (slStringLiteralPart)))))))))))
-  (classMethod
-    (methodHeader
-      (identifier)
-      (parameterList
-        (typedIdentifier
-          (identifier)
-          (typeAnnotation
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))))))
-    (newExpr
-      (declaredType
-        (qualifiedIdentifier
-          (identifier)))
-      (objectBody
-        (forGenerator
-          (typedIdentifier
-            (identifier))
-          (typedIdentifier
-            (identifier))
-          (unqualifiedAccessExpr
-            (identifier))
-          (objectBody
-            (objectElement
-              (newExpr
-                (objectBody
-                  (objectProperty
-                    (identifier)
-                    (unqualifiedAccessExpr
-                      (identifier)))
-                  (objectProperty
-                    (identifier)
-                    (unqualifiedAccessExpr
-                      (identifier))))))))
-        (forGenerator
-          (typedIdentifier
-            (identifier))
-          (typedIdentifier
-            (identifier))
-          (unqualifiedAccessExpr
-            (identifier))
-          (objectBody
-            (objectElement
-              (newExpr
-                (objectBody
-                  (objectProperty
-                    (identifier)
-                    (additiveExpr
-                      (unqualifiedAccessExpr
-                        (identifier))
-                      (slStringLiteralExpr
-                        (slStringLiteralPart))))
-                  (objectProperty
-                    (identifier)
-                    (additiveExpr
-                      (unqualifiedAccessExpr
-                        (identifier))
-                      (slStringLiteralExpr
-                        (slStringLiteralPart))))))))))))
-  (classMethod
-    (methodHeader
-      (identifier)
-      (parameterList
-        (typedIdentifier
-          (identifier)
-          (typeAnnotation
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))))))
-    (functionLiteralExpr
-      (parameterList
-        (typedIdentifier
-          (identifier)))
-      (amendExpr
-        (parenthesizedExpr
-          (unqualifiedAccessExpr
-            (identifier)))
-        (objectBody
-          (forGenerator
-            (typedIdentifier
-              (identifier))
-            (typedIdentifier
-              (identifier))
-            (unqualifiedAccessExpr
-              (identifier))
-            (objectBody
-              (objectElement
-                (newExpr
-                  (objectBody
-                    (objectProperty
-                      (identifier)
-                      (unqualifiedAccessExpr
-                        (identifier)))
-                    (objectProperty
-                      (identifier)
-                      (unqualifiedAccessExpr
-                        (identifier))))))))
-          (forGenerator
-            (typedIdentifier
-              (identifier))
-            (typedIdentifier
-              (identifier))
-            (unqualifiedAccessExpr
-              (identifier))
-            (objectBody
-              (objectElement
-                (newExpr
-                  (objectBody
-                    (objectProperty
-                      (identifier)
-                      (additiveExpr
-                        (unqualifiedAccessExpr
-                          (identifier))
-                        (slStringLiteralExpr
-                          (slStringLiteralPart))))
-                    (objectProperty
-                      (identifier)
-                      (additiveExpr
-                        (unqualifiedAccessExpr
-                          (identifier))
-                        (slStringLiteralExpr
-                          (slStringLiteralPart)))))))))))))
-  (classMethod
-    (methodHeader
-      (identifier)
-      (parameterList
-        (typedIdentifier
-          (identifier)
-          (typeAnnotation
-            (declaredType
-              (qualifiedIdentifier
-                (identifier))
-              (typeArgumentList
-                (declaredType
-                  (qualifiedIdentifier
-                    (identifier))))))))
-      (typeAnnotation
-        (declaredType
-          (qualifiedIdentifier
-            (identifier))
-          (typeArgumentList
-            (declaredType
-              (qualifiedIdentifier
-                (identifier))
-              (typeArgumentList
-                (declaredType
-                  (qualifiedIdentifier
-                    (identifier)))
-                (declaredType
-                  (qualifiedIdentifier
-                    (identifier)))))))))
-    (newExpr
-      (objectBody
-        (forGenerator
-          (typedIdentifier
-            (identifier))
-          (unqualifiedAccessExpr
-            (identifier))
-          (objectBody
-            (objectEntry
-              (unqualifiedAccessExpr
-                (identifier))
-              (unqualifiedAccessExpr
-                (identifier))))))))
-  (classProperty
-    (identifier)
-    (pipeExpr
-      (newExpr
-        (declaredType
-          (qualifiedIdentifier
-            (identifier))
-          (typeArgumentList
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))
-            (declaredType
-              (qualifiedIdentifier
-                (identifier)))))
-        (objectBody
-          (objectEntry
-            (slStringLiteralExpr
-              (slStringLiteralPart))
-            (slStringLiteralExpr
-              (slStringLiteralPart)))))
-      (unqualifiedAccessExpr
-        (identifier)
-        (argumentList
-          (unqualifiedAccessExpr
-            (identifier)
-            (argumentList
-              (slStringLiteralExpr
-                (slStringLiteralPart)))))))))

package/test/corpus/snippetTests/generators/forGeneratorLexicalScope.txt

@@ -1,199 +0,0 @@
-===
-generators/forGeneratorLexicalScope.pkl
-===
-
-amends ".../snippetTest.pkl"
-
-examples {
-  ["accessing for-bound variable from a lambda in a nested for"] {
-    new {
-      for (l1 in List("a", "b")) {
-        for (l2 in List("a", "d").filter((i) -> i == l1)) {
-          l1 + l2
-        }
-      }
-    }
-  }
-  ["accessing for-bound variable from a lambda in a nested when"] {
-    new {
-      for (l1 in List("a", "b")) {
-        when (!List("a", "d").filter((i) -> i == l1).isEmpty) {
-          l1
-        }
-      }
-    }
-  }
-  ["accessing for-bound variable from an expression inside a nested for"] {
-    new {
-      for (_n in List(1, 2, 3)) {
-        for (x in new App { n = _n }.list) {
-          x
-        }
-      }
-    }
-  }
-}
-
-local class App {
-  n: Int
-  list = List(n, n, n)
-}
-
----
-
-(module
-  (moduleHeader
-      (extendsOrAmendsClause
-      (stringConstant
-        (slStringLiteralPart))))
-  (classProperty
-    (identifier)
-    (objectBody
-      (objectEntry
-        (slStringLiteralExpr
-          (slStringLiteralPart))
-        (objectBody
-          (objectElement
-            (newExpr
-              (objectBody
-                (forGenerator
-                  (typedIdentifier
-                    (identifier))
-                  (unqualifiedAccessExpr
-                    (identifier)
-                    (argumentList
-                      (slStringLiteralExpr
-                        (slStringLiteralPart))
-                      (slStringLiteralExpr
-                        (slStringLiteralPart))))
-                  (objectBody
-                    (forGenerator
-                      (typedIdentifier
-                        (identifier))
-                      (qualifiedAccessExpr
-                        (unqualifiedAccessExpr
-                          (identifier)
-                          (argumentList
-                            (slStringLiteralExpr
-                              (slStringLiteralPart))
-                            (slStringLiteralExpr
-                              (slStringLiteralPart))))
-                        (identifier)
-                        (argumentList
-                          (functionLiteralExpr
-                            (parameterList
-                              (typedIdentifier
-                                (identifier)))
-                            (equalityExpr
-                              (unqualifiedAccessExpr
-                                (identifier))
-                              (unqualifiedAccessExpr
-                                (identifier))))))
-                      (objectBody
-                        (objectElement
-                          (additiveExpr
-                            (unqualifiedAccessExpr
-                              (identifier))
-                            (unqualifiedAccessExpr
-                              (identifier)))))))))))))
-      (objectEntry
-        (slStringLiteralExpr
-          (slStringLiteralPart))
-        (objectBody
-          (objectElement
-            (newExpr
-              (objectBody
-                (forGenerator
-                  (typedIdentifier
-                    (identifier))
-                  (unqualifiedAccessExpr
-                    (identifier)
-                    (argumentList
-                      (slStringLiteralExpr
-                        (slStringLiteralPart))
-                      (slStringLiteralExpr
-                        (slStringLiteralPart))))
-                  (objectBody
-                    (whenGenerator
-                      (logicalNotExpr
-                        (qualifiedAccessExpr
-                          (qualifiedAccessExpr
-                            (unqualifiedAccessExpr
-                              (identifier)
-                              (argumentList
-                                (slStringLiteralExpr
-                                  (slStringLiteralPart))
-                                (slStringLiteralExpr
-                                  (slStringLiteralPart))))
-                            (identifier)
-                            (argumentList
-                              (functionLiteralExpr
-                                (parameterList
-                                  (typedIdentifier
-                                    (identifier)))
-                                (equalityExpr
-                                  (unqualifiedAccessExpr
-                                    (identifier))
-                                  (unqualifiedAccessExpr
-                                    (identifier))))))
-                          (identifier)))
-                      (objectBody
-                        (objectElement
-                          (unqualifiedAccessExpr
-                            (identifier))))))))))))
-      (objectEntry
-        (slStringLiteralExpr
-          (slStringLiteralPart))
-        (objectBody
-          (objectElement
-            (newExpr
-              (objectBody
-                (forGenerator
-                  (typedIdentifier
-                    (identifier))
-                  (unqualifiedAccessExpr
-                    (identifier)
-                    (argumentList
-                      (intLiteralExpr)
-                      (intLiteralExpr)
-                      (intLiteralExpr)))
-                  (objectBody
-                    (forGenerator
-                      (typedIdentifier
-                        (identifier))
-                      (qualifiedAccessExpr
-                        (newExpr
-                          (declaredType
-                            (qualifiedIdentifier
-                              (identifier)))
-                          (objectBody
-                            (objectProperty
-                              (identifier)
-                              (unqualifiedAccessExpr
-                                (identifier)))))
-                        (identifier))
-                      (objectBody
-                        (objectElement
-                          (unqualifiedAccessExpr
-                            (identifier))))))))))))))
-  (clazz
-    (modifier)
-    (identifier)
-    (classBody
-      (classProperty
-        (identifier)
-        (typeAnnotation
-          (declaredType
-            (qualifiedIdentifier
-              (identifier)))))
-      (classProperty
-        (identifier)
-        (unqualifiedAccessExpr
-          (identifier)
-          (argumentList
-            (unqualifiedAccessExpr
-              (identifier))
-            (unqualifiedAccessExpr
-              (identifier))
-            (unqualifiedAccessExpr
-              (identifier))))))))