https://gcc.gnu.org/g:96a93d365915cbe8e14a015f7175d27359998ddc
commit r17-4689-g96a93d365915cbe8e14a015f7175d27359998ddc Author: James K. Lowden <[email protected]> Date: Sun Sep 20 11:51:02 2026 -0400 cobol: Add official COBOL word lists to parser. gcc/cobol/ChangeLog: * words/cdf.h: New file. * words/intrinsic.h: New file. * words/reserved.h: New file. Diff: --- gcc/cobol/words/cdf.h | 42 +++++ gcc/cobol/words/intrinsic.h | 99 +++++++++++ gcc/cobol/words/reserved.h | 418 ++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 559 insertions(+) diff --git a/gcc/cobol/words/cdf.h b/gcc/cobol/words/cdf.h new file mode 100644 index 000000000000..ffc645da6308 --- /dev/null +++ b/gcc/cobol/words/cdf.h @@ -0,0 +1,42 @@ +// Generated from gcc/cobol/words +#ifndef _CDF_H_ +#define _CDF_H_ +{ + tok_name_t { "CALL-CONVENTION" }, + tok_name_t { "CHECKING" }, + tok_name_t { "COBOL" }, + tok_name_t { "COBOL-WORDS" }, + tok_name_t { "COMPILE-TIME-ARITHMETIC-EXPRESSIONS" }, + tok_name_t { "DE-EDITING" }, + tok_name_t { "DEFINE" }, + tok_name_t { "DEFINED" }, + tok_name_t { "EQUATE" }, + tok_name_t { "EXTERNAL-FILE-FILE-STATUS" }, + tok_name_t { "FIXED" }, + tok_name_t { "FLAG-02" }, + tok_name_t { "FLAG-14" }, + tok_name_t { "FUNCTION-ARGUMENT" }, + tok_name_t { "I-O-DECLARATIVE" }, + tok_name_t { "I-O-STATUS-04" }, + tok_name_t { "I-O-STATUS-07" }, + tok_name_t { "IMP" }, + tok_name_t { "LEAP-SECOND" }, + tok_name_t { "LISTING" }, + tok_name_t { "MOVE-TO-SAME-NAME" }, + tok_name_t { "NUMVAL" }, + tok_name_t { "PARAMETER" }, + tok_name_t { "POP" }, + tok_name_t { "PROPAGATE" }, + tok_name_t { "PUSH" }, + tok_name_t { "READ-PREVIOUS" }, + tok_name_t { "REF-MOD-ZERO-LENGTH" }, + tok_name_t { "SUBSTITUTE" }, + tok_name_t { "TURN" }, + tok_name_t { "UNDEFINE" }, + tok_name_t { "VALUE-EDITING" }, + tok_name_t { "VALUE-FIG-CON-LENGTH" }, + tok_name_t { "VALUE-ZERO" }, + tok_name_t { "WRITE-END-OF-PAGE" }, + tok_name_t { "ZERO-LENGTH" }, +}; // end cdf word list +#endif diff --git a/gcc/cobol/words/intrinsic.h b/gcc/cobol/words/intrinsic.h new file mode 100644 index 000000000000..388aec230a1a --- /dev/null +++ b/gcc/cobol/words/intrinsic.h @@ -0,0 +1,99 @@ +// Generated from gcc/cobol/words +#ifndef _INTRINSIC_H_ +#define _INTRINSIC_H_ +{ + tok_name_t { "ABS" }, + tok_name_t { "ACOS" }, + tok_name_t { "ANNUITY" }, + tok_name_t { "ASIN" }, + tok_name_t { "ATAN" }, + tok_name_t { "BASECONVERT" }, + tok_name_t { "BOOLEAN-OF-INTEGER" }, + tok_name_t { "BYTE-LENGTH" }, + tok_name_t { "CHAR" }, + tok_name_t { "CHAR-NATIONAL" }, + tok_name_t { "COMBINED-DATETIME" }, + tok_name_t { "CONCAT" }, + tok_name_t { "CONVERT" }, + tok_name_t { "COS" }, + tok_name_t { "CURRENT-DATE" }, + tok_name_t { "DATE-OF-INTEGER" }, + tok_name_t { "DATE-TO-YYYYMMDD" }, + tok_name_t { "DAY-OF-INTEGER" }, + tok_name_t { "DAY-TO-YYYYDDD" }, + tok_name_t { "DISPLAY-OF" }, + tok_name_t { "E" }, + tok_name_t { "EXCEPTION-FILE" }, + tok_name_t { "EXCEPTION-FILE-N" }, + tok_name_t { "EXCEPTION-LOCATION" }, + tok_name_t { "EXCEPTION-LOCATION-N" }, + tok_name_t { "EXCEPTION-STATEMENT" }, + tok_name_t { "EXCEPTION-STATUS" }, + tok_name_t { "EXP" }, + tok_name_t { "EXP10" }, + tok_name_t { "FACTORIAL" }, + tok_name_t { "FIND-STRING" }, + tok_name_t { "FORMATTED-CURRENT-DATE" }, + tok_name_t { "FORMATTED-DATE" }, + tok_name_t { "FORMATTED-DATETIME" }, + tok_name_t { "FORMATTED-TIME" }, + tok_name_t { "FRACTION-PART" }, + tok_name_t { "HIGHEST-ALGEBRAIC" }, + tok_name_t { "INTEGER" }, + tok_name_t { "INTEGER-OF-BOOLEAN" }, + tok_name_t { "INTEGER-OF-DATE" }, + tok_name_t { "INTEGER-OF-DAY" }, + tok_name_t { "INTEGER-OF-FORMATTED-DATE" }, + tok_name_t { "INTEGER-PART" }, + tok_name_t { "LENGTH" }, + tok_name_t { "LOCALE-COMPARE" }, + tok_name_t { "LOCALE-DATE" }, + tok_name_t { "LOCALE-TIME" }, + tok_name_t { "LOCALE-TIME-FROM-SECONDS" }, + tok_name_t { "LOG" }, + tok_name_t { "LOG10" }, + tok_name_t { "LOWER-CASE" }, + tok_name_t { "LOWEST-ALGEBRAIC" }, + tok_name_t { "MAX" }, + tok_name_t { "MEAN" }, + tok_name_t { "MEDIAN" }, + tok_name_t { "MIDRANGE" }, + tok_name_t { "MIN" }, + tok_name_t { "MOD" }, + tok_name_t { "MODULE-NAME" }, + tok_name_t { "NATIONAL-OF" }, + tok_name_t { "NUMVAL" }, + tok_name_t { "NUMVAL-C" }, + tok_name_t { "NUMVAL-F" }, + tok_name_t { "ORD" }, + tok_name_t { "ORD-MAX" }, + tok_name_t { "ORD-MIN" }, + tok_name_t { "PI" }, + tok_name_t { "PRESENT-VALUE" }, + tok_name_t { "RANDOM" }, + tok_name_t { "RANGE" }, + tok_name_t { "REM" }, + tok_name_t { "REVERSE" }, + tok_name_t { "SECONDS-FROM-FORMATTED-TIME" }, + tok_name_t { "SECONDS-PAST-MIDNIGHT" }, + tok_name_t { "SIGN" }, + tok_name_t { "SIN" }, + tok_name_t { "SMALLEST-ALGEBRAIC" }, + tok_name_t { "SQRT" }, + tok_name_t { "STANDARD-COMPARE" }, + tok_name_t { "STANDARD-DEVIATION" }, + tok_name_t { "SUBSTITUTE" }, + tok_name_t { "SUM" }, + tok_name_t { "TAN" }, + tok_name_t { "TEST-DATE-YYYYMMDD" }, + tok_name_t { "TEST-DAY-YYYYDDD" }, + tok_name_t { "TEST-FORMATTED-DATETIME" }, + tok_name_t { "TEST-NUMVAL" }, + tok_name_t { "TEST-NUMVAL-C" }, + tok_name_t { "TEST-NUMVAL-F" }, + tok_name_t { "TRIM" }, + tok_name_t { "UPPER-CASE" }, + tok_name_t { "VARIANCE" }, + tok_name_t { "WHEN-COMPILED" }, +}; // end intrinsic word list +#endif diff --git a/gcc/cobol/words/reserved.h b/gcc/cobol/words/reserved.h new file mode 100644 index 000000000000..7cd75480670c --- /dev/null +++ b/gcc/cobol/words/reserved.h @@ -0,0 +1,418 @@ +// Generated from gcc/cobol/words +#ifndef _RESERVED_H_ +#define _RESERVED_H_ +{ + tok_name_t { "ACCEPT" }, + tok_name_t { "ACCESS" }, + tok_name_t { "ACTIVE-CLASS" }, + tok_name_t { "ADD" }, + tok_name_t { "ADDRESS" }, + tok_name_t { "ADVANCING" }, + tok_name_t { "AFTER" }, + tok_name_t { "ALIGNED" }, + tok_name_t { "ALL" }, + tok_name_t { "ALLOCATE" }, + tok_name_t { "ALPHABET" }, + tok_name_t { "ALPHABETIC" }, + tok_name_t { "ALPHABETIC-LOWER" }, + tok_name_t { "ALPHABETIC-UPPER" }, + tok_name_t { "ALPHANUMERIC" }, + tok_name_t { "ALPHANUMERIC-EDITED" }, + tok_name_t { "ALSO" }, + tok_name_t { "ALTERNATE" }, + tok_name_t { "AND" }, + tok_name_t { "ANY" }, + tok_name_t { "ANYCASE" }, + tok_name_t { "ARE" }, + tok_name_t { "AREA" }, + tok_name_t { "AREAS" }, + tok_name_t { "AS" }, + tok_name_t { "ASCENDING" }, + tok_name_t { "ASSIGN" }, + tok_name_t { "AT" }, + tok_name_t { "B-AND" }, + tok_name_t { "B-NOT" }, + tok_name_t { "B-OR" }, + tok_name_t { "B-SHIFT-L" }, + tok_name_t { "B-SHIFT-LC" }, + tok_name_t { "B-SHIFT-R" }, + tok_name_t { "B-SHIFT-RC" }, + tok_name_t { "B-XOR" }, + tok_name_t { "BASED" }, + tok_name_t { "BEFORE" }, + tok_name_t { "BINARY" }, + tok_name_t { "BINARY-CHAR" }, + tok_name_t { "BINARY-DOUBLE" }, + tok_name_t { "BINARY-LONG" }, + tok_name_t { "BINARY-SHORT" }, + tok_name_t { "BIT" }, + tok_name_t { "BLANK" }, + tok_name_t { "BLOCK" }, + tok_name_t { "BOOLEAN" }, + tok_name_t { "BOTTOM" }, + tok_name_t { "BY" }, + tok_name_t { "CALL" }, + tok_name_t { "CANCEL" }, + tok_name_t { "CF" }, + tok_name_t { "CH" }, + tok_name_t { "CHARACTER" }, + tok_name_t { "CHARACTERS" }, + tok_name_t { "CLASS" }, + tok_name_t { "CLASS-ID" }, + tok_name_t { "CLOSE" }, + tok_name_t { "CODE" }, + tok_name_t { "CODE-SET" }, + tok_name_t { "COL" }, + tok_name_t { "COLLATING" }, + tok_name_t { "COLS" }, + tok_name_t { "COLUMN" }, + tok_name_t { "COLUMNS" }, + tok_name_t { "COMMA" }, + tok_name_t { "COMMIT" }, + tok_name_t { "COMMON" }, + tok_name_t { "COMP" }, + tok_name_t { "COMPUTATIONAL" }, + tok_name_t { "COMPUTE" }, + tok_name_t { "CONDITION" }, + tok_name_t { "CONFIGURATION" }, + tok_name_t { "CONSTANT" }, + tok_name_t { "CONTAINS" }, + tok_name_t { "CONTENT" }, + tok_name_t { "CONTINUE" }, + tok_name_t { "CONTROL" }, + tok_name_t { "CONTROLS" }, + tok_name_t { "CONVERTING" }, + tok_name_t { "COPY" }, + tok_name_t { "CORR" }, + tok_name_t { "CORRESPONDING" }, + tok_name_t { "COUNT" }, + tok_name_t { "CRT" }, + tok_name_t { "CURRENCY" }, + tok_name_t { "CURSOR" }, + tok_name_t { "DATA" }, + tok_name_t { "DATA-POINTER" }, + tok_name_t { "DATE" }, + tok_name_t { "DAY" }, + tok_name_t { "DAY-OF-WEEK" }, + tok_name_t { "DE" }, + tok_name_t { "DECIMAL-POINT" }, + tok_name_t { "DECLARATIVES" }, + tok_name_t { "DEFAULT" }, + tok_name_t { "DELETE" }, + tok_name_t { "DELIMITED" }, + tok_name_t { "DELIMITER" }, + tok_name_t { "DEPENDING" }, + tok_name_t { "DESCENDING" }, + tok_name_t { "DESTINATION" }, + tok_name_t { "DETAIL" }, + tok_name_t { "DISPLAY" }, + tok_name_t { "DIVIDE" }, + tok_name_t { "DIVISION" }, + tok_name_t { "DOWN" }, + tok_name_t { "DUPLICATES" }, + tok_name_t { "DYNAMIC" }, + tok_name_t { "EC" }, + tok_name_t { "EDITING" }, + tok_name_t { "ELSE" }, + tok_name_t { "EMD-START" }, + tok_name_t { "END" }, + tok_name_t { "END-ACCEPT" }, + tok_name_t { "END-ADD" }, + tok_name_t { "END-CALL" }, + tok_name_t { "END-COMPUTE" }, + tok_name_t { "END-DELETE" }, + tok_name_t { "END-DISPLAY" }, + tok_name_t { "END-DIVIDE" }, + tok_name_t { "END-EVALUATE" }, + tok_name_t { "END-IF" }, + tok_name_t { "END-MULTIPLY" }, + tok_name_t { "END-OF-PAGE" }, + tok_name_t { "END-PERFORM" }, + tok_name_t { "END-READ" }, + tok_name_t { "END-RECEIVE" }, + tok_name_t { "END-RETURN" }, + tok_name_t { "END-REWRITE" }, + tok_name_t { "END-SEARCH" }, + tok_name_t { "END-SEND" }, + tok_name_t { "END-STRING" }, + tok_name_t { "END-SUBTRACT" }, + tok_name_t { "END-UNSTRING" }, + tok_name_t { "END-WRITE" }, + tok_name_t { "ENVIRONMENT" }, + tok_name_t { "EO" }, + tok_name_t { "EOP" }, + tok_name_t { "EQUAL" }, + tok_name_t { "ERROR" }, + tok_name_t { "EVALUATE" }, + tok_name_t { "EXCEPTION" }, + tok_name_t { "EXCEPTION-OBJECT" }, + tok_name_t { "EXCLUSIVE-OR" }, + tok_name_t { "EXIT" }, + tok_name_t { "EXTEND" }, + tok_name_t { "EXTERNAL" }, + tok_name_t { "FACTORY" }, + tok_name_t { "FALSE" }, + tok_name_t { "FARTHEST-FROM-ZERO" }, + tok_name_t { "FD" }, + tok_name_t { "FILE" }, + tok_name_t { "FILE-CONTROL" }, + tok_name_t { "FILLER" }, + tok_name_t { "FINAL" }, + tok_name_t { "FINALLY" }, + tok_name_t { "FIRST" }, + tok_name_t { "FLOAT-BINARY-128" }, + tok_name_t { "FLOAT-BINARY-32" }, + tok_name_t { "FLOAT-BINARY-64" }, + tok_name_t { "FLOAT-DECIMAL-16" }, + tok_name_t { "FLOAT-DECIMAL-34" }, + tok_name_t { "FLOAT-EXTENDED" }, + tok_name_t { "FLOAT-INFINITY" }, + tok_name_t { "FLOAT-LONG" }, + tok_name_t { "FLOAT-NOT-A-NUMBER" }, + tok_name_t { "FLOAT-NOT-A-NUMBER-" }, + tok_name_t { "FLOAT-NOT-A-NUMBER-" }, + tok_name_t { "FLOAT-SHORT" }, + tok_name_t { "FOOTING" }, + tok_name_t { "FOR" }, + tok_name_t { "FORMAT" }, + tok_name_t { "FREE" }, + tok_name_t { "FROM" }, + tok_name_t { "FUNCTION" }, + tok_name_t { "FUNCTION-ID" }, + tok_name_t { "FUNCTION-POINTER" }, + tok_name_t { "GENERATE" }, + tok_name_t { "GET" }, + tok_name_t { "GIVING" }, + tok_name_t { "GLOBAL" }, + tok_name_t { "GO" }, + tok_name_t { "GOBACK" }, + tok_name_t { "GREATER" }, + tok_name_t { "GROUP" }, + tok_name_t { "GROUP-USAGE" }, + tok_name_t { "HEADING" }, + tok_name_t { "HIGH-VALUE" }, + tok_name_t { "HIGH-VALUES" }, + tok_name_t { "I-OICONTROL" }, + tok_name_t { "IDENTIFICATION" }, + tok_name_t { "IF" }, + tok_name_t { "IN" }, + tok_name_t { "IN-ARITHMETIC-RANGE" }, + tok_name_t { "INDEX" }, + tok_name_t { "INDEXED" }, + tok_name_t { "INDICATE" }, + tok_name_t { "INHERITS" }, + tok_name_t { "INITIAL" }, + tok_name_t { "INITIALIZE" }, + tok_name_t { "INITIATE" }, + tok_name_t { "INPUT" }, + tok_name_t { "INPUT-OUTPUT" }, + tok_name_t { "INSPECT" }, + tok_name_t { "INTERFACE" }, + tok_name_t { "INTERFACE-ID" }, + tok_name_t { "INTO" }, + tok_name_t { "INVALID" }, + tok_name_t { "INVOKE" }, + tok_name_t { "IS" }, + tok_name_t { "JUST" }, + tok_name_t { "JUSTIFIED" }, + tok_name_t { "KEY" }, + tok_name_t { "LAST" }, + tok_name_t { "LEADING" }, + tok_name_t { "LEFT" }, + tok_name_t { "LENGTH" }, + tok_name_t { "LESS" }, + tok_name_t { "LIMIT" }, + tok_name_t { "LIMITS" }, + tok_name_t { "LINAGE" }, + tok_name_t { "LINAGE-COUNTER" }, + tok_name_t { "LINE" }, + tok_name_t { "LINE-COUNTER" }, + tok_name_t { "LINES" }, + tok_name_t { "LINKAGE" }, + tok_name_t { "LOCAL-STORAGE" }, + tok_name_t { "LOCALE" }, + tok_name_t { "LOCATION" }, + tok_name_t { "LOCK" }, + tok_name_t { "LOW-VALUE" }, + tok_name_t { "LOW-VALUES" }, + tok_name_t { "MERGE" }, + tok_name_t { "MESSAGE-TAG" }, + tok_name_t { "METHOD-ID" }, + tok_name_t { "MINUS" }, + tok_name_t { "MODE" }, + tok_name_t { "MOVE" }, + tok_name_t { "MULTIPLY" }, + tok_name_t { "NATIONAL" }, + tok_name_t { "NATIONAL-EDITED" }, + tok_name_t { "NATIVE" }, + tok_name_t { "NEAREST-TO-ZERO" }, + tok_name_t { "NEGATIVE" }, + tok_name_t { "NESTED" }, + tok_name_t { "NEXT" }, + tok_name_t { "NO" }, + tok_name_t { "NOT" }, + tok_name_t { "NULL" }, + tok_name_t { "NUMBER" }, + tok_name_t { "NUMERIC" }, + tok_name_t { "NUMERIC-EDITED" }, + tok_name_t { "OBJECT" }, + tok_name_t { "OBJECT-COMPUTER" }, + tok_name_t { "OBJECT-REFERENCE" }, + tok_name_t { "OCCURS" }, + tok_name_t { "OF" }, + tok_name_t { "OFF" }, + tok_name_t { "OMITTED" }, + tok_name_t { "ON" }, + tok_name_t { "OPEN" }, + tok_name_t { "OPTIONAL" }, + tok_name_t { "OPTIONS" }, + tok_name_t { "OR" }, + tok_name_t { "ORDER" }, + tok_name_t { "ORGANIZATION" }, + tok_name_t { "OTHER" }, + tok_name_t { "OUTPUT" }, + tok_name_t { "OVERFLOW" }, + tok_name_t { "OVERRIDE" }, + tok_name_t { "PACKED-DECIMAL" }, + tok_name_t { "PAGE" }, + tok_name_t { "PAGE-COUNTER" }, + tok_name_t { "PERFORM" }, + tok_name_t { "PF" }, + tok_name_t { "PH" }, + tok_name_t { "PIC" }, + tok_name_t { "PICTURE" }, + tok_name_t { "PLUS" }, + tok_name_t { "POINTER" }, + tok_name_t { "POSITIVE" }, + tok_name_t { "PRESENT" }, + tok_name_t { "PRINTING" }, + tok_name_t { "PROCEDURE" }, + tok_name_t { "PROGRAM" }, + tok_name_t { "PROGRAM-ID" }, + tok_name_t { "PROGRAM-POINTER" }, + tok_name_t { "PROPERTY" }, + tok_name_t { "PROTOTYPE" }, + tok_name_t { "QUIET" }, + tok_name_t { "QUOTE" }, + tok_name_t { "QUOTES" }, + tok_name_t { "RAISE" }, + tok_name_t { "RAISING" }, + tok_name_t { "RANDOM" }, + tok_name_t { "RD" }, + tok_name_t { "READ" }, + tok_name_t { "RECEIVE" }, + tok_name_t { "RECORD" }, + tok_name_t { "RECORDS" }, + tok_name_t { "REDEFINES" }, + tok_name_t { "REEL" }, + tok_name_t { "REFERENCE" }, + tok_name_t { "RELATIVE" }, + tok_name_t { "RELEASE" }, + tok_name_t { "REMAINDER" }, + tok_name_t { "REMOVAL" }, + tok_name_t { "RENAMES" }, + tok_name_t { "REPLACE" }, + tok_name_t { "REPLACING" }, + tok_name_t { "REPORT" }, + tok_name_t { "REPORTING" }, + tok_name_t { "REPORTS" }, + tok_name_t { "REPOSITORY" }, + tok_name_t { "RESERVE" }, + tok_name_t { "RESET" }, + tok_name_t { "RESUME" }, + tok_name_t { "RETRY" }, + tok_name_t { "RETURN" }, + tok_name_t { "RETURNING" }, + tok_name_t { "REWIND" }, + tok_name_t { "REWRITE" }, + tok_name_t { "RF" }, + tok_name_t { "RH" }, + tok_name_t { "RIGHT" }, + tok_name_t { "ROLLBACK" }, + tok_name_t { "ROUNDED" }, + tok_name_t { "RUN" }, + tok_name_t { "SAME" }, + tok_name_t { "SCREEN" }, + tok_name_t { "SD" }, + tok_name_t { "SEARCH" }, + tok_name_t { "SECTION" }, + tok_name_t { "SELECT" }, + tok_name_t { "SELF" }, + tok_name_t { "SEND" }, + tok_name_t { "SENTENCE" }, + tok_name_t { "SEPARATE" }, + tok_name_t { "SEQUENCE" }, + tok_name_t { "SEQUENTIAL" }, + tok_name_t { "SET" }, + tok_name_t { "SHARING" }, + tok_name_t { "SIGN" }, + tok_name_t { "SIGNALING" }, + tok_name_t { "SIZE" }, + tok_name_t { "SORT" }, + tok_name_t { "SORT-MERGE" }, + tok_name_t { "SOURCE" }, + tok_name_t { "SOURCE-COMPUTER" }, + tok_name_t { "SOURCES" }, + tok_name_t { "SPACE" }, + tok_name_t { "SPACES" }, + tok_name_t { "SPECIAL-NAMES" }, + tok_name_t { "STANDARD" }, + tok_name_t { "STANDARD-1" }, + tok_name_t { "STANDARD-2" }, + tok_name_t { "START" }, + tok_name_t { "STATUS" }, + tok_name_t { "STOP" }, + tok_name_t { "STRING" }, + tok_name_t { "SUBTRACT" }, + tok_name_t { "SUM" }, + tok_name_t { "SUPER" }, + tok_name_t { "SUPPRESS" }, + tok_name_t { "SYMBOLIC" }, + tok_name_t { "SYNC" }, + tok_name_t { "SYNCHRONIZED" }, + tok_name_t { "SYSTEM-DEFAULT" }, + tok_name_t { "TABLE" }, + tok_name_t { "TALLYING" }, + tok_name_t { "TERMINATE" }, + tok_name_t { "TEST" }, + tok_name_t { "THAN" }, + tok_name_t { "THEN" }, + tok_name_t { "THROUGH" }, + tok_name_t { "THRU" }, + tok_name_t { "TIME" }, + tok_name_t { "TIMES" }, + tok_name_t { "TO" }, + tok_name_t { "TOP" }, + tok_name_t { "TRAILING" }, + tok_name_t { "TRUE" }, + tok_name_t { "TYPE" }, + tok_name_t { "TYPEDEF" }, + tok_name_t { "UNIT" }, + tok_name_t { "UNIVERSAL" }, + tok_name_t { "UNLOCK" }, + tok_name_t { "UNSTRING" }, + tok_name_t { "UNTIL" }, + tok_name_t { "UP" }, + tok_name_t { "UPON" }, + tok_name_t { "USAGE" }, + tok_name_t { "USE" }, + tok_name_t { "USER-DEFAULT" }, + tok_name_t { "USING" }, + tok_name_t { "VAL-STATUS" }, + tok_name_t { "VALID" }, + tok_name_t { "VALIDATE" }, + tok_name_t { "VALIDATE-STATUS" }, + tok_name_t { "VALUE" }, + tok_name_t { "VALUES" }, + tok_name_t { "VARYING" }, + tok_name_t { "WHEN" }, + tok_name_t { "WITH" }, + tok_name_t { "WORKING-STORAGE" }, + tok_name_t { "WRITE" }, + tok_name_t { "XOR" }, + tok_name_t { "ZERO" }, + tok_name_t { "ZEROES" }, + tok_name_t { "ZEROS" }, + tok_name_t { "i-O" }, +}; // end reserved word list +#endif
