/* getline  get string from file */

getline(s, n,file)		/* read at most n chars from file */
char *s;			/* remove eol and put in s terminated */
int n;				/* by 0 (eos) */
int file;
{
int c,ce;
char *cs;

/* if fewer characters wanted than in line, flush rest of line */
cs= s;
while (((c= getc(file)) != EOF) && (n-- > 0)) {
	if ((*cs++ = c) == '\n') {
		cs-- ;	 /* remove NEWLINE */
		break;
	} /* end if *cs++ */
} /* end while */
*cs= EOS;
/* flush rest of line */
if ( n ==0) {
     while (((ce=getc(file))!='\n') && (ce!=EOF)) {;}
}  /* end if n */
return ((c == EOF && cs == s)? NULL: s);
}			/* end getline	*/

<СГ97*ў<  л"ў<Хл*¬<Н‚СЪ‡8*{<%:}<·Н‚Ъ‡8* <лНћ6ХНд6л*Ё<л{жа_{ІВM7СХs#r#> w#wНн6СКc7s#rГh7л"¦<л*¦<ХлНд6Сs#r{ц_ЙХх*Ё<л{