FILE-EMPTY-BUFFERS FILE-CHECK FILE-FLUSH
FILE-EMPTY-BUFFERS
* FILE-EMPTY-BUFFERS ( file-id -- )

FORTH/FORTH file_misc ordinary primitive