[d24f17c] | 1 | 'use strict'
|
---|
| 2 |
|
---|
| 3 | module.exports = purebasic
|
---|
| 4 | purebasic.displayName = 'purebasic'
|
---|
| 5 | purebasic.aliases = []
|
---|
| 6 | function purebasic(Prism) {
|
---|
| 7 | /*
|
---|
| 8 | Original Code by Bas Groothedde
|
---|
| 9 | !!MANY THANKS!! I never would have made this, regex and me will never be best friends ;)
|
---|
| 10 | ==> https://codepen.io/ImagineProgramming/details/JYydBy/
|
---|
| 11 | slightly changed to pass all tests
|
---|
| 12 | */
|
---|
| 13 | // PureBasic support, steal stuff from ansi-c
|
---|
| 14 | Prism.languages.purebasic = Prism.languages.extend('clike', {
|
---|
| 15 | comment: /;.*/,
|
---|
| 16 | keyword:
|
---|
| 17 | /\b(?:align|and|as|break|calldebugger|case|compilercase|compilerdefault|compilerelse|compilerelseif|compilerendif|compilerendselect|compilererror|compilerif|compilerselect|continue|data|datasection|debug|debuglevel|declare|declarec|declarecdll|declaredll|declaremodule|default|define|dim|disableasm|disabledebugger|disableexplicit|else|elseif|enableasm|enabledebugger|enableexplicit|end|enddatasection|enddeclaremodule|endenumeration|endif|endimport|endinterface|endmacro|endmodule|endprocedure|endselect|endstructure|endstructureunion|endwith|enumeration|extends|fakereturn|for|foreach|forever|global|gosub|goto|if|import|importc|includebinary|includefile|includepath|interface|macro|module|newlist|newmap|next|not|or|procedure|procedurec|procedurecdll|proceduredll|procedurereturn|protected|prototype|prototypec|read|redim|repeat|restore|return|runtime|select|shared|static|step|structure|structureunion|swap|threaded|to|until|wend|while|with|xincludefile|xor)\b/i,
|
---|
| 18 | function: /\b\w+(?:\.\w+)?\s*(?=\()/,
|
---|
| 19 | number: /(?:\$[\da-f]+|\b-?(?:\d+(?:\.\d+)?|\.\d+)(?:e[+-]?\d+)?)\b/i,
|
---|
| 20 | operator:
|
---|
| 21 | /(?:@\*?|\?|\*)\w+|-[>-]?|\+\+?|!=?|<<?=?|>>?=?|==?|&&?|\|?\||[~^%?*/@]/
|
---|
| 22 | })
|
---|
| 23 | Prism.languages.insertBefore('purebasic', 'keyword', {
|
---|
| 24 | tag: /#\w+\$?/,
|
---|
| 25 | asm: {
|
---|
| 26 | pattern: /(^[\t ]*)!.*/m,
|
---|
| 27 | lookbehind: true,
|
---|
| 28 | alias: 'tag',
|
---|
| 29 | inside: {
|
---|
| 30 | comment: /;.*/,
|
---|
| 31 | string: {
|
---|
| 32 | pattern: /(["'`])(?:\\.|(?!\1)[^\\\r\n])*\1/,
|
---|
| 33 | greedy: true
|
---|
| 34 | },
|
---|
| 35 | // Anonymous label references, i.e.: jmp @b
|
---|
| 36 | 'label-reference-anonymous': {
|
---|
| 37 | pattern: /(!\s*j[a-z]+\s+)@[fb]/i,
|
---|
| 38 | lookbehind: true,
|
---|
| 39 | alias: 'fasm-label'
|
---|
| 40 | },
|
---|
| 41 | // Named label reference, i.e.: jne label1
|
---|
| 42 | 'label-reference-addressed': {
|
---|
| 43 | pattern: /(!\s*j[a-z]+\s+)[A-Z._?$@][\w.?$@~#]*/i,
|
---|
| 44 | lookbehind: true,
|
---|
| 45 | alias: 'fasm-label'
|
---|
| 46 | },
|
---|
| 47 | keyword: [
|
---|
| 48 | /\b(?:extern|global)\b[^;\r\n]*/i,
|
---|
| 49 | /\b(?:CPU|DEFAULT|FLOAT)\b.*/
|
---|
| 50 | ],
|
---|
| 51 | function: {
|
---|
| 52 | pattern: /^([\t ]*!\s*)[\da-z]+(?=\s|$)/im,
|
---|
| 53 | lookbehind: true
|
---|
| 54 | },
|
---|
| 55 | 'function-inline': {
|
---|
| 56 | pattern: /(:\s*)[\da-z]+(?=\s)/i,
|
---|
| 57 | lookbehind: true,
|
---|
| 58 | alias: 'function'
|
---|
| 59 | },
|
---|
| 60 | label: {
|
---|
| 61 | pattern: /^([\t ]*!\s*)[A-Za-z._?$@][\w.?$@~#]*(?=:)/m,
|
---|
| 62 | lookbehind: true,
|
---|
| 63 | alias: 'fasm-label'
|
---|
| 64 | },
|
---|
| 65 | register:
|
---|
| 66 | /\b(?:st\d|[xyz]mm\d\d?|[cdt]r\d|r\d\d?[bwd]?|[er]?[abcd]x|[abcd][hl]|[er]?(?:bp|di|si|sp)|[cdefgs]s|mm\d+)\b/i,
|
---|
| 67 | number:
|
---|
| 68 | /(?:\b|-|(?=\$))(?:0[hx](?:[\da-f]*\.)?[\da-f]+(?:p[+-]?\d+)?|\d[\da-f]+[hx]|\$\d[\da-f]*|0[oq][0-7]+|[0-7]+[oq]|0[by][01]+|[01]+[by]|0[dt]\d+|(?:\d+(?:\.\d+)?|\.\d+)(?:\.?e[+-]?\d+)?[dt]?)\b/i,
|
---|
| 69 | operator: /[\[\]*+\-/%<>=&|$!,.:]/
|
---|
| 70 | }
|
---|
| 71 | }
|
---|
| 72 | })
|
---|
| 73 | delete Prism.languages.purebasic['class-name']
|
---|
| 74 | delete Prism.languages.purebasic['boolean']
|
---|
| 75 | Prism.languages.pbfasm = Prism.languages['purebasic']
|
---|
| 76 | }
|
---|