diff src/compiler.sml @ 398:ab3177746c78

Simple listShop working
author Adam Chlipala <adamc@hcoop.net>
date Tue, 21 Oct 2008 13:24:54 -0400
parents 519366a76603
children 8084fa9216de
line wrap: on
line diff
--- a/src/compiler.sml	Tue Oct 21 12:06:35 2008 -0400
+++ b/src/compiler.sml	Tue Oct 21 13:24:54 2008 -0400
@@ -535,7 +535,6 @@
                 else
                     let
                         val dir = OS.FileSys.tmpName ()
-                        val () = OS.FileSys.remove dir
                         val cname = OS.Path.joinDirFile {dir = dir, file = "urweb.c"}
                         val oname = OS.Path.joinDirFile {dir = dir, file = "urweb.o"}
                     in