summaryrefslogtreecommitdiff
path: root/src/main.mlton.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-01-26 12:35:32 -0500
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-01-26 12:35:32 -0500
commit28605345c88491627b7a34cea6e50c9e5b9b8b01 (patch)
tree3ff8deb5599074bb5f67cd1ccda2ad1bb74d5b5b /src/main.mlton.sml
parent9c27c9d90a3f3593de07658a14581b66d08c8b75 (diff)
Initial parsing and pretty-printing
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 833f8c11..ac9c24d6 100644
--- a/src/main.mlton.sml
+++ b/src/main.mlton.sml
@@ -25,3 +25,6 @@
* POSSIBILITY OF SUCH DAMAGE.
*)
+val () = case CommandLine.arguments () of
+ [filename] => Compiler.testParse filename
+ | _ => print "Bad arguments"