version 1.132, 2003/08/07 08:50:00
|
version 1.134, 2003/08/15 16:47:43
|
Line 1561 c_addr = strerror(n);
|
Line 1561 c_addr = strerror(n);
|
u = strlen(c_addr); |
u = strlen(c_addr); |
|
|
strsignal ( n -- c_addr u ) gforth |
strsignal ( n -- c_addr u ) gforth |
c_addr = strsignal(n); |
c_addr = (Address)strsignal(n); |
u = strlen(c_addr); |
u = strlen(c_addr); |
|
|
call-c ( w -- ) gforth call_c |
call-c ( w -- ) gforth call_c |
Line 2232 REST_REGS
|
Line 2232 REST_REGS
|
av-call-int ( -- w ) gforth av_call_int |
av-call-int ( -- w ) gforth av_call_int |
SAVE_REGS |
SAVE_REGS |
av_call(alist); |
av_call(alist); |
|
REST_REGS |
w = irv; |
w = irv; |
|
|
av-call-float ( -- r ) gforth av_call_float |
av-call-float ( -- r ) gforth av_call_float |