RosettaCodeData/Task/Null-object/Standard-ML/null-object-2.ml

3 lines
70 B
OCaml
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
case v of NONE => "unbound value"
| SOME _ => "bounded value"