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

import "StandardLibrary"

find a = a
foo x = True

main = iter (\x -> do
    if x == "A"
    then foo $ find 23
    else ()
    ()
  ) ["x"]
 where
  set = MSet.create () 
--
()