File geshi/geshi/pascal.php

Last commit: Fri Nov 23 00:12:00 2007 +0100	dankert	Farbige Darstellung von Code-Bl?cken mit Hilfe der Bibliothek GESHI.


     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 ?>



Download geshi/geshi/pascal.php


History
Fri, 23 Nov 2007 00:12:00 +0100	dankert	Farbige Darstellung von Code-Bl?cken mit Hilfe der Bibliothek GESHI.