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%2FListSyntax12.scl;h=4360dee06493beb086a2640a1c083a62bf4a8d0e;hp=8b18eb3d0c5bf061e4576548f9b8e3a024440f92;hb=172abed5dbf73c1304a7a95bb8504ea293556948;hpb=f8576d4d2b3b30d76db552d624fc9f087b8940bd diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/ListSyntax12.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/ListSyntax12.scl index 8b18eb3d0..4360dee06 100644 --- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/ListSyntax12.scl +++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/ListSyntax12.scl @@ -1,5 +1,5 @@ -import "Prelude" - -main = foldl (+) 0 [x | y <- [1..10], x <- [1..y]] --- +import "Prelude" + +main = foldl (+) 0 [x | y <- [1..10], x <- [1..y]] +-- 220 \ No newline at end of file