Powered by ViewCVS 1.0-dev
| version 1.230, Tue Jul 15 16:11:49 2008 UTC | version 1.231, Sun Jul 27 09:58:29 2008 UTC | ||
|---|---|---|---|
|
|
||
| variables @code{gforth_SP} and @code{gforth_FP}."" | variables @code{gforth_SP} and @code{gforth_FP}."" | ||
| /* This is a first attempt at support for calls to C. This may change in | /* This is a first attempt at support for calls to C. This may change in | ||
| the future */ | the future */ | ||
| IF_fpTOS(fp[0]=fpTOS); | |||
| gforth_FP=fp; | gforth_FP=fp; | ||
| gforth_SP=sp; | gforth_SP=sp; | ||
| gforth_RP=rp; | |||
| gforth_LP=lp; | |||
| ((void (*)())w)(); | ((void (*)())w)(); | ||
| sp=gforth_SP; | sp=gforth_SP; | ||
| fp=gforth_FP; | fp=gforth_FP; | ||
| rp=gforth_RP; | |||
| lp=gforth_LP; | |||
| IF_fpTOS(fpTOS=fp[0]); | |||
| \+ | \+ | ||
| \+file | \+file |
|
||||||||
|
CVS Admin Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |