1 <?php 2 /************************************************************************************* 3 * prolog.php 4 * -------- 5 * Author: Benny Baumann (BenBE (at) geshi.org) 6 * Copyright: (c) 2008 Benny Baumann (http://qbnz.com/highlighter/) 7 * Release Version: 1.0.8.3 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 ?> 144
