[svn:parrot] r44086 - branches/sys_mem_reduce/config/gen/crypto

bacek at svn.parrot.org bacek at svn.parrot.org
Wed Feb 17 10:30:01 UTC 2010


Author: bacek
Date: Wed Feb 17 10:30:00 2010
New Revision: 44086
URL: https://trac.parrot.org/parrot/changeset/44086

Log:
Switch generated Digest dynpmcs to GC allocations

Modified:
   branches/sys_mem_reduce/config/gen/crypto/digest_pmc.in

Modified: branches/sys_mem_reduce/config/gen/crypto/digest_pmc.in
==============================================================================
--- branches/sys_mem_reduce/config/gen/crypto/digest_pmc.in	Wed Feb 17 10:29:38 2010	(r44085)
+++ branches/sys_mem_reduce/config/gen/crypto/digest_pmc.in	Wed Feb 17 10:30:00 2010	(r44086)
@@ -34,7 +34,7 @@
 */
     VTABLE void init() {
 @TEMP_md_guard@
-        @TEMP_md_ctx@ *c    = mem_allocate_zeroed_typed(@TEMP_md_ctx@);
+        @TEMP_md_ctx@ *c    = gc_mem_allocate_zeroed_typed(INTERP, @TEMP_md_ctx@);
         PMC_data(SELF) = c;
         PObj_custom_destroy_SET(SELF);
 #else
@@ -54,7 +54,7 @@
 @TEMP_md_guard@
         @TEMP_md_ctx@ *c = PMC_data_typed(SELF, @TEMP_md_ctx@ *);
         if (c) {
-            mem_sys_free(c);
+            gc_mem_free(INTERP, c);
             PMC_data(SELF) = NULL;
         }
 #endif
@@ -70,7 +70,7 @@
     VTABLE PMC* clone() {
 @TEMP_md_guard@
         PMC     *retval  = pmc_new_noinit(INTERP, SELF->vtable->base_type);
-        @TEMP_md_ctx@ *c       = mem_allocate_zeroed_typed(@TEMP_md_ctx@);
+        @TEMP_md_ctx@ *c       = gc_mem_allocate_zeroed_typed(INTERP, @TEMP_md_ctx@);
 
         memcpy(c, PMC_data(SELF), sizeof (@TEMP_md_ctx@));
         PMC_data(retval) = c;


More information about the parrot-commits mailing list