You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586
  1. static const struct system_word vocab[82+1] = {
  2. { 0, (const byte *)"", 82+1},
  3. { 1, (const byte *)"$", c_dollar },
  4. { 1, (const byte *)"(", c_bra },
  5. { 1, (const byte *)")", c_ket },
  6. { 1, (const byte *)"*", c_multiply },
  7. { 1, (const byte *)"+", c_plus },
  8. { 1, (const byte *)"-", c_minus },
  9. { 1, (const byte *)"/", c_divide },
  10. { 1, (const byte *)"<", c_ls },
  11. { 1, (const byte *)"=", c_assign },
  12. { 1, (const byte *)">", c_gr },
  13. { 1, (const byte *)"?", c_debug },
  14. { 1, (const byte *)"[", c_leftslice },
  15. { 1, (const byte *)"]", c_rightslice },
  16. { 2, (const byte *)"!=", c_ne },
  17. { 2, (const byte *)"*=", c_multiplyassign },
  18. { 2, (const byte *)"+=", c_plusassign },
  19. { 2, (const byte *)"-=", c_minusassign },
  20. { 2, (const byte *)"->", c_sliceto },
  21. { 2, (const byte *)"/*", c_comment2 },
  22. { 2, (const byte *)"//", c_comment1 },
  23. { 2, (const byte *)"/=", c_divideassign },
  24. { 2, (const byte *)"<+", c_insert },
  25. { 2, (const byte *)"<-", c_slicefrom },
  26. { 2, (const byte *)"<=", c_le },
  27. { 2, (const byte *)"==", c_eq },
  28. { 2, (const byte *)"=>", c_assignto },
  29. { 2, (const byte *)">=", c_ge },
  30. { 2, (const byte *)"as", c_as },
  31. { 2, (const byte *)"do", c_do },
  32. { 2, (const byte *)"or", c_or },
  33. { 3, (const byte *)"and", c_and },
  34. { 3, (const byte *)"for", c_for },
  35. { 3, (const byte *)"get", c_get },
  36. { 3, (const byte *)"hex", c_hex },
  37. { 3, (const byte *)"hop", c_hop },
  38. { 3, (const byte *)"len", c_len },
  39. { 3, (const byte *)"non", c_non },
  40. { 3, (const byte *)"not", c_not },
  41. { 3, (const byte *)"set", c_set },
  42. { 3, (const byte *)"try", c_try },
  43. { 4, (const byte *)"fail", c_fail },
  44. { 4, (const byte *)"goto", c_goto },
  45. { 4, (const byte *)"loop", c_loop },
  46. { 4, (const byte *)"next", c_next },
  47. { 4, (const byte *)"size", c_size },
  48. { 4, (const byte *)"test", c_test },
  49. { 4, (const byte *)"true", c_true },
  50. { 5, (const byte *)"among", c_among },
  51. { 5, (const byte *)"false", c_false },
  52. { 5, (const byte *)"lenof", c_lenof },
  53. { 5, (const byte *)"limit", c_limit },
  54. { 5, (const byte *)"unset", c_unset },
  55. { 6, (const byte *)"atmark", c_atmark },
  56. { 6, (const byte *)"attach", c_attach },
  57. { 6, (const byte *)"cursor", c_cursor },
  58. { 6, (const byte *)"define", c_define },
  59. { 6, (const byte *)"delete", c_delete },
  60. { 6, (const byte *)"gopast", c_gopast },
  61. { 6, (const byte *)"insert", c_insert },
  62. { 6, (const byte *)"maxint", c_maxint },
  63. { 6, (const byte *)"minint", c_minint },
  64. { 6, (const byte *)"repeat", c_repeat },
  65. { 6, (const byte *)"sizeof", c_sizeof },
  66. { 6, (const byte *)"tomark", c_tomark },
  67. { 7, (const byte *)"atleast", c_atleast },
  68. { 7, (const byte *)"atlimit", c_atlimit },
  69. { 7, (const byte *)"decimal", c_decimal },
  70. { 7, (const byte *)"reverse", c_reverse },
  71. { 7, (const byte *)"setmark", c_setmark },
  72. { 7, (const byte *)"strings", c_strings },
  73. { 7, (const byte *)"tolimit", c_tolimit },
  74. { 8, (const byte *)"booleans", c_booleans },
  75. { 8, (const byte *)"integers", c_integers },
  76. { 8, (const byte *)"routines", c_routines },
  77. { 8, (const byte *)"setlimit", c_setlimit },
  78. { 9, (const byte *)"backwards", c_backwards },
  79. { 9, (const byte *)"externals", c_externals },
  80. { 9, (const byte *)"groupings", c_groupings },
  81. { 9, (const byte *)"stringdef", c_stringdef },
  82. { 9, (const byte *)"substring", c_substring },
  83. { 12, (const byte *)"backwardmode", c_backwardmode },
  84. { 13, (const byte *)"stringescapes", c_stringescapes }
  85. };