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%2FSort2.scl;h=440cf7a72ad82a22bed58f1de71cc58acba9010b;hp=8518264ecd1790264d0807b811365984b0c854ed;hb=172abed5dbf73c1304a7a95bb8504ea293556948;hpb=bb5a3edf299cb943999c72c69dd68fb740c8a506 diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Sort2.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Sort2.scl index 8518264ec..440cf7a72 100644 --- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Sort2.scl +++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Sort2.scl @@ -1,19 +1,19 @@ -import "JavaBuiltin" as Java - -importJava "org.simantics.scl.runtime.Lists" where - sortWith :: (a -> a -> Integer) -> [a] -> [a] - -//@JavaStaticMethod "org.simantics.scl.runtime.Lists.sortWith" -//sortWith :: (a -> a -> Integer) -> [a] -> [a] - - -//sortWith = Java.staticMethod "org.simantics.scl.runtime.Lists.sortWith" - -dumbCompare :: a -> a -> Integer -dumbCompare x y = 0 - -dumbSort = sortWith dumbCompare - -main = "Foo" --- +import "JavaBuiltin" as Java + +importJava "org.simantics.scl.runtime.Lists" where + sortWith :: (a -> a -> Integer) -> [a] -> [a] + +//@JavaStaticMethod "org.simantics.scl.runtime.Lists.sortWith" +//sortWith :: (a -> a -> Integer) -> [a] -> [a] + + +//sortWith = Java.staticMethod "org.simantics.scl.runtime.Lists.sortWith" + +dumbCompare :: a -> a -> Integer +dumbCompare x y = 0 + +dumbSort = sortWith dumbCompare + +main = "Foo" +-- Foo \ No newline at end of file