Move call( and execute( to core

[factor.git] / vm / errors.c

diff --git a/vm/errors.c b/vm/errors.c
index 7c06ec1310568a98a7058e1ff2bfa7a244a3e67e..9b7b7843d247fa4aac507490d269c37a1a006f73 100755 (executable)
--- a/vm/errors.c
+++ b/vm/errors.c
@@ -144,12 +144,6 @@ void misc_signal_handler_impl(void)
        signal_error(signal_number,signal_callstack_top);
 }
 
-void primitive_throw(void)
-{
-       dpop();
-       throw_impl(dpop(),stack_chain->callstack_top);
-}
-
 void primitive_call_clear(void)
 {
        throw_impl(dpop(),stack_chain->callstack_bottom);