00001
00002
00003
00004 #if !((' ' == 32) && ('!' == 33) && ('"' == 34) && ('#' == 35) \
00005 && ('%' == 37) && ('&' == 38) && ('\'' == 39) && ('(' == 40) \
00006 && (')' == 41) && ('*' == 42) && ('+' == 43) && (',' == 44) \
00007 && ('-' == 45) && ('.' == 46) && ('/' == 47) && ('0' == 48) \
00008 && ('1' == 49) && ('2' == 50) && ('3' == 51) && ('4' == 52) \
00009 && ('5' == 53) && ('6' == 54) && ('7' == 55) && ('8' == 56) \
00010 && ('9' == 57) && (':' == 58) && (';' == 59) && ('<' == 60) \
00011 && ('=' == 61) && ('>' == 62) && ('?' == 63) && ('A' == 65) \
00012 && ('B' == 66) && ('C' == 67) && ('D' == 68) && ('E' == 69) \
00013 && ('F' == 70) && ('G' == 71) && ('H' == 72) && ('I' == 73) \
00014 && ('J' == 74) && ('K' == 75) && ('L' == 76) && ('M' == 77) \
00015 && ('N' == 78) && ('O' == 79) && ('P' == 80) && ('Q' == 81) \
00016 && ('R' == 82) && ('S' == 83) && ('T' == 84) && ('U' == 85) \
00017 && ('V' == 86) && ('W' == 87) && ('X' == 88) && ('Y' == 89) \
00018 && ('Z' == 90) && ('[' == 91) && ('\\' == 92) && (']' == 93) \
00019 && ('^' == 94) && ('_' == 95) && ('a' == 97) && ('b' == 98) \
00020 && ('c' == 99) && ('d' == 100) && ('e' == 101) && ('f' == 102) \
00021 && ('g' == 103) && ('h' == 104) && ('i' == 105) && ('j' == 106) \
00022 && ('k' == 107) && ('l' == 108) && ('m' == 109) && ('n' == 110) \
00023 && ('o' == 111) && ('p' == 112) && ('q' == 113) && ('r' == 114) \
00024 && ('s' == 115) && ('t' == 116) && ('u' == 117) && ('v' == 118) \
00025 && ('w' == 119) && ('x' == 120) && ('y' == 121) && ('z' == 122) \
00026 && ('{' == 123) && ('|' == 124) && ('}' == 125) && ('~' == 126))
00027
00028 error "gperf generated tables don't work with this execution character set. Please report a bug to <bug-gnu-gperf@gnu.org>."
00029 #endif
00030
00031 #line 1 "defs/keywords"
00032
00033 struct kwtable {const char *name; int id[2]; enum lex_state_e state;};
00034 const struct kwtable *rb_reserved_word(const char *, unsigned int);
00035 #ifndef RIPPER
00036 static const struct kwtable *reserved_word(const char *, unsigned int);
00037 #define rb_reserved_word(str, len) reserved_word(str, len)
00038 #line 9 "defs/keywords"
00039 struct kwtable;
00040
00041 #define TOTAL_KEYWORDS 41
00042 #define MIN_WORD_LENGTH 2
00043 #define MAX_WORD_LENGTH 12
00044 #define MIN_HASH_VALUE 8
00045 #define MAX_HASH_VALUE 50
00046
00047
00048 #ifdef __GNUC__
00049 __inline
00050 #else
00051 #ifdef __cplusplus
00052 inline
00053 #endif
00054 #endif
00055 static unsigned int
00056 hash (str, len)
00057 register const char *str;
00058 register unsigned int len;
00059 {
00060 static const unsigned char asso_values[] =
00061 {
00062 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00063 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00064 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00065 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00066 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00067 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00068 51, 51, 51, 26, 51, 51, 14, 51, 16, 8,
00069 11, 13, 51, 51, 51, 51, 10, 51, 13, 51,
00070 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00071 51, 51, 51, 51, 51, 11, 51, 13, 1, 26,
00072 4, 1, 8, 28, 51, 23, 51, 1, 1, 27,
00073 5, 19, 21, 51, 8, 3, 3, 11, 51, 21,
00074 24, 16, 51, 51, 51, 51, 51, 51, 51, 51,
00075 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00076 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00077 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00078 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00079 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00080 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00081 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00082 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00083 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00084 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00085 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00086 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
00087 51, 51, 51, 51, 51, 51
00088 };
00089 register int hval = len;
00090
00091 switch (hval)
00092 {
00093 default:
00094 hval += asso_values[(unsigned char)str[2]];
00095
00096 case 2:
00097 case 1:
00098 hval += asso_values[(unsigned char)str[0]];
00099 break;
00100 }
00101 return hval + asso_values[(unsigned char)str[len - 1]];
00102 }
00103
00104 #ifdef __GNUC__
00105 __inline
00106 #if defined __GNUC_STDC_INLINE__ || defined __GNUC_GNU_INLINE__
00107 __attribute__ ((__gnu_inline__))
00108 #endif
00109 #endif
00110 const struct kwtable *
00111 rb_reserved_word (str, len)
00112 register const char *str;
00113 register unsigned int len;
00114 {
00115 static const struct kwtable wordlist[] =
00116 {
00117 {""}, {""}, {""}, {""}, {""}, {""}, {""}, {""},
00118 #line 19 "defs/keywords"
00119 {"break", {keyword_break, keyword_break}, EXPR_MID},
00120 #line 25 "defs/keywords"
00121 {"else", {keyword_else, keyword_else}, EXPR_BEG},
00122 #line 35 "defs/keywords"
00123 {"nil", {keyword_nil, keyword_nil}, EXPR_END},
00124 #line 28 "defs/keywords"
00125 {"ensure", {keyword_ensure, keyword_ensure}, EXPR_BEG},
00126 #line 27 "defs/keywords"
00127 {"end", {keyword_end, keyword_end}, EXPR_END},
00128 #line 44 "defs/keywords"
00129 {"then", {keyword_then, keyword_then}, EXPR_BEG},
00130 #line 36 "defs/keywords"
00131 {"not", {keyword_not, keyword_not}, EXPR_ARG},
00132 #line 29 "defs/keywords"
00133 {"false", {keyword_false, keyword_false}, EXPR_END},
00134 #line 42 "defs/keywords"
00135 {"self", {keyword_self, keyword_self}, EXPR_END},
00136 #line 26 "defs/keywords"
00137 {"elsif", {keyword_elsif, keyword_elsif}, EXPR_VALUE},
00138 #line 39 "defs/keywords"
00139 {"rescue", {keyword_rescue, modifier_rescue}, EXPR_MID},
00140 #line 45 "defs/keywords"
00141 {"true", {keyword_true, keyword_true}, EXPR_END},
00142 #line 48 "defs/keywords"
00143 {"until", {keyword_until, modifier_until}, EXPR_VALUE},
00144 #line 47 "defs/keywords"
00145 {"unless", {keyword_unless, modifier_unless}, EXPR_VALUE},
00146 #line 41 "defs/keywords"
00147 {"return", {keyword_return, keyword_return}, EXPR_MID},
00148 #line 22 "defs/keywords"
00149 {"def", {keyword_def, keyword_def}, EXPR_FNAME},
00150 #line 17 "defs/keywords"
00151 {"and", {keyword_and, keyword_and}, EXPR_VALUE},
00152 #line 24 "defs/keywords"
00153 {"do", {keyword_do, keyword_do}, EXPR_BEG},
00154 #line 51 "defs/keywords"
00155 {"yield", {keyword_yield, keyword_yield}, EXPR_ARG},
00156 #line 30 "defs/keywords"
00157 {"for", {keyword_for, keyword_for}, EXPR_VALUE},
00158 #line 46 "defs/keywords"
00159 {"undef", {keyword_undef, keyword_undef}, EXPR_FNAME},
00160 #line 37 "defs/keywords"
00161 {"or", {keyword_or, keyword_or}, EXPR_VALUE},
00162 #line 32 "defs/keywords"
00163 {"in", {keyword_in, keyword_in}, EXPR_VALUE},
00164 #line 49 "defs/keywords"
00165 {"when", {keyword_when, keyword_when}, EXPR_VALUE},
00166 #line 40 "defs/keywords"
00167 {"retry", {keyword_retry, keyword_retry}, EXPR_END},
00168 #line 31 "defs/keywords"
00169 {"if", {keyword_if, modifier_if}, EXPR_VALUE},
00170 #line 20 "defs/keywords"
00171 {"case", {keyword_case, keyword_case}, EXPR_VALUE},
00172 #line 38 "defs/keywords"
00173 {"redo", {keyword_redo, keyword_redo}, EXPR_END},
00174 #line 34 "defs/keywords"
00175 {"next", {keyword_next, keyword_next}, EXPR_MID},
00176 #line 43 "defs/keywords"
00177 {"super", {keyword_super, keyword_super}, EXPR_ARG},
00178 #line 33 "defs/keywords"
00179 {"module", {keyword_module, keyword_module}, EXPR_VALUE},
00180 #line 18 "defs/keywords"
00181 {"begin", {keyword_begin, keyword_begin}, EXPR_BEG},
00182 #line 12 "defs/keywords"
00183 {"__LINE__", {keyword__LINE__, keyword__LINE__}, EXPR_END},
00184 #line 13 "defs/keywords"
00185 {"__FILE__", {keyword__FILE__, keyword__FILE__}, EXPR_END},
00186 #line 11 "defs/keywords"
00187 {"__ENCODING__", {keyword__ENCODING__, keyword__ENCODING__}, EXPR_END},
00188 #line 15 "defs/keywords"
00189 {"END", {keyword_END, keyword_END}, EXPR_END},
00190 #line 16 "defs/keywords"
00191 {"alias", {keyword_alias, keyword_alias}, EXPR_FNAME},
00192 #line 14 "defs/keywords"
00193 {"BEGIN", {keyword_BEGIN, keyword_BEGIN}, EXPR_END},
00194 #line 23 "defs/keywords"
00195 {"defined?", {keyword_defined, keyword_defined}, EXPR_ARG},
00196 #line 21 "defs/keywords"
00197 {"class", {keyword_class, keyword_class}, EXPR_CLASS},
00198 {""}, {""},
00199 #line 50 "defs/keywords"
00200 {"while", {keyword_while, modifier_while}, EXPR_VALUE}
00201 };
00202
00203 if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH)
00204 {
00205 register int key = hash (str, len);
00206
00207 if (key <= MAX_HASH_VALUE && key >= 0)
00208 {
00209 register const char *s = wordlist[key].name;
00210
00211 if (*str == *s && !strcmp (str + 1, s + 1))
00212 return &wordlist[key];
00213 }
00214 }
00215 return 0;
00216 }
00217 #line 52 "defs/keywords"
00218
00219 #endif
00220