FILE-UPDATE
* FILE-UPDATE ( file-id -- )

FORTH/FORTH file_misc ordinary primitive