#ifndef _PFE_FILE_MIX_H
#define _PFE_FILE_MIX_H 1034771915
/* generated 2002-1016-1438 ../../../pfe/../mk/Make-H.pl ../../../pfe/file-mix.c */

#include <pfe/incl-mix.h>

/** 
 * -- miscellaneous useful extra words for FILE-EXT
 *
 *  Copyright (C) Tektronix, Inc. 1998 - 2001. All rights reserved.
 *
 *  @see     GNU LGPL
 *  @author  Tektronix CTE              @(#) %derived_by: guidod %
 *  @version %version:  %
 *    (%date_modified:  %)
 *
 *  @description
 *      Compatiblity with former standards, miscellaneous useful words.
 *      ... for FILE-EXT
 */

#ifdef __cplusplus
extern "C" {
#endif




/** INCLUDE ( 'filename' -- ? )
 * load the specified file, see also => LOAD" filename"
 */
extern P4_CODE (p4_include);

/** 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
 */
extern P4_CODE (p4_copy_file);

/** 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
 */
extern P4_CODE (p4_move_file);

/** FILE-R/W ( addr blk f fid -- )
 * like FIG-Forth <c> R/W </c>
 */
extern P4_CODE (p4_file_rw);

/** FILE-BLOCK ( a file-id -- c )
 */
extern P4_CODE (p4_file_block);

/** FILE-BUFFER ( a file-id -- c )
 */
extern P4_CODE (p4_file_buffer);

/** FILE-EMPTY-BUFFERS ( file-id -- )
 */
extern P4_CODE (p4_file_empty_buffers);

/** FILE-FLUSH ( file-id -- )
 simulate      : FILE-FLUSH DUP FILE-SAVE-BUFFERS FILE-EMTPY-BUFFERS ;
 */
extern P4_CODE (p4_file_flush);

/** FILE-LIST ( x file-id -- )
 */
extern P4_CODE (p4_file_list);

/** FILE-LOAD ( x file-id -- )
 */
extern P4_CODE (p4_file_load);

/** FILE-SAVE-BUFFERS ( file-id -- )
 */
extern P4_CODE (p4_file_save_buffers);

/** FILE-THRU ( lo hi file-id -- )
 * see => THRU
 */
extern P4_CODE (p4_file_thru);

/** FILE-UPDATE ( file-id -- )
 */
extern P4_CODE (p4_file_update);

#ifdef __cplusplus
} /* extern "C" */
#endif


#endif
