RosettaCodeData/Task/Program-termination/Standard-ML/program-termination.ml

6 lines
140 B
OCaml
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
if problem then
OS.Process.exit OS.Process.failure
(* valid status codes include OS.Process.success and OS.Process.failure *)
else
()