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


819805063dd191f2db7834c990bf052cca0bf636
[simantics/platform.git] / ConjunctionMacro.scl
1 (&&) :: Boolean -> (<e> Boolean) -> <e> Boolean
2 a && b = if a then b else False
3
4 main = False && fail "Should not be evaluated!"
5 --
6 false
Simantics Platform SDK.