continuations: don't need to init-catchstack twice from init.
parent
fe4093d67a
commit
6d5775e732
|
@ -206,7 +206,6 @@ M: condition compute-restarts
|
||||||
<PRIVATE
|
<PRIVATE
|
||||||
|
|
||||||
: init-error-handler ( -- )
|
: init-error-handler ( -- )
|
||||||
init-catchstack
|
|
||||||
! VM calls on error
|
! VM calls on error
|
||||||
[
|
[
|
||||||
OBJ-CURRENT-THREAD special-object error-thread set-global
|
OBJ-CURRENT-THREAD special-object error-thread set-global
|
||||||
|
|
Loading…
Reference in New Issue