develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r33910 - trunk/src

From:
cotto
Date:
December 14, 2008 21:09
Subject:
[svn:parrot] r33910 - trunk/src
Message ID:
20081215050858.79A6ACBA12@x12.develooper.com
Author: cotto
Date: Sun Dec 14 21:08:57 2008
New Revision: 33910

Modified:
   trunk/src/embed.c

Log:
[embed] fix a memory leak (CID #181)


Modified: trunk/src/embed.c
==============================================================================
--- trunk/src/embed.c	(original)
+++ trunk/src/embed.c	Sun Dec 14 21:08:57 2008
@@ -454,6 +454,7 @@
         if (ferror(io)) {
             Parrot_io_eprintf(interp, "Parrot VM: Problem reading packfile from PIO:  code %d.\n",
                         ferror(io));
+            mem_sys_free(program_code);
             return NULL;
         }
         fclose(io);



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About