[MLton-commit] r5138

[Vesa Karvonen]

Perform gc just before starting to parse, which requires a lot of memory.

----------------------------------------------------------------------

U   mlton/trunk/ide/emacs/esml-du-mlton.el

----------------------------------------------------------------------

Modified: mlton/trunk/ide/emacs/esml-du-mlton.el
===================================================================
--- mlton/trunk/ide/emacs/esml-du-mlton.el	2007-02-05 15:18:04 UTC (rev 5137)
+++ mlton/trunk/ide/emacs/esml-du-mlton.el	2007-02-05 16:06:19 UTC (rev 5138)
@@ -140,6 +140,7 @@
     (goto-char 1))
   (clrhash (esml-du-ctx-ref-to-sym-table ctx))
   (clrhash (esml-du-ctx-sym-to-uses-table ctx))
+  (garbage-collect)
   (bg-job-start
    (function
     (lambda (ctx)