--- gforth/kernel/int.fs	2006/05/01 09:45:56	1.151
+++ gforth/kernel/int.fs	2006/05/26 21:18:45	1.152
@@ -665,7 +665,7 @@ has? backtrace [IF]
     backtrace-rp0 @ >r	
     ['] interpret1 catch
     r> backtrace-rp0 !
-    throw ;
+    throw>error ;
 [ELSE]
 : interpret ( ... -- ... )
     BEGIN