X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=tests%2Forg.simantics.scl.compiler.tests%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Ftests%2Fscl%2FMacros1.scl;h=33844718f6db8c8fd5b7c92f5a4262a417dfda2e;hb=6573b29e111ea03c3fa88bf1565d47d0fc4faabd;hp=37b4e053eb491c40625140e3c6877225d6aa3558;hpb=d70b5f7a4cdeea05c7526560303feffeb03596b0;p=simantics%2Fplatform.git diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros1.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros1.scl index 37b4e053e..33844718f 100644 --- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros1.scl +++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros1.scl @@ -1,8 +1,8 @@ -@macro -(||) :: Boolean -> Boolean -> Boolean -a || b = if a then True else b - -main :: Boolean -main = True || (fail "This should not be executed") --- +@macro +(||) :: Boolean -> Boolean -> Boolean +a || b = if a then True else b + +main :: Boolean +main = True || (fail "This should not be executed") +-- true \ No newline at end of file