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

28 lines
913 B
C

/**************************************************************************
*
* p u t s F u n c t i o n
* -------------------------
* Copyright 1982 by Digital Research Inc. All rights reserved.
*
* "puts" copies a null terminated string to the standard output.
* It copies a newline char after the end of the string.
*
* Calling sequence:
* ret = puts(s)
* Where:
* s = string to put
* ret = last char output
*
*****************************************************************************/
#include "stdio.h"
WORD puts(str) /* CLEAR FUNCTION ***********/
REG BYTE *str; /* null term string */
{ /****************************/
while(*str) /* for all chars in s */
if(putc(*str++,stdout) == FAILURE) /* if putc fouls up */
return(FAILURE); /* give up */
return( putc('\n',stdout) ); /* append newline & return */
} /****************************/