openrat-cms

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README

pascal.php (4294B)

      1 <?php
      2 /*************************************************************************************
      3  * pascal.php
      4  * ----------
      5  * Author: Tux (tux@inamil.cz)
      6  * Copyright: (c) 2004 Tux (http://tux.a4.cz/), Nigel McNie (http://qbnz.com/highlighter)
      7  * Release Version: 1.0.7.20
      8  * Date Started: 2004/07/26
      9  *
     10  * Pascal language file for GeSHi.
     11  *
     12  * CHANGES
     13  * -------
     14  * 2004/11/27 (1.0.2)
     15  *  -  Added support for multiple object splitters
     16  * 2004/10/27 (1.0.1)
     17  *   -  Added support for URLs
     18  * 2004/08/05 (1.0.0)
     19  *   -  Added support for symbols
     20  * 2004/07/27 (0.9.1)
     21  *   -  Pascal is OO language. Some new words.
     22  * 2004/07/26 (0.9.0)
     23  *   -  First Release
     24  *
     25  * TODO (updated 2004/11/27)
     26  * -------------------------
     27  *
     28  *************************************************************************************
     29  *
     30  *     This file is part of GeSHi.
     31  *
     32  *   GeSHi is free software; you can redistribute it and/or modify
     33  *   it under the terms of the GNU General Public License as published by
     34  *   the Free Software Foundation; either version 2 of the License, or
     35  *   (at your option) any later version.
     36  *
     37  *   GeSHi is distributed in the hope that it will be useful,
     38  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
     39  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     40  *   GNU General Public License for more details.
     41  *
     42  *   You should have received a copy of the GNU General Public License
     43  *   along with GeSHi; if not, write to the Free Software
     44  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
     45  *
     46  ************************************************************************************/
     47 
     48 $language_data = array (
     49 	'LANG_NAME' => 'Pascal',
     50 	'COMMENT_SINGLE' => array(1 => '//'),
     51 	'COMMENT_MULTI' => array('{' => '}','(*' => '*)'),
     52 	'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
     53 	'QUOTEMARKS' => array("'", '"'),
     54 	'ESCAPE_CHAR' => '\\',
     55 	'KEYWORDS' => array(
     56 		1 => array(
     57 			'if', 'while', 'until', 'repeat', 'default',
     58 			'do', 'else', 'for', 'switch', 'goto','label','asm','begin','end',
     59 			'assembler','case', 'downto', 'to','div','mod','far','forward','in','inherited',
     60 			'inline','interrupt','label','library','not','var','of','then','stdcall',
     61 			'cdecl','end.','raise','try','except','name','finally','resourcestring','override','overload',
     62 			'default','public','protected','private','property','published','stored','catch'
     63 			),
     64 		2 => array(
     65 			'nil', 'false', 'break', 'true', 'function', 'procedure','implementation','interface',
     66 			'unit','program','initialization','finalization','uses'
     67 			),
     68 		3 => array(
     69 			'abs', 'absolute','and','arc','arctan','chr','constructor','destructor',
     70 			'dispose','cos','eof','eoln','exp','get','index','ln','new','xor','write','writeln',
     71 			'shr','sin','sqrt','succ','pred','odd','read','readln','ord','ordinal','blockread','blockwrite'
     72 			),
     73 		4 => array(
     74 			'array', 'char', 'const', 'boolean',  'real', 'integer', 'longint',
     75 			'word', 'shortint', 'record','byte','bytebool','string',
     76 			'type','object','export','exports','external','file','longbool','pointer','set',
     77 			'packed','ansistring','union'
     78 			),
     79 		),
     80 	'SYMBOLS' => array(
     81 		),
     82 	'CASE_SENSITIVE' => array(
     83 		GESHI_COMMENTS => true,
     84 		1 => false,
     85 		2 => false,
     86 		3 => false,
     87 		4 => false,
     88 		),
     89 	'STYLES' => array(
     90 		'KEYWORDS' => array(
     91 			1 => 'color: #b1b100;',
     92 			2 => 'color: #000000; font-weight: bold;',
     93 			3 => '',
     94 			4 => 'color: #993333;'
     95 			),
     96 		'COMMENTS' => array(
     97 			1 => 'color: #808080; font-style: italic;',
     98 			2 => 'color: #339933;',
     99 			'MULTI' => 'color: #808080; font-style: italic;'
    100 			),
    101 		'ESCAPE_CHAR' => array(
    102 			0 => 'color: #000099; font-weight: bold;'
    103 			),
    104 		'BRACKETS' => array(
    105 			0 => 'color: #66cc66;'
    106 			),
    107 		'STRINGS' => array(
    108 			0 => 'color: #ff0000;'
    109 			),
    110 		'NUMBERS' => array(
    111 			0 => 'color: #cc66cc;'
    112 			),
    113 		'METHODS' => array(
    114 			1 => 'color: #202020;'
    115 			),
    116 		'SYMBOLS' => array(
    117 			0 => 'color: #66cc66;'
    118 			),
    119 		'REGEXPS' => array(
    120 			),
    121 		'SCRIPT' => array(
    122 			)
    123 		),
    124 	'URLS' => array(
    125 		1 => '',
    126 		2 => '',
    127 		3 => '',
    128 		4 => ''
    129 		),
    130 	'OOLANG' => true,
    131 	'OBJECT_SPLITTERS' => array(
    132 		1 => '.'
    133 		),
    134 	'REGEXPS' => array(
    135 		),
    136 	'STRICT_MODE_APPLIES' => GESHI_NEVER,
    137 	'SCRIPT_DELIMITERS' => array(
    138 		),
    139 	'HIGHLIGHT_STRICT_BLOCK' => array(
    140         ),
    141     'TAB_WIDTH' => 4
    142 );
    143 
    144 ?>