Re-enabled Acorn transaction cancellation support for testing

[simantics/platform.git] / bundles / org.simantics.scl.compiler / tests / org / simantics / scl / compiler / tests / scl / Macros1.scl

@macro\r
(||) :: Boolean -> Boolean -> Boolean \r
a || b = if a then True else b\r
\r
main :: Boolean\r
main = True || (fail "This should not be executed")\r
--\r
true