[BACK]Return to utils.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib / TiGERS_0.9

Annotation of OpenXM_contrib/TiGERS_0.9/utils.c, Revision 1.1

1.1     ! maekawa     1: /*
        !             2: ** utils.c                                 Birk Huber, 4/99
        !             3: **
        !             4: **  A place for general global variables and routines accessible
        !             5: **  througout the program.
        !             6: **
        !             7: ** TiGERS,  Toric Groebner Basis Enumeration by Reverse Search
        !             8: ** copyright (c) 1999  Birk Huber
        !             9: **
        !            10: */
        !            11: #include<stdio.h>
        !            12: #include<stdlib.h>
        !            13:
        !            14: int eatwhite(FILE *is){
        !            15:  int c;
        !            16:  while ((c=fgetc(is))!=EOF){
        !            17:   if (c=='%')  while ((c=fgetc(is))!=EOF && c!='\n');
        !            18:   if (isspace(c)==0) break;
        !            19:  }
        !            20:  ungetc(c,is);
        !            21: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>