Could someone apply this ?

----- Forwarded message from Jason Gloudon <[EMAIL PROTECTED]> -----

Mailing-List: contact [EMAIL PROTECTED]; run by ezmlm
Precedence: bulk
Delivered-To: mailing list [EMAIL PROTECTED]
Date: Mon, 10 Jun 2002 19:33:56 -0400
From: Jason Gloudon <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Subject: [PATCH] packfile reading
User-Agent: Mutt/1.3.25i


This fixes the problem with reading .pbc files on win32. Someone may want to
write the code to do something useful with the results of stat() when mmap() is
not being used.


Index: assemble.pl
===================================================================
RCS file: /cvs/public/parrot/assemble.pl,v
retrieving revision 1.66
diff -u -r1.66 assemble.pl
--- assemble.pl 10 Jun 2002 05:40:06 -0000      1.66
+++ assemble.pl 10 Jun 2002 23:24:45 -0000
@@ -813,6 +813,7 @@
   close FILE;
 }
 else {
+  binmode STDOUT;
   print $bytecode;
 }
 
Index: embed.c
===================================================================
RCS file: /cvs/public/parrot/embed.c,v
retrieving revision 1.26
diff -u -r1.26 embed.c
--- embed.c     8 Jun 2002 03:38:45 -0000       1.26
+++ embed.c     10 Jun 2002 23:24:45 -0000
@@ -110,6 +110,7 @@
         INTVAL read_result;
         
         program_code = (char *)malloc(program_size + 1024);
+        program_size = 0;
         if (NULL == program_code) {
             fprintf(stderr,
                     "Parrot VM: Could not allocate buffer to read packfile from 
PIO.\n");

----- End forwarded message -----

-- 
Jason

Reply via email to