2 /*************************************************************************************
5 * Author: mbishop (mbishop@esoteriq.org)
6 * Copyright: (c) 2009 mbishop (mbishop@esoteriq.org)
7 * Release Version: 1.0.8.3
8 * Date Started: 2009/01/21
10 * Modula-3 language file for GeSHi.
16 * -------------------------
18 *************************************************************************************
20 * This file is part of GeSHi.
22 * GeSHi is free software; you can redistribute it and/or modify
23 * it under the terms of the GNU General Public License as published by
24 * the Free Software Foundation; either version 2 of the License, or
25 * (at your option) any later version.
27 * GeSHi is distributed in the hope that it will be useful,
28 * but WITHOUT ANY WARRANTY; without even the implied warranty of
29 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
30 * GNU General Public License for more details.
32 * You should have received a copy of the GNU General Public License
33 * along with GeSHi; if not, write to the Free Software
34 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
36 ************************************************************************************/
38 $language_data = array (
39 'LANG_NAME' => 'Modula-3',
40 'COMMENT_SINGLE' => array(),
41 'COMMENT_MULTI' => array('(*' => '*)'),
42 'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
43 'QUOTEMARKS' => array('"'),
44 'HARDQUOTE' => array("'", "'"),
45 'HARDESCAPE' => array("''"),
46 'ESCAPE_CHAR' => '\\',
49 'AND', 'ANY', 'ARRAY', 'AS', 'BEGIN', 'BITS', 'BRANDED', 'BY', 'CASE',
50 'CONST', 'DIV', 'DO', 'ELSE', 'ELSIF', 'END', 'EVAL', 'EXCEPT', 'EXCEPTION',
51 'EXIT', 'EXPORTS', 'FINALLY', 'FOR', 'FROM', 'GENERIC', 'IF', 'IMPORT', 'IN',
52 'INTERFACE', 'LOCK', 'LOOP', 'METHODS', 'MOD', 'MODULE', 'NOT', 'OBJECT', 'OF',
53 'OR', 'OVERRIDE', 'PROCEDURE', 'RAISE', 'RAISES', 'READONLY', 'RECORD', 'REF',
54 'REPEAT', 'RETURN', 'REVEAL', 'ROOT', 'SET', 'THEN', 'TO', 'TRY', 'TYPE', 'TYPECASE',
55 'UNSAFE', 'UNTIL', 'UNTRACED', 'VALUE', 'VAR', 'WHILE', 'WITH'
58 'NIL', 'NULL', 'FALSE', 'TRUE',
61 'ABS','ADR','ADRSIZE','BITSIZE','BYTESIZE','CEILING','DEC','DISPOSE',
62 'EXTENDED','FIRST','FLOAT','FLOOR','INC','ISTYPE','LAST','LOOPHOLE','MAX','MIN',
63 'NARROW','NEW','NUMBER','ORD','ROUND','SUBARRAY','TRUNC','TYPECODE', 'VAL'
66 'ADDRESS', 'BOOLEAN', 'CARDINAL', 'CHAR', 'INTEGER',
67 'LONGREAL', 'MUTEX', 'REAL', 'REFANY', 'TEXT'
71 ',', ':', '=', '+', '-', '*', '/', '#'
73 'CASE_SENSITIVE' => array(
74 GESHI_COMMENTS => false,
82 1 => 'color: #000000; font-weight: bold;',
83 2 => 'color: #000000; font-weight: bold;',
84 3 => 'color: #000066;',
85 4 => 'color: #000066; font-weight: bold;'
88 'MULTI' => 'color: #666666; font-style: italic;'
90 'ESCAPE_CHAR' => array(
91 0 => 'color: #000099; font-weight: bold;',
92 'HARD' => 'color: #000099; font-weight: bold;'
95 0 => 'color: #009900;'
98 0 => 'color: #ff0000;',
99 'HARD' => 'color: #ff0000;'
102 0 => 'color: #cc66cc;'
105 1 => 'color: #0066ee;'
108 0 => 'color: #339933;'
122 'OBJECT_SPLITTERS' => array(
127 'STRICT_MODE_APPLIES' => GESHI_NEVER,
128 'SCRIPT_DELIMITERS' => array(
130 'HIGHLIGHT_STRICT_BLOCK' => array(