luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity
gambas-source-code/main/share/gb_reserved_temp.h
Benoît Minisini 117f2ac635 [INTERPRETER] 
* NEW: New GB.NewZeroString() API to create a Gambas string from a 
  null-terminated string. Components were modified to use it.
* OPT: Many optimizations everywhere.

[COMPILER]
* OPT: Many optimizations. The compiler should be noticeably faster.


git-svn-id: svn://localhost/gambas/trunk@2953 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2010-05-22 18:02:34 +00:00

812 lines
37 KiB
C
Raw Blame History

/***************************************************************************
gb_reserved_temp.h
(c) 2000-2009 Benoît Minisini <gambas@users.sourceforge.net>
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
***************************************************************************/
#include "gb_common.h"
#include "gb_common_case.h"
#include "gb_pcode.h"
#include "gb_type_common.h"
#include "gb_reserved.h"
/* If this file is modified, don't forget to update GAMBAS_PCODE_VERSION in acinclude.m4 if needed */
#include "gb_reserved_keyword.h"
SUBR_INFO COMP_subr_info[] =
{
{ "Left$", 0, 0, 1, 2 },
{ "Left", 0, 0, 1, 2 },
{ "Mid$", 1, 0, 2, 3 },
{ "Mid", 1, 0, 2, 3 },
{ "Right$", 2, 0, 1, 2 },
{ "Right", 2, 0, 1, 2 },
{ "Len", 3, 0, 1 },
{ "Space$", 4, 0, 1 },
{ "Space", 4, 0, 1 },
{ "String$", 5, 0, 2 },
{ "String", 5, 0, 2 },
{ "Trim$", 6, 0, 1 },
{ "Trim", 6, 0, 1 },
{ "LTrim$", 6, 1, 1 },
{ "LTrim", 6, 1, 1 },
{ "RTrim$", 6, 2, 1 },
{ "RTrim", 6, 2, 1 },
{ "Upper$", 7, 0, 1 },
{ "Upper", 7, 0, 1 },
{ "UCase$", 7, 0, 1 },
{ "UCase", 7, 0, 1 },
{ "Lower$", 8, 0, 1 },
{ "Lower", 8, 0, 1 },
{ "LCase$", 8, 0, 1 },
{ "LCase", 8, 0, 1 },
{ "Chr$", 9, 0, 1 },
{ "Chr", 9, 0, 1 },
{ "Asc", 10, 0, 1, 2 },
{ "InStr", 11, 0, 2, 4 },
{ "RInStr", 12, 0, 2, 4 }, /* CODE_RINSTR */
{ "Subst$", 13, 0, 1, 63 },
{ "Subst", 13, 0, 1, 63 },
{ "Replace$", 14, 0, 3, 4 },
{ "Replace", 14, 0, 3, 4 },
{ "Split", 15, 0, 1, 5 },
{ "Scan", 16, 0, 2 },
{ "Comp", 17, 0, 2, 3 },
{ "Conv", 18, 0, 3 },
{ "Conv$", 18, 0, 3 },
{ "SConv", 19, 0, 1 },
{ "SConv$", 19, 0, 1 },
{ "DConv", 19, 1, 1 },
{ "DConv$", 19, 1, 1 },
{ "Abs", 20, 0, 1 }, /* CODE_ABS */
{ "Int", 21, 0, 1 },
{ "Fix", 22, 0, 1 },
{ "Sgn", 23, 0, 1 },
{ "Frac", 24, 1, 1 },
{ "Log", 24, 2, 1 },
{ "Exp", 24, 3, 1 },
{ "Sqr", 24, 4, 1 },
{ "Sin", 24, 5, 1 },
{ "Cos", 24, 6, 1 },
{ "Tan", 24, 7, 1 },
{ "Atn", 24, 8, 1 },
{ "ATan", 24, 8, 1 },
{ "Asn", 24, 9, 1 },
{ "ASin", 24, 9, 1 },
{ "Acs", 24, 10, 1 },
{ "ACos", 24, 10, 1 },
{ "Deg", 24, 11, 1 },
{ "Rad", 24, 12, 1 },
{ "Log10", 24, 13, 1 },
{ "Sinh", 24, 14, 1 },
{ "Cosh", 24, 15, 1 },
{ "Tanh", 24, 16, 1 },
{ "Asnh", 24, 17, 1 },
{ "ASinh", 24, 17, 1 },
{ "Acsh", 24, 18, 1 },
{ "ACosh", 24, 18, 1 },
{ "Atnh", 24, 19, 1 },
{ "ATanh", 24, 19, 1 },
{ "Exp2", 24, 20, 1 },
{ "Exp10", 24, 21, 1 },
{ "Log2", 24, 22, 1 },
{ "Cbr", 24, 23, 1 },
{ "Expm", 24, 24, 1 },
{ "Logp", 24, 25, 1 },
{ "Pi", 25, 0, 0, 1 },
{ "Round", 26, 0, 1, 2 },
#ifndef __EVAL_RESERVED_C
{ ".Randomize", 27, 0, 0, 1 },
#endif
{ "Rnd", 28, 0, 0, 2 },
{ "Min", 29, 0, 2, },
{ "Max", 30, 0, 2, }, /* CODE_MAX */
{ "If", 31, 0, 3, },
{ "IIf", 31, 0, 3, },
{ "Choose", 32, 0, 1, 63 },
{ ".Array", 33, 0, 1, 63 }, /* Needed for Eval("[...]") */
{ "ATan2", 34, 1, 2 },
{ "Atn2", 34, 1, 2 },
{ "Ang", 34, 2, 2 },
{ "Hyp", 34, 3, 2 },
{ "Mag", 34, 3, 2 },
{ "IsAscii", 35, 1, 1 },
{ "IsLetter", 35, 2, 1 },
{ "IsLCase", 35, 3, 1 },
{ "IsLower", 35, 3, 1 },
{ "IsUCase", 35, 4, 1 },
{ "IsUpper", 35, 4, 1 },
{ "IsDigit", 35, 5, 1 },
{ "IsHexa", 35, 6, 1 },
{ "IsSpace", 35, 7, 1 },
{ "IsBlank", 35, 8, 1 },
{ "IsPunct", 35, 9, 1 },
{ "Ascii?", 35, 1, 1 },
{ "Letter?", 35, 2, 1 },
{ "LCase?", 35, 3, 1 },
{ "Lower?", 35, 3, 1 },
{ "UCase?", 35, 4, 1 },
{ "Upper?", 35, 4, 1 },
{ "Digit?", 35, 5, 1 },
{ "Hexa?", 35, 6, 1 },
{ "Space?", 35, 7, 1 },
{ "Blank?", 35, 8, 1 },
{ "Punct?", 35, 9, 1 },
{ "BClr", 36, 1, 2 },
{ "BSet", 36, 2, 2 },
{ "BTst", 36, 3, 2 },
{ "BChg", 36, 4, 2 },
{ "Shl", 36, 5, 2 },
{ "Asl", 36, 5, 2 },
{ "Shr", 36, 6, 2 },
{ "Asr", 36, 6, 2 },
{ "Rol", 36, 7, 2 },
{ "Ror", 36, 8, 2 },
{ "Lsl", 36, 9, 2 },
{ "Lsr", 36, 10, 2 },
{ "IsBoolean", 37, 1, 1 },
{ "IsByte", 37, 2, 1 },
{ "IsShort", 37, 3, 1 },
{ "IsInteger", 37, 4, 1 },
{ "IsLong", 37, 5, 1 },
{ "IsSingle", 37, 6, 1 },
{ "IsFloat", 37, 7, 1 },
{ "IsDate", 37, 8, 1 },
{ "IsString", 37, 9, 1 },
{ "IsPointer", 37, 11, 1 },
{ "IsVariant", 37, 12, 1 },
{ "IsNull", 37, 15, 1 },
{ "IsObject", 37, 16, 1 },
{ "IsNumber", 37, 17, 1 },
/*{ "Boolean?", 37, 1, 1 },
{ "Byte?", 37, 2, 1 },
{ "Short?", 37, 3, 1 },
{ "Integer?", 37, 4, 1 },
{ "Long?", 37, 5, 1 },
{ "Single?", 37, 6, 1 },
{ "Float?", 37, 7, 1 },
{ "Date?", 37, 8, 1 },
{ "String?", 37, 9, 1 },
{ "Null?", 37, 15, 1 },
{ "Object?", 37, 16, 1 },
{ "Number?", 37, 17, 1 },*/
{ "TypeOf", 38, 0, 1 },
{ "CBool", 39, 1, 1 }, /* CODE_CONV */
{ "CByte", 39, 2, 1 },
{ "CShort", 39, 3, 1 },
{ "CInt", 39, 4, 1 },
{ "CInteger", 39, 4, 1 },
{ "CLng", 39, 5, 1 },
{ "CLong", 39, 5, 1 },
{ "CSng", 39, 6, 1 },
{ "CSingle", 39, 6, 1 },
{ "CFlt", 39, 7, 1 },
{ "CFloat", 39, 7, 1 },
{ "CDate", 39, 8, 1 },
{ "CStr", 39, 9, 1 },
{ "CString", 39, 9, 1 },
{ "CVar", 39, 12, 1 },
{ "CVariant", 39, 12, 1 },
{ "Bin$", 40, 0, 1, 2 },
{ "Bin", 40, 0, 1, 2 },
{ "Hex$", 41, 0, 1, 2 },
{ "Hex", 41, 0, 1, 2 },
{ "Val", 42, 0, 1 },
{ "Str$", 43, 0, 1 },
{ "Str", 43, 0, 1 },
{ "Format$", 44, 0, 1, 2 },
{ "Format", 44, 0, 1, 2 },
{ "Timer", 45, 0, 0 },
{ "Now", 46, 0, 0 },
{ "Year", 47, 1, 1 },
{ "Month", 47, 2, 1 },
{ "Day", 47, 3, 1 },
{ "Hour", 47, 4, 1 },
{ "Minute", 47, 5, 1 },
{ "Second", 47, 6, 1 },
{ "WeekDay", 47, 7, 1 },
{ "Week", 48, 0, 0, 3 },
{ "Date", 49, 0, 0, 6 },
{ "Time", 50, 0, 0, 3 },
{ "DateAdd", 51, 0, 3 },
{ "DateDiff", 51, 1, 3 },
{ "Eval", 52, 0, 1, 2 },
#ifndef __EVAL_RESERVED_C
{ ".Error", 53, 0, 0, 2 },
{ ".Debug", 54, 0, 0 },
{ ".Wait", 55, 0, 0, 1 },
{ ".Open", 56, 0, 2 },
{ ".OpenMemory", 56, 1, 2 },
{ ".Close", 57, 0, 1 },
{ ".Input", 58, 0, 0, 1 },
{ ".LineInput", 59, 0, 1 },
{ ".Print", 60, 0, 1, 63 },
{ ".Read", 61, 0, 2, },
{ ".ReadBytes", 61, 1, 2, },
{ ".Write", 62, 0, 3, },
{ ".WriteBytes", 62, 1, 3, },
{ ".Flush", 63, 0, 1 },
{ ".Lock", 64, 0, 1 },
{ ".Unlock", 64, 1, 1 },
{ ".InputFrom", 65, 0, 1 },
{ ".OutputTo", 65, 1, 1 },
{ ".ErrorTo", 65, 2, 1 },
#endif
{ "Eof", 66, 0, 0, 1 },
{ "Lof", 67, 0, 0, 1 },
{ "Seek", 68, 0, 1, 3 },
#ifndef __EVAL_RESERVED_C
{ ".Kill", 69, 0, 1 },
{ ".Mkdir", 70, 0, 1 },
{ ".Rmdir", 71, 0, 1 },
{ ".Move", 72, 0, 2 },
{ ".Copy", 73, 0, 2 },
{ ".Link", 74, 0, 2 },
#endif
{ "Exist", 75, 0, 1 },
{ "Access", 76, 0, 1, 2 },
{ "Stat", 77, 0, 1, 2 },
{ "Dfree", 78, 0, 1 },
{ "Temp", 79, 0, 0, 1 },
{ "Temp$", 79, 0, 0, 1 },
{ "IsDir", 80, 0, 1 },
{ "Dir?", 80, 0, 1 },
{ "Dir", 81, 0, 1, 3 },
{ "RDir", 82, 0, 1, 4 },
#ifndef __EVAL_RESERVED_C
{ ".Exec", 83, 0, 4 },
{ ".Shell", 83, 1, 4 },
#endif
{ "Alloc", 84, 0, 1, 2 },
{ "Free", 85, 0, 1 },
{ "Realloc", 86, 0, 2, 3 },
{ "StrPtr", 87, 0, 1 },
#ifndef __EVAL_RESERVED_C
{ ".Sleep", 88, 0, 1 },
#endif
{ "VarPtr", 89, 0, 1 },
{ ".Collection", 90, 0, 1, 63 },
{ "Tr", 91, 0, 1 },
{ "Tr$", 91, 0, 1 },
{ "Quote", 92, 0, 1 },
{ "Quote$", 92, 0, 1 },
{ "Shell", 92, 1, 1 },
{ "Shell$", 92, 1, 1 },
{ "Html", 92, 2, 1 },
{ "Html$", 92, 2, 1 },
{ "Unquote", 93, 0, 1 },
{ "Unquote$", 93, 0, 1 },
{ "Assign", 94, 0, 1, 2 }, /* CODE_ASSIGN */
/*
{ "_EventOff", 94, 0, 0 },
{ "_EventOn", 95, 0, 0 },
*/
{ NULL }
};
TABLE *COMP_res_table;
TABLE *COMP_subr_table;
int SUBR_VarPtr;
int SUBR_Mid;
int SUBR_MidS;
static uchar _operator_table[256] = { 0 };
static int get_index(const char *subr_name)
{
int index;
if (TABLE_find_symbol(COMP_subr_table, subr_name, strlen(subr_name), NULL, &index))
return index;
else
return NO_SYMBOL;
}
void RESERVED_init(void)
{
COMP_INFO *info;
SUBR_INFO *subr;
int len;
int i;
/* Reserved words symbol table */
TABLE_create(&COMP_res_table, 0, TF_IGNORE_CASE);
for (info = &COMP_res_info[0], i = 0; info->name; info++, i++)
{
len = strlen(info->name);
if (len == 1)
_operator_table[(uint)*info->name] = i;
TABLE_add_symbol(COMP_res_table, info->name, len, NULL, NULL);
}
#ifdef DEBUG
printf("Reserved symbols table:\n");
TABLE_print(COMP_res_table, TRUE);
#endif
#if 0
HASH_TABLE_create(&_reserved_hash, sizeof(short), HF_NORMAL);
index = 0;
for (info = &COMP_res_info[0]; info->name; info++)
{
strcpy(buffer, info->name);
len = strlen(buffer);
for (i = 0; i < len; i++)
buffer[i] = tolower(buffer[i]);
*((short *)HASH_TABLE_insert(_reserved_hash, buffer, len)) = index;
index++;
}
#endif
/* Subroutines table */
TABLE_create(&COMP_subr_table, 0, TF_IGNORE_CASE);
for (subr = &COMP_subr_info[0]; subr->name; subr++)
{
if (subr->max_param == 0)
subr->max_param = subr->min_param;
TABLE_add_symbol(COMP_subr_table, subr->name, strlen(subr->name), NULL, NULL);
}
#ifdef DEBUG
printf("Subroutines table:\n");
TABLE_print(COMP_subr_table, TRUE);
#endif
SUBR_VarPtr = get_index("VarPtr");
SUBR_Mid = get_index("Mid");
SUBR_MidS = get_index("Mid$");
/* Table des constantes */
/*
TABLE_create(&COMP_const_table, 0, TF_IGNORE_CASE);
for (cst = &COMP_const_info[0]; cst->name; cst++)
TABLE_add_symbol(COMP_const_table, cst->name, strlen(cst->name), NULL, NULL);
*/
}
void RESERVED_exit(void)
{
TABLE_delete(&COMP_res_table);
TABLE_delete(&COMP_subr_table);
}
SUBR_INFO *SUBR_get(const char *subr_name)
{
int index = get_index(subr_name);
if (index == NO_SYMBOL)
return NULL;
else
return &COMP_subr_info[index];
}
SUBR_INFO *SUBR_get_from_opcode(ushort opcode, ushort optype)
{
SUBR_INFO *si;
for (si = COMP_subr_info; si->name; si++)
{
if (si->opcode == opcode)
{
if (si->min_param != si->max_param)
return si;
else if (si->optype == optype || si->optype == 0)
return si;
}
}
/*ERROR_panic("SUBR_get_from_opcode: SUBR not found !");*/
return NULL;
}
static uint hash(const char *key, int len)
{
int i;
uint h = 1;
for (i = 0; i < len; i++)
h = (h << 4) + (h ^ (key[i] & 0x1F));
return h % 73;
}
int RESERVED_find_word(const char *word, int len)
{
int ind;
if (len == 1)
{
ind = _operator_table[(uint)*word];
if (ind)
return ind;
else
return -1;
}
/*if (TABLE_find_symbol(COMP_res_table, word, len, NULL, &ind))
return ind;
else
return -1;*/
static void *jump[] = {
&&__00, &&__01, &&__02, &&__03, &&__04, &&__05, &&__06, &&__07,
&&__08, &&__09, &&__10, &&__11, &&__12, &&__13, &&__14, &&__15,
&&__16, &&__17, &&__18, &&__19, &&__20, &&__21, &&__22, &&__23,
&&__24, &&__25, &&__26, &&__27, &&__28, &&__29, &&__30, &&__31,
&&__32, &&__33, &&__34, &&__35, &&__36, &&__37, &&__38, &&__39,
&&__40, &&__41, &&__42, &&__43, &&__44, &&__45, &&__46, &&__47,
&&__48, &&__49, &&__50, &&__51, &&__52, &&__53, &&__54, &&__55,
&&__56, &&__57, &&__58, &&__59, &&__60, &&__61, &&__62, &&__63,
&&__64, &&__65, &&__66, &&__67, &&__68, &&__69, &&__70, &&__71,
&&__72,
};
goto *jump[hash(word, len)];
__00:
if (len == 4 && tolower(word[0]) == 'p' && tolower(word[1]) == 'i' && tolower(word[2]) == 'p' && tolower(word[3]) == 'e' ) return 106;
if (len == 2 && word[0] == '*' && word[1] == '=' ) return 152;
return -1;
__01:
if (len == 3 && tolower(word[0]) == 'd' && tolower(word[1]) == 'e' && tolower(word[2]) == 'c' ) return 97;
return -1;
__02:
if (len == 4 && tolower(word[0]) == 'c' && tolower(word[1]) == 'a' && tolower(word[2]) == 's' && tolower(word[3]) == 'e' ) return 51;
return -1;
__03:
if (len == 4 && tolower(word[0]) == 't' && tolower(word[1]) == 'r' && tolower(word[2]) == 'u' && tolower(word[3]) == 'e' ) return 62;
if (len == 4 && tolower(word[0]) == 'e' && tolower(word[1]) == 'n' && tolower(word[2]) == 'u' && tolower(word[3]) == 'm' ) return 75;
return -1;
__04:
if (len == 5 && tolower(word[0]) == 'e' && tolower(word[1]) == 'r' && tolower(word[2]) == 'r' && tolower(word[3]) == 'o' && tolower(word[4]) == 'r' ) return 73;
return -1;
__05:
return -1;
__06:
if (len == 4 && tolower(word[0]) == 'l' && tolower(word[1]) == 'o' && tolower(word[2]) == 'c' && tolower(word[3]) == 'k' ) return 102;
return -1;
__07:
return -1;
__08:
return -1;
__09:
return -1;
__10:
if (len == 5 && tolower(word[0]) == 'e' && tolower(word[1]) == 'v' && tolower(word[2]) == 'e' && tolower(word[3]) == 'n' && tolower(word[4]) == 't' ) return 21;
return -1;
__11:
if (len == 5 && tolower(word[0]) == 'b' && tolower(word[1]) == 'r' && tolower(word[2]) == 'e' && tolower(word[3]) == 'a' && tolower(word[4]) == 'k' ) return 53;
if (len == 2 && word[0] == '-' && word[1] == '=' ) return 151;
return -1;
__12:
if (len == 5 && tolower(word[0]) == 's' && tolower(word[1]) == 'h' && tolower(word[2]) == 'o' && tolower(word[3]) == 'r' && tolower(word[4]) == 't' ) return 8;
return -1;
__13:
if (len == 2 && word[0] == '&' && word[1] == '=' ) return 155;
return -1;
__14:
if (len == 5 && tolower(word[0]) == 'c' && tolower(word[1]) == 'l' && tolower(word[2]) == 'a' && tolower(word[3]) == 's' && tolower(word[4]) == 's' ) return 13;
if (len == 9 && tolower(word[0]) == 'p' && tolower(word[1]) == 'r' && tolower(word[2]) == 'o' && tolower(word[3]) == 'c' && tolower(word[4]) == 'e' && tolower(word[5]) == 'd' && tolower(word[6]) == 'u' && tolower(word[7]) == 'r' && tolower(word[8]) == 'e' ) return 29;
return -1;
__15:
if (len == 5 && tolower(word[0]) == 's' && tolower(word[1]) == 'u' && tolower(word[2]) == 'p' && tolower(word[3]) == 'e' && tolower(word[4]) == 'r' ) return 74;
return -1;
__16:
if (len == 8 && tolower(word[0]) == 'o' && tolower(word[1]) == 'p' && tolower(word[2]) == 't' && tolower(word[3]) == 'i' && tolower(word[4]) == 'o' && tolower(word[5]) == 'n' && tolower(word[6]) == 'a' && tolower(word[7]) == 'l' ) return 32;
return -1;
__17:
if (len == 4 && tolower(word[0]) == 'd' && tolower(word[1]) == 'a' && tolower(word[2]) == 't' && tolower(word[3]) == 'e' ) return 3;
if (len == 7 && tolower(word[0]) == 'i' && tolower(word[1]) == 'n' && tolower(word[2]) == 't' && tolower(word[3]) == 'e' && tolower(word[4]) == 'g' && tolower(word[5]) == 'e' && tolower(word[6]) == 'r' ) return 6;
return -1;
__18:
if (len == 5 && tolower(word[0]) == 'c' && tolower(word[1]) == 'o' && tolower(word[2]) == 'n' && tolower(word[3]) == 's' && tolower(word[4]) == 't' ) return 16;
if (len == 4 && tolower(word[0]) == 'n' && tolower(word[1]) == 'e' && tolower(word[2]) == 'x' && tolower(word[3]) == 't' ) return 49;
return -1;
__19:
if (len == 4 && tolower(word[0]) == 'b' && tolower(word[1]) == 'y' && tolower(word[2]) == 't' && tolower(word[3]) == 'e' ) return 2;
return -1;
__20:
if (len == 6 && tolower(word[0]) == 's' && tolower(word[1]) == 't' && tolower(word[2]) == 'r' && tolower(word[3]) == 'u' && tolower(word[4]) == 'c' && tolower(word[5]) == 't' ) return 15;
if (len == 6 && tolower(word[0]) == 'p' && tolower(word[1]) == 'u' && tolower(word[2]) == 'b' && tolower(word[3]) == 'l' && tolower(word[4]) == 'i' && tolower(word[5]) == 'c' ) return 18;
return -1;
__21:
if (len == 5 && tolower(word[0]) == 'f' && tolower(word[1]) == 'l' && tolower(word[2]) == 'o' && tolower(word[3]) == 'a' && tolower(word[4]) == 't' ) return 5;
if (len == 5 && tolower(word[0]) == 'r' && tolower(word[1]) == 'a' && tolower(word[2]) == 'i' && tolower(word[3]) == 's' && tolower(word[4]) == 'e' ) return 72;
return -1;
__22:
if (len == 7 && tolower(word[0]) == 'd' && tolower(word[1]) == 'e' && tolower(word[2]) == 'f' && tolower(word[3]) == 'a' && tolower(word[4]) == 'u' && tolower(word[5]) == 'l' && tolower(word[6]) == 't' ) return 69;
return -1;
__23:
if (len == 2 && word[0] == '=' && word[1] == '=' ) return 120;
return -1;
__24:
if (len == 4 && tolower(word[0]) == 'n' && tolower(word[1]) == 'u' && tolower(word[2]) == 'l' && tolower(word[3]) == 'l' ) return 65;
if (len == 4 && tolower(word[0]) == 'e' && tolower(word[1]) == 'a' && tolower(word[2]) == 'c' && tolower(word[3]) == 'h' ) return 67;
return -1;
__25:
if (len == 6 && tolower(word[0]) == 'b' && tolower(word[1]) == 'i' && tolower(word[2]) == 'n' && tolower(word[3]) == 'a' && tolower(word[4]) == 'r' && tolower(word[5]) == 'y' ) return 86;
return -1;
__26:
if (len == 5 && tolower(word[0]) == 'w' && tolower(word[1]) == 'h' && tolower(word[2]) == 'i' && tolower(word[3]) == 'l' && tolower(word[4]) == 'e' ) return 36;
return -1;
__27:
if (len == 8 && tolower(word[0]) == 'f' && tolower(word[1]) == 'u' && tolower(word[2]) == 'n' && tolower(word[3]) == 'c' && tolower(word[4]) == 't' && tolower(word[5]) == 'i' && tolower(word[6]) == 'o' && tolower(word[7]) == 'n' ) return 14;
if (len == 3 && tolower(word[0]) == 'x' && tolower(word[1]) == 'o' && tolower(word[2]) == 'r' ) return 141;
if (len == 2 && word[0] == '&' && word[1] == '/' ) return 149;
return -1;
__28:
if (len == 4 && tolower(word[0]) == 'l' && tolower(word[1]) == 'i' && tolower(word[2]) == 'n' && tolower(word[3]) == 'k' ) return 101;
return -1;
__29:
if (len == 5 && tolower(word[0]) == 'e' && tolower(word[1]) == 'n' && tolower(word[2]) == 'd' && tolower(word[3]) == 'i' && tolower(word[4]) == 'f' ) return 43;
return -1;
__30:
if (len == 5 && tolower(word[0]) == 's' && tolower(word[1]) == 'l' && tolower(word[2]) == 'e' && tolower(word[3]) == 'e' && tolower(word[4]) == 'p' ) return 92;
if (len == 2 && tolower(word[0]) == 'i' && tolower(word[1]) == 's' ) return 145;
return -1;
__31:
if (len == 5 && tolower(word[0]) == 'c' && tolower(word[1]) == 'a' && tolower(word[2]) == 't' && tolower(word[3]) == 'c' && tolower(word[4]) == 'h' ) return 60;
return -1;
__32:
if (len == 6 && tolower(word[0]) == 's' && tolower(word[1]) == 'i' && tolower(word[2]) == 'n' && tolower(word[3]) == 'g' && tolower(word[4]) == 'l' && tolower(word[5]) == 'e' ) return 4;
return -1;
__33:
if (len == 4 && tolower(word[0]) == 's' && tolower(word[1]) == 'w' && tolower(word[2]) == 'a' && tolower(word[3]) == 'p' ) return 64;
if (len == 7 && tolower(word[0]) == 'l' && tolower(word[1]) == 'i' && tolower(word[2]) == 'b' && tolower(word[3]) == 'r' && tolower(word[4]) == 'a' && tolower(word[5]) == 'r' && tolower(word[6]) == 'y' ) return 104;
return -1;
__34:
if (len == 6 && tolower(word[0]) == 's' && tolower(word[1]) == 't' && tolower(word[2]) == 'a' && tolower(word[3]) == 't' && tolower(word[4]) == 'i' && tolower(word[5]) == 'c' ) return 19;
if (len == 3 && tolower(word[0]) == 's' && tolower(word[1]) == 'u' && tolower(word[2]) == 'b' ) return 30;
if (len == 6 && tolower(word[0]) == 'c' && tolower(word[1]) == 'r' && tolower(word[2]) == 'e' && tolower(word[3]) == 'a' && tolower(word[4]) == 't' && tolower(word[5]) == 'e' ) return 85;
if (len == 3 && word[0] == '&' && word[1] == '/' && word[2] == '=' ) return 156;
return -1;
__35:
if (len == 2 && tolower(word[0]) == 'm' && tolower(word[1]) == 'e' ) return 56;
if (len == 4 && tolower(word[0]) == 'm' && tolower(word[1]) == 'o' && tolower(word[2]) == 'v' && tolower(word[3]) == 'e' ) return 94;
if (len == 4 && tolower(word[0]) == 'e' && tolower(word[1]) == 'n' && tolower(word[2]) == 'd' && tolower(word[3]) == 's' ) return 148;
return -1;
__36:
if (len == 5 && tolower(word[0]) == 'm' && tolower(word[1]) == 'k' && tolower(word[2]) == 'd' && tolower(word[3]) == 'i' && tolower(word[4]) == 'r' ) return 98;
return -1;
__37:
if (len == 4 && tolower(word[0]) == 'l' && tolower(word[1]) == 'o' && tolower(word[2]) == 'n' && tolower(word[3]) == 'g' ) return 7;
if (len == 4 && tolower(word[0]) == 's' && tolower(word[1]) == 't' && tolower(word[2]) == 'e' && tolower(word[3]) == 'p' ) return 48;
if (len == 5 && tolower(word[0]) == 'b' && tolower(word[1]) == 'y' && tolower(word[2]) == 'r' && tolower(word[3]) == 'e' && tolower(word[4]) == 'f' ) return 108;
if (len == 3 && tolower(word[0]) == 'n' && tolower(word[1]) == 'o' && tolower(word[2]) == 't' ) return 140;
return -1;
__38:
if (len == 7 && tolower(word[0]) == 'v' && tolower(word[1]) == 'a' && tolower(word[2]) == 'r' && tolower(word[3]) == 'i' && tolower(word[4]) == 'a' && tolower(word[5]) == 'n' && tolower(word[6]) == 't' ) return 10;
if (len == 6 && tolower(word[0]) == 'o' && tolower(word[1]) == 'b' && tolower(word[2]) == 'j' && tolower(word[3]) == 'e' && tolower(word[4]) == 'c' && tolower(word[5]) == 't' ) return 11;
if (len == 2 && word[0] == '<' && word[1] == '=' ) return 134;
if (len == 2 && word[0] == '\\' && word[1] == '=' ) return 154;
return -1;
__39:
if (len == 8 && tolower(word[0]) == 'p' && tolower(word[1]) == 'r' && tolower(word[2]) == 'o' && tolower(word[3]) == 'p' && tolower(word[4]) == 'e' && tolower(word[5]) == 'r' && tolower(word[6]) == 't' && tolower(word[7]) == 'y' ) return 20;
if (len == 3 && tolower(word[0]) == 'f' && tolower(word[1]) == 'o' && tolower(word[2]) == 'r' ) return 45;
if (len == 5 && tolower(word[0]) == 'p' && tolower(word[1]) == 'r' && tolower(word[2]) == 'i' && tolower(word[3]) == 'n' && tolower(word[4]) == 't' ) return 77;
if (len == 3 && tolower(word[0]) == 'i' && tolower(word[1]) == 'n' && tolower(word[2]) == 'c' ) return 96;
return -1;
__40:
if (len == 2 && tolower(word[0]) == 'a' && tolower(word[1]) == 's' ) return 25;
if (len == 3 && tolower(word[0]) == 'a' && tolower(word[1]) == 'n' && tolower(word[2]) == 'd' ) return 138;
return -1;
__41:
if (len == 4 && tolower(word[0]) == 'g' && tolower(word[1]) == 'o' && tolower(word[2]) == 't' && tolower(word[3]) == 'o' ) return 55;
if (len == 2 && tolower(word[0]) == 'i' && tolower(word[1]) == 'n' ) return 68;
if (len == 2 && word[0] == '<' && word[1] == '>' ) return 135;
return -1;
__42:
if (len == 4 && tolower(word[0]) == 'q' && tolower(word[1]) == 'u' && tolower(word[2]) == 'i' && tolower(word[3]) == 't' ) return 71;
if (len == 4 && tolower(word[0]) == 'l' && tolower(word[1]) == 'i' && tolower(word[2]) == 'n' && tolower(word[3]) == 'e' ) return 87;
return -1;
__43:
return -1;
__44:
if (len == 7 && tolower(word[0]) == 'p' && tolower(word[1]) == 'o' && tolower(word[2]) == 'i' && tolower(word[3]) == 'n' && tolower(word[4]) == 't' && tolower(word[5]) == 'e' && tolower(word[6]) == 'r' ) return 12;
if (len == 4 && tolower(word[0]) == 'r' && tolower(word[1]) == 'e' && tolower(word[2]) == 'a' && tolower(word[3]) == 'd' ) return 79;
if (len == 4 && tolower(word[0]) == 'l' && tolower(word[1]) == 'i' && tolower(word[2]) == 'k' && tolower(word[3]) == 'e' ) return 146;
return -1;
__45:
if (len == 6 && tolower(word[0]) == 's' && tolower(word[1]) == 't' && tolower(word[2]) == 'r' && tolower(word[3]) == 'i' && tolower(word[4]) == 'n' && tolower(word[5]) == 'g' ) return 9;
if (len == 3 && tolower(word[0]) == 'd' && tolower(word[1]) == 'i' && tolower(word[2]) == 'm' ) return 27;
if (len == 2 && word[0] == '/' && word[1] == '=' ) return 153;
return -1;
__46:
if (len == 6 && tolower(word[0]) == 'r' && tolower(word[1]) == 'e' && tolower(word[2]) == 'p' && tolower(word[3]) == 'e' && tolower(word[4]) == 'a' && tolower(word[5]) == 't' ) return 38;
if (len == 4 && tolower(word[0]) == 't' && tolower(word[1]) == 'h' && tolower(word[2]) == 'e' && tolower(word[3]) == 'n' ) return 41;
if (len == 3 && tolower(word[0]) == 'e' && tolower(word[1]) == 'n' && tolower(word[2]) == 'd' ) return 44;
if (len == 6 && tolower(word[0]) == 'a' && tolower(word[1]) == 'p' && tolower(word[2]) == 'p' && tolower(word[3]) == 'e' && tolower(word[4]) == 'n' && tolower(word[5]) == 'd' ) return 84;
return -1;
__47:
if (len == 5 && tolower(word[0]) == 'f' && tolower(word[1]) == 'l' && tolower(word[2]) == 'u' && tolower(word[3]) == 's' && tolower(word[4]) == 'h' ) return 88;
return -1;
__48:
if (len == 3 && word[0] == '.' && word[1] == '.' && word[2] == '.' ) return 113;
return -1;
__49:
if (len == 2 && tolower(word[0]) == 'i' && tolower(word[1]) == 'f' ) return 40;
if (len == 4 && tolower(word[0]) == 'e' && tolower(word[1]) == 'x' && tolower(word[2]) == 'e' && tolower(word[3]) == 'c' ) return 89;
return -1;
__50:
if (len == 2 && tolower(word[0]) == 't' && tolower(word[1]) == 'o' ) return 46;
return -1;
__51:
if (len == 7 && tolower(word[0]) == 'b' && tolower(word[1]) == 'o' && tolower(word[2]) == 'o' && tolower(word[3]) == 'l' && tolower(word[4]) == 'e' && tolower(word[5]) == 'a' && tolower(word[6]) == 'n' ) return 1;
if (len == 6 && tolower(word[0]) == 'b' && tolower(word[1]) == 'e' && tolower(word[2]) == 'g' && tolower(word[3]) == 'i' && tolower(word[4]) == 'n' && tolower(word[5]) == 's' ) return 147;
return -1;
__52:
return -1;
__53:
if (len == 6 && tolower(word[0]) == 'r' && tolower(word[1]) == 'e' && tolower(word[2]) == 't' && tolower(word[3]) == 'u' && tolower(word[4]) == 'r' && tolower(word[5]) == 'n' ) return 31;
if (len == 9 && tolower(word[0]) == 'r' && tolower(word[1]) == 'a' && tolower(word[2]) == 'n' && tolower(word[3]) == 'd' && tolower(word[4]) == 'o' && tolower(word[5]) == 'm' && tolower(word[6]) == 'i' && tolower(word[7]) == 'z' && tolower(word[8]) == 'e' ) return 107;
return -1;
__54:
if (len == 6 && tolower(word[0]) == 'o' && tolower(word[1]) == 'u' && tolower(word[2]) == 't' && tolower(word[3]) == 'p' && tolower(word[4]) == 'u' && tolower(word[5]) == 't' ) return 33;
if (len == 2 && tolower(word[0]) == 'o' && tolower(word[1]) == 'r' ) return 139;
return -1;
__55:
if (len == 4 && tolower(word[0]) == 'k' && tolower(word[1]) == 'i' && tolower(word[2]) == 'l' && tolower(word[3]) == 'l' ) return 93;
return -1;
__56:
if (len == 6 && tolower(word[0]) == 'e' && tolower(word[1]) == 'x' && tolower(word[2]) == 'p' && tolower(word[3]) == 'o' && tolower(word[4]) == 'r' && tolower(word[5]) == 't' ) return 24;
if (len == 7 && tolower(word[0]) == 'f' && tolower(word[1]) == 'i' && tolower(word[2]) == 'n' && tolower(word[3]) == 'a' && tolower(word[4]) == 'l' && tolower(word[5]) == 'l' && tolower(word[6]) == 'y' ) return 59;
if (len == 4 && tolower(word[0]) == 'w' && tolower(word[1]) == 'i' && tolower(word[2]) == 't' && tolower(word[3]) == 'h' ) return 61;
if (len == 5 && tolower(word[0]) == 's' && tolower(word[1]) == 'h' && tolower(word[2]) == 'e' && tolower(word[3]) == 'l' && tolower(word[4]) == 'l' ) return 90;
if (len == 4 && tolower(word[0]) == 'w' && tolower(word[1]) == 'a' && tolower(word[2]) == 'i' && tolower(word[3]) == 't' ) return 91;
return -1;
__57:
if (len == 8 && tolower(word[0]) == 'i' && tolower(word[1]) == 'n' && tolower(word[2]) == 'h' && tolower(word[3]) == 'e' && tolower(word[4]) == 'r' && tolower(word[5]) == 'i' && tolower(word[6]) == 't' && tolower(word[7]) == 's' ) return 22;
return -1;
__58:
if (len == 4 && tolower(word[0]) == 'f' && tolower(word[1]) == 'r' && tolower(word[2]) == 'o' && tolower(word[3]) == 'm' ) return 47;
if (len == 5 && tolower(word[0]) == 'd' && tolower(word[1]) == 'e' && tolower(word[2]) == 'b' && tolower(word[3]) == 'u' && tolower(word[4]) == 'g' ) return 105;
if (len == 2 && word[0] == '+' && word[1] == '=' ) return 150;
return -1;
__59:
if (len == 3 && tolower(word[0]) == 'm' && tolower(word[1]) == 'o' && tolower(word[2]) == 'd' ) return 144;
return -1;
__60:
if (len == 3 && tolower(word[0]) == 'n' && tolower(word[1]) == 'e' && tolower(word[2]) == 'w' ) return 28;
return -1;
__61:
return -1;
__62:
if (len == 5 && tolower(word[0]) == 'u' && tolower(word[1]) == 'n' && tolower(word[2]) == 't' && tolower(word[3]) == 'i' && tolower(word[4]) == 'l' ) return 37;
if (len == 4 && tolower(word[0]) == 'w' && tolower(word[1]) == 'e' && tolower(word[2]) == 'n' && tolower(word[3]) == 'd' ) return 39;
return -1;
__63:
return -1;
__64:
if (len == 4 && tolower(word[0]) == 'e' && tolower(word[1]) == 'l' && tolower(word[2]) == 's' && tolower(word[3]) == 'e' ) return 42;
if (len == 8 && tolower(word[0]) == 'c' && tolower(word[1]) == 'o' && tolower(word[2]) == 'n' && tolower(word[3]) == 't' && tolower(word[4]) == 'i' && tolower(word[5]) == 'n' && tolower(word[6]) == 'u' && tolower(word[7]) == 'e' ) return 54;
if (len == 5 && tolower(word[0]) == 'i' && tolower(word[1]) == 'n' && tolower(word[2]) == 'p' && tolower(word[3]) == 'u' && tolower(word[4]) == 't' ) return 78;
if (len == 6 && tolower(word[0]) == 'm' && tolower(word[1]) == 'e' && tolower(word[2]) == 'm' && tolower(word[3]) == 'o' && tolower(word[4]) == 'r' && tolower(word[5]) == 'y' ) return 109;
return -1;
__65:
if (len == 6 && tolower(word[0]) == 's' && tolower(word[1]) == 'e' && tolower(word[2]) == 'l' && tolower(word[3]) == 'e' && tolower(word[4]) == 'c' && tolower(word[5]) == 't' ) return 50;
if (len == 4 && tolower(word[0]) == 'e' && tolower(word[1]) == 'x' && tolower(word[2]) == 'i' && tolower(word[3]) == 't' ) return 52;
if (len == 6 && tolower(word[0]) == 'e' && tolower(word[1]) == 'x' && tolower(word[2]) == 't' && tolower(word[3]) == 'e' && tolower(word[4]) == 'r' && tolower(word[5]) == 'n' ) return 66;
return -1;
__66:
if (len == 2 && tolower(word[0]) == 'o' && tolower(word[1]) == 'f' ) return 26;
if (len == 5 && tolower(word[0]) == 'f' && tolower(word[1]) == 'a' && tolower(word[2]) == 'l' && tolower(word[3]) == 's' && tolower(word[4]) == 'e' ) return 63;
if (len == 4 && tolower(word[0]) == 's' && tolower(word[1]) == 't' && tolower(word[2]) == 'o' && tolower(word[3]) == 'p' ) return 70;
if (len == 4 && tolower(word[0]) == 'c' && tolower(word[1]) == 'o' && tolower(word[2]) == 'p' && tolower(word[3]) == 'y' ) return 95;
if (len == 5 && tolower(word[0]) == 'w' && tolower(word[1]) == 'a' && tolower(word[2]) == 't' && tolower(word[3]) == 'c' && tolower(word[4]) == 'h' ) return 100;
return -1;
__67:
if (len == 3 && tolower(word[0]) == 'l' && tolower(word[1]) == 'e' && tolower(word[2]) == 't' ) return 76;
if (len == 5 && tolower(word[0]) == 'w' && tolower(word[1]) == 'r' && tolower(word[2]) == 'i' && tolower(word[3]) == 't' && tolower(word[4]) == 'e' ) return 80;
if (len == 4 && tolower(word[0]) == 'o' && tolower(word[1]) == 'p' && tolower(word[2]) == 'e' && tolower(word[3]) == 'n' ) return 81;
if (len == 5 && tolower(word[0]) == 'r' && tolower(word[1]) == 'm' && tolower(word[2]) == 'd' && tolower(word[3]) == 'i' && tolower(word[4]) == 'r' ) return 99;
return -1;
__68:
if (len == 4 && tolower(word[0]) == 'l' && tolower(word[1]) == 'a' && tolower(word[2]) == 's' && tolower(word[3]) == 't' ) return 57;
return -1;
__69:
if (len == 5 && tolower(word[0]) == 'c' && tolower(word[1]) == 'l' && tolower(word[2]) == 'o' && tolower(word[3]) == 's' && tolower(word[4]) == 'e' ) return 82;
return -1;
__70:
if (len == 7 && tolower(word[0]) == 'p' && tolower(word[1]) == 'r' && tolower(word[2]) == 'i' && tolower(word[3]) == 'v' && tolower(word[4]) == 'a' && tolower(word[5]) == 't' && tolower(word[6]) == 'e' ) return 17;
if (len == 10 && tolower(word[0]) == 'i' && tolower(word[1]) == 'm' && tolower(word[2]) == 'p' && tolower(word[3]) == 'l' && tolower(word[4]) == 'e' && tolower(word[5]) == 'm' && tolower(word[6]) == 'e' && tolower(word[7]) == 'n' && tolower(word[8]) == 't' && tolower(word[9]) == 's' ) return 23;
if (len == 2 && tolower(word[0]) == 'd' && tolower(word[1]) == 'o' ) return 34;
if (len == 3 && tolower(word[0]) == 'd' && tolower(word[1]) == 'i' && tolower(word[2]) == 'v' ) return 143;
return -1;
__71:
if (len == 4 && tolower(word[0]) == 'l' && tolower(word[1]) == 'o' && tolower(word[2]) == 'o' && tolower(word[3]) == 'p' ) return 35;
if (len == 4 && tolower(word[0]) == 's' && tolower(word[1]) == 'e' && tolower(word[2]) == 'e' && tolower(word[3]) == 'k' ) return 83;
if (len == 6 && tolower(word[0]) == 'u' && tolower(word[1]) == 'n' && tolower(word[2]) == 'l' && tolower(word[3]) == 'o' && tolower(word[4]) == 'c' && tolower(word[5]) == 'k' ) return 103;
return -1;
__72:
if (len == 3 && tolower(word[0]) == 't' && tolower(word[1]) == 'r' && tolower(word[2]) == 'y' ) return 58;
if (len == 2 && word[0] == '>' && word[1] == '=' ) return 133;
if (len == 2 && word[0] == '^' && word[1] == '=' ) return 157;
return -1;
}
Reference in a new issue View git blame Copy permalink