# New Ticket Created by Andy Dougherty
# Please include the string: [perl #41324]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=41324 >
This patch was necessary for me to build parrot with my old Sun compiler.
diff -r -u parrot-current/lib/Parrot/Pmc2c/Utils.pm
parrot-andy/lib/Parrot/Pmc2c/Utils.pm
--- parrot-current/lib/Parrot/Pmc2c/Utils.pm Wed Jan 17 03:15:09 2007
+++ parrot-andy/lib/Parrot/Pmc2c/Utils.pm Tue Jan 23 10:32:30 2007
@@ -1095,9 +1095,9 @@
/* END PMEHTOD BODY */
$method_returns
- //if (PMC_cont(ccont)->address) {
+ /* //if (PMC_cont(ccont)->address) { */
{
- //parrot_context_t * const caller_ctx = PMC_cont(ccont)->to_ctx;
+ /* //parrot_context_t * const caller_ctx = PMC_cont(ccont)->to_ctx; */
if (! caller_ctx) {
/* there is no point calling real_exception here, because
PDB_backtrace can't deal with a missing to_ctx either. */
--
Andy Dougherty [EMAIL PROTECTED]
