[MLton-commit] r7427

[Matthew Fluet]

Report failure of 'CM.Graph.graph sources' and use OS.Process.success.
----------------------------------------------------------------------

U   mlton/trunk/util/cm2mlb/cm2mlb.sml

----------------------------------------------------------------------

Modified: mlton/trunk/util/cm2mlb/cm2mlb.sml
===================================================================
--- mlton/trunk/util/cm2mlb/cm2mlb.sml	2010-02-18 18:08:43 UTC (rev 7426)
+++ mlton/trunk/util/cm2mlb/cm2mlb.sml	2010-02-18 18:32:51 UTC (rev 7427)
@@ -206,7 +206,7 @@
                               outstream = out};
                   TextIO.output (out, "end\n")
                end
-          | NONE => ()
+          | NONE => die ("CM.Graph.graph " ^ sources ^ " failed") 
       end
 
    fun usage msg =
@@ -238,7 +238,7 @@
              | _ => usage "wrong number of arguments"
       in
          loop args handle e => die (concat ["cm2mlb failed: ", General.exnMessage e])
-         ; 0
+         ; OS.Process.success
       end
 
    fun export () =