diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2013-12-06 08:54:03 -0500 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2013-12-06 08:54:03 -0500 |
| commit | 377d1b9ccdf923b6803dc63a66babd90f08ba3f7 (patch) | |
| tree | 75bd065fbd4b3cc2a28b74389d458566606761da /src/main.mlton.sml | |
| parent | 4800d8054ee97979a4706daa178127985957b016 (diff) | |
Small reformatting and documentation for '-print-cinclude'
Diffstat (limited to 'src/main.mlton.sml')
| -rw-r--r-- | src/main.mlton.sml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/main.mlton.sml b/src/main.mlton.sml index e68ecdd8..b0c4e03f 100644 --- a/src/main.mlton.sml +++ b/src/main.mlton.sml @@ -56,10 +56,10 @@ fun oneRun args = raise Code OS.Process.success) fun printNumericVersion () = (print (Config.versionNumber ^ "\n"); raise Code OS.Process.success) - fun printCCompiler () = (print ((Settings.getCCompiler ()) ^ "\n"); - raise Code OS.Process.success) - fun printCInclude () = (print ((Config.includ) ^ "\n"); - raise Code OS.Process.success) + fun printCCompiler () = (print (Settings.getCCompiler () ^ "\n"); + raise Code OS.Process.success) + fun printCInclude () = (print (Config.includ ^ "\n"); + raise Code OS.Process.success) fun doArgs args = case args of |