Plan 9 from Bell Labs’s /usr/web/sources/plan9/sys/src/ape/lib/ap/stdio/fputs.c
/* * pANS stdio -- fputs */ #include "iolib.h" int fputs(const char *s, FILE *f){ while(*s) putc(*s++, f); return ferror(f)?EOF:0; }