PR.registerLangHandler(PR.createSimpleLexer([[
'opn'
,/^\(/,
null
,
'('
],[
'clo'
,/^\)/,
null
,
')'
],[PR.PR_COMMENT,/^;[^\r\n]*/,
null
,
';'
],[PR.PR_PLAIN,/^[\t\n\r \xA0]+/,
null
,
' \n\r \xa0'
],[PR.PR_STRING,/^\"(?:[^\"\\]|\\[\s\S])*(?:\"|$)/,
null
,
'\"'
]],[[PR.PR_KEYWORD,/^(?:block|c[ad]+r|
catch
|cons|defun|
do
|eq|eql|equal|equalp|eval-when|flet|format|go|
if
|labels|lambda|let|load-time-value|locally|macrolet|multiple-value-call|nil|progn|progv|quote|require|
return
-from|setq|symbol-macrolet|t|tagbody|the|
throw
|unwind)\b/,
null
],[PR.PR_LITERAL,/^[+\-]?(?:0x[0-9a-f]+|\d+\/\d+|(?:\.\d+|\d+(?:\.\d*)?)(?:[ed][+\-]?\d+)?)/i],[PR.PR_LITERAL,/^\
'(?:-*(?:\w|\\[\x21-\x7e])(?:[\w-]*|\\[\x21-\x7e])[=!?]?)?/],[PR.PR_PLAIN,/^-*(?:[a-z_]|\\[\x21-\x7e])(?:[\w-]*|\\[\x21-\x7e])[=!?]?/i],[PR.PR_PUNCTUATION,/^[^\w\t\n\r \xA0()\"\\\';]+/]]),['
cl
','
el
','
lisp
','
scm'])