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

6 lines
140 B
OCaml
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
if problem then
OS.Process.exit OS.Process.failure
(* valid status codes include OS.Process.success and OS.Process.failure *)
else
()