Steve Fink (via RT):
# Index: classes/default.pmc
# ===================================================================
# RCS file: /home/perlcvs/parrot/classes/default.pmc,v
# retrieving revision 1.17
# diff -a -u -r1.17 default.pmc
# --- classes/default.pmc       25 Apr 2002 21:35:16 -0000      1.17
# +++ classes/default.pmc       14 May 2002 22:05:24 -0000
# @@ -41,6 +41,8 @@
#      * the garbage collector.
#      */
#     PMC* mark (PMC *end_of_used_list) {
# +       internal_exception(INTERNAL_PANIC, "custom_mark flag 
# set but no custom mark routine defined\n");
# +        return NULL;
#     }
#  
#     INTVAL get_integer () {

I suggest that you use the PANIC() macro instead of
internal_exception().  PANIC() prints the C file and line number, a ton
of configuration info, and a message saying that you should contact p6i
unless you did something in the internals that might have caused the
panic.  (It will also eventually make Parrot dump core so you can figure
out what went wrong.)

--Brent Dax <[EMAIL PROTECTED]>
@roles=map {"Parrot $_"} qw(embedding regexen Configure)

blink:  Text blinks (alternates between visible and invisible).
Conforming user agents are not required to support this value.
    --The W3C CSS-2 Specification

Reply via email to