4 ms·
I'm getting constant memory on this (mono v3.12.1) let rec beep x = if x = 0 then x else boop (x - 1) and boop y = if y = 0 then y else
by saosebastiao 12y ago
I'm getting constant memory on this (mono v3.12.1)
let rec beep x =
if x = 0 then x else boop (x - 1)
and boop y =
if y = 0 then y else beep (y - 1)
let main argv =
printfn "%A" (beep 999999999)
0
- profquail 12y agoThose are mutually recursive functions, but they're not using continuations.