fork download
  1. let ref f = function
  2. | [] -> "vide"
  3. | _ -> "pas vide"
  4.  
  5. let () = print_endline (f [])
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
Standard input is empty
compilation info
File "prog.ml", line 5, characters 24-25:
Unbound value f
stdout
Standard output is empty