X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=tests%2Forg.simantics.scl.compiler.tests%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Ftests%2Fscl%2FSelect1.scl;h=12d89510c760546ac5851e3f565c00aceddad1a5;hp=f8d0359ec2dbbf00a10e8fe61a84d05689f5d782;hb=HEAD;hpb=c08364c64a0bb53c45c052a3e4cea8702bbd69a0 diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Select1.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Select1.scl index f8d0359ec..12d89510c 100644 --- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Select1.scl +++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Select1.scl @@ -1,11 +1,11 @@ -import "StandardLibrary" - -main = let - l = [1..3] - in - select (?x,?y) where - ?x <- l - ?y <- l - ?x = ?y --- +import "StandardLibrary" + +main = let + l = [1..3] + in + select (?x,?y) where + ?x <- l + ?y <- l + ?x = ?y +-- [(1,1), (2,2), (3,3)] \ No newline at end of file