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%2FMacros2.scl;h=14cfa409996c8ce50a0260101b02e4584f52a9c6;hp=d1379cd8e3e72cb672da6dc12d97a5cef0519bd8;hb=HEAD;hpb=43ddca759254b8e38029c1041d91cbdd7890c9b5 diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros2.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros2.scl index d1379cd8e..14cfa4099 100644 --- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros2.scl +++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros2.scl @@ -1,13 +1,11 @@ -import "JavaBuiltin" as Java - -(==) = Java.icmpeq - -@macro -(&<&) :: Integer -> Integer -> Integer -a &<& b = if cmp == 0 then b else cmp - where - cmp = a - -main = 3 &<& 7 --- +import "JavaBuiltin" as Java + +@macro +(&<&) :: Integer -> Integer -> Integer +a &<& b = if cmp == 0 then b else cmp + where + cmp = a + +main = 3 &<& 7 +-- 3 \ No newline at end of file