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
|
!(function (r) {
r.languages.pure = {
comment: [
{ pattern: /(^|[^\\])\/\*[\s\S]*?\*\//, lookbehind: !0 },
{ pattern: /(^|[^\\:])\/\/.*/, lookbehind: !0 },
/#!.+/,
],
'inline-lang': {
pattern: /%<[\s\S]+?%>/,
greedy: !0,
inside: {
lang: {
pattern: /(^%< *)-\*-.+?-\*-/,
lookbehind: !0,
alias: 'comment',
},
delimiter: { pattern: /^%<.*|%>$/, alias: 'punctuation' },
},
},
string: { pattern: /"(?:\\.|[^"\\\r\n])*"/, greedy: !0 },
number: {
pattern:
/((?:\.\.)?)(?:\b(?:inf|nan)\b|\b0x[\da-f]+|(?:\b(?:0b)?\d+(?:\.\d+)?|\B\.\d+)(?:e[+-]?\d+)?L?)/i,
lookbehind: !0,
},
keyword:
/\b(?:NULL|ans|break|bt|case|catch|cd|clear|const|def|del|dump|else|end|exit|extern|false|force|help|if|infix[lr]?|interface|let|ls|mem|namespace|nonfix|of|otherwise|outfix|override|postfix|prefix|private|public|pwd|quit|run|save|show|stats|then|throw|trace|true|type|underride|using|when|with)\b/,
function:
/\b(?:abs|add_(?:addr|constdef|(?:fundef|interface|macdef|typedef)(?:_at)?|vardef)|all|any|applp?|arity|bigintp?|blob(?:_crc|_size|p)?|boolp?|byte_c?string(?:_pointer)?|byte_(?:matrix|pointer)|calloc|cat|catmap|ceil|char[ps]?|check_ptrtag|chr|clear_sentry|clearsym|closurep?|cmatrixp?|cols?|colcat(?:map)?|colmap|colrev|colvector(?:p|seq)?|complex(?:_float_(?:matrix|pointer)|_matrix(?:_view)?|_pointer|p)?|conj|cookedp?|cst|cstring(?:_(?:dup|list|vector))?|curry3?|cyclen?|del_(?:constdef|fundef|interface|macdef|typedef|vardef)|delete|diag(?:mat)?|dim|dmatrixp?|do|double(?:_matrix(?:_view)?|_pointer|p)?|dowith3?|drop|dropwhile|eval(?:cmd)?|exactp|filter|fix|fixity|flip|float(?:_matrix|_pointer)|floor|fold[lr]1?|frac|free|funp?|functionp?|gcd|get(?:_(?:byte|constdef|double|float|fundef|int(?:64)?|interface(?:_typedef)?|long|macdef|pointer|ptrtag|sentry|short|string|typedef|vardef))?|globsym|hash|head|id|im|imatrixp?|index|inexactp|infp|init|insert|int(?:_matrix(?:_view)?|_pointer|p)?|int64_(?:matrix|pointer)|integerp?|iteraten?|iterwhile|join|keys?|lambdap?|last(?:err(?:pos)?)?|lcd|list[2p]?|listmap|make_ptrtag|malloc|map|matcat|matrixp?|max|member|min|nanp|nargs|nmatrixp?|null|numberp?|ord|pack(?:ed)?|pointer(?:_cast|_tag|_type|p)?|pow|pred|ptrtag|put(?:_(?:byte|double|float|int(?:64)?|long|pointer|short|string))?|rationalp?|re|realp?|realloc|recordp?|redim|reduce(?:_with)?|refp?|repeatn?|reverse|rlistp?|round|rows?|rowcat(?:map)?|rowmap|rowrev|rowvector(?:p|seq)?|same|scan[lr]1?|sentry|sgn|short_(?:matrix|pointer)|slice|smatrixp?|sort|split|str|strcat|stream|stride|string(?:_(?:dup|list|vector)|p)?|subdiag(?:mat)?|submat|subseq2?|substr|succ|supdiag(?:mat)?|symbolp?|tail|take|takewhile|thunkp?|transpose|trunc|tuplep?|typep|ubyte|uint(?:64)?|ulong|uncurry3?|unref|unzip3?|update|ushort|vals?|varp?|vector(?:p|seq)?|void|zip3?|zipwith3?)\b/,
special: { pattern: /\b__[a-z]+__\b/i, alias: 'builtin' },
operator:
/(?:[!"#$%&'*+,\-.\/:<=>?@\\^`|~\u00a1-\u00bf\u00d7-\u00f7\u20d0-\u2bff]|\b_+\b)+|\b(?:and|div|mod|not|or)\b/,
punctuation: /[(){}\[\];,|]/,
};
['c', { lang: 'c++', alias: 'cpp' }, 'fortran'].forEach(function (e) {
var t = e;
if (
('string' != typeof e && ((t = e.alias), (e = e.lang)), r.languages[t])
) {
var a = {};
(a['inline-lang-' + t] = {
pattern: RegExp(
'%< *-\\*- *<lang>\\d* *-\\*-[^]+?%>'.replace(
'<lang>',
e.replace(/([.+*?\/\\(){}\[\]])/g, '\\$1')
),
'i'
),
inside: r.util.clone(r.languages.pure['inline-lang'].inside),
}),
(a['inline-lang-' + t].inside.rest = r.util.clone(r.languages[t])),
r.languages.insertBefore('pure', 'inline-lang', a);
}
}),
r.languages.c &&
(r.languages.pure['inline-lang'].inside.rest = r.util.clone(
r.languages.c
));
})(Prism);
|