[PATCH] packfile reading

[Jason Gloudon]

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");