142 lines
4.9 KiB
PHP
142 lines
4.9 KiB
PHP
<?php
|
|
/*************************************************************************************
|
|
* oz.php
|
|
* --------
|
|
* Author: Wolfgang Meyer (Wolfgang.Meyer@gmx.net)
|
|
* Copyright: (c) 2010 Wolfgang Meyer
|
|
* Release Version: 1.0.8.12
|
|
* Date Started: 2010/01/03
|
|
*
|
|
* Oz language file for GeSHi.
|
|
*
|
|
* CHANGES
|
|
* -------
|
|
*
|
|
*************************************************************************************
|
|
*
|
|
* 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
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* 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' => 'OZ',
|
|
'COMMENT_SINGLE' => array(1 => '%'),
|
|
'COMMENT_MULTI' => array('/*' => '*/'),
|
|
'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
|
|
'QUOTEMARKS' => array('"','\''),
|
|
'ESCAPE_CHAR' => '\\',
|
|
'NUMBERS' => array(),
|
|
'KEYWORDS' => array(
|
|
1 => array(
|
|
'declare','local','in','end','proc','fun','functor','require','prepare',
|
|
'import','export','define','at','case','then','else','of','elseof',
|
|
'elsecase','if','elseif','class','from','prop','attr','feat','meth',
|
|
'self','true','false','unit','div','mod','andthen','orelse','cond','or',
|
|
'dis','choice','not','thread','try','catch','finally','raise','lock',
|
|
'skip','fail','for','do'
|
|
)
|
|
),
|
|
'CASE_SENSITIVE' => array(
|
|
GESHI_COMMENTS => false,
|
|
1 => true
|
|
),
|
|
'SYMBOLS' => array(
|
|
'@', '!', '|', '<-', ':=', '<', '>', '=<', '>=', '<=', '#', '~', '.',
|
|
'*', '-', '+', '/', '<:', '>:', '=:', '=<:', '>=:', '\\=', '\\=:', ',',
|
|
'!!', '...', '==', '::', ':::'
|
|
),
|
|
'STYLES' => array(
|
|
'REGEXPS' => array(
|
|
1 => 'color: #0000ff;',
|
|
2 => 'color: #00a030;',
|
|
3 => 'color: #bc8f8f;',
|
|
4 => 'color: #0000ff;',
|
|
5 => 'color: #a020f0;'
|
|
),
|
|
'ESCAPE_CHAR' => array(
|
|
0 => 'color: #bc8f8f;'
|
|
),
|
|
'KEYWORDS' => array(
|
|
1 => 'color: #a020f0;'
|
|
),
|
|
'COMMENTS' => array(
|
|
1 => 'color: #B22222;',
|
|
'MULTI' => 'color: #B22222;'
|
|
),
|
|
'STRINGS' => array(
|
|
0 => 'color: #bc8f8f;'
|
|
),
|
|
'SYMBOLS' => array(
|
|
0 => 'color: #a020f0;'
|
|
),
|
|
'BRACKETS' => array(),
|
|
'NUMBERS' => array(),
|
|
'METHODS' => array(),
|
|
'SCRIPT' => array()
|
|
),
|
|
'OOLANG' => false,
|
|
'OBJECT_SPLITTERS' => array(),
|
|
'STRICT_MODE_APPLIES' => GESHI_MAYBE,
|
|
'SCRIPT_DELIMITERS' => array(),
|
|
'HIGHLIGHT_STRICT_BLOCK' => array(),
|
|
'URLS' => array(
|
|
1 => ''
|
|
),
|
|
'REGEXPS' => array(
|
|
// function and procedure definition
|
|
1 => array(
|
|
GESHI_SEARCH => "(proc|fun)([^{}\n\)]*)(\\{)([\$A-Z\300-\326\330-\336][A-Z\300-\326\330-\336a-z\337-\366\370-\3770-9_.]*)",
|
|
GESHI_REPLACE => '\4',
|
|
GESHI_MODIFIERS => '',
|
|
GESHI_BEFORE => '\1\2\3',
|
|
GESHI_AFTER => ''
|
|
),
|
|
// class definition
|
|
2 => array(
|
|
GESHI_SEARCH => "(class)([^A-Z\$]*)([\$A-Z\300-\326\330-\336][A-Z\300-\326\330-\336a-z\337-\366\370-\3770-9_.]*)",
|
|
GESHI_REPLACE => '\3\4',
|
|
GESHI_MODIFIERS => '',
|
|
GESHI_BEFORE => '\1\2',
|
|
GESHI_AFTER => ''
|
|
),
|
|
// single character
|
|
3 => array(
|
|
GESHI_SEARCH => "&.",
|
|
GESHI_REPLACE => '\0',
|
|
GESHI_MODIFIERS => '',
|
|
GESHI_BEFORE => '',
|
|
GESHI_AFTER => ''
|
|
),
|
|
// method definition
|
|
4 => array(
|
|
GESHI_SEARCH => "(meth)([^a-zA-Z]+)([a-zA-Z\300-\326\330-\336][A-Z\300-\326\330-\336a-z\337-\366\370-\3770-9]*)",
|
|
GESHI_REPLACE => '\3',
|
|
GESHI_MODIFIERS => '',
|
|
GESHI_BEFORE => '\1\2',
|
|
GESHI_AFTER => ''
|
|
),
|
|
// highlight "[]"
|
|
// ([] is actually a keyword, but that causes problems in validation; putting it into symbols doesn't work.)
|
|
5 => array(
|
|
GESHI_SEARCH => "\[\]",
|
|
GESHI_REPLACE => '\0',
|
|
GESHI_MODIFIERS => '',
|
|
GESHI_BEFORE => '',
|
|
GESHI_AFTER => ''
|
|
)
|
|
)
|
|
);
|