]> gerrit.simantics Code Review - simantics/platform.git/blob - Macros1.scl
Code Review / simantics / platform.git / blob
? search:


33844718f6db8c8fd5b7c92f5a4262a417dfda2e
[simantics/platform.git] / Macros1.scl
1 @macro
2 (||) :: Boolean -> Boolean -> Boolean 
3 a || b = if a then True else b
4
5 main :: Boolean
6 main = True || (fail "This should not be executed")
7 --
8 true
Simantics Platform SDK.