1<?php 2/**************************************************************************** 3 * modula2.php 4 * ----------- 5 * Author: Benjamin Kowarsch (benjamin@modula2.net) 6 * Copyright: (c) 2009 Benjamin Kowarsch (benjamin@modula2.net) 7 * Release Version: 1.0.9.1 8 * Date Started: 2009/11/05 9 * 10 * Modula-2 language file for GeSHi. 11 * 12 * CHANGES 13 * ------- 14 * 2010/05/22 (1.0.8.8) 15 * - First Release 16 * 17 * TODO (updated 2010/05/22) 18 * ------------------------- 19 * 20 ************************************************************************************* 21 * 22 * This file is part of GeSHi. 23 * 24 * GeSHi is free software; you can redistribute it and/or modify 25 * it under the terms of the GNU General Public License as published by 26 * the Free Software Foundation; either version 2 of the License, or 27 * (at your option) any later version. 28 * 29 * GeSHi is distributed in the hope that it will be useful, 30 * but WITHOUT ANY WARRANTY; without even the implied warranty of 31 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 32 * GNU General Public License for more details. 33 * 34 * You should have received a copy of the GNU General Public License 35 * along with GeSHi; if not, write to the Free Software 36 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 37 * 38 ************************************************************************************/ 39 40$language_data = array ( 41 'LANG_NAME' => 'Modula-2', 42 'COMMENT_MULTI' => array('(*' => '*)'), 43 'COMMENT_SINGLE' => array(), 44 'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE, 45 'QUOTEMARKS' => array('"'), 46 'HARDQUOTE' => array("'", "'"), 47 'HARDESCAPE' => array("''"), 48 'ESCAPE_CHAR' => '\\', 49 'KEYWORDS' => array( 50 1 => array( /* reserved words */ 51 'AND', 'ARRAY', 'BEGIN', 'BY', 'CASE', 'CONST', 'DEFINITION', 52 'DIV', 'DO', 'ELSE', 'ELSIF', 'END', 'EXIT', 'EXPORT', 'FOR', 53 'FROM', 'IF', 'IMPLEMENTATION', 'IMPORT', 'IN', 'LOOP', 'MOD', 54 'MODULE', 'NOT', 'OF', 'OR', 'POINTER', 'PROCEDURE', 'QUALIFIED', 55 'RECORD', 'REPEAT', 'RETURN', 'SET', 'THEN', 'TO', 'TYPE', 56 'UNTIL', 'VAR', 'WHILE', 'WITH' 57 ), 58 2 => array( /* pervasive constants */ 59 'NIL', 'FALSE', 'TRUE', 60 ), 61 3 => array( /* pervasive types */ 62 'BITSET', 'CAP', 'CHR', 'DEC', 'DISPOSE', 'EXCL', 'FLOAT', 63 'HALT', 'HIGH', 'INC', 'INCL', 'MAX', 'MIN', 'NEW', 'ODD', 'ORD', 64 'SIZE', 'TRUNC', 'VAL' 65 ), 66 4 => array( /* pervasive functions and macros */ 67 'ABS', 'BOOLEAN', 'CARDINAL', 'CHAR', 'INTEGER', 68 'LONGCARD', 'LONGINT', 'LONGREAL', 'PROC', 'REAL' 69 ), 70 ), 71 'SYMBOLS' => array( 72 ',', ':', '=', '+', '-', '*', '/', '#', '~' 73 ), 74 'CASE_SENSITIVE' => array( 75 GESHI_COMMENTS => false, 76 1 => true, 77 2 => true, 78 3 => true, 79 4 => true, 80 ), 81 'STYLES' => array( 82 'KEYWORDS' => array( 83 1 => 'color: #000000; font-weight: bold;', 84 2 => 'color: #000000; font-weight: bold;', 85 3 => 'color: #000066;', 86 4 => 'color: #000066; font-weight: bold;' 87 ), 88 'COMMENTS' => array( 89 'MULTI' => 'color: #666666; font-style: italic;' 90 ), 91 'ESCAPE_CHAR' => array( 92 0 => 'color: #000099; font-weight: bold;', 93 'HARD' => 'color: #000099; font-weight: bold;' 94 ), 95 'BRACKETS' => array( 96 0 => 'color: #009900;' 97 ), 98 'STRINGS' => array( 99 0 => 'color: #ff0000;', 100 'HARD' => 'color: #ff0000;' 101 ), 102 'NUMBERS' => array( 103 0 => 'color: #cc66cc;' 104 ), 105 'METHODS' => array( 106 1 => 'color: #0066ee;' 107 ), 108 'SYMBOLS' => array( 109 0 => 'color: #339933;' 110 ), 111 'REGEXPS' => array( 112 ), 113 'SCRIPT' => array( 114 ) 115 ), 116 'URLS' => array( 117 1 => '', 118 2 => '', 119 3 => '', 120 4 => '' 121 ), 122 'OOLANG' => false, 123 'OBJECT_SPLITTERS' => array( 124 1 => '' 125 ), 126 'REGEXPS' => array( 127 ), 128 'STRICT_MODE_APPLIES' => GESHI_NEVER, 129 'SCRIPT_DELIMITERS' => array( 130 ), 131 'HIGHLIGHT_STRICT_BLOCK' => array( 132 ), 133 'TAB_WIDTH' => 4 134); 135