1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
<?php
/*************************************************************************************
* visualprolog.php
* ----------
* Author: Thomas Linder Puls (puls@pdc.dk)
* Copyright: (c) 2008 Thomas Linder Puls (puls@pdc.dk)
* Release Version: 1.0.8.12
* Date Started: 2008/11/20
*
* Visual Prolog 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' => 'Visual Prolog',
'COMMENT_SINGLE' => array(1 => '%'),
'COMMENT_MULTI' => array('/*' => '*/'),
'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
'QUOTEMARKS' => array("'", '"'),
'HARDQUOTE' => array('@"', '"'),
'HARDESCAPE' => array('""'),
'ESCAPE_CHAR' => '\\',
'KEYWORDS' => array(
1 => array(
'clauses','constants','constructors','delegate','domains','facts',
'goal','guards','inherits','monitor','namespace','open',
'predicates','properties','resolve','supports'
),
2 => array(
'align','and','anyflow','as','bitsize','catch','determ','digits',
'div','do','else','elseif','erroneous','externally','failure',
'finally','from','language','mod','multi','nondeterm','or',
'procedure','quot','rem','single','then','to'
),
3 => array(
'#bininclude','#else','#elseif','#endif','#error','#export',
'#externally','#if','#import','#include','#message','#options',
'#orrequires','#requires','#then','#warning'
),
),
'SYMBOLS' => array(
'+', '-', '*', '?', '=', '/', '>', '<', '^', '!', ':', '(', ')', '{', '}', '[', ']'
),
'CASE_SENSITIVE' => array(
GESHI_COMMENTS => true,
1 => true,
2 => true,
3 => true
),
'STYLES' => array(
'KEYWORDS' => array(
1 => 'color: #808000;',
2 => 'color: #333399;',
3 => 'color: #800080;',
),
'COMMENTS' => array(
1 => 'color: #AA77BD',
'MULTI' => 'color: #AA77BD'
),
'ESCAPE_CHAR' => array(
0 => 'color: #008080;'
),
'BRACKETS' => array(
0 => 'color: #000000;'
),
'STRINGS' => array(
0 => 'color: #00B7B7;'
),
'NUMBERS' => array(
0 => 'color: #0000FF;'
),
'METHODS' => array(
),
'SYMBOLS' => array(
0 => 'color: #000000;'
),
'SCRIPT' => array(
),
'REGEXPS' => array(
0 => 'color: #008000;',
1 => 'color: #808000;',
2 => 'color: #333399;',
)
),
'URLS' => array(
1 => '',
2 => '',
3 => ''
),
'OOLANG' => true,
'OBJECT_SPLITTERS' => array(
1 => ':',
2 => '::'
),
'REGEXPS' => array(
0 => "(?<![a-zA-Z0-9_])(?!(?:PIPE|SEMI)>)[A-Z_]\w*(?!\w)",
1 => "\\b(end\\s+)?(implement|class|interface)\\b",
2 => "\\b(end\\s+)?(foreach|if|try)\\b",
),
'STRICT_MODE_APPLIES' => GESHI_NEVER,
'SCRIPT_DELIMITERS' => array(
),
'HIGHLIGHT_STRICT_BLOCK' => array(
),
'TAB_WIDTH' => 4
);
|
