]> gerrit.simantics Code Review - simantics/platform.git/blob - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/ListSyntax5.scl
Merge commit 'd186091'
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / ListSyntax5.scl
1 import "Prelude"\r
2 \r
3 a = [1,2,3,4]\r
4 \r
5 main :: [Integer]\r
6 main = [x+y | x <- a, y <- a, x!=y]\r
7 --\r
8 [3, 4, 5, 3, 5, 6, 4, 5, 7, 5, 6, 7]\r