hi, i think the following patch from CVS fixes this issue:
http://clozure.com/cgi-bin/viewcvs.cgi/ccl/lisp-kernel/lisp-debug.c.diff?r2=1.5&r1=1.4&diff_format=u you can also find it as attachment. bye, - michael
=================================================================== RCS file: /usr/local/tmpcvs/openmcl/ccl/lisp-kernel/lisp-debug.c,v retrieving revision 1.4 retrieving revision 1.5 diff -u -r1.4 -r1.5 --- ccl/lisp-kernel/lisp-debug.c 2004/05/03 07:45:31 1.4 +++ ccl/lisp-kernel/lisp-debug.c 2005/03/14 14:17:05 1.5 @@ -55,6 +55,8 @@ int c; } debug_command_entry; + +extern debug_command_entry debug_command_entries[]; @@ -87,7 +89,6 @@ void show_lisp_register(ExceptionInformationPowerPC *xp, char *label, int r) { - extern char *print_lisp_object(LispObj); LispObj val = xpGPR(xp, r); @@ -497,6 +498,7 @@ return debug_exit_success; } + debug_command_entry debug_command_entries[] = { {debug_set_gpr, @@ -629,13 +631,13 @@ lisp_Debugger(ExceptionInformationPowerPC *xp, int why, char *message, ...) { va_list args; + debug_command_return state = debug_continue; if (threads_initialized) { suspend_other_threads(); } va_start(args,message); - debug_command_return state = debug_continue; vfprintf(stderr, message, args); fprintf(stderr, "\n"); va_end(args);