file_misc file locals

"FILE-Misc Compatibility words"

file_misc FORTH
* INCLUDE ( 'filename' -- ? )

load the specified file, see also LOAD" filename"

FORTH/FORTH file_misc ordinary primitive

/* more file-manipulation */
* COPY-FILE ( src-str src-strlen dst-str dst-strlen -- errno|0 )

like RENAME-FILE, copies the file from src-name to dst-name
and returns an error-code or null

FORTH/FORTH file_misc ordinary primitive

* MOVE-FILE ( src-str src-strlen dst-str dst-strlen -- errno|0 )

like RENAME-FILE, but also across-volumes

moves the file from src-name to dst-name and returns an
error-code or null

FORTH/FORTH file_misc ordinary primitive

* FILE-R/W ( addr blk f fid -- )

like FIG-Forth R/W

FORTH/FORTH file_misc ordinary primitive

* the FILE-operations can can also be USING blocks from a file
* FILE-BLOCK ( a file-id -- c )

FORTH/FORTH file_misc ordinary primitive

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

FORTH/FORTH file_misc ordinary primitive

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

FORTH/FORTH file_misc ordinary primitive

* FILE-FLUSH ( file-id -- )
 simulate      : FILE-FLUSH DUP FILE-SAVE-BUFFERS FILE-EMTPY-BUFFERS ;

FORTH/FORTH file_misc ordinary primitive

* FILE-LIST ( x file-id -- )

FORTH/FORTH file_misc ordinary primitive

* FILE-LOAD ( x file-id -- )

FORTH/FORTH file_misc ordinary primitive

* FILE-SAVE-BUFFERS ( file-id -- )

FORTH/FORTH file_misc ordinary primitive

* FILE-THRU ( lo hi file-id -- )

see THRU

FORTH/FORTH file_misc ordinary primitive

* FILE-UPDATE ( file-id -- )

FORTH/FORTH file_misc ordinary primitive