Files
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

20 lines
393 B
C

/* setbuf - assign a buffer to a stream, after open but
before any i/o.
Returns SUCCESS if ok, FAILURE o.w. */
#include "stdio.h"
WORD setbuf(sp,buf) /* CLEAR FUNCTION ***********/
REG FILE *sp;
REG BYTE *buf;
{
if( sp->_base != NULLPTR )
return(FAILURE);
sp->_base = sp->_ptr = buf;
if( buf == NULLPTR )
sp->_flag |= _IONBUF;
else sp->_flag &= ~_IONBUF;
return(SUCCESS);
}