pikatchu / LinearML

Functional language for parallel programming
Other
432 stars 37 forks source link

exception Assert_failure("emit.ml", 213, 34) #5

Closed magnusjonsson closed 13 years ago

magnusjonsson commented 13 years ago

Minimal program to reproduce:

module Main = struct
  val main: unit -> unit 
  let main() =
    let d = ()
    in (fun () -> d) ()
end

(It doesn't seem to matter whether fun or !fun is used.)

pikatchu commented 13 years ago

Many thanks!

I just fixed it. I added your example in regression. Strangely I get a warning from llvm now ... this is odd.

magnusjonsson commented 13 years ago

Nice! Maybe issue #6 can shed some light on the llvm warning.

pikatchu commented 13 years ago

Ah closure are really sketchy in the back-end right now ... You will find many of those :-) However it's good because it helps me building a regression test base! I will look into that as soon as I can.

Thanks!