[svn:parrot] r44083 - branches/sys_mem_reduce/src

bacek at svn.parrot.org bacek at svn.parrot.org
Wed Feb 17 10:28:55 UTC 2010


Author: bacek
Date: Wed Feb 17 10:28:55 2010
New Revision: 44083
URL: https://trac.parrot.org/parrot/changeset/44083

Log:
Switch to GC allocations in embed.c

Modified:
   branches/sys_mem_reduce/src/embed.c

Modified: branches/sys_mem_reduce/src/embed.c
==============================================================================
--- branches/sys_mem_reduce/src/embed.c	Wed Feb 17 10:28:36 2010	(r44082)
+++ branches/sys_mem_reduce/src/embed.c	Wed Feb 17 10:28:55 2010	(r44083)
@@ -463,7 +463,7 @@
         INTVAL wanted     = program_size;
         size_t read_result;
 
-        program_code = mem_allocate_n_typed(chunk_size, char);
+        program_code = gc_mem_allocate_n_typed(interp, chunk_size, char);
         cursor       = program_code;
         program_size = 0;
 
@@ -474,7 +474,7 @@
                 break;
 
             chunk_size   = 1024;
-            mem_realloc_n_typed(program_code, program_size + chunk_size, char);
+            gc_mem_realloc_n_typed(interp, program_code, program_size + chunk_size, char);
 
             if (!program_code) {
                 Parrot_io_eprintf(interp,
@@ -492,7 +492,7 @@
              "Parrot VM: Problem reading packfile from PIO:  code %d.\n",
                         ferror(io));
             fclose(io);
-            mem_sys_free(program_code);
+            gc_mem_free(interp, program_code);
             return NULL;
         }
 
@@ -980,7 +980,7 @@
 Parrot_disassemble(PARROT_INTERP, SHIM(const char *outfile), Parrot_disassemble_options options)
 {
     PDB_line_t *line;
-    PDB_t * const pdb   = mem_allocate_zeroed_typed(PDB_t);
+    PDB_t * const pdb   = gc_mem_allocate_typed(interp, PDB_t);
     int num_mappings    = 0;
     int curr_mapping    = 0;
     int op_code_seq_num = 0;


More information about the parrot-commits mailing list