/* get character from fp till '\n' is met; return # of characters */

#include <stdio.h>

int fgetrecord(fp,s)
FILE *fp;
char *s;
{
int i;
char c;
	i=0;
	do
	{ if(fscanf(fp,"%c",&c)==EOF) return(-1);
	  if(c=='\n') break;
	  s[i++]=c;
	} while(c!='\n');
	s[i]='\0';
	return(i);
}