Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

Loading…

let one = 1 in (fun() -> one) () evaluates to 32767 #6

Open
magnusjonsson opened this Issue · 0 comments

1 participant

@magnusjonsson

On amd64, this outputs 32767 instead of 1.

module Main = struct

  val main: unit -> unit
  let main() =
    let one = 1 in
    Print.int((fun() -> one) ())
end
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.