Change 33902 by [EMAIL PROTECTED] on 2008/05/21 14:35:20
Make the worst case error message for Perl_croak_xs_usage() consistent
with stringifying a code reference.
Affected files ...
... //depot/perl/universal.c#190 edit
Differences ...
==== //depot/perl/universal.c#190 (text) ====
Index: perl/universal.c
--- perl/universal.c#189~33901~ 2008-05-21 06:35:43.000000000 -0700
+++ perl/universal.c 2008-05-21 07:35:20.000000000 -0700
@@ -329,7 +329,7 @@
Perl_croak(aTHX_ "Usage: %s(%s)", gvname, params);
} else {
/* Pants. I don't think that it should be possible to get here. */
- Perl_croak(aTHX_ "Usage: CODE(%"UVXf")(%s)", (UV)cv, params);
+ Perl_croak(aTHX_ "Usage: CODE(0x%"UVxf")(%s)", (UV)cv, params);
}
}
End of Patch.
