diff --git a/core/kernel/kernel-tests.factor b/core/kernel/kernel-tests.factor index bd21490542..ded2ee9702 100644 --- a/core/kernel/kernel-tests.factor +++ b/core/kernel/kernel-tests.factor @@ -164,11 +164,6 @@ IN: kernel.tests last-frame ] unit-test -: throw-frame-test ( c -- * ) [ gc gc continue ] call-clear ; -: throw-frame-test' ( -- ) [ throw-frame-test ] callcc0 ; - -[ ] [ throw-frame-test' ] unit-test - [ 10 2 3 4 5 ] [ 1 2 3 4 5 [ 10 * ] 4dip ] unit-test [ 3 -1 5/6 ] [ 1 2 3 4 5 6 [ + ] [ - ] [ / ] 2tri* ] unit-test