rem: return errors;
add: return ok;
context: paste_serial (int nfiles, char **fnamptr){  int errors = 0;		/* 1 if open or read errors occur. */  register int charnew, charold; /* Current and previous char read. */  register char *delimptr;	/* Current delimiter char. */  register FILE *fileptr;	/* Open for reading current file. */  for (; nfiles; nfiles--, fnamptr++)    {      if (STREQ (*fnamptr, "-"))	{	  have_read_stdin = 1;	  fileptr = stdin;	}      else	{	  fileptr = fopen (*fnamptr, "r");	  if (fileptr == NULL)	    {	      error (0, errno, "%s", *fnamptr);	      errors = 1;	      continue;	    }	}      delimptr = delims;	/* Set up for delimiter string. */      charold = getc (fileptr);      if (charold != EOF)	{	  /* `charold' is set up.  Hit it!	     Keep reading characters, stashing them in `charnew';	     output `charold', converting to the appropriate delimiter	     character if needed.  After the EOF, output `charold'	     if it's a newline; otherwise, output it and then a newline. */	  while ((charnew = getc (fileptr)) != EOF)	    {	      /* Process the old character. */	      if (charold == '\n')		{		  if (*delimptr != EMPTY_DELIM)		    putc (*delimptr, stdout);		  if (++delimptr == delim_end)		    delimptr = delims;		}	      else		putc (charold, stdout);	      charold = charnew;	    }	  /* Hit EOF.  Process that last character. */	  putc (charold, stdout);	}      if (charold != '\n')	putc ('\n', stdout);      if (ferror (fileptr))	{	  error (0, errno, "%s", *fnamptr);	  errors = 1;	}      if (fileptr == stdin)	clearerr (fileptr);	/* Also clear EOF. */      else if (fclose (fileptr) == EOF)	{	  error (0, errno, "%s", *fnamptr);	  errors = 1;	}    }  return errors;}