URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [980825-1.c] - Rev 377
Go to most recent revision | Compare with Previous | Blame | View Log
typedef enum { FALSE, TRUE } boolean; enum _errorTypes { FATAL = 1, WARNING = 2, PERROR = 4 }; typedef struct _optionValues { struct _include { boolean classNames; boolean defines; boolean enumerators; } include; } optionValues; extern optionValues Option; static void applyTagInclusionList( list ) const char *const list; { boolean mode = TRUE; const char *p; for (p = list ; *p != '\0' ; ++p) switch (*p) { case '=': clearTagList(); mode = TRUE; break; case '+': mode = TRUE; break; case '-': mode = FALSE; break; case 'c': Option.include.classNames = mode; break; case 'd': Option.include.defines = mode; break; case 'e': Option.include.enumerators = mode; break; default: error(FATAL, "-i: Invalid tag option '%c'", *p); break; } }
Go to most recent revision | Compare with Previous | Blame | View Log