--- gforth/prim	2003/08/08 05:56:37	1.133
+++ gforth/prim	2003/08/15 16:47:43	1.134
@@ -2232,6 +2232,7 @@ REST_REGS
 av-call-int    ( -- w )        gforth  av_call_int
 SAVE_REGS
 av_call(alist);
+REST_REGS
 w = irv;
 
 av-call-float   ( -- r )        gforth  av_call_float