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
| module.exports = function(hljs) {
| var COMMENT = {
| variants: [
| hljs.COMMENT('--', '$'),
| hljs.COMMENT(
| '{-',
| '-}',
| {
| contains: ['self']
| }
| )
| ]
| };
|
| var CONSTRUCTOR = {
| className: 'type',
| begin: '\\b[A-Z][\\w\']*', // TODO: other constructors (built-in, infix).
| relevance: 0
| };
|
| var LIST = {
| begin: '\\(', end: '\\)',
| illegal: '"',
| contains: [
| {className: 'type', begin: '\\b[A-Z][\\w]*(\\((\\.\\.|,|\\w+)\\))?'},
| COMMENT
| ]
| };
|
| var RECORD = {
| begin: '{', end: '}',
| contains: LIST.contains
| };
|
| var CHARACTER = {
| className: 'string',
| begin: '\'\\\\?.', end: '\'',
| illegal: '.'
| };
|
| return {
| keywords:
| 'let in if then else case of where module import exposing ' +
| 'type alias as infix infixl infixr port effect command subscription',
| contains: [
|
| // Top-level constructions.
|
| {
| beginKeywords: 'port effect module', end: 'exposing',
| keywords: 'port effect module where command subscription exposing',
| contains: [LIST, COMMENT],
| illegal: '\\W\\.|;'
| },
| {
| begin: 'import', end: '$',
| keywords: 'import as exposing',
| contains: [LIST, COMMENT],
| illegal: '\\W\\.|;'
| },
| {
| begin: 'type', end: '$',
| keywords: 'type alias',
| contains: [CONSTRUCTOR, LIST, RECORD, COMMENT]
| },
| {
| beginKeywords: 'infix infixl infixr', end: '$',
| contains: [hljs.C_NUMBER_MODE, COMMENT]
| },
| {
| begin: 'port', end: '$',
| keywords: 'port',
| contains: [COMMENT]
| },
|
| // Literals and names.
|
| CHARACTER,
| hljs.QUOTE_STRING_MODE,
| hljs.C_NUMBER_MODE,
| CONSTRUCTOR,
| hljs.inherit(hljs.TITLE_MODE, {begin: '^[_a-z][\\w\']*'}),
| COMMENT,
|
| {begin: '->|<-'} // No markup, relevance booster
| ],
| illegal: /;/
| };
| };
|
|
