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>