lama_byterun/stdlib/Lazy.expr
2020-01-20 03:38:43 +03:00

14 lines
No EOL
183 B
Text

public fun lazy (f) {
local value, set = false;
fun () {
if set
then value
else set := true; value := f (); value
fi
}
}
public fun force (f) {
f ()
}