- description
-- miscellaneous useful extra words for FILE-EXT
Copyright (C) Tektronix, Inc. 1998 - 2001. All rights reserved.
description:
Compatiblity with former standards, miscellaneous useful words.
... for FILE-EXT
-
FORTH
INCLUDE
( 'filename' -- ? )();
p4:"include";
load the specified file, see also LOAD" filename"
-
FORTH
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
MOVE-FILE
( src-str src-strlen dst-str dst-strlen -- errno|0 )( | ); | |
like RENAME-FILE, but also across-volumes <br>
moves the file from src-name to dst-name and returns an
error-code or null
-
FORTH
FILE-R/W
( addr blk f fid -- )( | ); | |
like FIG-Forth R/W
-
FORTH
FILE-BLOCK
( a file-id -- c )( | ); | |
-
FORTH
FILE-BUFFER
( a file-id -- c )( | ); | |
-
FORTH
FILE-EMPTY-BUFFERS
( file-id -- )( | ); | |
-
FORTH
FILE-FLUSH
( file-id -- )( | ); | |
simulate : FILE-FLUSH DUP FILE-SAVE-BUFFERS FILE-EMTPY-BUFFERS ;
-
FORTH
FILE-LIST
( x file-id -- )( | ); | |
-
FORTH
FILE-LOAD
( x file-id -- )( | ); | |
-
FORTH
FILE-SAVE-BUFFERS
( file-id -- )( | ); | |
-
FORTH
FILE-THRU
( lo hi file-id -- )( | ); | |
see THRU
-
FORTH
FILE-UPDATE
( file-id -- )( | ); | |