Merge "Re-enabled Acorn transaction cancellation support for testing"

[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / Macros2.scl

import "JavaBuiltin" as Java\r
\r
@macro\r
(&<&) :: Integer -> Integer -> Integer\r
a &<& b = if cmp == 0 then b else cmp\r
  where   \r
    cmp = a\r
\r
main = 3 &<& 7\r
--\r
3