[svn:parrot] r48936 - trunk/src/gc

[chromatic at svn.parrot.org]

Author: chromatic
Date: Sat Sep 11 17:46:57 2010
New Revision: 48936
URL: https://trac.parrot.org/parrot/changeset/48936

Log:
[GC] Made is_pmc_ptr() much more accurate.

This should fix TT #1783.

Modified:
   trunk/src/gc/system.c

Modified: trunk/src/gc/system.c
==============================================================================
--- trunk/src/gc/system.c	Sat Sep 11 17:39:50 2010	(r48935)
+++ trunk/src/gc/system.c	Sat Sep 11 17:46:57 2010	(r48936)
@@ -525,7 +525,8 @@
 is_pmc_ptr(ARGIN(const Memory_Pools *mem_pools), ARGIN(const void *ptr))
 {
     ASSERT_ARGS(is_pmc_ptr)
-        return contained_in_pool(mem_pools->pmc_pool, ptr);
+        return PObj_is_PMC_TEST((PObj *)ptr)
+            && contained_in_pool(mem_pools->pmc_pool, ptr);
 }