int diff --git a/src/packfile/api.c b/src/packfile/api.c index e38ec7d..f3d9d7f 100644 --- a/src/packfile/api.c +++ b/src/packfile/api.c @@ -927,6 +927,9 @@ do_sub_pragmas(PARROT_INTERP, ARGIN(PackFile_ByteCode *self), ASSERT_ARGS(do_sub_pragmas) PackFile_ConstTable * const ct = self->const_table; opcode_t i; +#if TRACE_PACKFILE + PackFile * const pf = self; +#endif TRACE_PRINTF(("PackFile: do_sub_pragmas (action=%d)\n", action)); @@ -1100,6 +1103,9 @@ PackFile_Header_unpack(PARROT_INTERP, ARGMOD(PackFile_Header *self), INTVAL pf_options) { ASSERT_ARGS(PackFile_Header_unpack) +#if TRACE_PACKFILE + PackFile * const pf = self; +#endif /* Verify that the packfile isn't too small to contain a proper header */ if (packed_size < PACKFILE_HEADER_BYTES) { @@ -1115,7 +1121,7 @@ PackFile_Header_unpack(PARROT_INTERP, ARGMOD(PackFile_Header *self), PackFile_Header_validate(interp, self, pf_options); /* Extract the header's UUID. */ - PackFile_Header_read_uuid(interp, self, packed, packed_size) + PackFile_Header_read_uuid(interp, self, packed, packed_size); /* Describe what was read for debugging. */ TRACE_PRINTF(("PackFile_Header_unpack: Wordsize %d.\n", self->wordsize));