[svn:parrot] r25554 - trunk/compilers/imcc

Author: petdance
Date: Wed Feb  6 08:06:54 2008
New Revision: 25554

Modified:
   trunk/compilers/imcc/pbc.c

Log:
use snprintf

Modified: trunk/compilers/imcc/pbc.c
==============================================================================
--- trunk/compilers/imcc/pbc.c  (original)
+++ trunk/compilers/imcc/pbc.c  Wed Feb  6 08:06:54 2008
@@ -356,13 +356,13 @@
     size_t size, old;
 
     if (!globals.cs->jit_info) {
-        char * const name = (char *)
-            mem_sys_allocate(strlen(globals.cs->seg->base.name) + 5);
-        sprintf(name, "%s_JIT", globals.cs->seg->base.name);
+        const size_t len = strlen(globals.cs->seg->base.name) + 5;
+        char * const name = (char *)mem_sys_allocate(len);
+        snprintf(name, len, "%s_JIT", globals.cs->seg->base.name);
         globals.cs->jit_info =
             PackFile_Segment_new_seg(interp,
                     interp->code->base.dir, PF_UNKNOWN_SEG, name, 1);
-        free(name);
+        mem_sys_free(name);
     }
 
     size = unit->n_basic_blocks + (old = old_blocks());