[svn:parrot] r43311 - in branches/boehm_gc/src: . gc

[bacek at svn.parrot.org]

Author: bacek
Date: Tue Dec 29 13:13:36 2009
New Revision: 43311
URL: https://trac.parrot.org/parrot/changeset/43311

Log:
Initialize Boehm GC early. We have to restructure CLI args handling to do it properly

Modified:
   branches/boehm_gc/src/gc/gc_boehm.c
   branches/boehm_gc/src/main.c

Modified: branches/boehm_gc/src/gc/gc_boehm.c
==============================================================================
--- branches/boehm_gc/src/gc/gc_boehm.c	Tue Dec 29 11:33:50 2009	(r43310)
+++ branches/boehm_gc/src/gc/gc_boehm.c	Tue Dec 29 13:13:36 2009	(r43311)
@@ -250,7 +250,8 @@
 {
     ASSERT_ARGS(Parrot_gc_boehm_init)
 
-    GC_enable_incremental();
+    //GC_init();
+    //GC_enable_incremental();
 
     interp->gc_sys->do_gc_mark         = gc_boehm_mark_and_sweep;
     interp->gc_sys->finalize_gc_system = NULL;

Modified: branches/boehm_gc/src/main.c
==============================================================================
--- branches/boehm_gc/src/main.c	Tue Dec 29 11:33:50 2009	(r43310)
+++ branches/boehm_gc/src/main.c	Tue Dec 29 13:13:36 2009	(r43311)
@@ -24,6 +24,10 @@
 #include "parrot/embed.h"
 #include "parrot/imcc.h"
 
+#ifdef PARROR_HAS_BOEHM_GC
+  #include <gc.h>
+#endif
+
 /*
 
 =item C<int main(int argc, char * argv[])>
@@ -41,6 +45,11 @@
     Interp     *interp;
     int         status;
 
+#ifdef PARROR_HAS_BOEHM_GC
+    GC_init();
+    GC_enable_incremental();
+#endif
+
     /* internationalization setup */
     /* setlocale(LC_ALL, ""); */
     PARROT_BINDTEXTDOMAIN(PACKAGE, LOCALEDIR);