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