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 / While3.scl

import "Prelude"

main = do
    a = ref 1
    b = ref 0
    while (getRef a < 5) do
        b := getRef b + 1
        a := getRef a + 1
    getRef b             
--
4