let () = try let m = (1, Some "xyu") in raise @@ Value m with
Standard input is empty
File "prog.ml", line 4, characters 37-44:
Error: The constructor Value expects 2 argument(s),
but is applied here to 1 argument(s)
Standard output is empty