Fixed multiple issues causing dangling references to discarded queries

[simantics/platform.git] / tests / scl / Monads1.scl

import "Prelude"

a = [1, 2]
b = [5, 6]

main = a >>= \x -> b >>= \y -> return (x+y) 
--
[6, 7, 7, 8]