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

4 lines
67 B
Text
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
match v with
| None -> "unbound value"
| Some _ -> "bounded value"