RosettaCodeData/Task/Null-object/Standard-ML/null-object-2.ml
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

2 lines
70 B
Standard ML

case v of NONE => "unbound value"
| SOME _ => "bounded value"