00001 static struct system_word vocab[80+1] = { 00002 { 0, (byte *)"", 80+1}, 00003 00004 { 1, (byte *)"$", c_dollar }, 00005 { 1, (byte *)"(", c_bra }, 00006 { 1, (byte *)")", c_ket }, 00007 { 1, (byte *)"*", c_multiply }, 00008 { 1, (byte *)"+", c_plus }, 00009 { 1, (byte *)"-", c_minus }, 00010 { 1, (byte *)"/", c_divide }, 00011 { 1, (byte *)"<", c_ls }, 00012 { 1, (byte *)"=", c_assign }, 00013 { 1, (byte *)">", c_gr }, 00014 { 1, (byte *)"?", c_debug }, 00015 { 1, (byte *)"[", c_leftslice }, 00016 { 1, (byte *)"]", c_rightslice }, 00017 { 2, (byte *)"!=", c_ne }, 00018 { 2, (byte *)"*=", c_multiplyassign }, 00019 { 2, (byte *)"+=", c_plusassign }, 00020 { 2, (byte *)"-=", c_minusassign }, 00021 { 2, (byte *)"->", c_sliceto }, 00022 { 2, (byte *)"/*", c_comment2 }, 00023 { 2, (byte *)"//", c_comment1 }, 00024 { 2, (byte *)"/=", c_divideassign }, 00025 { 2, (byte *)"<+", c_insert }, 00026 { 2, (byte *)"<-", c_slicefrom }, 00027 { 2, (byte *)"<=", c_le }, 00028 { 2, (byte *)"==", c_eq }, 00029 { 2, (byte *)"=>", c_assignto }, 00030 { 2, (byte *)">=", c_ge }, 00031 { 2, (byte *)"as", c_as }, 00032 { 2, (byte *)"do", c_do }, 00033 { 2, (byte *)"or", c_or }, 00034 { 3, (byte *)"and", c_and }, 00035 { 3, (byte *)"for", c_for }, 00036 { 3, (byte *)"get", c_get }, 00037 { 3, (byte *)"hex", c_hex }, 00038 { 3, (byte *)"hop", c_hop }, 00039 { 3, (byte *)"non", c_non }, 00040 { 3, (byte *)"not", c_not }, 00041 { 3, (byte *)"set", c_set }, 00042 { 3, (byte *)"try", c_try }, 00043 { 4, (byte *)"fail", c_fail }, 00044 { 4, (byte *)"goto", c_goto }, 00045 { 4, (byte *)"loop", c_loop }, 00046 { 4, (byte *)"next", c_next }, 00047 { 4, (byte *)"size", c_size }, 00048 { 4, (byte *)"test", c_test }, 00049 { 4, (byte *)"true", c_true }, 00050 { 5, (byte *)"among", c_among }, 00051 { 5, (byte *)"false", c_false }, 00052 { 5, (byte *)"limit", c_limit }, 00053 { 5, (byte *)"unset", c_unset }, 00054 { 6, (byte *)"atmark", c_atmark }, 00055 { 6, (byte *)"attach", c_attach }, 00056 { 6, (byte *)"cursor", c_cursor }, 00057 { 6, (byte *)"define", c_define }, 00058 { 6, (byte *)"delete", c_delete }, 00059 { 6, (byte *)"gopast", c_gopast }, 00060 { 6, (byte *)"insert", c_insert }, 00061 { 6, (byte *)"maxint", c_maxint }, 00062 { 6, (byte *)"minint", c_minint }, 00063 { 6, (byte *)"repeat", c_repeat }, 00064 { 6, (byte *)"sizeof", c_sizeof }, 00065 { 6, (byte *)"tomark", c_tomark }, 00066 { 7, (byte *)"atleast", c_atleast }, 00067 { 7, (byte *)"atlimit", c_atlimit }, 00068 { 7, (byte *)"decimal", c_decimal }, 00069 { 7, (byte *)"reverse", c_reverse }, 00070 { 7, (byte *)"setmark", c_setmark }, 00071 { 7, (byte *)"strings", c_strings }, 00072 { 7, (byte *)"tolimit", c_tolimit }, 00073 { 8, (byte *)"booleans", c_booleans }, 00074 { 8, (byte *)"integers", c_integers }, 00075 { 8, (byte *)"routines", c_routines }, 00076 { 8, (byte *)"setlimit", c_setlimit }, 00077 { 9, (byte *)"backwards", c_backwards }, 00078 { 9, (byte *)"externals", c_externals }, 00079 { 9, (byte *)"groupings", c_groupings }, 00080 { 9, (byte *)"stringdef", c_stringdef }, 00081 { 9, (byte *)"substring", c_substring }, 00082 { 12, (byte *)"backwardmode", c_backwardmode }, 00083 { 13, (byte *)"stringescapes", c_stringescapes } 00084 };