source: tags/arb_5.3/CONVERTALN/truncate.c

#include <stdio.h>
#include "convert.h"
#include "global.h"


/* ------------------------------------------------------------ */
/*  Function truncate_over_80().
    /*      Initially used for truncating line over 80 char.
    /*      of AE2 file.  Now might not be useful anymore...
*/
void
truncate_over_80(inf, outf)
     FILE *inf, *outf;
{
    char *fgets(), *eof, line[80], c;

    eof=fgets(line, 80, inf);
    for(;eof!=NULL; )   {
        if(strlen(line)>=79)    {
            fprintf(stderr, "OVERFLOW LINE: %s", line);
            for(; (c=fgetc(inf))!='\n'&&c!=NULL; );
        }
        eof=fgets(line, 80, inf);
    }
}