Returning local function value does not work

[Linda_pp]

Repro:

let rec hof f =
    let rec h x = f x in h
in
let rec g x = x + 1 in
let f = hof g in
println_int (f 10)

Error:

[1]    44863 bus error  ./foo

at runtime.

[Linda_pp]

Stack violation looks to cause this problem. So I need to introduce malloc or something to avoid it.