inc/geshi/prolog.php

   1 <?php
   2 /*************************************************************************************
   3  * prolog.php
   4  * --------
   5  * Author: Benny Baumann (BenBE@geshi.org)
   6  * Copyright: (c) 2008 Benny Baumann (http://qbnz.com/highlighter/)
   7  * Release Version: 1.0.8.4
   8  * Date Started: 2008/10/02
   9  *
  10  * Prolog language file for GeSHi.
  11  *
  12  * CHANGES
  13  * -------
  14  * 2008/10/02 (1.0.8.1)
  15  *  -  First Release
  16  *
  17  * TODO (updated 2008/10/02)
  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' => 'Prolog',
  42     'COMMENT_SINGLE' => array(1 => '%'),
  43     'COMMENT_MULTI' => array('/*' => '*/'),
  44     'HARDQUOTE' => array("'", "'"),
  45     'HARDESCAPE' => array("\'"),
  46     'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
  47     'QUOTEMARKS' => array(),
  48     'ESCAPE_CHAR' => '',
  49     'NUMBERS' =>
  50         GESHI_NUMBER_INT_BASIC | GESHI_NUMBER_FLT_SCI_ZERO,
  51     'KEYWORDS' => array(
  52         1 => array(
  53             'abolish','abs','arg','asserta','assertz','at_end_of_stream','atan',
  54             'atom','atom_chars','atom_codes','atom_concat','atom_length',
  55             'atomic','bagof','call','catch','ceiling','char_code',
  56             'char_conversion','clause','close','compound','consult','copy_term',
  57             'cos','current_char_conversion','current_input','current_op',
  58             'current_output','current_predicate','current_prolog_flag',
  59             'discontiguous','dynamic','ensure_loaded','exp','fail','findall',
  60             'float','float_fractional_part','float_integer_part','floor',
  61             'flush_output','functor','get_byte','get_char','get_code','halt',
  62             'include','initialization','integer','is','listing','log','mod',
  63             'multifile','nl','nonvar','notrace','number','number_chars',
  64             'number_codes','once','op','open','peek_byte','peek_char',
  65             'peek_code','put_byte','put_char','put_code','read','read_term',
  66             'rem','repeat','retract','round','set_input','set_output',
  67             'set_prolog_flag','set_stream_position','setof','sign','sin','sqrt',
  68             'stream_property','sub_atom','throw','trace','true','truncate',
  69             'unify_with_occurs_check','univ','var','write','write_canonical',
  70             'write_term','writeq'
  71             )
  72         ),
  73     'SYMBOLS' => array(
  74         0 => array('(', ')', '[', ']', '{', '}',),
  75         1 => array('?-', ':-', '=:='),
  76         2 => array('\-', '\+', '\*', '\/'),
  77         3 => array('-', '+', '*', '/'),
  78         4 => array('.', ':', ',', ';'),
  79         5 => array('!', '@', '&', '|'),
  80         6 => array('<', '>', '=')
  81         ),
  82     'CASE_SENSITIVE' => array(
  83         GESHI_COMMENTS => false,
  84         1 => false
  85         ),
  86     'STYLES' => array(
  87         'KEYWORDS' => array(
  88             1 => 'color: #990000;'
  89             ),
  90         'COMMENTS' => array(
  91             1 => 'color: #666666; font-style: italic;',
  92             'MULTI' => 'color: #666666; font-style: italic;'
  93             ),
  94         'ESCAPE_CHAR' => array(
  95             0 => 'color: #000099; font-weight: bold;',
  96             'HARD' => 'color: #000099; font-weight: bold;'
  97             ),
  98         'BRACKETS' => array(
  99             0 => 'color: #009900;'
 100             ),
 101         'STRINGS' => array(
 102             0 => 'color: #0000ff;',
 103             'HARD' => 'color: #0000ff;'
 104             ),
 105         'NUMBERS' => array(
 106             0 => 'color: #800080;'
 107             ),
 108         'METHODS' => array(
 109             ),
 110         'SYMBOLS' => array(
 111             0 => 'color: #339933;',
 112             1 => 'color: #339933;',
 113             2 => 'color: #339933;',
 114             3 => 'color: #339933;',
 115             4 => 'color: #339933;',
 116             5 => 'color: #339933;',
 117             6 => 'color: #339933;'
 118             ),
 119         'REGEXPS' => array(
 120             0 => 'color: #008080;'
 121             ),
 122         'SCRIPT' => array(
 123             )
 124         ),
 125     'URLS' => array(
 126         1 => 'http://pauillac.inria.fr/~deransar/prolog/bips.html'
 127         ),
 128     'OOLANG' => false,
 129     'OBJECT_SPLITTERS' => array(
 130         ),
 131     'REGEXPS' => array(
 132         //Variables
 133         0 => "(?<![A-Z_])(?!(?:PIPE|SEMI)[^a-zA-Z0-9_])[A-Z_][a-zA-Z0-9_]*(?![a-zA-Z0-9_])"
 134         ),
 135     'STRICT_MODE_APPLIES' => GESHI_NEVER,
 136     'SCRIPT_DELIMITERS' => array(
 137         ),
 138     'HIGHLIGHT_STRICT_BLOCK' => array(
 139         ),
 140     'TAB_WIDTH' => 4
 141 );
 142
 143 ?>