* linked ( list -- ) \ gforth : linked here over @ a, swap ! ; (note: win32forth calls it "link," )
linked
( list -- )
\ gforth
: linked here over @ a, swap ! ;
gforth' gforth ordinary primitive