Return to fflib.fs CVS log | Up to [gforth] / gforth |
version 1.11, 2005/12/11 20:14:37 | version 1.12, 2005/12/11 21:58:20 |
---|---|
Line 64 DOES> ( x1 .. xn -- r ) | Line 64 DOES> ( x1 .. xn -- r ) |
dup cell+ @ swap 3 cells + >r ; | dup cell+ @ swap 3 cells + >r ; |
Variable ind-call ind-call off | Variable ind-call ind-call off |
: fptr: ( "name" -- ) | : fptr ( "name" -- ) |
Create here thisproc ! 0 , 0 , 0 , 0 also c-decl ind-call on | Create here thisproc ! 0 , 0 , 0 , 0 also c-decl ind-call on |
DOES> 3 cells + >r ; | DOES> 3 cells + >r ; |