104 lines
2.2 KiB
JavaScript
104 lines
2.2 KiB
JavaScript
/*
|
|
Language: Lisp
|
|
Description: Generic lisp syntax
|
|
Author: Vasily Polovnyov <vast@whiteants.net>
|
|
Category: lisp
|
|
*/
|
|
|
|
function(hljs) {
|
|
var LISP_IDENT_RE = '[a-zA-Z_\\-\\+\\*\\/\\<\\=\\>\\&\\#][a-zA-Z0-9_\\-\\+\\*\\/\\<\\=\\>\\&\\#!]*';
|
|
var MEC_RE = '\\|[^]*?\\|';
|
|
var LISP_SIMPLE_NUMBER_RE = '(\\-|\\+)?\\d+(\\.\\d+|\\/\\d+)?((d|e|f|l|s)(\\+|\\-)?\\d+)?';
|
|
var SHEBANG = {
|
|
className: 'shebang',
|
|
begin: '^#!', end: '$'
|
|
};
|
|
var LITERAL = {
|
|
className: 'literal',
|
|
begin: '\\b(t{1}|nil)\\b'
|
|
};
|
|
var NUMBER = {
|
|
className: 'number',
|
|
variants: [
|
|
{begin: LISP_SIMPLE_NUMBER_RE, relevance: 0},
|
|
{begin: '#b[0-1]+(/[0-1]+)?'},
|
|
{begin: '#o[0-7]+(/[0-7]+)?'},
|
|
{begin: '#x[0-9a-f]+(/[0-9a-f]+)?'},
|
|
{begin: '#c\\(' + LISP_SIMPLE_NUMBER_RE + ' +' + LISP_SIMPLE_NUMBER_RE, end: '\\)'}
|
|
]
|
|
};
|
|
var STRING = hljs.inherit(hljs.QUOTE_STRING_MODE, {illegal: null});
|
|
var COMMENT = {
|
|
className: 'comment',
|
|
begin: ';', end: '$', relevance: 0
|
|
};
|
|
var VARIABLE = {
|
|
className: 'variable',
|
|
begin: '\\*', end: '\\*'
|
|
};
|
|
var KEYWORD = {
|
|
className: 'keyword',
|
|
begin: '[:&]' + LISP_IDENT_RE
|
|
};
|
|
var MEC = {
|
|
begin: MEC_RE
|
|
};
|
|
var QUOTED_LIST = {
|
|
begin: '\\(', end: '\\)',
|
|
contains: ['self', LITERAL, STRING, NUMBER]
|
|
};
|
|
var QUOTED = {
|
|
className: 'quoted',
|
|
contains: [NUMBER, STRING, VARIABLE, KEYWORD, QUOTED_LIST],
|
|
variants: [
|
|
{
|
|
begin: '[\'`]\\(', end: '\\)'
|
|
},
|
|
{
|
|
begin: '\\(quote ', end: '\\)',
|
|
keywords: 'quote'
|
|
},
|
|
{
|
|
begin: '\'' + MEC_RE
|
|
}
|
|
]
|
|
};
|
|
var QUOTED_ATOM = {
|
|
className: 'quoted',
|
|
begin: '\'' + LISP_IDENT_RE
|
|
};
|
|
var LIST = {
|
|
className: 'list',
|
|
begin: '\\(', end: '\\)'
|
|
};
|
|
var BODY = {
|
|
endsWithParent: true,
|
|
relevance: 0
|
|
};
|
|
LIST.contains = [
|
|
{
|
|
className: 'keyword',
|
|
variants: [
|
|
{begin: LISP_IDENT_RE},
|
|
{begin: MEC_RE}
|
|
]
|
|
},
|
|
BODY
|
|
];
|
|
BODY.contains = [QUOTED, QUOTED_ATOM, LIST, LITERAL, NUMBER, STRING, COMMENT, VARIABLE, KEYWORD, MEC];
|
|
|
|
return {
|
|
illegal: /\S/,
|
|
contains: [
|
|
NUMBER,
|
|
SHEBANG,
|
|
LITERAL,
|
|
STRING,
|
|
COMMENT,
|
|
QUOTED,
|
|
QUOTED_ATOM,
|
|
LIST
|
|
]
|
|
};
|
|
}
|