Mercurial > urweb

diff src/main.mlton.sml @ 1164:8679ba87cf3c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sigfile directive
author Adam Chlipala <adamc@hcoop.net>
date Thu, 11 Feb 2010 09:10:01 -0500
parents c01fb6f1b31f
children 52c6ac6a59f1
line wrap: on
line diff
--- a/src/main.mlton.sml	Tue Feb 09 20:08:59 2010 -0500
+++ b/src/main.mlton.sml	Thu Feb 11 09:10:01 2010 -0500
@@ -72,6 +72,9 @@
       | "-root" :: name :: root :: rest =>
         (Compiler.addModuleRoot (root, name);
          doArgs rest)
+      | "-sigfile" :: name :: rest =>
+        (Settings.setSigFile (SOME name);
+         doArgs rest)
       | arg :: rest =>
         (if size arg > 0 andalso String.sub (arg, 0) = #"-" then
              raise Fail ("Unknown flag " ^ arg)