changeset 1606:f4453e2402d0

Yet another fix to previous change
author Adam Chlipala <adam@chlipala.net>
date Sun, 20 Nov 2011 20:54:03 -0500
parents 48eed6cf2be7
children da788bd72c9e
files src/compiler.sml
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/compiler.sml	Sun Nov 20 20:46:28 2011 -0500
+++ b/src/compiler.sml	Sun Nov 20 20:54:03 2011 -0500
@@ -497,7 +497,8 @@
                             in
                                 readSources acc
                             end
-                          | _ => rev acc
+                          | OnlyComment => readSources acc
+                          | EndOfFile => rev acc
 
                     val prefix = ref (case Settings.getUrlPrefix () of "/" => NONE | s => SOME s)
                     val database = ref (Settings.getDbstring ())