[svn:parrot] r43892 - in branches/boehm_gc_2/src: . gc

[bacek at svn.parrot.org]

Author: bacek
Date: Thu Feb 11 12:43:39 2010
New Revision: 43892
URL: https://trac.parrot.org/parrot/changeset/43892

Log:
Add Boehm GC into list of available GCs.

Modified:
   branches/boehm_gc_2/src/gc/gc_private.h
   branches/boehm_gc_2/src/main.c

Modified: branches/boehm_gc_2/src/gc/gc_private.h
==============================================================================
--- branches/boehm_gc_2/src/gc/gc_private.h	Thu Feb 11 12:43:21 2010	(r43891)
+++ branches/boehm_gc_2/src/gc/gc_private.h	Thu Feb 11 12:43:39 2010	(r43892)
@@ -83,8 +83,9 @@
 
 
 typedef enum _gc_sys_type_enum {
-    MS,  /*mark and sweep*/
-    INF /*infinite memory core*/
+    MS,         /*mark and sweep*/
+    INF,        /*infinite memory core*/
+    BOEHM       /* Boehm GC */
 } gc_sys_type_enum;
 
 /* how often to skip a full GC when this pool has nothing free */

Modified: branches/boehm_gc_2/src/main.c
==============================================================================
--- branches/boehm_gc_2/src/main.c	Thu Feb 11 12:43:21 2010	(r43891)
+++ branches/boehm_gc_2/src/main.c	Thu Feb 11 12:43:39 2010	(r43892)
@@ -407,6 +407,8 @@
                 interp->gc_sys->sys_type = MS;
             else if (STREQ(opt.opt_arg, "inf"))
                 interp->gc_sys->sys_type = INF;
+            else if (STREQ(opt.opt_arg, "boehm"))
+                interp->gc_sys->sys_type = BOEHM;
             else
                 Parrot_ex_throw_from_c_args(interp, NULL, 1,
                         "main: Unrecognized GC '%s' specified."