lilypond-1.3.60

diff --git a/lily/main.cc b/lily/main.cc
index 3bade16b9d3e52a9881b944848022d78dd739752..3f7a41e000b7b69187655b1d30b0f6454ed42a8e 100644 (file)
--- a/lily/main.cc
+++ b/lily/main.cc
@@ -303,6 +303,12 @@ main (int argc, char **argv)
   debug_init ();               // should be first
   setup_paths ();
 
+  /*
+    prepare guile for heavy mem usage. 
+   */
+  setenv ("GUILE_INIT_SEGMENT_SIZE_1", "4194304", 0);
+  setenv ("GUILE_MAX_SEGMENT_SIZE", "8388608", 0);
+
   oparser_global_p = new Getopt_long(argc, argv,theopts);
   while (Long_option_init const * opt = (*oparser_global_p)())
     {