gcc/testsuite/gcc.c-torture/compile/980825-1.c

   1 typedef enum { FALSE, TRUE } boolean;
   2 enum _errorTypes { FATAL = 1, WARNING = 2, PERROR = 4 };
   3 typedef struct _optionValues {
   4     struct _include {
   5         boolean classNames;
   6         boolean defines;
   7         boolean enumerators;
   8     } include;
   9 } optionValues;
  10 extern optionValues     Option;
  11 static void applyTagInclusionList( list )
  12     const char *const list;
  13 {
  14     boolean mode = TRUE;
  15     const char *p;
  16     for (p = list  ;  *p != '\0'  ;  ++p)
  17         switch (*p)
  18         {
  19             case '=':
  20                 clearTagList();
  21                 mode = TRUE;
  22                 break;
  23             case '+':   mode = TRUE;    break;
  24             case '-':   mode = FALSE;   break;
  25             case 'c':   Option.include.classNames       = mode;         break;
  26             case 'd':   Option.include.defines          = mode;         break;
  27             case 'e':   Option.include.enumerators      = mode;         break;
  28             default: error(FATAL, "-i: Invalid tag option '%c'", *p);   break;
  29         }
  30 }