FILE-BUFFER FILE-BLOCK FILE-CHECK
FILE-BUFFER
* FILE-BUFFER ( a file-id -- c )

file_misc ordinary primitive