diff options
Diffstat (limited to 'lex.c.blt')
| -rw-r--r-- | lex.c.blt | 305 |
1 files changed, 195 insertions, 110 deletions
@@ -1,5 +1,5 @@ -/* C code produced by gperf version 3.0.3 */ -/* Command-line: gperf -C -p -j1 -i 1 -g -o -t -N rb_reserved_word -k'1,3,$' keywords */ +/* ANSI-C code produced by gperf version 3.1 */ +/* Command-line: gperf -C -L ANSI-C -P -p -j1 -i 1 -g -o -t -N rb_reserved_word -k'1,3,$' defs/keywords */ #if !((' ' == 32) && ('!' == 33) && ('"' == 34) && ('#' == 35) \ && ('%' == 37) && ('&' == 38) && ('\'' == 39) && ('(' == 40) \ @@ -25,15 +25,17 @@ && ('w' == 119) && ('x' == 120) && ('y' == 121) && ('z' == 122) \ && ('{' == 123) && ('|' == 124) && ('}' == 125) && ('~' == 126)) /* The character set is not based on ISO-646. */ -error "gperf generated tables don't work with this execution character set. Please report a bug to <bug-gnu-gperf@gnu.org>." +#error "gperf generated tables don't work with this execution character set. Please report a bug to <bug-gperf@gnu.org>." #endif -#line 1 "keywords" +#line 1 "defs/keywords" -struct kwtable {const char *name; int id[2]; enum lex_state_e state;}; +struct kwtable {short name, id[2], state;}; const struct kwtable *rb_reserved_word(const char *, unsigned int); #ifndef RIPPER -#line 7 "keywords" +static const struct kwtable *reserved_word(register const char *str, register size_t len); +#define rb_reserved_word(str, len) reserved_word(str, len) +#line 9 "defs/keywords" struct kwtable; #define TOTAL_KEYWORDS 41 @@ -51,9 +53,7 @@ inline #endif #endif static unsigned int -hash (str, len) - register const char *str; - register unsigned int len; +hash (register const char *str, register size_t len) { static const unsigned char asso_values[] = { @@ -84,7 +84,7 @@ hash (str, len) 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51 }; - register int hval = len; + register unsigned int hval = (unsigned int)len; switch (hval) { @@ -96,122 +96,207 @@ hash (str, len) hval += asso_values[(unsigned char)str[0]]; break; } - return hval + asso_values[(unsigned char)str[len - 1]]; + return (unsigned int)hval + asso_values[(unsigned char)str[len - 1]]; } -#ifdef __GNUC__ -__inline -#ifdef __GNUC_STDC_INLINE__ -__attribute__ ((__gnu_inline__)) -#endif -#endif +struct stringpool_t + { + char stringpool_str8[sizeof("break")]; + char stringpool_str9[sizeof("else")]; + char stringpool_str10[sizeof("nil")]; + char stringpool_str11[sizeof("ensure")]; + char stringpool_str12[sizeof("end")]; + char stringpool_str13[sizeof("then")]; + char stringpool_str14[sizeof("not")]; + char stringpool_str15[sizeof("false")]; + char stringpool_str16[sizeof("self")]; + char stringpool_str17[sizeof("elsif")]; + char stringpool_str18[sizeof("rescue")]; + char stringpool_str19[sizeof("true")]; + char stringpool_str20[sizeof("until")]; + char stringpool_str21[sizeof("unless")]; + char stringpool_str22[sizeof("return")]; + char stringpool_str23[sizeof("def")]; + char stringpool_str24[sizeof("and")]; + char stringpool_str25[sizeof("do")]; + char stringpool_str26[sizeof("yield")]; + char stringpool_str27[sizeof("for")]; + char stringpool_str28[sizeof("undef")]; + char stringpool_str29[sizeof("or")]; + char stringpool_str30[sizeof("in")]; + char stringpool_str31[sizeof("when")]; + char stringpool_str32[sizeof("retry")]; + char stringpool_str33[sizeof("if")]; + char stringpool_str34[sizeof("case")]; + char stringpool_str35[sizeof("redo")]; + char stringpool_str36[sizeof("next")]; + char stringpool_str37[sizeof("super")]; + char stringpool_str38[sizeof("module")]; + char stringpool_str39[sizeof("begin")]; + char stringpool_str40[sizeof("__LINE__")]; + char stringpool_str41[sizeof("__FILE__")]; + char stringpool_str42[sizeof("__ENCODING__")]; + char stringpool_str43[sizeof("END")]; + char stringpool_str44[sizeof("alias")]; + char stringpool_str45[sizeof("BEGIN")]; + char stringpool_str46[sizeof("defined?")]; + char stringpool_str47[sizeof("class")]; + char stringpool_str50[sizeof("while")]; + }; +static const struct stringpool_t stringpool_contents = + { + "break", + "else", + "nil", + "ensure", + "end", + "then", + "not", + "false", + "self", + "elsif", + "rescue", + "true", + "until", + "unless", + "return", + "def", + "and", + "do", + "yield", + "for", + "undef", + "or", + "in", + "when", + "retry", + "if", + "case", + "redo", + "next", + "super", + "module", + "begin", + "__LINE__", + "__FILE__", + "__ENCODING__", + "END", + "alias", + "BEGIN", + "defined?", + "class", + "while" + }; +#define stringpool ((const char *) &stringpool_contents) const struct kwtable * -rb_reserved_word (str, len) - register const char *str; - register unsigned int len; +rb_reserved_word (register const char *str, register size_t len) { static const struct kwtable wordlist[] = { - {""}, {""}, {""}, {""}, {""}, {""}, {""}, {""}, -#line 17 "keywords" - {"break", {keyword_break, keyword_break}, EXPR_MID}, -#line 23 "keywords" - {"else", {keyword_else, keyword_else}, EXPR_BEG}, -#line 33 "keywords" - {"nil", {keyword_nil, keyword_nil}, EXPR_END}, -#line 26 "keywords" - {"ensure", {keyword_ensure, keyword_ensure}, EXPR_BEG}, -#line 25 "keywords" - {"end", {keyword_end, keyword_end}, EXPR_END}, -#line 42 "keywords" - {"then", {keyword_then, keyword_then}, EXPR_BEG}, -#line 34 "keywords" - {"not", {keyword_not, keyword_not}, EXPR_ARG}, -#line 27 "keywords" - {"false", {keyword_false, keyword_false}, EXPR_END}, -#line 40 "keywords" - {"self", {keyword_self, keyword_self}, EXPR_END}, -#line 24 "keywords" - {"elsif", {keyword_elsif, keyword_elsif}, EXPR_VALUE}, -#line 37 "keywords" - {"rescue", {keyword_rescue, modifier_rescue}, EXPR_MID}, -#line 43 "keywords" - {"true", {keyword_true, keyword_true}, EXPR_END}, -#line 46 "keywords" - {"until", {keyword_until, modifier_until}, EXPR_VALUE}, -#line 45 "keywords" - {"unless", {keyword_unless, modifier_unless}, EXPR_VALUE}, -#line 39 "keywords" - {"return", {keyword_return, keyword_return}, EXPR_MID}, -#line 20 "keywords" - {"def", {keyword_def, keyword_def}, EXPR_FNAME}, -#line 15 "keywords" - {"and", {keyword_and, keyword_and}, EXPR_VALUE}, -#line 22 "keywords" - {"do", {keyword_do, keyword_do}, EXPR_BEG}, -#line 49 "keywords" - {"yield", {keyword_yield, keyword_yield}, EXPR_ARG}, -#line 28 "keywords" - {"for", {keyword_for, keyword_for}, EXPR_VALUE}, -#line 44 "keywords" - {"undef", {keyword_undef, keyword_undef}, EXPR_FNAME}, -#line 35 "keywords" - {"or", {keyword_or, keyword_or}, EXPR_VALUE}, -#line 30 "keywords" - {"in", {keyword_in, keyword_in}, EXPR_VALUE}, -#line 47 "keywords" - {"when", {keyword_when, keyword_when}, EXPR_VALUE}, -#line 38 "keywords" - {"retry", {keyword_retry, keyword_retry}, EXPR_END}, -#line 29 "keywords" - {"if", {keyword_if, modifier_if}, EXPR_VALUE}, -#line 18 "keywords" - {"case", {keyword_case, keyword_case}, EXPR_VALUE}, -#line 36 "keywords" - {"redo", {keyword_redo, keyword_redo}, EXPR_END}, -#line 32 "keywords" - {"next", {keyword_next, keyword_next}, EXPR_MID}, -#line 41 "keywords" - {"super", {keyword_super, keyword_super}, EXPR_ARG}, -#line 31 "keywords" - {"module", {keyword_module, keyword_module}, EXPR_VALUE}, -#line 16 "keywords" - {"begin", {keyword_begin, keyword_begin}, EXPR_BEG}, -#line 10 "keywords" - {"__LINE__", {keyword__LINE__, keyword__LINE__}, EXPR_END}, -#line 11 "keywords" - {"__FILE__", {keyword__FILE__, keyword__FILE__}, EXPR_END}, -#line 9 "keywords" - {"__ENCODING__", {keyword__ENCODING__, keyword__ENCODING__}, EXPR_END}, -#line 13 "keywords" - {"END", {keyword_END, keyword_END}, EXPR_END}, -#line 14 "keywords" - {"alias", {keyword_alias, keyword_alias}, EXPR_FNAME}, -#line 12 "keywords" - {"BEGIN", {keyword_BEGIN, keyword_BEGIN}, EXPR_END}, -#line 21 "keywords" - {"defined?", {keyword_defined, keyword_defined}, EXPR_ARG}, -#line 19 "keywords" - {"class", {keyword_class, keyword_class}, EXPR_CLASS}, - {""}, {""}, -#line 48 "keywords" - {"while", {keyword_while, modifier_while}, EXPR_VALUE} + {-1}, {-1}, {-1}, {-1}, {-1}, {-1}, {-1}, {-1}, +#line 19 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str8, {keyword_break, keyword_break}, EXPR_MID}, +#line 25 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str9, {keyword_else, keyword_else}, EXPR_BEG}, +#line 35 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str10, {keyword_nil, keyword_nil}, EXPR_END}, +#line 28 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str11, {keyword_ensure, keyword_ensure}, EXPR_BEG}, +#line 27 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str12, {keyword_end, keyword_end}, EXPR_END}, +#line 44 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str13, {keyword_then, keyword_then}, EXPR_BEG}, +#line 36 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str14, {keyword_not, keyword_not}, EXPR_ARG}, +#line 29 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str15, {keyword_false, keyword_false}, EXPR_END}, +#line 42 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str16, {keyword_self, keyword_self}, EXPR_END}, +#line 26 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str17, {keyword_elsif, keyword_elsif}, EXPR_VALUE}, +#line 39 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str18, {keyword_rescue, modifier_rescue}, EXPR_MID}, +#line 45 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str19, {keyword_true, keyword_true}, EXPR_END}, +#line 48 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str20, {keyword_until, modifier_until}, EXPR_VALUE}, +#line 47 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str21, {keyword_unless, modifier_unless}, EXPR_VALUE}, +#line 41 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str22, {keyword_return, keyword_return}, EXPR_MID}, +#line 22 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str23, {keyword_def, keyword_def}, EXPR_FNAME}, +#line 17 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str24, {keyword_and, keyword_and}, EXPR_VALUE}, +#line 24 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str25, {keyword_do, keyword_do}, EXPR_BEG}, +#line 51 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str26, {keyword_yield, keyword_yield}, EXPR_ARG}, +#line 30 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str27, {keyword_for, keyword_for}, EXPR_VALUE}, +#line 46 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str28, {keyword_undef, keyword_undef}, EXPR_FNAME|EXPR_FITEM}, +#line 37 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str29, {keyword_or, keyword_or}, EXPR_VALUE}, +#line 32 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str30, {keyword_in, keyword_in}, EXPR_VALUE}, +#line 49 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str31, {keyword_when, keyword_when}, EXPR_VALUE}, +#line 40 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str32, {keyword_retry, keyword_retry}, EXPR_END}, +#line 31 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str33, {keyword_if, modifier_if}, EXPR_VALUE}, +#line 20 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str34, {keyword_case, keyword_case}, EXPR_VALUE}, +#line 38 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str35, {keyword_redo, keyword_redo}, EXPR_END}, +#line 34 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str36, {keyword_next, keyword_next}, EXPR_MID}, +#line 43 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str37, {keyword_super, keyword_super}, EXPR_ARG}, +#line 33 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str38, {keyword_module, keyword_module}, EXPR_VALUE}, +#line 18 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str39, {keyword_begin, keyword_begin}, EXPR_BEG}, +#line 12 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str40, {keyword__LINE__, keyword__LINE__}, EXPR_END}, +#line 13 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str41, {keyword__FILE__, keyword__FILE__}, EXPR_END}, +#line 11 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str42, {keyword__ENCODING__, keyword__ENCODING__}, EXPR_END}, +#line 15 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str43, {keyword_END, keyword_END}, EXPR_END}, +#line 16 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str44, {keyword_alias, keyword_alias}, EXPR_FNAME|EXPR_FITEM}, +#line 14 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str45, {keyword_BEGIN, keyword_BEGIN}, EXPR_END}, +#line 23 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str46, {keyword_defined, keyword_defined}, EXPR_ARG}, +#line 21 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str47, {keyword_class, keyword_class}, EXPR_CLASS}, + {-1}, {-1}, +#line 50 "defs/keywords" + {(int)(size_t)&((struct stringpool_t *)0)->stringpool_str50, {keyword_while, modifier_while}, EXPR_VALUE} }; if (len <= MAX_WORD_LENGTH && len >= MIN_WORD_LENGTH) { - register int key = hash (str, len); + register unsigned int key = hash (str, len); - if (key <= MAX_HASH_VALUE && key >= 0) + if (key <= MAX_HASH_VALUE) { - register const char *s = wordlist[key].name; + register int o = wordlist[key].name; + if (o >= 0) + { + register const char *s = o + stringpool; - if (*str == *s && !strcmp (str + 1, s + 1)) - return &wordlist[key]; + if (*str == *s && !strcmp (str + 1, s + 1)) + return &wordlist[key]; + } } } return 0; } -#line 50 "keywords" +#line 52 "defs/keywords" #endif |