mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 00:14:25 +00:00
46 lines
1.1 KiB
C
46 lines
1.1 KiB
C
/**************************************************************************
|
||
*
|
||
* f w r i t e F u n c t i o n
|
||
* -----------------------------
|
||
* Copyright 1982 by Digital Research Inc. All rights reserved.
|
||
*
|
||
* "fwrite" writes NI items of size SZ from memory at BUFF into stream
|
||
* SP.
|
||
*
|
||
* Calling sequence:
|
||
* nitems = fwrite(buff,size,nitems,stream)
|
||
* Where:
|
||
* buff -> where to write from
|
||
* size = number bytes in each item
|
||
* nitems = number bytes written/to write
|
||
* stream -> file
|
||
*
|
||
* nitems is set to 0 if an error occurs (including EOF).
|
||
*
|
||
*****************************************************************************/
|
||
|
||
#include "stdio.h"
|
||
|
||
WORD fwrite(buff,siz,num,sp) /* CLEAR FUNCTION ***********/
|
||
REG BYTE *buff;
|
||
WORD siz,
|
||
num;
|
||
REG FILE *sp;
|
||
{
|
||
REG WORD jj, kk;
|
||
|
||
for( jj=0; jj<num; jj++ )
|
||
for( kk=0; kk<siz; kk++ )
|
||
if( fputc(*buff++,sp) == FAILURE ) /* used for side effects */
|
||
return(NULL);
|
||
return(num);
|
||
}
|
||
p) == FAILURE ) /* used for side effects */
|
||
return(NULL);
|
||
return(num);
|
||
}
|
||
p) == FAILURE ) /* used for side effects */
|
||
return(NULL);
|
||
return(num);
|
||
}
|