view release on metacpan or  search on metacpan

keywords.c  view on Meta::CPAN

                      name[5] == 'o' &&
                      name[6] == 'w' &&
                      name[7] == 'n')
                  {                               /* shutdown         */
                    return -KEY_shutdown;
                  }

                  goto unknown;

                default:
                  goto unknown;
              }

            case 'y':
              if (name[2] == 's' &&
                  name[3] == 'w' &&
                  name[4] == 'r' &&
                  name[5] == 'i' &&
                  name[6] == 't' &&
                  name[7] == 'e')
              {                                   /* syswrite         */
                return -KEY_syswrite;
              }

              goto unknown;

            default:
              goto unknown;
          }

        case 't':
          if (name[1] == 'r' &&
              name[2] == 'u' &&
              name[3] == 'n' &&
              name[4] == 'c' &&
              name[5] == 'a' &&
              name[6] == 't' &&
              name[7] == 'e')
          {                                       /* truncate         */
            return -KEY_truncate;
          }

          goto unknown;

        default:
          goto unknown;
      }

    case 9: /* 11 tokens of length 9 */
      switch (name[0])
      {
        case 'U':
          if (name[1] == 'N' &&
              name[2] == 'I' &&
              name[3] == 'T' &&
              name[4] == 'C' &&
              name[5] == 'H' &&
              name[6] == 'E' &&
              name[7] == 'C' &&
              name[8] == 'K')
          {                                       /* UNITCHECK        */
            return KEY_UNITCHECK;
          }

          goto unknown;

        case '_':
          if (name[1] == '_' &&
              name[2] == 'C' &&
              name[3] == 'L' &&
              name[4] == 'A' &&
              name[5] == 'S' &&
              name[6] == 'S' &&
              name[7] == '_' &&
              name[8] == '_')
          {                                       /* __CLASS__        */
            return (all_keywords || FEATURE_CLASS_IS_ENABLED ? -KEY___CLASS__ : 0);
          }

          goto unknown;

        case 'e':
          switch (name[1])
          {
            case 'n':
              if (name[2] == 'd' &&
                  name[3] == 'n' &&
                  name[4] == 'e' &&
                  name[5] == 't' &&
                  name[6] == 'e' &&
                  name[7] == 'n' &&
                  name[8] == 't')
              {                                   /* endnetent        */
                return -KEY_endnetent;
              }

              goto unknown;

            case 'v':
              if (name[2] == 'a' &&
                  name[3] == 'l' &&
                  name[4] == 'b' &&
                  name[5] == 'y' &&
                  name[6] == 't' &&
                  name[7] == 'e' &&
                  name[8] == 's')
              {                                   /* evalbytes        */
                return (all_keywords || FEATURE_EVALBYTES_IS_ENABLED ? -KEY_evalbytes : 0);
              }

              goto unknown;

            default:
              goto unknown;
          }

        case 'g':
          if (name[1] == 'e' &&
              name[2] == 't' &&
              name[3] == 'n' &&
              name[4] == 'e' &&
              name[5] == 't' &&