PHP Classes

File: examples/tags/syntax/geshi/geshi/cobol.php

Recommend this page to a friend!
  Classes of Oliver Lillie  >  PHP Custom Tags  >  examples/tags/syntax/geshi/geshi/cobol.php  >  Download  
File: examples/tags/syntax/geshi/geshi/cobol.php
Role: Auxiliary script
Content type: text/plain
Description: Auxiliary script
Class: PHP Custom Tags
Template engine based on tags similar to HTML
Author: By
Last change: Update of examples/tags/syntax/geshi/geshi/cobol.php
Date: 11 months ago
Size: 12,259 bytes


Class file image Download
 * cobol.php
 * ----------
 * Author: BenBE (
 * Copyright: (c) 2007-2008 BenBE (
 * Release Version: 1.0.8
 * Date Started: 2007/07/02
 * COBOL language file for GeSHi.
 * -------
 * TODO (updated 2007/07/02)
 * -------------------------
 *     This file is part of GeSHi.
 *   GeSHi is free software; you can redistribute it and/or modify
 *   it under the terms of the GNU General Public License as published by
 *   the Free Software Foundation; either version 2 of the License, or
 *   (at your option) any later version.
 *   GeSHi is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   GNU General Public License for more details.
 *   You should have received a copy of the GNU General Public License
 *   along with GeSHi; if not, write to the Free Software
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

$language_data = array (
    'LANG_NAME' => 'COBOL',
    'COMMENT_SINGLE' => array(),
    'COMMENT_MULTI' => array(),
    'COMMENT_REGEXP' => array(1 => '/^\*.*?$/m'),
    'QUOTEMARKS' => array('"', "'"),
    'ESCAPE_CHAR' => '\\',
    'KEYWORDS' => array(
        1 => array( //Compiler Directives
            "DIAGNOSE-74", "NODIAGNOSE-74", "DIAGNOSE-85", "NODIAGNOSE-85",
            "LD", "LESS-CODE", "LIBRARY", "LINES", "LIST", "NOLIST", "LMAP",
            "NOLMAP", "MAIN", "MAP", "NOMAP", "NLD", "NONSTOP", "NON-SHARED",
            "NOSYMBOLS", "SYNTAX", "TANDEM", "TRAP2", "NOTRAP2", "TRAP2-74",
            "NOTRAP2-74", "UL", "WARN", "NOWARN"
        2 => array( //Statement Keywords
            "ACCEPT", "ADD", "TO", "GIVING", "CORRESPONDING", "ALTER", "CALL",
            "COBOL", "EVALUATE", "EXIT", "GO", "IF", "INITIALIZE", "INSPECT",
            "REWRITE", "SEARCH", "SET", "UP", "DOWN", "SORT", "START",
            "EXCEPTION", "WRITE"
        3 => array( //Reserved in some contexts
            "ACCESS", "ADDRESS", "ADVANCING", "AFTER", "ALL",
            "AT", "AUTHOR", "BEFORE", "BINARY", "BLANK", "BLOCK", "BOTTOM", "BY",
            "CALL", "CANCEL", "CD", "CF", "CH", "CHARACTER", "CHARACTERS",
            "COBOL", "CODE", "CODE-SET", "COLLATING", "COLUMN", "COMMA",
            "COMMON", "COMMUNICATION", "COMP", "COMP-3", "COMP-5",
            "DYNAMIC", "EGI", "ELSE", "EMI", "ENABLE", "END", "END-ADD",
            "END-WRITE", "ENTER", "EOP", "EQUAL", "ERROR", "ESI", "EVALUATE",
            "HIGH-VALUES", "I-O", "I-O-CONTROL", "IDENTIFICATION", "IF", "IN",
            "INVALID", "IS", "JUST", "JUSTIFIED", "KEY", "LABEL", "LAST",
            "LEADING", "LEFT", "LENGTH", "LESS", "LIMIT", "LIMITS", "LINAGE",
            "NEGATIVE", "NEXT", "NO", "NOT", "NULL", "NULLS", "NUMBER",
            "OFF", "OMITTED", "ON", "OPEN", "OPTIONAL", "OR", "ORDER",
            "PADDING", "PAGE", "PAGE-COUNTER", "PERFORM", "PF", "PH", "PIC",
            "PROTECTED", "PURGE", "QUEUE", "QUOTE", "QUOTES", "RANDOM", "RD",
            "RESERVE", "RESET", "REVERSED", "REWIND", "REWRITE", "RF",
            "RH", "RIGHT", "ROUNDED", "RUN", "SAME", "SD", "SEARCH", "SECTION",
            "SUB-QUEUE-1", "SUB-QUEUE-2", "SUB-QUEUE-3", "SUBTRACT", "SUM",
            "TEXT", "THAN", "THEN", "THROUGH", "THRU", "TIME", "TIMES", "TO",
            "TOP", "TRAILING", "TRUE", "TYPE", "UNIT", "UNLOCK", "UNLOCKFILE",
            "UNLOCKRECORD", "UNSTRING", "UNTIL", "UP", "UPON", "USAGE", "USE",
            "USING", "VALUE", "VALUES", "VARYING", "WHEN", "WITH", "WORDS",
        4 => array( //Standard functions
            "ACOS", "ANNUITY", "ASIN", "ATAN", "CHAR", "COS", "CURRENT-DATE",
            "LOG", "LOG10", "LOWER-CASE", "MAX", "MEAN", "MEDIAN", "MIDRANGE",
            "MIN", "MOD", "NUMVAL", "NUMVAL-C", "ORD", "ORD-MAX", "ORD-MIN",
            "PRESENT-VALUE", "RANDOM", "RANGE", "REM", "REVERSE", "SIN", "SQRT",
        5 => array( //Privileged Built-in Functions
            "#IN", "#OUT", "#TERM", "#TEMP", "#DYNAMIC", "COBOL85^ARMTRAP",
    'SYMBOLS' => array(
        //Avoid having - in identifiers marked as symbols
        ' + ', ' - ', ' * ', ' / ', ' ** ',
        '.', ',',
        '(', ')', '[', ']'
    'CASE_SENSITIVE' => array(
        GESHI_COMMENTS => false,
        1 => false,
        2 => false,
        3 => false,
        4 => false,
        5 => false
    'STYLES' => array(
        'KEYWORDS' => array(
            1 => 'color: #000080; font-weight: bold;',
            2 => 'color: #000000; font-weight: bold;',
            3 => 'color: #008000; font-weight: bold;',
            4 => 'color: #000080;',
            5 => 'color: #008000;',
        'COMMENTS' => array(
            1 => 'color: #a0a0a0; font-style: italic;',
            'MULTI' => 'color: #a0a0a0; font-style: italic;'
        'ESCAPE_CHAR' => array(
            0 => 'color: #000099; font-weight: bold;'
        'BRACKETS' => array(
            0 => 'color: #339933;'
        'STRINGS' => array(
            0 => 'color: #ff0000;'
        'NUMBERS' => array(
            0 => 'color: #993399;'
        'METHODS' => array(
            1 => 'color: #202020;'
        'SYMBOLS' => array(
            0 => 'color: #000066;'
        'REGEXPS' => array(
        'SCRIPT' => array(
    'URLS' => array(
        1 => '',
        2 => '',
        3 => '',
        4 => '',
        5 => ''
    'OOLANG' => false,
    'OBJECT_SPLITTERS' => array(
    'REGEXPS' => array(
    'SCRIPT_DELIMITERS' => array(
    'TAB_WIDTH' => 4

For more information send a message to info at phpclasses dot org.