Created
September 13, 2010 20:09
-
-
Save abutcher/577935 to your computer and use it in GitHub Desktop.
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
SyntaxHighlighter.brushes.CommonLisp = function() | |
{ | |
var funcs = 'lambda list progn mapcar car cdr reverse member append format'; | |
var keywords = 'let while unless cond if eq t nil defvar dotimes setf listp numberp not equal'; | |
var macros = 'loop when dolist dotimes defun'; | |
var operators = '> < + - = * / %'; | |
this.regexList = [ | |
{ regex: SyntaxHighlighter.regexLib.multiLineDoubleQuotedString, css: 'string' }, | |
{ regex: new RegExp('&\\w+;', 'g'), css: 'plain' }, | |
{ regex: new RegExp(';.*', 'g'), css: 'comments' }, | |
{ regex: new RegExp("'(\\w|-)+", 'g'), css: 'variable' }, | |
{ regex: new RegExp(this.getKeywords(keywords), 'gm'), css: 'keyword' }, | |
{ regex: new RegExp(this.getKeywords(macros), 'gm'), css: 'keyword' }, | |
{ regex: new RegExp(this.getKeywords(funcs), 'gm'),css: 'functions' }, | |
]; | |
this.forHtmlScript(SyntaxHighlighter.regexLib.aspScriptTags); | |
} | |
SyntaxHighlighter.brushes.CommonLisp.prototype = new SyntaxHighlighter.Highlighter(); | |
SyntaxHighlighter.brushes.CommonLisp.aliases = ['lisp', 'cl', 'el']; |
Definitely -- Evaluating this shit again.
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
Should some of the things in funcs be highlighted as a keyword?