Upload

Digital Research

CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v101/clib/puts.c

@@ -0,0 +1,25 @@
+/**************************************************************************
+*
+*			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(s)					/****************************/
+	BYTE *s;				/* null term string	    */
+{						/****************************/
+	while(*s) 				/* for all chars in s	    */
+	    if(putc(*s++,stdout) == FAILURE)	/*   if putc fouls up	    */
+		return(FAILURE);		/*     give up		    */
+	return( putc('\n',stdout) );		/* append newline & return  */
+}						/****************************/