Merge commit '5da68e7'

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

import "Prelude"\r
\r
fib :: Integer -> Integer\r
fib x | x <= 2 = 1\r
      | True   = fib (x-1) + fib (x-2)\r
\r
main = fib 13\r
--\r
233