websvn |
Subversion Repositories: |
Rev 1 | Rev 3 | |
---|---|---|
Line 2... | Line 2... | |
/************************************************************************************* |
/************************************************************************************* | |
* cobol.php |
* cobol.php | |
* ---------- |
* ---------- | |
* Author: BenBE (BenBE@omorphia.org) |
* Author: BenBE (BenBE@omorphia.org) | |
* Copyright: (c) 2007-2008 BenBE (http://www.omorphia.de/) |
* Copyright: (c) 2007-2008 BenBE (http://www.omorphia.de/) | |
* Release Version: 1.0.8.1 |
* Release Version: 1.0.8.3 | |
* Date Started: 2007/07/02 |
* Date Started: 2007/07/02 | |
* |
* | |
* COBOL language file for GeSHi. |
* COBOL language file for GeSHi. | |
* |
* | |
* CHANGES |
* CHANGES | |
Line 68... | Line 68... | |
'NOSYMBOLS', 'SYNTAX', 'TANDEM', 'TRAP2', 'NOTRAP2', 'TRAP2-74', |
'NOSYMBOLS', 'SYNTAX', 'TANDEM', 'TRAP2', 'NOTRAP2', 'TRAP2-74', | |
'NOTRAP2-74', 'UL', 'WARN', 'NOWARN' |
'NOTRAP2-74', 'UL', 'WARN', 'NOWARN' | |
), |
), | |
2 => array( //Statement Keywords |
2 => array( //Statement Keywords | |
'ACCEPT', 'ADD', 'TO', 'GIVING', 'CORRESPONDING', 'ALTER', 'CALL', |
'ACCEPT', 'ADD', 'TO', 'GIVING', 'CORRESPONDING', 'ALTER', 'CALL', | |
'CANCEL', 'CHECKPOINT', 'CLOSE', 'COMPUTE', 'CONTINUE', 'COPY', |
'CHECKPOINT', 'CLOSE', 'COMPUTE', 'CONTINUE', 'COPY', | |
'DELETE', 'DISPLAY', 'DIVIDE', 'INTO', 'REMAINDER', 'ENTER', |
'DELETE', 'DISPLAY', 'DIVIDE', 'INTO', 'REMAINDER', 'ENTER', | |
'COBOL', 'EVALUATE', 'EXIT', 'GO', 'IF', 'INITIALIZE', 'INSPECT', |
'COBOL', 'EVALUATE', 'EXIT', 'GO', 'INITIALIZE', | |
'TALLYING', 'REPLACING', 'CONVERTING', 'LOCKFILE', 'MERGE', 'MOVE', |
'TALLYING', 'REPLACING', 'CONVERTING', 'LOCKFILE', 'MERGE', 'MOVE', | |
'MULTIPLY', 'BY', 'OPEN', 'PERFORM', 'TIMES', |
'MULTIPLY', 'OPEN', 'PERFORM', 'TIMES', | |
'UNTIL', 'VARYING', 'READ', 'RELEASE', 'REPLACE', 'RETURN', |
'UNTIL', 'VARYING', 'RETURN', | |
'REWRITE', 'SEARCH', 'SET', 'UP', 'DOWN', 'SORT', 'START', |
||
'STARTBACKUP', 'STOP', 'STRING', 'SUBTRACT', 'FROM', 'UNLOCKFILE', |
||
'UNLOCKRECORD', 'UNSTRING', 'USE', 'DEBUGGING', 'AFTER', |
||
'EXCEPTION', 'WRITE' |
||
), |
), | |
3 => array( //Reserved in some contexts |
3 => array( //Reserved in some contexts | |
'ACCESS', 'ADDRESS', 'ADVANCING', 'AFTER', 'ALL', |
'ACCESS', 'ADDRESS', 'ADVANCING', 'AFTER', 'ALL', | |
'ALPHABET', 'ALPHABETIC', 'ALPHABETIC-LOWER', 'ALPHABETIC-UPPER', |
'ALPHABET', 'ALPHABETIC', 'ALPHABETIC-LOWER', 'ALPHABETIC-UPPER', | |
'ALPHANUMERIC', 'ALPHANUMERIC-EDITED', 'ALSO', 'ALTER', 'ALTERNATE', |
'ALPHANUMERIC', 'ALPHANUMERIC-EDITED', 'ALSO', 'ALTERNATE', | |
'AND', 'ANY', 'APPROXIMATE', 'AREA', 'AREAS', 'ASCENDING', 'ASSIGN', |
'AND', 'ANY', 'APPROXIMATE', 'AREA', 'AREAS', 'ASCENDING', 'ASSIGN', | |
'AT', 'AUTHOR', 'BEFORE', 'BINARY', 'BLANK', 'BLOCK', 'BOTTOM', 'BY', |
'AT', 'AUTHOR', 'BEFORE', 'BINARY', 'BLOCK', 'BOTTOM', 'BY', | |
'CALL', 'CANCEL', 'CD', 'CF', 'CH', 'CHARACTER', 'CHARACTERS', |
'CD', 'CF', 'CH', 'CHARACTER', 'CHARACTERS', | |
'CHARACTER-SET', 'CHECKPOINT', 'CLASS', 'CLOCK-UNITS', 'CLOSE', |
'CHARACTER-SET', 'CLASS', 'CLOCK-UNITS', | |
'COBOL', 'CODE', 'CODE-SET', 'COLLATING', 'COLUMN', 'COMMA', |
'CODE-SET', 'COLLATING', 'COLUMN', 'COMMA', | |
'COMMON', 'COMMUNICATION', 'COMP', 'COMP-3', 'COMP-5', |
'COMMON', 'COMMUNICATION', 'COMP', 'COMP-3', 'COMP-5', | |
'COMPUTATIONAL', 'COMPUTATIONAL-3', 'COMPUTATIONAL-5', |
'COMPUTATIONAL', 'COMPUTATIONAL-3', 'COMPUTATIONAL-5', | |
'CONFIGURATION', 'CONTAINS', 'CONTENT', 'CONTINUE', 'CONTROL', |
'CONFIGURATION', 'CONTAINS', 'CONTENT', 'CONTROL', | |
'CONTROLS', 'CONVERTING', 'COPY', 'CORR', 'CORRESPONDING', 'COUNT', |
'CONTROLS', 'CORR', 'COUNT', | |
'CURRENCY', 'DATA', 'DATE', 'DATE-COMPILED', 'DATE-WRITTEN', 'DAY', |
'CURRENCY', 'DATA', 'DATE', 'DATE-COMPILED', 'DATE-WRITTEN', 'DAY', | |
'DAY-OF-WEEK', 'DE', 'DEBUG-CONTENTS', 'DEBUG-ITEM', 'DEBUG-LINE', |
'DAY-OF-WEEK', 'DE', 'DEBUG-CONTENTS', 'DEBUG-ITEM', 'DEBUG-LINE', | |
'DEBUG-SUB-2', 'DEBUG-SUB-3', 'DEBUGGING', 'DECIMAL-POINT', |
'DEBUG-SUB-2', 'DEBUG-SUB-3', 'DEBUGGING', 'DECIMAL-POINT', | |
'DECLARATIVES', 'DEBUG-NAME', 'DEBUG-SUB-1', 'DELETE', 'DELIMITED', |
'DECLARATIVES', 'DEBUG-NAME', 'DEBUG-SUB-1', 'DELIMITED', | |
'DELIMITER', 'DEPENDING', 'DESCENDING', 'DESTINATION', 'DETAIL', |
'DELIMITER', 'DEPENDING', 'DESCENDING', 'DESTINATION', 'DETAIL', | |
'DISABLE', 'DISPLAY', 'DIVIDE', 'DIVISION', 'DOWN', 'DUPLICATES', |
'DISABLE', 'DIVISION', 'DOWN', 'DUPLICATES', | |
'DYNAMIC', 'EGI', 'ELSE', 'EMI', 'ENABLE', 'END', 'END-ADD', |
'DYNAMIC', 'EGI', 'ELSE', 'EMI', 'ENABLE', 'END', 'END-ADD', | |
'END-COMPUTE', 'END-DELETE', 'END-DIVIDE', 'END-EVALUATE', 'END-IF', |
'END-COMPUTE', 'END-DELETE', 'END-DIVIDE', 'END-EVALUATE', 'END-IF', | |
'END-MULTIPLY', 'END-OF-PAGE', 'END-PERFORM', 'END-READ', |
'END-MULTIPLY', 'END-OF-PAGE', 'END-PERFORM', 'END-READ', | |
'END-RECEIVE', 'END-RETURN', 'END-REWRITE', 'END-SEARCH', |
'END-RECEIVE', 'END-RETURN', 'END-REWRITE', 'END-SEARCH', | |
'END-START', 'END-STRING', 'END-SUBTRACT', 'END-UNSTRING', |
'END-START', 'END-STRING', 'END-SUBTRACT', 'END-UNSTRING', | |
'END-WRITE', 'ENTER', 'EOP', 'EQUAL', 'ERROR', 'ESI', 'EVALUATE', |
'END-WRITE', 'EOP', 'EQUAL', 'ERROR', 'ESI', | |
'EVERY', 'EXCEPTION', 'EXCLUSIVE', 'EXIT', 'EXTEND', |
'EVERY', 'EXCEPTION', 'EXCLUSIVE', 'EXTEND', | |
'EXTENDED-STORAGE', 'EXTERNAL', 'FALSE', 'FD', 'FILE', |
'EXTENDED-STORAGE', 'EXTERNAL', 'FALSE', 'FD', 'FILE', | |
'FILE-CONTROL', 'FILLER', 'FINAL', 'FIRST', 'FOOTING', 'FOR', |
'FILE-CONTROL', 'FILLER', 'FINAL', 'FIRST', 'FOOTING', 'FOR', | |
'FROM', 'FUNCTION', 'GENERATE', 'GENERIC', 'GIVING', 'GLOBAL', |
'FROM', 'FUNCTION', 'GENERATE', 'GENERIC', 'GLOBAL', | |
'GO', 'GREATER', 'GROUP', 'GUARDIAN-ERR', 'HEADING', 'HIGH-VALUE', |
'GREATER', 'GROUP', 'GUARDIAN-ERR', 'HIGH-VALUE', | |
'HIGH-VALUES', 'I-O', 'I-O-CONTROL', 'IDENTIFICATION', 'IN', |
'HIGH-VALUES', 'I-O', 'I-O-CONTROL', 'IDENTIFICATION', 'IN', | |
'INDEX', 'INDEXED', 'INDICATE', 'INITIAL', 'INITIALIZE', 'INITIATE', |
'INDEX', 'INDEXED', 'INDICATE', 'INITIAL', 'INITIATE', | |
'INPUT', 'INPUT-OUTPUT', 'INSPECT', 'INSTALLATION', 'INTO', |
'INPUT', 'INPUT-OUTPUT', 'INSTALLATION', | |
'INVALID', 'IS', 'JUST', 'JUSTIFIED', 'KEY', 'LABEL', 'LAST', |
'INVALID', 'IS', 'JUST', 'JUSTIFIED', 'KEY', 'LABEL', 'LAST', | |
'LEADING', 'LEFT', 'LENGTH', 'LESS', 'LIMIT', 'LIMITS', 'LINAGE', |
'LEADING', 'LEFT', 'LESS', 'LIMIT', 'LIMITS', 'LINAGE', | |
'LINAGE-COUNTER', 'LINE', 'LINE-COUNTER', 'LINKAGE', 'LOCK', |
'LINAGE-COUNTER', 'LINE', 'LINE-COUNTER', 'LINKAGE', 'LOCK', | |
'LOCKFILE', 'LOW-VALUE', 'LOW-VALUES', 'MEMORY', 'MERGE', 'MESSAGE', |
'LOW-VALUE', 'LOW-VALUES', 'MEMORY', 'MESSAGE', | |
'MODE', 'MODULES', 'MOVE', 'MULTIPLE', 'MULTIPLY', 'NATIVE', |
'MODE', 'MODULES', 'MULTIPLE', 'NATIVE', | |
'NEGATIVE', 'NEXT', 'NO', 'NOT', 'NULL', 'NULLS', 'NUMBER', |
'NEGATIVE', 'NEXT', 'NO', 'NOT', 'NULL', 'NULLS', 'NUMBER', | |
'NUMERIC', 'NUMERIC-EDITED', 'OBJECT-COMPUTER', 'OCCURS', 'OF', |
'NUMERIC', 'NUMERIC-EDITED', 'OBJECT-COMPUTER', 'OCCURS', 'OF', | |
'OFF', 'OMITTED', 'ON', 'OPEN', 'OPTIONAL', 'OR', 'ORDER', |
'OFF', 'OMITTED', 'ON', 'OPTIONAL', 'OR', 'ORDER', | |
'ORGANIZATION', 'OTHER', 'OUTPUT', 'OVERFLOW', 'PACKED-DECIMAL', |
'ORGANIZATION', 'OTHER', 'OUTPUT', 'OVERFLOW', 'PACKED-DECIMAL', | |
'PADDING', 'PAGE', 'PAGE-COUNTER', 'PERFORM', 'PF', 'PH', 'PIC', |
'PADDING', 'PAGE', 'PAGE-COUNTER', 'PF', 'PH', 'PIC', | |
'PICTURE', 'PLUS', 'POINTER', 'POSITION', 'POSITIVE', 'PRINTING', |
'PICTURE', 'PLUS', 'POINTER', 'POSITION', 'POSITIVE', 'PRINTING', | |
'PROCEDURE', 'PROCEDURES', 'PROCEED', 'PROGRAM', 'PROGRAM-ID', |
'PROCEDURE', 'PROCEDURES', 'PROCEED', 'PROGRAM', 'PROGRAM-ID', | |
'PROGRAM-STATUS', 'PROGRAM-STATUS-1', 'PROGRAM-STATUS-2', 'PROMPT', |
'PROGRAM-STATUS', 'PROGRAM-STATUS-1', 'PROGRAM-STATUS-2', 'PROMPT', | |
'PROTECTED', 'PURGE', 'QUEUE', 'QUOTE', 'QUOTES', 'RANDOM', 'RD', |
'PROTECTED', 'PURGE', 'QUEUE', 'QUOTE', 'QUOTES', 'RD', | |
'READ', 'RECEIVE', 'RECEIVE-CONTROL', 'RECORD', 'RECORDS', |
'RECEIVE', 'RECEIVE-CONTROL', 'RECORD', 'RECORDS', | |
'REDEFINES', 'REEL', 'REFERENCE', 'REFERENCES', 'RELATIVE', |
'REDEFINES', 'REEL', 'REFERENCE', 'REFERENCES', 'RELATIVE', | |
'RELEASE', 'REMAINDER', 'REMOVAL', 'RENAMES', 'REPLACE', |
'REMOVAL', 'RENAMES', 'REPLACE', | |
'REPLACING', 'REPLY', 'REPORT', 'REPORTING', 'REPORTS', 'RERUN', |
'REPLY', 'REPORT', 'REPORTING', 'REPORTS', 'RERUN', | |
'RESERVE', 'RESET', 'REVERSED', 'REWIND', 'REWRITE', 'RF', |
'RESERVE', 'RESET', 'REVERSED', 'REWIND', 'REWRITE', 'RF', | |
'RH', 'RIGHT', 'ROUNDED', 'RUN', 'SAME', 'SD', 'SEARCH', 'SECTION', |
'RH', 'RIGHT', 'ROUNDED', 'RUN', 'SAME', 'SD', | |
'SECURITY', 'SEGMENT', 'SEGMENT-LIMIT', 'SELECT', 'SEND', |
'SECURITY', 'SEGMENT', 'SEGMENT-LIMIT', 'SELECT', 'SEND', | |
'SENTENCE', 'SEPARATE', 'SEQUENCE', 'SEQUENTIAL', 'SET', 'SHARED', |
'SENTENCE', 'SEPARATE', 'SEQUENCE', 'SEQUENTIAL', 'SET', | |
'SIGN', 'SIZE', 'SORT', 'SORT-MERGE', 'SOURCE', 'SOURCE-COMPUTER', |
'SIGN', 'SIZE', 'SORT', 'SORT-MERGE', 'SOURCE-COMPUTER', | |
'SPACE', 'SPACES', 'SPECIAL-NAMES', 'STANDARD', 'STANDARD-1', |
'SPACE', 'SPACES', 'SPECIAL-NAMES', 'STANDARD', 'STANDARD-1', | |
'STANDARD-2', 'START', 'STARTBACKUP', 'STATUS', 'STOP', 'STRING', |
'STANDARD-2', 'START', 'STARTBACKUP', 'STATUS', 'STOP', 'STRING', | |
'SUB-QUEUE-1', 'SUB-QUEUE-2', 'SUB-QUEUE-3', 'SUBTRACT', 'SUM', |
'SUB-QUEUE-1', 'SUB-QUEUE-2', 'SUB-QUEUE-3', 'SUBTRACT', | |
'SUPPRESS', 'SYMBOLIC', 'SYNC', 'SYNCDEPTH', 'SYNCHRONIZED', |
'SYMBOLIC', 'SYNC', 'SYNCDEPTH', 'SYNCHRONIZED', | |
'TABLE', 'TAL', 'TALLYING', 'TAPE', 'TERMINAL', 'TERMINATE', 'TEST', |
'TABLE', 'TAL', 'TAPE', 'TERMINAL', 'TERMINATE', 'TEST', | |
'TEXT', 'THAN', 'THEN', 'THROUGH', 'THRU', 'TIME', 'TIMES', 'TO', |
'TEXT', 'THAN', 'THEN', 'THROUGH', 'THRU', 'TIME', | |
'TOP', 'TRAILING', 'TRUE', 'TYPE', 'UNIT', 'UNLOCK', 'UNLOCKFILE', |
'TOP', 'TRAILING', 'TRUE', 'TYPE', 'UNIT', 'UNLOCK', 'UNLOCKFILE', | |
'UNLOCKRECORD', 'UNSTRING', 'UNTIL', 'UP', 'UPON', 'USAGE', 'USE', |
'UNLOCKRECORD', 'UNSTRING', 'UP', 'UPON', 'USAGE', 'USE', | |
'USING', 'VALUE', 'VALUES', 'VARYING', 'WHEN', 'WITH', 'WORDS', |
'USING', 'VALUE', 'VALUES', 'WHEN', 'WITH', 'WORDS', | |
'WORKING-STORAGE', 'WRITE', 'ZERO', 'ZEROES' |
'WORKING-STORAGE', 'WRITE', 'ZERO', 'ZEROES' | |
), |
), | |
4 => array( //Standard functions |
4 => array( //Standard functions | |
'ACOS', 'ANNUITY', 'ASIN', 'ATAN', 'CHAR', 'COS', 'CURRENT-DATE', |
'ACOS', 'ANNUITY', 'ASIN', 'ATAN', 'CHAR', 'COS', 'CURRENT-DATE', | |
'DATE-OF-INTEGER', 'DAY-OF-INTEGER', 'FACTORIAL', 'INTEGER', |
'DATE-OF-INTEGER', 'DAY-OF-INTEGER', 'FACTORIAL', 'INTEGER', |