]>
luflow.net public git repositories - flow-web.git/blob - static/highlight/languages/lisp.min.js
1 /*! `lisp` grammar compiled for Highlight.js 11.11.1 */
2 (()=>{var e
=(()=>{"use strict";return e
=>{
3 const n
="[a-zA-Z_\\-+\\*\\/<=>&#][a-zA-Z0-9_\\-+*\\/<=>&#!]*",a
="\\|[^]*?\\|",i
="(-|\\+)?\\d+(\\.\\d+|\\/\\d+)?((d|e|f|l|s|D|E|F|L|S)(\\+|-)?\\d+)?",s
={
4 className:"literal",begin:"\\b(t{1}|nil)\\b"},l
={className:"number",variants:[{
5 begin:i
,relevance:0},{begin:"#(b|B)[0-1]+(/[0-1]+)?"},{
6 begin:"#(o|O)[0-7]+(/[0-7]+)?"},{begin:"#(x|X)[0-9a-fA-F]+(/[0-9a-fA-F]+)?"},{
7 begin:"#(c|C)\\("+i
+" +"+i
,end:"\\)"}]},b
=e
.inherit(e
.QUOTE_STRING_MODE
,{
8 illegal:null}),g
=e
.COMMENT(";","$",{relevance:0}),r
={begin:"\\*",end:"\\*"},t
={
9 className:"symbol",begin:"[:&]"+n
},c
={begin:n
,relevance:0},d
={begin:a
},o
={
10 contains:[l
,b
,r
,t
,{begin:"\\(",end:"\\)",contains:["self",s
,b
,l
,c
]},c
],
11 variants:[{begin:"['`]\\(",end:"\\)"},{begin:"\\(quote ",end:"\\)",keywords:{
12 name:"quote"}},{begin:"'"+a
}]},v
={variants:[{begin:"'"+n
},{
13 begin:"#'"+n
+"(::"+n
+")*"}]},m
={begin:"\\(\\s*",end:"\\)"},u
={endsWithParent:!0,
14 relevance:0};return m
.contains
=[{className:"name",variants:[{begin:n
,relevance:0
15 },{begin:a
}]},u
],u
.contains
=[o
,v
,m
,s
,l
,b
,g
,r
,t
,d
,c
],{name:"Lisp",illegal:/\S/,
16 contains:[l
,e
.SHEBANG(),s
,b
,g
,o
,v
,m
,c
]}}})();hljs
.registerLanguage("lisp",e
)