summaryrefslogtreecommitdiff
path: root/src/main.mlton.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/main.mlton.sml')
-rw-r--r--src/main.mlton.sml3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/main.mlton.sml b/src/main.mlton.sml
index b0c4e03f..6bdc9539 100644
--- a/src/main.mlton.sml
+++ b/src/main.mlton.sml
@@ -133,6 +133,9 @@ fun oneRun args =
| "-static" :: rest =>
(Settings.setStaticLinking true;
doArgs rest)
+ | "-stop" :: phase :: rest =>
+ (Compiler.setStop phase;
+ doArgs rest)
| "-path" :: name :: path :: rest =>
(Compiler.addPath (name, path);
doArgs rest)