Return to libffi.fs CVS log | Up to [gforth] / gforth |
version 1.33, 2009/12/31 15:32:35 | version 1.34, 2012/03/17 01:36:04 |
---|---|
Line 51 include-ffi.h-string save-c-prefix-line | Line 51 include-ffi.h-string save-c-prefix-line |
\c gforth_clist = args; | \c gforth_clist = args; |
\c gforth_ritem = resp; | \c gforth_ritem = resp; |
\c | \c |
\c gforth_engine((Xt *)ip, sp, rp1, fp, lp, gforth_UP); | \c gforth_engine((Xt *)ip, sp, rp1, fp, lp); |
\c | \c |
\c /* restore global variables */ | \c /* restore global variables */ |
\c gforth_RP = rp1; | \c gforth_RP = rp1; |