PageRenderTime 58ms CodeModel.GetById 26ms RepoModel.GetById 1ms app.codeStats 0ms

/projects/jext-5.0/src/lib/org/gjt/sp/jedit/syntax/CobolTokenMarker.java

https://gitlab.com/essere.lab.public/qualitas.class-corpus
Java | 834 lines | 762 code | 42 blank | 30 comment | 12 complexity | 811c85936f23c58637fa1118cfd6e974 MD5 | raw file
  1. /*
  2. * CobolTokenMarker.java - Dawn token marker
  3. * Copyright (C) 2000 Romain Guy
  4. * romain.guy@jext.org
  5. * www.jext.org
  6. *
  7. * This program is free software; you can redistribute it and/or
  8. * modify it under the terms of the GNU General Public License
  9. * as published by the Free Software Foundation; either version 2
  10. * of the License, or any later version.
  11. *
  12. * This program is distributed in the hope that it will be useful,
  13. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  15. * GNU General Public License for more details.
  16. *
  17. * You should have received a copy of the GNU General Public License
  18. * along with this program; if not, write to the Free Software
  19. * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  20. */
  21. package org.gjt.sp.jedit.syntax;
  22. import javax.swing.text.Segment;
  23. public class CobolTokenMarker extends TokenMarker
  24. {
  25. // private members
  26. private static KeywordMap cobolKeywords;
  27. private KeywordMap keywords;
  28. private int lastOffset;
  29. private int lastKeyword;
  30. public CobolTokenMarker()
  31. {
  32. this.keywords = getKeywords();
  33. }
  34. public byte markTokensImpl(byte token, Segment line, int lineIndex)
  35. {
  36. char[] array = line.array;
  37. int offset = line.offset;
  38. lastOffset = offset;
  39. lastKeyword = offset;
  40. int length = line.count + offset;
  41. loop: for(int i = offset; i < length; i++)
  42. {
  43. int i1 = (i+1);
  44. char c = array[i];
  45. switch(token)
  46. {
  47. case Token.NULL:
  48. switch(c)
  49. {
  50. case 'E':
  51. if (SyntaxUtilities.regionMatches(false, line, i1, "XEC SQL"))
  52. {
  53. doKeyword(line, i, c);
  54. i += 7;
  55. token = Token.KEYWORD3;
  56. }
  57. break;
  58. case '*':
  59. addToken(i - lastOffset, token);
  60. addToken(length - i, Token.COMMENT1);
  61. token = Token.NULL;
  62. lastOffset = lastKeyword = length;
  63. break loop;
  64. case '"':
  65. doKeyword(line, i, c);
  66. addToken(i - lastOffset,token);
  67. token = Token.LITERAL1;
  68. lastOffset = lastKeyword = i;
  69. break;
  70. case '\'':
  71. doKeyword(line, i, c);
  72. addToken(i - lastOffset,token);
  73. token = Token.LITERAL2;
  74. lastOffset = lastKeyword = i;
  75. break;
  76. case ' ':
  77. doKeyword(line, i, c);
  78. }
  79. break;
  80. case Token.KEYWORD3:
  81. if (c == 'E')
  82. {
  83. if (SyntaxUtilities.regionMatches(false, line, i1, "ND-EXEC"))
  84. {
  85. i += 8;
  86. addToken(i - lastOffset, token);
  87. token = Token.NULL;
  88. lastOffset = lastKeyword = i;
  89. }
  90. }
  91. break;
  92. case Token.LITERAL1:
  93. if(c == '"')
  94. {
  95. addToken(i1 - lastOffset, token);
  96. token = Token.NULL;
  97. lastOffset = lastKeyword = i1;
  98. }
  99. break;
  100. case Token.LITERAL2:
  101. if(c == '\'')
  102. {
  103. addToken(i1 - lastOffset, Token.LITERAL1);
  104. token = Token.NULL;
  105. lastOffset = lastKeyword = i1;
  106. }
  107. break;
  108. default:
  109. throw new InternalError("Invalid state: " + token);
  110. }
  111. }
  112. if (token == Token.NULL)
  113. doKeyword(line, length, '\0');
  114. switch(token)
  115. {
  116. // case Token.LITERAL1:
  117. // case Token.LITERAL2:
  118. // addToken(length - lastOffset, Token.INVALID);
  119. // token = Token.NULL;
  120. // break;
  121. //case Token.KEYWORD2:
  122. // addToken(length - lastOffset, token);
  123. // token = Token.NULL;
  124. default:
  125. addToken(length - lastOffset, token);
  126. break;
  127. }
  128. return token;
  129. }
  130. public static KeywordMap getKeywords()
  131. {
  132. if (cobolKeywords == null)
  133. {
  134. cobolKeywords = new KeywordMap(false);
  135. cobolKeywords.add("ACCEPT", Token.KEYWORD1);
  136. cobolKeywords.add("ACCESS", Token.KEYWORD1);
  137. cobolKeywords.add("ACTUAL", Token.KEYWORD1);
  138. cobolKeywords.add("ADD", Token.KEYWORD1);
  139. cobolKeywords.add("ADDRESS", Token.KEYWORD1);
  140. cobolKeywords.add("ADVANCING", Token.KEYWORD1);
  141. cobolKeywords.add("AFTER", Token.KEYWORD1);
  142. cobolKeywords.add("ALL", Token.KEYWORD1);
  143. cobolKeywords.add("ALPHABET", Token.KEYWORD1);
  144. cobolKeywords.add("ALPHABETIC", Token.KEYWORD1);
  145. cobolKeywords.add("ALPHABETIC-LOWER", Token.KEYWORD1);
  146. cobolKeywords.add("ALPHABETIC-UPPER", Token.KEYWORD1);
  147. cobolKeywords.add("ALPHANUMERIC", Token.KEYWORD1);
  148. cobolKeywords.add("ALPHANUMERIC-EDITED", Token.KEYWORD1);
  149. cobolKeywords.add("ALSO", Token.KEYWORD1);
  150. cobolKeywords.add("ALTER", Token.KEYWORD1);
  151. cobolKeywords.add("ALTERNATE", Token.KEYWORD1);
  152. cobolKeywords.add("AND", Token.KEYWORD1);
  153. cobolKeywords.add("ANY", Token.KEYWORD1);
  154. cobolKeywords.add("API", Token.KEYWORD1);
  155. cobolKeywords.add("APPLY", Token.KEYWORD1);
  156. cobolKeywords.add("ARE", Token.KEYWORD1);
  157. cobolKeywords.add("AREA", Token.KEYWORD1);
  158. cobolKeywords.add("AREAS", Token.KEYWORD1);
  159. cobolKeywords.add("ASCENDING", Token.KEYWORD1);
  160. cobolKeywords.add("ASSIGN", Token.KEYWORD1);
  161. cobolKeywords.add("AT", Token.KEYWORD1);
  162. cobolKeywords.add("AUTHOR", Token.KEYWORD1);
  163. cobolKeywords.add("AUTO", Token.KEYWORD1);
  164. cobolKeywords.add("AUTO-SKIP", Token.KEYWORD1);
  165. cobolKeywords.add("AUTOMATIC", Token.KEYWORD1);
  166. cobolKeywords.add("BACKGROUND-COLOR", Token.KEYWORD1);
  167. cobolKeywords.add("BACKGROUND-COLOUR", Token.KEYWORD1);
  168. cobolKeywords.add("BACKWARD", Token.KEYWORD1);
  169. cobolKeywords.add("BASIS", Token.KEYWORD1);
  170. cobolKeywords.add("BEEP", Token.KEYWORD1);
  171. cobolKeywords.add("BEFORE", Token.KEYWORD1);
  172. cobolKeywords.add("BEGINNING", Token.KEYWORD1);
  173. cobolKeywords.add("BELL", Token.KEYWORD1);
  174. cobolKeywords.add("BINARY", Token.KEYWORD1);
  175. cobolKeywords.add("BLANK", Token.KEYWORD1);
  176. cobolKeywords.add("BLINK", Token.KEYWORD1);
  177. cobolKeywords.add("BLOCK", Token.KEYWORD1);
  178. cobolKeywords.add("BOTTOM", Token.KEYWORD1);
  179. cobolKeywords.add("BY", Token.KEYWORD1);
  180. cobolKeywords.add("C01", Token.KEYWORD1);
  181. cobolKeywords.add("C02", Token.KEYWORD1);
  182. cobolKeywords.add("C03", Token.KEYWORD1);
  183. cobolKeywords.add("C04", Token.KEYWORD1);
  184. cobolKeywords.add("C05", Token.KEYWORD1);
  185. cobolKeywords.add("C06", Token.KEYWORD1);
  186. cobolKeywords.add("C07", Token.KEYWORD1);
  187. cobolKeywords.add("C08", Token.KEYWORD1);
  188. cobolKeywords.add("C09", Token.KEYWORD1);
  189. cobolKeywords.add("C10", Token.KEYWORD1);
  190. cobolKeywords.add("C11", Token.KEYWORD1);
  191. cobolKeywords.add("C12", Token.KEYWORD1);
  192. cobolKeywords.add("CALL", Token.KEYWORD1);
  193. cobolKeywords.add("CALL-CONVENTION", Token.KEYWORD1);
  194. cobolKeywords.add("CANCEL", Token.KEYWORD1);
  195. cobolKeywords.add("CBL", Token.KEYWORD1);
  196. cobolKeywords.add("CD", Token.KEYWORD1);
  197. cobolKeywords.add("CF", Token.KEYWORD1);
  198. cobolKeywords.add("CH", Token.KEYWORD1);
  199. cobolKeywords.add("CHAIN", Token.KEYWORD1);
  200. cobolKeywords.add("CHAINING", Token.KEYWORD1);
  201. cobolKeywords.add("CHANGED", Token.KEYWORD1);
  202. cobolKeywords.add("CHARACTER", Token.KEYWORD1);
  203. cobolKeywords.add("CHARACTERS", Token.KEYWORD1);
  204. cobolKeywords.add("CLASS", Token.KEYWORD1);
  205. cobolKeywords.add("CLOCK-UNITS", Token.KEYWORD1);
  206. cobolKeywords.add("CLOSE", Token.KEYWORD1);
  207. cobolKeywords.add("COBOL", Token.KEYWORD1);
  208. cobolKeywords.add("CODE", Token.KEYWORD1);
  209. cobolKeywords.add("CODE-SET", Token.KEYWORD1);
  210. cobolKeywords.add("COL", Token.KEYWORD1);
  211. cobolKeywords.add("COLLATING", Token.KEYWORD1);
  212. cobolKeywords.add("COLUMN", Token.KEYWORD1);
  213. cobolKeywords.add("COM-REG", Token.KEYWORD1);
  214. cobolKeywords.add("COMMA", Token.KEYWORD1);
  215. cobolKeywords.add("COMMIT", Token.KEYWORD1);
  216. cobolKeywords.add("COMMON", Token.KEYWORD1);
  217. cobolKeywords.add("COMMUNICATION", Token.KEYWORD1);
  218. cobolKeywords.add("COMP", Token.KEYWORD1);
  219. cobolKeywords.add("COMP-0", Token.KEYWORD1);
  220. cobolKeywords.add("COMP-1", Token.KEYWORD1);
  221. cobolKeywords.add("COMP-2", Token.KEYWORD1);
  222. cobolKeywords.add("COMP-3", Token.KEYWORD1);
  223. cobolKeywords.add("COMP-4", Token.KEYWORD1);
  224. cobolKeywords.add("COMP-5", Token.KEYWORD1);
  225. cobolKeywords.add("COMP-6", Token.KEYWORD1);
  226. cobolKeywords.add("COMP-X", Token.KEYWORD1);
  227. cobolKeywords.add("COMPUTATIONAL", Token.KEYWORD1);
  228. cobolKeywords.add("COMPUTATIONAL-0", Token.KEYWORD1);
  229. cobolKeywords.add("COMPUTATIONAL-1", Token.KEYWORD1);
  230. cobolKeywords.add("COMPUTATIONAL-2", Token.KEYWORD1);
  231. cobolKeywords.add("COMPUTATIONAL-3", Token.KEYWORD1);
  232. cobolKeywords.add("COMPUTATIONAL-4", Token.KEYWORD1);
  233. cobolKeywords.add("COMPUTATIONAL-5", Token.KEYWORD1);
  234. cobolKeywords.add("COMPUTATIONAL-6", Token.KEYWORD1);
  235. cobolKeywords.add("COMPUTATIONAL-X", Token.KEYWORD1);
  236. cobolKeywords.add("COMPUTE", Token.KEYWORD1);
  237. cobolKeywords.add("CONFIGURATION", Token.KEYWORD1);
  238. cobolKeywords.add("CONSOLE", Token.KEYWORD1);
  239. cobolKeywords.add("CONTAINS", Token.KEYWORD1);
  240. cobolKeywords.add("CONTENT", Token.KEYWORD1);
  241. cobolKeywords.add("CONTINUE", Token.KEYWORD1);
  242. cobolKeywords.add("CONTROL", Token.KEYWORD1);
  243. cobolKeywords.add("CONTROLS", Token.KEYWORD1);
  244. cobolKeywords.add("CONVERTING", Token.KEYWORD1);
  245. cobolKeywords.add("COPY", Token.KEYWORD1);
  246. cobolKeywords.add("CORE-INDEX", Token.KEYWORD1);
  247. cobolKeywords.add("CORR", Token.KEYWORD1);
  248. cobolKeywords.add("CORRESPONDING", Token.KEYWORD1);
  249. cobolKeywords.add("COUNT", Token.KEYWORD1);
  250. cobolKeywords.add("CRT", Token.KEYWORD1);
  251. cobolKeywords.add("CRT-UNDER", Token.KEYWORD1);
  252. cobolKeywords.add("CURRENCY", Token.KEYWORD1);
  253. cobolKeywords.add("CURRENT-DATE", Token.KEYWORD1);
  254. cobolKeywords.add("CURSOR", Token.KEYWORD1);
  255. cobolKeywords.add("CYCLE", Token.KEYWORD1);
  256. cobolKeywords.add("CYL-INDEX", Token.KEYWORD1);
  257. cobolKeywords.add("CYL-OVERFLOW", Token.KEYWORD1);
  258. cobolKeywords.add("DATA", Token.KEYWORD1);
  259. cobolKeywords.add("DATE", Token.KEYWORD1);
  260. cobolKeywords.add("DATE-COMPILED", Token.KEYWORD1);
  261. cobolKeywords.add("DATE-WRITTEN", Token.KEYWORD1);
  262. cobolKeywords.add("DAY", Token.KEYWORD1);
  263. cobolKeywords.add("DAY-OF-WEEK", Token.KEYWORD1);
  264. cobolKeywords.add("DBCS", Token.KEYWORD1);
  265. cobolKeywords.add("DE", Token.KEYWORD1);
  266. cobolKeywords.add("DEBUG", Token.KEYWORD1);
  267. cobolKeywords.add("DEBUG-CONTENTS", Token.KEYWORD1);
  268. cobolKeywords.add("DEBUG-ITEM", Token.KEYWORD1);
  269. cobolKeywords.add("DEBUG-LINE", Token.KEYWORD1);
  270. cobolKeywords.add("DEBUG-NAME", Token.KEYWORD1);
  271. cobolKeywords.add("DEBUG-SUB-1", Token.KEYWORD1);
  272. cobolKeywords.add("DEBUG-SUB-2", Token.KEYWORD1);
  273. cobolKeywords.add("DEBUG-SUB-3", Token.KEYWORD1);
  274. cobolKeywords.add("DEBUGGING", Token.KEYWORD1);
  275. cobolKeywords.add("DECIMAL-POINT", Token.KEYWORD1);
  276. cobolKeywords.add("DECLARATIVES", Token.KEYWORD1);
  277. cobolKeywords.add("DELETE", Token.KEYWORD1);
  278. cobolKeywords.add("DELIMITED", Token.KEYWORD1);
  279. cobolKeywords.add("DELIMITER", Token.KEYWORD1);
  280. cobolKeywords.add("DEPENDING", Token.KEYWORD1);
  281. cobolKeywords.add("DESCENDING", Token.KEYWORD1);
  282. cobolKeywords.add("DESTINATION", Token.KEYWORD1);
  283. cobolKeywords.add("DETAIL", Token.KEYWORD1);
  284. cobolKeywords.add("DISABLE", Token.KEYWORD1);
  285. cobolKeywords.add("DISK", Token.KEYWORD1);
  286. cobolKeywords.add("DISP", Token.KEYWORD1);
  287. cobolKeywords.add("DISPLAY", Token.KEYWORD1);
  288. cobolKeywords.add("DISPLAY-1", Token.KEYWORD1);
  289. cobolKeywords.add("DISPLAY-ST", Token.KEYWORD1);
  290. cobolKeywords.add("DIVIDE", Token.KEYWORD1);
  291. cobolKeywords.add("DIVISION", Token.KEYWORD1);
  292. cobolKeywords.add("DOWN", Token.KEYWORD1);
  293. cobolKeywords.add("DUPLICATES", Token.KEYWORD1);
  294. cobolKeywords.add("DYNAMIC", Token.KEYWORD1);
  295. cobolKeywords.add("ECHO", Token.KEYWORD1);
  296. cobolKeywords.add("EGCS", Token.KEYWORD1);
  297. cobolKeywords.add("EGI", Token.KEYWORD1);
  298. cobolKeywords.add("EJECT", Token.KEYWORD1);
  299. cobolKeywords.add("ELSE", Token.KEYWORD1);
  300. cobolKeywords.add("EMI", Token.KEYWORD1);
  301. cobolKeywords.add("EMPTY-CHECK", Token.KEYWORD1);
  302. cobolKeywords.add("ENABLE", Token.KEYWORD1);
  303. cobolKeywords.add("END", Token.KEYWORD1);
  304. cobolKeywords.add("END-ACCEPT", Token.KEYWORD1);
  305. cobolKeywords.add("END-ADD", Token.KEYWORD1);
  306. cobolKeywords.add("END-CALL", Token.KEYWORD1);
  307. cobolKeywords.add("END-CHAIN", Token.KEYWORD1);
  308. cobolKeywords.add("END-COMPUTE", Token.KEYWORD1);
  309. cobolKeywords.add("END-DELETE", Token.KEYWORD1);
  310. cobolKeywords.add("END-DISPLAY", Token.KEYWORD1);
  311. cobolKeywords.add("END-DIVIDE", Token.KEYWORD1);
  312. cobolKeywords.add("END-EVALUATE", Token.KEYWORD1);
  313. cobolKeywords.add("END-IF", Token.KEYWORD1);
  314. cobolKeywords.add("END-INVOKE", Token.KEYWORD1);
  315. cobolKeywords.add("END-MULTIPLY", Token.KEYWORD1);
  316. cobolKeywords.add("END-OF-PAGE", Token.KEYWORD1);
  317. cobolKeywords.add("END-PERFORM", Token.KEYWORD1);
  318. cobolKeywords.add("END-READ", Token.KEYWORD1);
  319. cobolKeywords.add("END-RECEIVE", Token.KEYWORD1);
  320. cobolKeywords.add("END-RETURN", Token.KEYWORD1);
  321. cobolKeywords.add("END-REWRITE", Token.KEYWORD1);
  322. cobolKeywords.add("END-SEARCH", Token.KEYWORD1);
  323. cobolKeywords.add("END-START", Token.KEYWORD1);
  324. cobolKeywords.add("END-STRING", Token.KEYWORD1);
  325. cobolKeywords.add("END-SUBTRACT", Token.KEYWORD1);
  326. cobolKeywords.add("END-UNSTRING", Token.KEYWORD1);
  327. cobolKeywords.add("END-WRITE", Token.KEYWORD1);
  328. cobolKeywords.add("ENDING", Token.KEYWORD1);
  329. cobolKeywords.add("ENTER", Token.KEYWORD1);
  330. cobolKeywords.add("ENTRY", Token.KEYWORD1);
  331. cobolKeywords.add("ENVIRONMENT", Token.KEYWORD1);
  332. cobolKeywords.add("EOL", Token.KEYWORD1);
  333. cobolKeywords.add("EOP", Token.KEYWORD1);
  334. cobolKeywords.add("EOS", Token.KEYWORD1);
  335. cobolKeywords.add("EQUAL", Token.KEYWORD1);
  336. cobolKeywords.add("EQUALS", Token.KEYWORD1);
  337. cobolKeywords.add("ERASE", Token.KEYWORD1);
  338. cobolKeywords.add("ERROR", Token.KEYWORD1);
  339. cobolKeywords.add("ESCAPE", Token.KEYWORD1);
  340. cobolKeywords.add("ESI", Token.KEYWORD1);
  341. cobolKeywords.add("EVALUATE", Token.KEYWORD1);
  342. cobolKeywords.add("EVERY", Token.KEYWORD1);
  343. cobolKeywords.add("EXAMINE", Token.KEYWORD1);
  344. cobolKeywords.add("EXCEEDS", Token.KEYWORD1);
  345. cobolKeywords.add("EXCEPTION", Token.KEYWORD1);
  346. cobolKeywords.add("EXCESS-3", Token.KEYWORD1);
  347. cobolKeywords.add("EXCLUSIVE", Token.KEYWORD1);
  348. cobolKeywords.add("EXEC", Token.KEYWORD1);
  349. cobolKeywords.add("EXECUTE", Token.KEYWORD1);
  350. cobolKeywords.add("EXHIBIT", Token.KEYWORD1);
  351. cobolKeywords.add("EXIT", Token.KEYWORD1);
  352. cobolKeywords.add("EXTEND", Token.KEYWORD1);
  353. cobolKeywords.add("EXTENDED-SEARCH", Token.KEYWORD1);
  354. cobolKeywords.add("EXTERNAL", Token.KEYWORD1);
  355. cobolKeywords.add("FACTORY", Token.KEYWORD1);
  356. cobolKeywords.add("FALSE", Token.KEYWORD1);
  357. cobolKeywords.add("FD", Token.KEYWORD1);
  358. cobolKeywords.add("FH-FCD", Token.KEYWORD1);
  359. cobolKeywords.add("FH-KEYDEF", Token.KEYWORD1);
  360. cobolKeywords.add("FILE", Token.KEYWORD1);
  361. cobolKeywords.add("FILE-CONTROL", Token.KEYWORD1);
  362. cobolKeywords.add("FILE-ID", Token.KEYWORD1);
  363. cobolKeywords.add("FILE-LIMIT", Token.KEYWORD1);
  364. cobolKeywords.add("FILE-LIMITS", Token.KEYWORD1);
  365. cobolKeywords.add("FILLER", Token.KEYWORD1);
  366. cobolKeywords.add("FINAL", Token.KEYWORD1);
  367. cobolKeywords.add("FIRST", Token.KEYWORD1);
  368. cobolKeywords.add("FIXED", Token.KEYWORD1);
  369. cobolKeywords.add("FOOTING", Token.KEYWORD1);
  370. cobolKeywords.add("FOR", Token.KEYWORD1);
  371. cobolKeywords.add("FOREGROUND-COLOR", Token.KEYWORD1);
  372. cobolKeywords.add("FOREGROUND-COLOUR", Token.KEYWORD1);
  373. cobolKeywords.add("FROM", Token.KEYWORD1);
  374. cobolKeywords.add("FULL", Token.KEYWORD1);
  375. cobolKeywords.add("FUNCTION", Token.KEYWORD1);
  376. cobolKeywords.add("GENERATE", Token.KEYWORD1);
  377. cobolKeywords.add("GIVING", Token.KEYWORD1);
  378. cobolKeywords.add("GLOBAL", Token.KEYWORD1);
  379. cobolKeywords.add("GO", Token.KEYWORD1);
  380. cobolKeywords.add("GOBACK", Token.KEYWORD1);
  381. cobolKeywords.add("GREATER", Token.KEYWORD1);
  382. cobolKeywords.add("GRID", Token.KEYWORD1);
  383. cobolKeywords.add("GROUP", Token.KEYWORD1);
  384. cobolKeywords.add("HEADING", Token.KEYWORD1);
  385. cobolKeywords.add("HIGH", Token.KEYWORD1);
  386. cobolKeywords.add("HIGH-VALUE", Token.KEYWORD1);
  387. cobolKeywords.add("HIGH-VALUES", Token.KEYWORD1);
  388. cobolKeywords.add("HIGHLIGHT", Token.KEYWORD1);
  389. cobolKeywords.add("I-O", Token.KEYWORD1);
  390. cobolKeywords.add("I-O-CONTROL", Token.KEYWORD1);
  391. cobolKeywords.add("ID", Token.KEYWORD1);
  392. cobolKeywords.add("IDENTIFICATION", Token.KEYWORD1);
  393. cobolKeywords.add("IF", Token.KEYWORD1);
  394. cobolKeywords.add("IGNORE", Token.KEYWORD1);
  395. cobolKeywords.add("IN", Token.KEYWORD1);
  396. cobolKeywords.add("INDEX", Token.KEYWORD1);
  397. cobolKeywords.add("INDEXED", Token.KEYWORD1);
  398. cobolKeywords.add("INDICATE", Token.KEYWORD1);
  399. cobolKeywords.add("INHERITING", Token.KEYWORD1);
  400. cobolKeywords.add("INITIAL", Token.KEYWORD1);
  401. cobolKeywords.add("INITIALIZE", Token.KEYWORD1);
  402. cobolKeywords.add("INITIATE", Token.KEYWORD1);
  403. cobolKeywords.add("INPUT", Token.KEYWORD1);
  404. cobolKeywords.add("INPUT-OUTPUT", Token.KEYWORD1);
  405. cobolKeywords.add("INSERT", Token.KEYWORD1);
  406. cobolKeywords.add("INSPECT", Token.KEYWORD1);
  407. cobolKeywords.add("INSTALLATION", Token.KEYWORD1);
  408. cobolKeywords.add("INTO", Token.KEYWORD1);
  409. cobolKeywords.add("INVALID", Token.KEYWORD1);
  410. cobolKeywords.add("INVOKE", Token.KEYWORD1);
  411. cobolKeywords.add("IS", Token.KEYWORD1);
  412. cobolKeywords.add("JAPANESE", Token.KEYWORD1);
  413. cobolKeywords.add("JUST", Token.KEYWORD1);
  414. cobolKeywords.add("JUSTIFIED", Token.KEYWORD1);
  415. cobolKeywords.add("KANJI", Token.KEYWORD1);
  416. cobolKeywords.add("KEPT", Token.KEYWORD1);
  417. cobolKeywords.add("KEY", Token.KEYWORD1);
  418. cobolKeywords.add("KEYBOARD", Token.KEYWORD1);
  419. cobolKeywords.add("LABEL", Token.KEYWORD1);
  420. cobolKeywords.add("LAST", Token.KEYWORD1);
  421. cobolKeywords.add("LEADING", Token.KEYWORD1);
  422. cobolKeywords.add("LEAVE", Token.KEYWORD1);
  423. cobolKeywords.add("LEFT", Token.KEYWORD1);
  424. cobolKeywords.add("LEFT-JUSTIFY", Token.KEYWORD1);
  425. cobolKeywords.add("LEFTLINE", Token.KEYWORD1);
  426. cobolKeywords.add("LENGTH", Token.KEYWORD1);
  427. cobolKeywords.add("LENGTH-CHECK", Token.KEYWORD1);
  428. cobolKeywords.add("LESS", Token.KEYWORD1);
  429. cobolKeywords.add("LIMIT", Token.KEYWORD1);
  430. cobolKeywords.add("LIMITS", Token.KEYWORD1);
  431. cobolKeywords.add("LIN", Token.KEYWORD1);
  432. cobolKeywords.add("LINAGE", Token.KEYWORD1);
  433. cobolKeywords.add("LINAGE-COUNTER", Token.KEYWORD1);
  434. cobolKeywords.add("LINE", Token.KEYWORD1);
  435. cobolKeywords.add("LINE-COUNTER", Token.KEYWORD1);
  436. cobolKeywords.add("LINES", Token.KEYWORD1);
  437. cobolKeywords.add("LINKAGE", Token.KEYWORD1);
  438. cobolKeywords.add("LOCAL-STORAGE", Token.KEYWORD1);
  439. cobolKeywords.add("LOCK", Token.KEYWORD1);
  440. cobolKeywords.add("LOCKING", Token.KEYWORD1);
  441. cobolKeywords.add("LOW", Token.KEYWORD1);
  442. cobolKeywords.add("LOW-VALUE", Token.KEYWORD1);
  443. cobolKeywords.add("LOW-VALUES", Token.KEYWORD1);
  444. cobolKeywords.add("LOWER", Token.KEYWORD1);
  445. cobolKeywords.add("LOWLIGHT", Token.KEYWORD1);
  446. cobolKeywords.add("MANUAL", Token.KEYWORD1);
  447. cobolKeywords.add("MASTER-INDEX", Token.KEYWORD1);
  448. cobolKeywords.add("MEMORY", Token.KEYWORD1);
  449. cobolKeywords.add("MERGE", Token.KEYWORD1);
  450. cobolKeywords.add("MESSAGE", Token.KEYWORD1);
  451. cobolKeywords.add("METHOD", Token.KEYWORD1);
  452. cobolKeywords.add("MODE", Token.KEYWORD1);
  453. cobolKeywords.add("MODULES", Token.KEYWORD1);
  454. cobolKeywords.add("MORE-LABELS", Token.KEYWORD1);
  455. cobolKeywords.add("MOVE", Token.KEYWORD1);
  456. cobolKeywords.add("MULTIPLE", Token.KEYWORD1);
  457. cobolKeywords.add("MULTIPLY", Token.KEYWORD1);
  458. cobolKeywords.add("NAME", Token.KEYWORD1);
  459. cobolKeywords.add("NAMED", Token.KEYWORD1);
  460. cobolKeywords.add("NATIONAL", Token.KEYWORD1);
  461. cobolKeywords.add("NATIONAL-EDITED", Token.KEYWORD1);
  462. cobolKeywords.add("NATIVE", Token.KEYWORD1);
  463. cobolKeywords.add("NCHAR", Token.KEYWORD1);
  464. cobolKeywords.add("NEGATIVE", Token.KEYWORD1);
  465. cobolKeywords.add("NEXT", Token.KEYWORD1);
  466. cobolKeywords.add("NO", Token.KEYWORD1);
  467. cobolKeywords.add("NO-ECHO", Token.KEYWORD1);
  468. cobolKeywords.add("NOMINAL", Token.KEYWORD1);
  469. cobolKeywords.add("NOT", Token.KEYWORD1);
  470. cobolKeywords.add("NOTE", Token.KEYWORD1);
  471. cobolKeywords.add("NSTD-REELS", Token.KEYWORD1);
  472. cobolKeywords.add("NULL", Token.KEYWORD1);
  473. cobolKeywords.add("NULLS", Token.KEYWORD1);
  474. cobolKeywords.add("NUMBER", Token.KEYWORD1);
  475. cobolKeywords.add("NUMERIC", Token.KEYWORD1);
  476. cobolKeywords.add("NUMERIC-EDITED", Token.KEYWORD1);
  477. cobolKeywords.add("OBJECT", Token.KEYWORD1);
  478. cobolKeywords.add("OBJECT-COMPUTER", Token.KEYWORD1);
  479. cobolKeywords.add("OBJECT-STORAGE", Token.KEYWORD1);
  480. cobolKeywords.add("OCCURS", Token.KEYWORD1);
  481. cobolKeywords.add("OF", Token.KEYWORD1);
  482. cobolKeywords.add("OFF", Token.KEYWORD1);
  483. cobolKeywords.add("OMITTED", Token.KEYWORD1);
  484. cobolKeywords.add("ON", Token.KEYWORD1);
  485. cobolKeywords.add("OOSTACKPTR", Token.KEYWORD1);
  486. cobolKeywords.add("OPEN", Token.KEYWORD1);
  487. cobolKeywords.add("OPTIONAL", Token.KEYWORD1);
  488. cobolKeywords.add("OR", Token.KEYWORD1);
  489. cobolKeywords.add("ORDER", Token.KEYWORD1);
  490. cobolKeywords.add("ORGANIZATION", Token.KEYWORD1);
  491. cobolKeywords.add("OTHER", Token.KEYWORD1);
  492. cobolKeywords.add("OTHERWISE", Token.KEYWORD1);
  493. cobolKeywords.add("OUTPUT", Token.KEYWORD1);
  494. cobolKeywords.add("OVERFLOW", Token.KEYWORD1);
  495. cobolKeywords.add("OVERLINE", Token.KEYWORD1);
  496. cobolKeywords.add("PACKED-DECIMAL", Token.KEYWORD1);
  497. cobolKeywords.add("PADDING", Token.KEYWORD1);
  498. cobolKeywords.add("PAGE", Token.KEYWORD1);
  499. cobolKeywords.add("PAGE-COUNTER", Token.KEYWORD1);
  500. cobolKeywords.add("PARAGRAPH", Token.KEYWORD1);
  501. cobolKeywords.add("PASSWORD", Token.KEYWORD1);
  502. cobolKeywords.add("PERFORM", Token.KEYWORD1);
  503. cobolKeywords.add("PF", Token.KEYWORD1);
  504. cobolKeywords.add("PH", Token.KEYWORD1);
  505. cobolKeywords.add("PIC", Token.KEYWORD1);
  506. cobolKeywords.add("PICTURE", Token.KEYWORD1);
  507. cobolKeywords.add("PLUS", Token.KEYWORD1);
  508. cobolKeywords.add("POINTER", Token.KEYWORD1);
  509. cobolKeywords.add("POS", Token.KEYWORD1);
  510. cobolKeywords.add("POSITION", Token.KEYWORD1);
  511. cobolKeywords.add("POSITIONING", Token.KEYWORD1);
  512. cobolKeywords.add("POSITIVE", Token.KEYWORD1);
  513. cobolKeywords.add("PREVIOUS", Token.KEYWORD1);
  514. cobolKeywords.add("PRINT", Token.KEYWORD1);
  515. cobolKeywords.add("PRINT-SWITCH", Token.KEYWORD1);
  516. cobolKeywords.add("PRINTER", Token.KEYWORD1);
  517. cobolKeywords.add("PRINTER-1", Token.KEYWORD1);
  518. cobolKeywords.add("PRINTING", Token.KEYWORD1);
  519. cobolKeywords.add("PRIVATE", Token.KEYWORD1);
  520. cobolKeywords.add("PROCEDURE", Token.KEYWORD1);
  521. cobolKeywords.add("PROCEDURE-POINTER", Token.KEYWORD1);
  522. cobolKeywords.add("PROCEDURES", Token.KEYWORD1);
  523. cobolKeywords.add("PROCEED", Token.KEYWORD1);
  524. cobolKeywords.add("PROCESSING", Token.KEYWORD1);
  525. cobolKeywords.add("PROGRAM", Token.KEYWORD1);
  526. cobolKeywords.add("PROGRAM-ID", Token.KEYWORD1);
  527. cobolKeywords.add("PROMPT", Token.KEYWORD1);
  528. cobolKeywords.add("PROTECTED", Token.KEYWORD1);
  529. cobolKeywords.add("PUBLIC", Token.KEYWORD1);
  530. cobolKeywords.add("PURGE", Token.KEYWORD1);
  531. cobolKeywords.add("QUEUE", Token.KEYWORD1);
  532. cobolKeywords.add("QUOTE", Token.KEYWORD1);
  533. cobolKeywords.add("QUOTES", Token.KEYWORD1);
  534. cobolKeywords.add("RANDOM", Token.KEYWORD1);
  535. cobolKeywords.add("RANGE", Token.KEYWORD1);
  536. cobolKeywords.add("RD", Token.KEYWORD1);
  537. cobolKeywords.add("READ", Token.KEYWORD1);
  538. cobolKeywords.add("READY", Token.KEYWORD1);
  539. cobolKeywords.add("RECEIVE", Token.KEYWORD1);
  540. cobolKeywords.add("RECORD", Token.KEYWORD1);
  541. cobolKeywords.add("RECORD-OVERFLOW", Token.KEYWORD1);
  542. cobolKeywords.add("RECORDING", Token.KEYWORD1);
  543. cobolKeywords.add("RECORDS", Token.KEYWORD1);
  544. cobolKeywords.add("REDEFINES", Token.KEYWORD1);
  545. cobolKeywords.add("REEL", Token.KEYWORD1);
  546. cobolKeywords.add("REFERENCE", Token.KEYWORD1);
  547. cobolKeywords.add("REFERENCES", Token.KEYWORD1);
  548. cobolKeywords.add("RELATIVE", Token.KEYWORD1);
  549. cobolKeywords.add("RELEASE", Token.KEYWORD1);
  550. cobolKeywords.add("RELOAD", Token.KEYWORD1);
  551. cobolKeywords.add("REMAINDER", Token.KEYWORD1);
  552. cobolKeywords.add("REMARKS", Token.KEYWORD1);
  553. cobolKeywords.add("REMOVAL", Token.KEYWORD1);
  554. cobolKeywords.add("RENAMES", Token.KEYWORD1);
  555. cobolKeywords.add("REORG-CRITERIA", Token.KEYWORD1);
  556. cobolKeywords.add("REPLACE", Token.KEYWORD1);
  557. cobolKeywords.add("REPLACING", Token.KEYWORD1);
  558. cobolKeywords.add("REPORT", Token.KEYWORD1);
  559. cobolKeywords.add("REPORTING", Token.KEYWORD1);
  560. cobolKeywords.add("REPORTS", Token.KEYWORD1);
  561. cobolKeywords.add("REQUIRED", Token.KEYWORD1);
  562. cobolKeywords.add("REREAD", Token.KEYWORD1);
  563. cobolKeywords.add("RERUN", Token.KEYWORD1);
  564. cobolKeywords.add("RESERVE", Token.KEYWORD1);
  565. cobolKeywords.add("RESET", Token.KEYWORD1);
  566. cobolKeywords.add("RETURN", Token.KEYWORD1);
  567. cobolKeywords.add("RETURN-CODE", Token.KEYWORD1);
  568. cobolKeywords.add("RETURNING", Token.KEYWORD1);
  569. cobolKeywords.add("REVERSE", Token.KEYWORD1);
  570. cobolKeywords.add("REVERSE-VIDEO", Token.KEYWORD1);
  571. cobolKeywords.add("REVERSED", Token.KEYWORD1);
  572. cobolKeywords.add("REWIND", Token.KEYWORD1);
  573. cobolKeywords.add("REWRITE", Token.KEYWORD1);
  574. cobolKeywords.add("RF", Token.KEYWORD1);
  575. cobolKeywords.add("RH", Token.KEYWORD1);
  576. cobolKeywords.add("RIGHT", Token.KEYWORD1);
  577. cobolKeywords.add("RIGHT-JUSTIFY", Token.KEYWORD1);
  578. cobolKeywords.add("ROLLBACK", Token.KEYWORD1);
  579. cobolKeywords.add("ROUNDED", Token.KEYWORD1);
  580. cobolKeywords.add("RUN", Token.KEYWORD1);
  581. cobolKeywords.add("S01", Token.KEYWORD1);
  582. cobolKeywords.add("S02", Token.KEYWORD1);
  583. cobolKeywords.add("S03", Token.KEYWORD1);
  584. cobolKeywords.add("S04", Token.KEYWORD1);
  585. cobolKeywords.add("S05", Token.KEYWORD1);
  586. cobolKeywords.add("SAME", Token.KEYWORD1);
  587. cobolKeywords.add("SCREEN", Token.KEYWORD1);
  588. cobolKeywords.add("SD", Token.KEYWORD1);
  589. cobolKeywords.add("SEARCH", Token.KEYWORD1);
  590. cobolKeywords.add("SECTION", Token.KEYWORD1);
  591. cobolKeywords.add("SECURE", Token.KEYWORD1);
  592. cobolKeywords.add("SECURITY", Token.KEYWORD1);
  593. cobolKeywords.add("SEEK", Token.KEYWORD1);
  594. cobolKeywords.add("SEGMENT", Token.KEYWORD1);
  595. cobolKeywords.add("SEGMENT-LIMIT", Token.KEYWORD1);
  596. cobolKeywords.add("SELECT", Token.KEYWORD1);
  597. cobolKeywords.add("SELECTIVE", Token.KEYWORD1);
  598. cobolKeywords.add("SEND", Token.KEYWORD1);
  599. cobolKeywords.add("SENTENCE", Token.KEYWORD1);
  600. cobolKeywords.add("SEPARATE", Token.KEYWORD1);
  601. cobolKeywords.add("SEQUENCE", Token.KEYWORD1);
  602. cobolKeywords.add("SEQUENTIAL", Token.KEYWORD1);
  603. cobolKeywords.add("SERVICE", Token.KEYWORD1);
  604. cobolKeywords.add("SET", Token.KEYWORD1);
  605. cobolKeywords.add("SHIFT-IN", Token.KEYWORD1);
  606. cobolKeywords.add("SHIFT-OUT", Token.KEYWORD1);
  607. cobolKeywords.add("SIGN", Token.KEYWORD1);
  608. cobolKeywords.add("SIZE", Token.KEYWORD1);
  609. cobolKeywords.add("SKIP1", Token.KEYWORD1);
  610. cobolKeywords.add("SKIP2", Token.KEYWORD1);
  611. cobolKeywords.add("SKIP3", Token.KEYWORD1);
  612. cobolKeywords.add("SORT", Token.KEYWORD1);
  613. cobolKeywords.add("SORT-CONTROL", Token.KEYWORD1);
  614. cobolKeywords.add("SORT-CORE-SIZE", Token.KEYWORD1);
  615. cobolKeywords.add("SORT-FILE-SIZE", Token.KEYWORD1);
  616. cobolKeywords.add("SORT-MERGE", Token.KEYWORD1);
  617. cobolKeywords.add("SORT-MESSAGE", Token.KEYWORD1);
  618. cobolKeywords.add("SORT-MODE-SIZE", Token.KEYWORD1);
  619. cobolKeywords.add("SORT-OPTION", Token.KEYWORD1);
  620. cobolKeywords.add("SORT-RETURN", Token.KEYWORD1);
  621. cobolKeywords.add("SOURCE", Token.KEYWORD1);
  622. cobolKeywords.add("SOURCE-COMPUTER", Token.KEYWORD1);
  623. cobolKeywords.add("SPACE", Token.KEYWORD1);
  624. cobolKeywords.add("SPACE-FILL", Token.KEYWORD1);
  625. cobolKeywords.add("SPACES", Token.KEYWORD1);
  626. cobolKeywords.add("SPECIAL-NAMES", Token.KEYWORD1);
  627. cobolKeywords.add("STANDARD", Token.KEYWORD1);
  628. cobolKeywords.add("STANDARD-1", Token.KEYWORD1);
  629. cobolKeywords.add("STANDARD-2", Token.KEYWORD1);
  630. cobolKeywords.add("START", Token.KEYWORD1);
  631. cobolKeywords.add("STATUS", Token.KEYWORD1);
  632. cobolKeywords.add("STOP", Token.KEYWORD1);
  633. cobolKeywords.add("STORE", Token.KEYWORD1);
  634. cobolKeywords.add("STRING", Token.KEYWORD1);
  635. cobolKeywords.add("SUB-QUEUE-1", Token.KEYWORD1);
  636. cobolKeywords.add("SUB-QUEUE-2", Token.KEYWORD1);
  637. cobolKeywords.add("SUB-QUEUE-3", Token.KEYWORD1);
  638. cobolKeywords.add("SUBTRACT", Token.KEYWORD1);
  639. cobolKeywords.add("SUM", Token.KEYWORD1);
  640. cobolKeywords.add("SUPER", Token.KEYWORD1);
  641. cobolKeywords.add("SUPPRESS", Token.KEYWORD1);
  642. cobolKeywords.add("SYMBOLIC", Token.KEYWORD1);
  643. cobolKeywords.add("SYNC", Token.KEYWORD1);
  644. cobolKeywords.add("SYNCHRONIZED", Token.KEYWORD1);
  645. cobolKeywords.add("SYSIN", Token.KEYWORD1);
  646. cobolKeywords.add("SYSIPT", Token.KEYWORD1);
  647. cobolKeywords.add("SYSLST", Token.KEYWORD1);
  648. cobolKeywords.add("SYSOUT", Token.KEYWORD1);
  649. cobolKeywords.add("SYSPCH", Token.KEYWORD1);
  650. cobolKeywords.add("SYSPUNCH", Token.KEYWORD1);
  651. cobolKeywords.add("TAB", Token.KEYWORD1);
  652. cobolKeywords.add("TABLE", Token.KEYWORD1);
  653. cobolKeywords.add("TALLY", Token.KEYWORD1);
  654. cobolKeywords.add("TALLYING", Token.KEYWORD1);
  655. cobolKeywords.add("TAPE", Token.KEYWORD1);
  656. cobolKeywords.add("TERMINAL", Token.KEYWORD1);
  657. cobolKeywords.add("TERMINATE", Token.KEYWORD1);
  658. cobolKeywords.add("TEST", Token.KEYWORD1);
  659. cobolKeywords.add("TEXT", Token.KEYWORD1);
  660. cobolKeywords.add("THAN", Token.KEYWORD1);
  661. cobolKeywords.add("THEN", Token.KEYWORD1);
  662. cobolKeywords.add("THROUGH", Token.KEYWORD1);
  663. cobolKeywords.add("THRU", Token.KEYWORD1);
  664. cobolKeywords.add("TIME", Token.KEYWORD1);
  665. cobolKeywords.add("TIME-OF-DAY", Token.KEYWORD1);
  666. cobolKeywords.add("TIME-OUT", Token.KEYWORD1);
  667. cobolKeywords.add("TIMEOUT", Token.KEYWORD1);
  668. cobolKeywords.add("TIMES", Token.KEYWORD1);
  669. cobolKeywords.add("TITLE", Token.KEYWORD1);
  670. cobolKeywords.add("TO", Token.KEYWORD1);
  671. cobolKeywords.add("TOP", Token.KEYWORD1);
  672. cobolKeywords.add("TOTALED", Token.KEYWORD1);
  673. cobolKeywords.add("TOTALING", Token.KEYWORD1);
  674. cobolKeywords.add("TRACE", Token.KEYWORD1);
  675. cobolKeywords.add("TRACK-AREA", Token.KEYWORD1);
  676. cobolKeywords.add("TRACK-LIMIT", Token.KEYWORD1);
  677. cobolKeywords.add("TRACKS", Token.KEYWORD1);
  678. cobolKeywords.add("TRAILING", Token.KEYWORD1);
  679. cobolKeywords.add("TRAILING-SIGN", Token.KEYWORD1);
  680. cobolKeywords.add("TRANSFORM", Token.KEYWORD1);
  681. cobolKeywords.add("TRUE", Token.KEYWORD1);
  682. cobolKeywords.add("TYPE", Token.KEYWORD1);
  683. cobolKeywords.add("TYPEDEF", Token.KEYWORD1);
  684. cobolKeywords.add("UNDERLINE", Token.KEYWORD1);
  685. cobolKeywords.add("UNEQUAL", Token.KEYWORD1);
  686. cobolKeywords.add("UNIT", Token.KEYWORD1);
  687. cobolKeywords.add("UNLOCK", Token.KEYWORD1);
  688. cobolKeywords.add("UNSTRING", Token.KEYWORD1);
  689. cobolKeywords.add("UNTIL", Token.KEYWORD1);
  690. cobolKeywords.add("UP", Token.KEYWORD1);
  691. cobolKeywords.add("UPDATE", Token.KEYWORD1);
  692. cobolKeywords.add("UPON", Token.KEYWORD1);
  693. cobolKeywords.add("UPPER", Token.KEYWORD1);
  694. cobolKeywords.add("UPSI-0", Token.KEYWORD1);
  695. cobolKeywords.add("UPSI-1", Token.KEYWORD1);
  696. cobolKeywords.add("UPSI-2", Token.KEYWORD1);
  697. cobolKeywords.add("UPSI-3", Token.KEYWORD1);
  698. cobolKeywords.add("UPSI-4", Token.KEYWORD1);
  699. cobolKeywords.add("UPSI-5", Token.KEYWORD1);
  700. cobolKeywords.add("UPSI-6", Token.KEYWORD1);
  701. cobolKeywords.add("UPSI-7", Token.KEYWORD1);
  702. cobolKeywords.add("USAGE", Token.KEYWORD1);
  703. cobolKeywords.add("USE", Token.KEYWORD1);
  704. cobolKeywords.add("USER", Token.KEYWORD1);
  705. cobolKeywords.add("USING", Token.KEYWORD1);
  706. cobolKeywords.add("VALUE", Token.KEYWORD1);
  707. cobolKeywords.add("VALUES", Token.KEYWORD1);
  708. cobolKeywords.add("VARIABLE", Token.KEYWORD1);
  709. cobolKeywords.add("VARYING", Token.KEYWORD1);
  710. cobolKeywords.add("WAIT", Token.KEYWORD1);
  711. cobolKeywords.add("WHEN", Token.KEYWORD1);
  712. cobolKeywords.add("WHEN-COMPILED", Token.KEYWORD1);
  713. cobolKeywords.add("WITH", Token.KEYWORD1);
  714. cobolKeywords.add("WORDS", Token.KEYWORD1);
  715. cobolKeywords.add("WORKING-STORAGE", Token.KEYWORD1);
  716. cobolKeywords.add("WRITE", Token.KEYWORD1);
  717. cobolKeywords.add("WRITE-ONLY", Token.KEYWORD1);
  718. cobolKeywords.add("WRITE-VERIFY", Token.KEYWORD1);
  719. cobolKeywords.add("ZERO", Token.KEYWORD1);
  720. cobolKeywords.add("ZERO-FILL", Token.KEYWORD1);
  721. cobolKeywords.add("ZEROES", Token.KEYWORD1);
  722. cobolKeywords.add("ZEROS", Token.KEYWORD1);
  723. cobolKeywords.add("ACOS", Token.KEYWORD2);
  724. cobolKeywords.add("ANNUITY", Token.KEYWORD2);
  725. cobolKeywords.add("ASIN", Token.KEYWORD2);
  726. cobolKeywords.add("ATAN", Token.KEYWORD2);
  727. cobolKeywords.add("CHAR", Token.KEYWORD2);
  728. cobolKeywords.add("COS", Token.KEYWORD2);
  729. cobolKeywords.add("CURRENT-DATE", Token.KEYWORD2);
  730. cobolKeywords.add("DATE-OF-INTEGER", Token.KEYWORD2);
  731. cobolKeywords.add("DAY-OF-INTEGER", Token.KEYWORD2);
  732. cobolKeywords.add("FACTORIAL", Token.KEYWORD2);
  733. cobolKeywords.add("INTEGER", Token.KEYWORD2);
  734. cobolKeywords.add("INTEGER-OF-DATE", Token.KEYWORD2);
  735. cobolKeywords.add("INTEGER-OF-DAY", Token.KEYWORD2);
  736. cobolKeywords.add("INTEGER-PART", Token.KEYWORD2);
  737. cobolKeywords.add("LOG", Token.KEYWORD2);
  738. cobolKeywords.add("LOG10", Token.KEYWORD2);
  739. cobolKeywords.add("LOWER-CASE", Token.KEYWORD2);
  740. cobolKeywords.add("MAX", Token.KEYWORD2);
  741. cobolKeywords.add("MEAN", Token.KEYWORD2);
  742. cobolKeywords.add("MEDIAN", Token.KEYWORD2);
  743. cobolKeywords.add("MIDRANGE", Token.KEYWORD2);
  744. cobolKeywords.add("MIN", Token.KEYWORD2);
  745. cobolKeywords.add("MOD", Token.KEYWORD2);
  746. cobolKeywords.add("NUMVAL", Token.KEYWORD2);
  747. cobolKeywords.add("NUMVAL-C", Token.KEYWORD2);
  748. cobolKeywords.add("ORD", Token.KEYWORD2);
  749. cobolKeywords.add("ORD-MAX", Token.KEYWORD2);
  750. cobolKeywords.add("ORD-MIN", Token.KEYWORD2);
  751. cobolKeywords.add("PRESENT-VALUE", Token.KEYWORD2);
  752. cobolKeywords.add("RANDOM", Token.KEYWORD2);
  753. cobolKeywords.add("RANGE", Token.KEYWORD2);
  754. cobolKeywords.add("REM", Token.KEYWORD2);
  755. cobolKeywords.add("REVERSE", Token.KEYWORD2);
  756. cobolKeywords.add("SIN", Token.KEYWORD2);
  757. cobolKeywords.add("SQRT", Token.KEYWORD2);
  758. cobolKeywords.add("STANDARD-DEVIATION", Token.KEYWORD2);
  759. cobolKeywords.add("SUM", Token.KEYWORD2);
  760. cobolKeywords.add("TAN", Token.KEYWORD2);
  761. cobolKeywords.add("UPPER-CASE", Token.KEYWORD2);
  762. cobolKeywords.add("VARIANCE", Token.KEYWORD2);
  763. cobolKeywords.add("WHEN-COMPILED", Token.KEYWORD2);
  764. cobolKeywords.add("[COPY-PREFIX]", Token.LITERAL2);
  765. cobolKeywords.add("[COUNT]", Token.LITERAL2);
  766. cobolKeywords.add("[DISPLAY]", Token.LITERAL2);
  767. cobolKeywords.add("[EXECUTE]", Token.LITERAL2);
  768. cobolKeywords.add("[PG]", Token.LITERAL2);
  769. cobolKeywords.add("[PREFIX]", Token.LITERAL2);
  770. cobolKeywords.add("[PROGRAM]", Token.LITERAL2);
  771. cobolKeywords.add("[SPECIAL-PREFIX]", Token.LITERAL2);
  772. cobolKeywords.add("[TESTCASE]", Token.LITERAL2);
  773. }
  774. return cobolKeywords;
  775. }
  776. private boolean doKeyword(Segment line, int i, char c)
  777. {
  778. int i1 = i + 1;
  779. int len = i - lastKeyword;
  780. byte id = keywords.lookup(line, lastKeyword, len);
  781. if (id != Token.NULL)
  782. {
  783. if(lastKeyword != lastOffset)
  784. addToken(lastKeyword - lastOffset, Token.NULL);
  785. addToken(len, id);
  786. lastOffset = i;
  787. }
  788. lastKeyword = i1;
  789. return false;
  790. }
  791. }
  792. // End of CobolTokenMarker.java