ILIAS  Release_4_0_x_branch Revision 61816
 All Data Structures Namespaces Files Functions Variables Groups Pages
HFile_haskell.php
Go to the documentation of this file.
1 <?php
2 $BEAUT_PATH = realpath(".")."/Services/COPage/syntax_highlight/php";
3 if (!isset ($BEAUT_PATH)) return;
4 require_once("$BEAUT_PATH/Beautifier/HFile.php");
5  class HFile_haskell extends HFile{
6  function HFile_haskell(){
7  $this->HFile();
8 /*************************************/
9 // Beautifier Highlighting Configuration File
10 // Haskell
11 /*************************************/
12 // Flags
13 
14 $this->nocase = "0";
15 $this->notrim = "0";
16 $this->perl = "0";
17 
18 // Colours
19 
20 $this->colours = array("blue", "purple", "gray", "brown", "blue");
21 $this->quotecolour = "blue";
22 $this->blockcommentcolour = "green";
23 $this->linecommentcolour = "green";
24 
25 // Indent Strings
26 
27 $this->indent = array();
28 $this->unindent = array();
29 
30 // String characters and delimiters
31 
32 $this->stringchars = array("\"", "'");
33 $this->delimiters = array("(", ")", "{", "}", "[", "]", ";", ",", "`", " ", " ");
34 $this->escchar = "";
35 
36 // Comment settings
37 
38 $this->linecommenton = array("--");
39 $this->blockcommenton = array("{-");
40 $this->blockcommentoff = array("-}");
41 
42 // Keywords (keyword mapping to colour number)
43 
44 $this->keywords = array(
45  "(" => "1",
46  ")" => "1",
47  "Addr" => "1",
48  "EQ" => "1",
49  "EmptyRec" => "1",
50  "EmptyRow" => "1",
51  "Either" => "1",
52  "False" => "1",
53  "FilePath" => "1",
54  "GT" => "1",
55  "Hugs_Error" => "1",
56  "Hugs_ExitWith" => "1",
57  "Hugs_Return" => "1",
58  "Hugs_SuspendThread" => "1",
59  "IO" => "1",
60  "IOError" => "1",
61  "IOResult" => "1",
62  "Just" => "1",
63  "LT" => "1",
64  "Left" => "1",
65  "Maybe" => "1",
66  "Nothing" => "1",
67  "Ordering" => "1",
68  "Rec" => "1",
69  "Right" => "1",
70  "Ratio" => "1",
71  "Rational" => "1",
72  "ST" => "1",
73  "True" => "1",
74  "_" => "2",
75  "=" => "2",
76  "=>" => "2",
77  "|" => "2",
78  "<-" => "2",
79  "->" => "2",
80  "," => "2",
81  ".." => "2",
82  ":" => "2",
83  "::" => "2",
84  "class" => "2",
85  "case" => "2",
86  "data" => "2",
87  "deriving" => "2",
88  "do" => "2",
89  "else" => "2",
90  "import" => "2",
91  "instance" => "2",
92  "if" => "2",
93  "in" => "2",
94  "let" => "2",
95  "module" => "2",
96  "newtype" => "2",
97  "of" => "2",
98  "primitive" => "2",
99  "type" => "2",
100  "then" => "2",
101  "where" => "2",
102  "&&" => "3",
103  "||" => "3",
104  "//" => "3",
105  "/=" => "3",
106  "/" => "3",
107  "==" => "3",
108  "!" => "3",
109  "!!" => "3",
110  "+" => "3",
111  "++" => "3",
112  "-" => "3",
113  "*" => "3",
114  "**" => "3",
115  "<" => "3",
116  "<=" => "3",
117  ">" => "3",
118  ">>" => "3",
119  ">>=" => "3",
120  ">=" => "3",
121  "abs" => "3",
122  "absReal" => "3",
123  "accumulate" => "3",
124  "acos" => "3",
125  "acosh" => "3",
126  "all" => "3",
127  "and" => "3",
128  "any" => "3",
129  "appendFile" => "3",
130  "applyM" => "3",
131  "approxRational" => "3",
132  "asTypeOf" => "3",
133  "asciiTab" => "3",
134  "asin" => "3",
135  "asinh" => "3",
136  "atan" => "3",
137  "atan2" => "3",
138  "atanh" => "3",
139  "break" => "3",
140  "catch" => "3",
141  "ceiling" => "3",
142  "chr" => "3",
143  "compare" => "3",
144  "concat" => "3",
145  "concatMap" => "3",
146  "const" => "3",
147  "cos" => "3",
148  "cosh" => "3",
149  "curry" => "3",
150  "cycle" => "3",
151  "decodeFloat" => "3",
152  "denominator" => "3",
153  "digitToInt" => "3",
154  "div" => "3",
155  "divMod" => "3",
156  "doubleToFloat" => "3",
157  "doubleToRatio" => "3",
158  "doubleToRational" => "3",
159  "drop" => "3",
160  "dropWhile" => "3",
161  "either" => "3",
162  "elem" => "3",
163  "encodeFloat" => "3",
164  "enumFrom" => "3",
165  "enumFromThen" => "3",
166  "enumFromThenTo" => "3",
167  "enumFromTo" => "3",
168  "error" => "3",
169  "even" => "3",
170  "exp" => "3",
171  "exponent" => "3",
172  "fail" => "3",
173  "filter" => "3",
174  "flip" => "3",
175  "floatDigits" => "3",
176  "floatProperFraction" => "3",
177  "floatRadix" => "3",
178  "floatRange" => "3",
179  "floatToRational" => "3",
180  "floor" => "3",
181  "foldl" => "3",
182  "foldl\'" => "3",
183  "foldl1" => "3",
184  "foldr" => "3",
185  "foldr1" => "3",
186  "fromDouble" => "3",
187  "fromEnum" => "3",
188  "fromInt" => "3",
189  "fromInteger" => "3",
190  "fromIntegral" => "3",
191  "fromRational" => "3",
192  "fromRealFrac" => "3",
193  "fst" => "3",
194  "gcd" => "3",
195  "getChar" => "3",
196  "getContents" => "3",
197  "getLine" => "3",
198  "guard" => "3",
199  "head" => "3",
200  "hugsIORun" => "3",
201  "hugsPutStr" => "3",
202  "id" => "3",
203  "inRange" => "3",
204  "index" => "3",
205  "init" => "3",
206  "intToDigit" => "3",
207  "intToRatio" => "3",
208  "interact" => "3",
209  "ioeGetErrorString" => "3",
210  "isAlpha" => "3",
211  "isAlphanum" => "3",
212  "isAscii" => "3",
213  "isControl" => "3",
214  "isDenormalized" => "3",
215  "isDigit" => "3",
216  "isHexDigit" => "3",
217  "isIEEE" => "3",
218  "isInfinite" => "3",
219  "isLower" => "3",
220  "isNaN" => "3",
221  "isNegativeZero" => "3",
222  "isOctDigit" => "3",
223  "isPrint" => "3",
224  "isSpace" => "3",
225  "isUpper" => "3",
226  "iterate" => "3",
227  "last" => "3",
228  "lcm" => "3",
229  "length" => "3",
230  "lex" => "3",
231  "lexDigits" => "3",
232  "lexLitChar" => "3",
233  "lexmatch" => "3",
234  "lines" => "3",
235  "log" => "3",
236  "logBase" => "3",
237  "lookup" => "3",
238  "map" => "3",
239  "mapM" => "3",
240  "mapM_" => "3",
241  "max" => "3",
242  "maxBound" => "3",
243  "maximum" => "3",
244  "maybe" => "3",
245  "min" => "3",
246  "minBound" => "3",
247  "minimum" => "3",
248  "mod" => "3",
249  "negate" => "3",
250  "nonnull" => "3",
251  "not" => "3",
252  "notElem" => "3",
253  "null" => "3",
254  "numerator" => "3",
255  "numericEnumFrom" => "3",
256  "numericEnumFromThen" => "3",
257  "numericEnumFromThenTo" => "3",
258  "numericEnumFromTo" => "3",
259  "odd" => "3",
260  "or" => "3",
261  "ord" => "3",
262  "otherwise" => "3",
263  "pi" => "3",
264  "pred" => "3",
265  "primAcosDouble" => "3",
266  "primAcosFloat" => "3",
267  "primAsinDouble" => "3",
268  "primAsinFloat" => "3",
269  "primAtanDouble" => "3",
270  "primAtanFloat" => "3",
271  "primCharToInt" => "3",
272  "primCmpChar" => "3",
273  "primCmpDouble" => "3",
274  "primCmpFloat" => "3",
275  "primCmpInt" => "3",
276  "primCmpInteger" => "3",
277  "primCompAux" => "3",
278  "primCosDouble" => "3",
279  "primCosFloat" => "3",
280  "primDivDouble" => "3",
281  "primDivFloat" => "3",
282  "primDivInt" => "3",
283  "primDoubleDecode" => "3",
284  "primDoubleDigits" => "3",
285  "primDoubleEncode" => "3",
286  "primDoubleMaxExp" => "3",
287  "primDoubleMinExp" => "3",
288  "primDoubleRadix" => "3",
289  "primEqChar" => "3",
290  "primEqDouble" => "3",
291  "primEqFloat" => "3",
292  "primEqInt" => "3",
293  "primEqInteger" => "3",
294  "primEvenInt" => "3",
295  "primEvenInteger" => "3",
296  "primExitWith" => "3",
297  "primExpDouble" => "3",
298  "primExpFloat" => "3",
299  "primFloatDecode" => "3",
300  "primFloatDigits" => "3",
301  "primFloatEncode" => "3",
302  "primFloatMaxExp" => "3",
303  "primFloatMinExp" => "3",
304  "primFloatRadix" => "3",
305  "primIntToChar" => "3",
306  "primIntToDouble" => "3",
307  "primIntToFloat" => "3",
308  "primIntToInteger" => "3",
309  "primIntegerToDouble" => "3",
310  "primIntegerToFloat" => "3",
311  "primIntegerToInt" => "3",
312  "primLogDouble" => "3",
313  "primLogFloat" => "3",
314  "primMaxInt" => "3",
315  "primMinInt" => "3",
316  "primMinusDouble" => "3",
317  "primMinusFloat" => "3",
318  "primMinusInt" => "3",
319  "primMinusInteger" => "3",
320  "primModInt" => "3",
321  "primMulDouble" => "3",
322  "primMulFloat" => "3",
323  "primMulInt" => "3",
324  "primMulInteger" => "3",
325  "primNegDouble" => "3",
326  "primNegFloat" => "3",
327  "primNegInt" => "3",
328  "primNegInteger" => "3",
329  "primPiDouble" => "3",
330  "primPiFloat" => "3",
331  "primPlusDouble" => "3",
332  "primPlusFloat" => "3",
333  "primPlusInt" => "3",
334  "primPlusInteger" => "3",
335  "primPmFlt" => "3",
336  "primPmInt" => "3",
337  "primPmInteger" => "3",
338  "primPmNpk" => "3",
339  "primPmSub" => "3",
340  "primQrmInt" => "3",
341  "primQrmInteger" => "3",
342  "primQuotInt" => "3",
343  "primRationalToDouble" => "3",
344  "primRationalToFloat" => "3",
345  "primRemInt" => "3",
346  "primShowsDouble" => "3",
347  "primShowsFloat" => "3",
348  "primShowsInt" => "3",
349  "primShowsInteger" => "3",
350  "primSinDouble" => "3",
351  "primSinFloat" => "3",
352  "primSqrtDouble" => "3",
353  "primSqrtFloat" => "3",
354  "primTanDouble" => "3",
355  "primTanFloat" => "3",
356  "primbindIO" => "3",
357  "primretIO" => "3",
358  "print" => "3",
359  "product" => "3",
360  "properFraction" => "3",
361  "protectEsc" => "3",
362  "putChar" => "3",
363  "putStr" => "3",
364  "putStrLn" => "3",
365  "quot" => "3",
366  "quotRem" => "3",
367  "range" => "3",
368  "rangeSize" => "3",
369  "rationalToDouble" => "3",
370  "rationalToFloat" => "3",
371  "rationalToRealFloat" => "3",
372  "read" => "3",
373  "readDec" => "3",
374  "readField" => "3",
375  "readFile" => "3",
376  "readFloat" => "3",
377  "readHex" => "3",
378  "readIO" => "3",
379  "readInt" => "3",
380  "readList" => "3",
381  "readLitChar" => "3",
382  "readLn" => "3",
383  "readOct" => "3",
384  "readParen" => "3",
385  "readSigned" => "3",
386  "reads" => "3",
387  "readsPrec" => "3",
388  "realFloatToRational" => "3",
389  "recip" => "3",
390  "reduce" => "3",
391  "rem" => "3",
392  "repeat" => "3",
393  "replicate" => "3",
394  "return" => "3",
395  "reverse" => "3",
396  "round" => "3",
397  "scaleFloat" => "3",
398  "scanl" => "3",
399  "scanl1" => "3",
400  "scanr" => "3",
401  "scanr1" => "3",
402  "seq" => "3",
403  "sequence" => "3",
404  "show" => "3",
405  "showChar" => "3",
406  "showField" => "3",
407  "showInt" => "3",
408  "showList" => "3",
409  "showLitChar" => "3",
410  "showParen" => "3",
411  "showSigned" => "3",
412  "showString" => "3",
413  "shows" => "3",
414  "showsPrec" => "3",
415  "significand" => "3",
416  "signum" => "3",
417  "signumReal" => "3",
418  "sin" => "3",
419  "sinh" => "3",
420  "snd" => "3",
421  "span" => "3",
422  "splitAt" => "3",
423  "sqrt" => "3",
424  "strict" => "3",
425  "subtract" => "3",
426  "succ" => "3",
427  "sum" => "3",
428  "tail" => "3",
429  "take" => "3",
430  "takeWhile" => "3",
431  "tan" => "3",
432  "tanh" => "3",
433  "toEnum" => "3",
434  "toInt" => "3",
435  "toInteger" => "3",
436  "toLower" => "3",
437  "toRational" => "3",
438  "toUpper" => "3",
439  "truncate" => "3",
440  "uncurry" => "3",
441  "undefined" => "3",
442  "unlines" => "3",
443  "until" => "3",
444  "unwords" => "3",
445  "unzip" => "3",
446  "unzip3" => "3",
447  "userError" => "3",
448  "words" => "3",
449  "writeFile" => "3",
450  "zero" => "3",
451  "zip" => "3",
452  "zip3" => "3",
453  "zipWith" => "3",
454  "zipWith3" => "3",
455  "Bool" => "4",
456  "Char" => "4",
457  "Float" => "4",
458  "Int" => "4",
459  "Integer" => "4",
460  "Long" => "4",
461  "String" => "4",
462  "Bounded" => "5",
463  "Double" => "5",
464  "Enum" => "5",
465  "Eq" => "5",
466  "Eval" => "5",
467  "Functor" => "5",
468  "Fractional" => "5",
469  "Floating" => "5",
470  "Ix" => "5",
471  "Integral" => "5",
472  "Monad" => "5",
473  "MonadZero" => "5",
474  "MonadPlus" => "5",
475  "Num" => "5",
476  "Ord" => "5",
477  "Read" => "5",
478  "Real" => "5",
479  "RealFrac" => "5",
480  "RealFloat" => "5",
481  "Show" => "5",
482  "Void" => "5");
483 
484 // Special extensions
485 
486 // Each category can specify a PHP function that returns an altered
487 // version of the keyword.
488 
489 
490 
491 $this->linkscripts = array(
492  "1" => "donothing",
493  "2" => "donothing",
494  "3" => "donothing",
495  "4" => "donothing",
496  "5" => "donothing");
497 }
498 
499 
500 function donothing($keywordin)
501 {
502  return $keywordin;
503 }
504 
505 }?>