RosettaCodeData/Task/Null-object/OCaml/null-object-2.ocaml

4 lines
67 B
Plaintext

match v with
| None -> "unbound value"
| Some _ -> "bounded value"