diff src/main.mlton.sml @ 23:bfa2e9ae4df8

Tree-shaking
author Adam Chlipala <adamc@hcoop.net>
date Sun, 08 Jun 2008 17:15:09 -0400
parents 1ab48e37d0ef
children 145b536fc702
line wrap: on
line diff
--- a/src/main.mlton.sml	Sun Jun 08 16:08:31 2008 -0400
+++ b/src/main.mlton.sml	Sun Jun 08 17:15:09 2008 -0400
@@ -26,5 +26,5 @@
  *)
 
 val () = case CommandLine.arguments () of
-             [filename] => Compiler.testReduce filename
+             [filename] => Compiler.testShake filename
            | _ => print "Bad arguments"