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.sml4
1 files changed, 1 insertions, 3 deletions
diff --git a/src/main.mlton.sml b/src/main.mlton.sml
index 801821d1..849bc8b1 100644
--- a/src/main.mlton.sml
+++ b/src/main.mlton.sml
@@ -25,6 +25,4 @@
* POSSIBILITY OF SUCH DAMAGE.
*)
-val () = case CommandLine.arguments () of
- [filename] => Compiler.testCjrize filename
- | _ => print "Bad arguments"
+val () = Compiler.testCjrize (CommandLine.arguments ())