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=36282d240b9ac295894a6705672efa11eb26e4d2 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