1 |
|
2 |
|
3 |
|
4 |
|
5 |
|
6 |
|
7 | Prism.languages.pascal = {
|
8 | 'comment': [
|
9 | /\(\*[\s\S]+?\*\)/,
|
10 | /\{[\s\S]+?\}/,
|
11 | /\/\/.*/
|
12 | ],
|
13 | 'string': {
|
14 | pattern: /(?:'(?:''|[^'\r\n])*'(?!')|#[&$%]?[a-f\d]+)+|\^[a-z]/i,
|
15 | greedy: true
|
16 | },
|
17 | 'keyword': [
|
18 | {
|
19 |
|
20 | pattern: /(^|[^&])\b(?:absolute|array|asm|begin|case|const|constructor|destructor|do|downto|else|end|file|for|function|goto|if|implementation|inherited|inline|interface|label|nil|object|of|operator|packed|procedure|program|record|reintroduce|repeat|self|set|string|then|to|type|unit|until|uses|var|while|with)\b/i,
|
21 | lookbehind: true
|
22 | },
|
23 | {
|
24 |
|
25 | pattern: /(^|[^&])\b(?:dispose|exit|false|new|true)\b/i,
|
26 | lookbehind: true
|
27 | },
|
28 | {
|
29 |
|
30 | pattern: /(^|[^&])\b(?:class|dispinterface|except|exports|finalization|finally|initialization|inline|library|on|out|packed|property|raise|resourcestring|threadvar|try)\b/i,
|
31 | lookbehind: true
|
32 | },
|
33 | {
|
34 |
|
35 | pattern: /(^|[^&])\b(?:absolute|abstract|alias|assembler|bitpacked|break|cdecl|continue|cppdecl|cvar|default|deprecated|dynamic|enumerator|experimental|export|external|far|far16|forward|generic|helper|implements|index|interrupt|iochecks|local|message|name|near|nodefault|noreturn|nostackframe|oldfpccall|otherwise|overload|override|pascal|platform|private|protected|public|published|read|register|reintroduce|result|safecall|saveregisters|softfloat|specialize|static|stdcall|stored|strict|unaligned|unimplemented|varargs|virtual|write)\b/i,
|
36 | lookbehind: true
|
37 | }
|
38 | ],
|
39 | 'number': [
|
40 |
|
41 | /(?:[&%]\d+|\$[a-f\d]+)/i,
|
42 |
|
43 | /\b\d+(?:\.\d+)?(?:e[+-]?\d+)?/i
|
44 | ],
|
45 | 'operator': [
|
46 | /\.\.|\*\*|:=|<[<=>]?|>[>=]?|[+\-*\/]=?|[@^=]/i,
|
47 | {
|
48 | pattern: /(^|[^&])\b(?:and|as|div|exclude|in|include|is|mod|not|or|shl|shr|xor)\b/,
|
49 | lookbehind: true
|
50 | }
|
51 | ],
|
52 | 'punctuation': /\(\.|\.\)|[()\[\]:;,.]/
|
53 | };
|
54 |
|
55 | Prism.languages.objectpascal = Prism.languages.pascal;
|
56 |
|
\ | No newline at end of file |