--- gforth/libffi.fs	2012/03/17 22:18:59	1.35
+++ gforth/libffi.fs	2012/07/23 14:15:51	1.36
@@ -51,7 +51,7 @@ include-ffi.h-string save-c-prefix-line
 \c     gforth_clist = args;
 \c     gforth_ritem = resp;
 \c
-\c     gforth_engine((Xt *)ip, sp, rp1, fp, lp);
+\c     gforth_engine((Xt *)ip);
 \c 
 \c     /* restore global variables */
 \c     gforth_RP = rp1;