Return to main.c CVS log | Up to [gforth] / gforth / engine |
version 1.119, 2003/08/15 14:07:04 | version 1.120, 2003/08/16 21:09:47 |
---|---|
Line 70 va_alist clist; | Line 70 va_alist clist; |
void engine_callback(Xt* fcall, void * alist) | void engine_callback(Xt* fcall, void * alist) |
{ | { |
engine(fcall, SP, RP, FP, LP); | |
clist = (va_alist)alist; | clist = (va_alist)alist; |
engine(fcall, SP, RP, FP, LP); | |
} | } |
#endif | #endif |