void SysCreateFile( ftnfile *fcb ) {
//=====================================
// Cause the file to exist in the file system.
fcb->fileptr = Openf( fcb->filename, REC_TEXT | WRONLY );
if( fcb->fileptr != NULL ) {
Closef( fcb->fileptr );
fcb->fileptr = NULL;
fcb->flags |= FTN_FSEXIST;
} else {
IOErr( IO_FILE_PROBLEM );
}
}
void OpenAction( ftnfile *fcb ) {
//==================================
// Open a file.
SetIOBufferSize( fcb->blocksize );
fcb->fileptr = Openf( fcb->filename, _FileAttrs( fcb ) );
if( fcb->fileptr != NULL ) {
if( ((a_file *)(fcb->fileptr))->attrs & CHAR_DEVICE ) {
// In dos box under NT we do not get correct information
// about a device until we actually open it (a bug in the NT
// dos box
fcb->device = INFO_DEV;
}
}
}
file_handle SDOpen( char *name, int mode ) {
//==============================================
return( Openf( name, Modes[ mode ] | CurrAttrs ) );
}
