lib/lexers/lisp.tes


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29

! AUTO-GENERATED FROM SCITE PROPERTY SET !

@[lexer.test.lisp]{
  :EN*.lspQ*U.r
  Q.r"F :EN*.lispQ*U.r '
Q.r}

@[lexer.set.lisp]{
  ESSETLEXER,SCLEX_LISP
  0ESSETKEYWORDS
    not defun + - * / = < > <= >= princ eval apply funcall quote identity
    function complement backquote lambda set setq setf defun defmacro gensym make symbol
    intern symbol name symbol value symbol plist get getf putprop remprop hash make
    array aref car cdr caar cadr cdar cddr caaar caadr cadar caddr cdaar cdadr cddar
    cdddr caaaar caaadr caadar caaddr cadaar cadadr caddar cadddr cdaaar cdaadr cdadar
    cdaddr cddaar cddadr cdddar cddddr cons list append reverse last nth nthcdr member
    assoc subst sublis nsubst nsublis remove length list length mapc mapcar mapl
    maplist mapcan mapcon rplaca rplacd nconc delete atom symbolp numberp boundp null
    listp consp minusp zerop plusp evenp oddp eq eql equal cond case and or let l if
    prog prog1 prog2 progn go return do dolist dotimes catch throw error cerror break
    continue errset baktrace evalhook truncate float rem min max abs sin cos tan expt exp
    sqrt random logand logior logxor lognot bignums logeqv lognand lognor logorc2
    logtest logbitp logcount integer length nil
  :M[color.comment],1M[color.set]
  :M[color.number],2M[color.set]
  :M[color.keyword],3M[color.set]
  :M[color.string],6M[color.set]
  :M[color.operator],10M[color.set]
}