steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix Objective-C exception handling

slava 2006-11-17 07:01:05 +00:00
parent fde3ba3bb3
commit 7904ddcac2
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
library/tools/errors.factor
View File

@ -80,6 +80,7 @@ DEFER: objc-error. ( alien -- )
retainstack-overflow. retainstack-overflow.
callstack-underflow. callstack-underflow.
callstack-overflow. callstack-overflow.
objc-error.
} nth ; } nth ;
M: kernel-error error. dup kernel-error execute ; M: kernel-error error. dup kernel-error execute ;

3
vm/os-macosx.m
View File

@ -18,6 +18,7 @@ void run()
for(;;) for(;;)
{ {
NS_DURING NS_DURING
stack_chain->native_stack_pointer = native_stack_pointer();
SETJMP(stack_chain->toplevel); SETJMP(stack_chain->toplevel);
handle_error(); handle_error();
@ -38,7 +39,7 @@ NS_ENDHANDLER
void run_toplevel(void) void run_toplevel(void)
{ {
interpreter(); run();
} }
void early_init(void) void early_init(void)