diff options
Diffstat (limited to 'src/main.mlton.sml')
-rw-r--r-- | src/main.mlton.sml | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/main.mlton.sml b/src/main.mlton.sml index 6bdc9539..71fefc48 100644 --- a/src/main.mlton.sml +++ b/src/main.mlton.sml @@ -124,6 +124,13 @@ fun oneRun args = | "-dumpSource" :: rest => (Compiler.dumpSource := true; doArgs rest) + | "-dumpVerboseSource" :: rest => + (Compiler.dumpSource := true; + ElabPrint.debug := true; + ExplPrint.debug := true; + CorePrint.debug := true; + MonoPrint.debug := true; + doArgs rest) | "-output" :: s :: rest => (Settings.setExe (SOME s); doArgs rest) |