fork download
  1. let foo = ref []
  2. let bar () = foo := 42 :: !foo
  3. let qux () = foo := "hello" :: !foo
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
Standard input is empty
compilation info
File "prog.ml", line 3, characters 20-27:
Error: This expression has type string but an expression was expected of type
         int
stdout
Standard output is empty