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
|
// brush: "haskell" aliases: []
// This file is part of the "jQuery.Syntax" project, and is distributed under the MIT License.
// Copyright (c) 2011 Samuel G. D. Williams. <http://www.oriontransfer.co.nz>
// See <jquery.syntax.js> for licensing details.
Syntax.register('haskell', function(brush) {
var keywords = ["as", "case", "of", "class", "data", "data family", "data instance", "default", "deriving", "deriving instance", "do", "forall", "foreign", "hiding", "if", "then", "else", "import", "infix", "infixl", "infixr", "instance", "let", "in", "mdo", "module", "newtype", "proc", "qualified", "rec", "type", "type family", "type instance", "where"];
var operators = ["`", "|", "\\", "-", "-<", "-<<", "->", "*", "?", "??", "#", "<-", "@", "!", "::", "_", "~", ">", ";", "{", "}"];
var values = ["True", "False"];
brush.push(values, {klass: 'constant'});
brush.push(keywords, {klass: 'keyword'});
brush.push(operators, {klass: 'operator'});
// Camelcase Types
brush.push(Syntax.lib.camelCaseType);
// Comments
brush.push({
pattern: /\-\-.*$/gm,
klass: 'comment',
allow: ['href']
});
brush.push({
pattern: /\{\-[\s\S]*?\-\}/gm,
klass: 'comment',
allow: ['href']
});
brush.push(Syntax.lib.webLink);
// Numbers
brush.push(Syntax.lib.decimalNumber);
brush.push(Syntax.lib.hexNumber);
// Strings
brush.push(Syntax.lib.singleQuotedString);
brush.push(Syntax.lib.doubleQuotedString);
brush.push(Syntax.lib.stringEscape);
});
|
