FILE-SIZE
* FILE-SIZE ( file -- s.size code )

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

file ordinary primitive