[svn:parrot] r44069 - branches/sys_mem_reduce/src/pmc

bacek at svn.parrot.org bacek at svn.parrot.org
Wed Feb 17 07:20:25 UTC 2010


Author: bacek
Date: Wed Feb 17 07:20:24 2010
New Revision: 44069
URL: https://trac.parrot.org/parrot/changeset/44069

Log:
Switch FFA to use GC memory

Modified:
   branches/sys_mem_reduce/src/pmc/fixedfloatarray.pmc

Modified: branches/sys_mem_reduce/src/pmc/fixedfloatarray.pmc
==============================================================================
--- branches/sys_mem_reduce/src/pmc/fixedfloatarray.pmc	Wed Feb 17 07:19:52 2010	(r44068)
+++ branches/sys_mem_reduce/src/pmc/fixedfloatarray.pmc	Wed Feb 17 07:20:24 2010	(r44069)
@@ -43,7 +43,7 @@
         FLOATVAL *float_array;
         GET_ATTR_float_array(INTERP, SELF, float_array);
         if (float_array)
-            mem_sys_free(float_array);
+            gc_mem_free(INTERP, float_array);
     }
 
 /*
@@ -70,7 +70,7 @@
         SET_ATTR_size(INTERP, dest, size);
         mem_size          = size * sizeof (FLOATVAL);
 
-        dest_float_array  = (FLOATVAL*)mem_sys_allocate(mem_size);
+        dest_float_array  = (FLOATVAL*)Parrot_gc_allocate_memory_chunk(INTERP, mem_size);
         mem_sys_memcopy(dest_float_array, self_float_array, mem_size);
         SET_ATTR_float_array(INTERP, dest, dest_float_array);
         PObj_custom_destroy_SET(dest);


More information about the parrot-commits mailing list