FILE-POSITION FILE-LOAD FILE-R/W
FILE-POSITION
* FILE-POSITION ( file -- p.pos code )

return the current position in the file and
return a status code. A code of zero means success.

FORTH/ANS file (dpANS11.6.1.1520) ordinary primitive