[svn:parrot] r47151 - in branches/gc_massacre/src: . gc

bacek at svn.parrot.org bacek at svn.parrot.org
Sun May 30 14:49:15 UTC 2010


Author: bacek
Date: Sun May 30 14:49:15 2010
New Revision: 47151
URL: https://trac.parrot.org/parrot/changeset/47151

Log:
Add TMS into command-line options.

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

Modified: branches/gc_massacre/src/gc/gc_private.h
==============================================================================
--- branches/gc_massacre/src/gc/gc_private.h	Sun May 30 14:48:31 2010	(r47150)
+++ branches/gc_massacre/src/gc/gc_private.h	Sun May 30 14:49:15 2010	(r47151)
@@ -84,8 +84,9 @@
 
 
 typedef enum _gc_sys_type_enum {
-    MS,  /*mark and sweep*/
-    INF /*infinite memory core*/
+    MS,  /* mark and sweep */
+    INF, /* infinite memory core */
+    TMS, /* tricolor mark and sweep */
 } gc_sys_type_enum;
 
 /* how often to skip a full GC when this pool has nothing free */

Modified: branches/gc_massacre/src/main.c
==============================================================================
--- branches/gc_massacre/src/main.c	Sun May 30 14:48:31 2010	(r47150)
+++ branches/gc_massacre/src/main.c	Sun May 30 14:49:15 2010	(r47151)
@@ -359,6 +359,8 @@
                 interp->gc_sys->sys_type = MS;
             else if (STREQ(arg, "inf"))
                 interp->gc_sys->sys_type = INF;
+            else if (STREQ(arg, "tms"))
+                interp->gc_sys->sys_type = TMS;
             else {
                 fprintf(stderr,
                         "main: Unrecognized GC '%s' specified."


More information about the parrot-commits mailing list