mirror of https://github.com/jkjoy/sunpeiwen.git
107 lines
3.1 KiB
JavaScript
107 lines
3.1 KiB
JavaScript
/* eslint-disable regexp/no-dupe-characters-character-class */
|
||
(function (Prism) {
|
||
|
||
/**
|
||
* Regular expression for characters that are not allowed in identifiers.
|
||
*
|
||
* @type {string}
|
||
*/
|
||
var nonId = /\s\x00-\x1f\x22-\x2f\x3a-\x3f\x5b-\x5e\x60\x7b-\x7e/.source;
|
||
|
||
/**
|
||
* Surround a regular expression for IDs with patterns for non-ID sequences.
|
||
*
|
||
* @param {string} pattern A regular expression for identifiers.
|
||
* @param {string} [flags] The regular expression flags.
|
||
* @returns {RegExp} A wrapped regular expression for identifiers.
|
||
*/
|
||
function wrapId(pattern, flags) {
|
||
return RegExp(pattern.replace(/<nonId>/g, nonId), flags);
|
||
}
|
||
|
||
Prism.languages.kumir = {
|
||
'comment': {
|
||
pattern: /\|.*/
|
||
},
|
||
|
||
'prolog': {
|
||
pattern: /#.*/,
|
||
greedy: true
|
||
},
|
||
|
||
'string': {
|
||
pattern: /"[^\n\r"]*"|'[^\n\r']*'/,
|
||
greedy: true
|
||
},
|
||
|
||
'boolean': {
|
||
pattern: wrapId(/(^|[<nonId>])(?:да|нет)(?=[<nonId>]|$)/.source),
|
||
lookbehind: true
|
||
},
|
||
|
||
'operator-word': {
|
||
pattern: wrapId(/(^|[<nonId>])(?:и|или|не)(?=[<nonId>]|$)/.source),
|
||
lookbehind: true,
|
||
alias: 'keyword'
|
||
},
|
||
|
||
'system-variable': {
|
||
pattern: wrapId(/(^|[<nonId>])знач(?=[<nonId>]|$)/.source),
|
||
lookbehind: true,
|
||
alias: 'keyword'
|
||
},
|
||
|
||
'type': [
|
||
{
|
||
pattern: wrapId(/(^|[<nonId>])(?:вещ|лит|лог|сим|цел)(?:\x20*таб)?(?=[<nonId>]|$)/.source),
|
||
lookbehind: true,
|
||
alias: 'builtin'
|
||
},
|
||
{
|
||
pattern: wrapId(/(^|[<nonId>])(?:компл|сканкод|файл|цвет)(?=[<nonId>]|$)/.source),
|
||
lookbehind: true,
|
||
alias: 'important'
|
||
}
|
||
],
|
||
|
||
/**
|
||
* Should be performed after searching for type names because of "таб".
|
||
* "таб" is a reserved word, but never used without a preceding type name.
|
||
* "НАЗНАЧИТЬ", "Фввод", and "Фвывод" are not reserved words.
|
||
*/
|
||
'keyword': {
|
||
pattern: wrapId(/(^|[<nonId>])(?:алг|арг(?:\x20*рез)?|ввод|ВКЛЮЧИТЬ|вс[её]|выбор|вывод|выход|дано|для|до|дс|если|иначе|исп|использовать|кон(?:(?:\x20+|_)исп)?|кц(?:(?:\x20+|_)при)?|надо|нач|нс|нц|от|пауза|пока|при|раза?|рез|стоп|таб|то|утв|шаг)(?=[<nonId>]|$)/.source),
|
||
lookbehind: true
|
||
},
|
||
|
||
/** Should be performed after searching for reserved words. */
|
||
'name': {
|
||
// eslint-disable-next-line regexp/no-super-linear-backtracking
|
||
pattern: wrapId(/(^|[<nonId>])[^\d<nonId>][^<nonId>]*(?:\x20+[^<nonId>]+)*(?=[<nonId>]|$)/.source),
|
||
lookbehind: true
|
||
},
|
||
|
||
/** Should be performed after searching for names. */
|
||
'number': {
|
||
pattern: wrapId(/(^|[<nonId>])(?:\B\$[\da-f]+\b|(?:\b\d+(?:\.\d*)?|\B\.\d+)(?:e[+-]?\d+)?)(?=[<nonId>]|$)/.source, 'i'),
|
||
lookbehind: true
|
||
},
|
||
|
||
/** Should be performed after searching for words. */
|
||
'punctuation': /:=|[(),:;\[\]]/,
|
||
|
||
/**
|
||
* Should be performed after searching for
|
||
* - numeric constants (because of "+" and "-");
|
||
* - punctuation marks (because of ":=" and "=").
|
||
*/
|
||
'operator-char': {
|
||
pattern: /\*\*?|<[=>]?|>=?|[-+/=]/,
|
||
alias: 'operator'
|
||
}
|
||
};
|
||
|
||
Prism.languages.kum = Prism.languages.kumir;
|
||
|
||
}(Prism));
|