Fixed multiple issues causing dangling references to discarded queries

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

import "JavaBuiltin" as Java

(+) = Java.iadd
(-) = Java.isub
(<=) = Java.icmple

fibonacci x = if x <= (1 :: Integer) 
              then 1 :: Integer 
              else fibonacci (x - 1) 
                 + fibonacci (x - 2)

main = fibonacci 10
--
89