seppdroid/Digital-Research-Source-Code
1
0
Fork 0
mirror of https://github.com/SEPPDROID/Digital-Research-Source-Code.git synced 2025-10-26 09:54:20 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Upload

Browse Source 
Digital Research
This commit is contained in:
Sepp J Morris
2020-11-06 18:50:37 +01:00
parent 621ed8ccaf
commit 31738079c4
8481 changed files with 1888323 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
CPM OPERATING SYSTEMS/CPM 86/CONCURRENT/CCPM-86 3.1 SOURCE/D6/ISSYSFIL.C Normal file
View File

@@ -0,0 +1,20 @@
/*----------------------------------------------------------------------*\
| NAME : is_sysfile |
| CREATED : 18-August-83 LAST MODIFIED: 18-August-83 |
| FUNCTION: Is_sysfile checks to see if an FCB references a |
| system type file. |
| INPUT : fcb -- ptr to an FCB to check |
| OUTPUT : Return 1 if a system file was found, 0 if not. |
\*----------------------------------------------------------------------*/
#include <portab.h>
WORD is_sysfile( fcb )
BYTE fcb[];
{
if( fcb[10] & ~0x7f )
return( YES );
return( NO );
}