[svn:parrot] r36043 - trunk/src/gc
[email protected] Mon, 26 Jan 2009 22:06:39 -0800 (PST)
| Newsgroups | perl.cvs.parrot |
|---|---|
| Message-ID | <[email protected]> |
Author: petdance
Date: Mon Jan 26 22:06:38 2009
New Revision: 36043
Modified:
trunk/src/gc/mark_sweep.c
Log:
one teeny const
Modified: trunk/src/gc/mark_sweep.c
==============================================================================
--- trunk/src/gc/mark_sweep.c (original)
+++ trunk/src/gc/mark_sweep.c Mon Jan 26 22:06:38 2009
@@ -723,7 +723,7 @@
gc_ms_add_free_pmc_ext(SHIM_INTERP, ARGMOD(Small_Object_Pool *pool), ARGIN(void *to_add))
{
ASSERT_ARGS(gc_ms_add_free_pmc_ext)
- PMC_EXT *object = (PMC_EXT *)to_add;
+ PMC_EXT * const object = (PMC_EXT *)to_add;
object->_metadata = NULL;
/* yes, this cast is a hack for now, but a pointer is a pointer */