Files
2018-01-27 22:35:41 +09:00

14 lines
190 B
C

puts(str)
char *str;
{
auto char *p,c;
auto int f;
extern int cout;
if (nargs() != 1)
IEHzap("puts ");
p = str;
while( (c = *p++)!= '\0') cputc(c,cout);
cputc('\n',cout);
return(str);
}