ref: 94d2ee527af44610a498d6f6adbba8f0b6d76f17
dir: /sys/src/ape/lib/ap/stdio/gets.c/
/*
* pANS stdio -- gets
*/
#include "iolib.h"
char *gets(char *as){
#ifdef secure
stdin->flags|=ERR;
return NULL;
#else
char *s=as;
int c;
while((c=getchar())!='\n' && c!=EOF) *s++=c;
if(c!=EOF || s!=as) *s='\0';
else return NULL;
return as;
#endif
}