[svn:parrot] r43251 - trunk/src

[cotto at svn.parrot.org]

Author: cotto
Date: Sat Dec 26 20:05:27 2009
New Revision: 43251
URL: https://trac.parrot.org/parrot/changeset/43251

Log:
[packfile] don't dump data that's guaranteed to be garbage, plus minor docs fix

Modified:
   trunk/src/packfile.c

Modified: trunk/src/packfile.c
==============================================================================
--- trunk/src/packfile.c	Sat Dec 26 18:30:14 2009	(r43250)
+++ trunk/src/packfile.c	Sat Dec 26 20:05:27 2009	(r43251)
@@ -2574,8 +2574,7 @@
 =item C<static PackFile_Segment * byte_code_new(PARROT_INTERP, PackFile *pf,
 STRING *name, int add)>
 
-Creates a new C<PackFile_ByteCode> segment.  Ignores C<pf>, C<name>, and C<add>
-are ignored.
+Creates a new C<PackFile_ByteCode> segment.  Ignores C<pf>, C<name>, and C<add>.
 
 =cut
 
@@ -2805,23 +2804,6 @@
     }
 
     Parrot_io_printf(interp, "  ]\n");
-
-    j = self->data ? 0: self->file_offset + 4;
-
-    if (j % 8)
-        Parrot_io_printf(interp, "\n %04x:  ", (int) j);
-
-    for (; j < (self->data ? self->size :
-            self->file_offset + self->op_count); j++) {
-
-        if (j % 8 == 0)
-            Parrot_io_printf(interp, "\n %04x:  ", (int) j);
-
-        Parrot_io_printf(interp, "%08lx ", (unsigned long)
-                self->data ? self->data[j] : self->pf->src[j]);
-    }
-
-    Parrot_io_printf(interp, "\n]\n");
 }