mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 16:34:07 +00:00
32 lines
945 B
C
32 lines
945 B
C
/****************************************************************************
|
|
*
|
|
* C F I L E O P E N R O U T I N E
|
|
* -------------------------------------
|
|
*
|
|
* The "open" routine opens a "C" file and returns a file id.
|
|
*
|
|
* Calling Sequence:
|
|
*
|
|
* fid = open(fname,mode,type);
|
|
*
|
|
* Where:
|
|
*
|
|
* fname is the address of a null terminated file name.
|
|
* mode is the open mode:
|
|
*
|
|
* 0 => READ access only
|
|
* 1 => WRITE access only
|
|
* 2 => Both READ and WRITE
|
|
* type is 0 for ASCII files, 1 for BINARY
|
|
*
|
|
*
|
|
*****************************************************************************/
|
|
#include <portab.h> /* */
|
|
WORD xopen(fname,mode,xtype) /****************************/
|
|
BYTE *fname; /* -> File name */
|
|
WORD mode; /* Open mode */
|
|
WORD xtype; /* File type */
|
|
{ /****************************/
|
|
return(_open(fname,mode,xtype)); /* Call clib routine */
|
|
} /****************************/
|