]> gerrit.simantics Code Review - simantics/platform.git/blob - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/AsPattern.scl
(refs #7307) Added features field to SCL module header
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / AsPattern.scl
1 import "JavaBuiltin" as Java
2
3 sort p@(a,b) | Java.icmpgt a b = (b,a)
4              | True            = p
5                
6 main = sort (sort (2 :: Integer,1 :: Integer))
7 --
8 (1,2)