don't assume world has children in debugger

db4
Joe Groff 2009-05-14 10:08:57 -05:00
parent 0d8115a940
commit ba9ba118a6
1 changed files with 1 additions and 1 deletions

View File

@ -60,7 +60,7 @@ M: debugger focusable-child*
GENERIC: error-in-debugger? ( error -- ? )
M: world-error error-in-debugger? world>> gadget-child debugger? ;
M: world-error error-in-debugger? world>> children>> [ f ] [ first debugger? ] if-empty ;
M: object error-in-debugger? drop f ;