"Fossies" - the Fresh Open Source Software Archive

Member "wscite/lisp.properties" (11 Sep 2020, 5182 Bytes) of package /windows/misc/wscite445.zip:


As a special service "Fossies" has tried to format the requested text file into HTML format (style: standard) with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file.

    1 # Define SciTE settings for lisp and Scheme files.
    2 
    3 file.patterns.lisp=*.lsp;*.lisp
    4 
    5 filter.lisp=LISP (lsp lisp)|$(file.patterns.lisp)|
    6 
    7 file.patterns.scheme=*.scm;*.smd;*.ss
    8 filter.scheme=Scheme (scm smd)|$(file.patterns.scheme)|
    9 
   10 #*filter.lisp=$(filter.lisp)
   11 #*filter.scheme=$(filter.scheme)
   12 
   13 lexer.$(file.patterns.lisp)=lisp
   14 lexer.$(file.patterns.scheme)=lisp
   15 
   16 *language.lisp=Lisp|lisp||
   17 
   18 # lisp build in functions, xlisp dialect
   19 keywords.$(file.patterns.lisp)= not defun + - * / = < > <= >= princ \
   20 eval apply funcall quote identity function complement backquote lambda set setq setf \
   21 defun defmacro gensym make symbol intern symbol name symbol value symbol plist get \
   22 getf putprop remprop hash make array aref car cdr caar cadr cdar cddr caaar caadr cadar \
   23 caddr cdaar cdadr cddar cdddr caaaar caaadr caadar caaddr cadaar cadadr caddar cadddr \
   24 cdaaar cdaadr cdadar cdaddr cddaar cddadr cdddar cddddr cons list append reverse last nth \
   25 nthcdr member assoc subst sublis nsubst  nsublis remove length list length \
   26 mapc mapcar mapl maplist mapcan mapcon rplaca rplacd nconc delete atom symbolp numberp \
   27 boundp null listp consp minusp zerop plusp evenp oddp eq eql equal cond case and or let l if prog \
   28 prog1 prog2 progn go return do dolist dotimes catch throw error cerror break \
   29 continue errset baktrace evalhook truncate float rem min max abs sin cos tan expt exp sqrt \
   30 random logand logior logxor lognot bignums logeqv lognand lognor \
   31 logorc2 logtest logbitp logcount integer length nil
   32 
   33 word.chars.lisp=$(chars.alpha)$(chars.numeric)_-<>.#+@$%^&=*!?
   34 word.characters.$(file.patterns.lisp)=$(word.chars.lisp)
   35 
   36 # Scheme functions, R5RS
   37 keywords.$(file.patterns.scheme)= + - * / = < > <= >= => \
   38 abs acos and angle append apply asin assoc assoc assq assv atan \
   39 begin boolean? \
   40 caar cadr call-with-current-continuation call/cc \
   41 call-with-input-file call-with-output-file call-with-values \
   42 car cdr \
   43 caar cadr cdar cddr \
   44 caaar caadr cadar caddr cdaar cdadr cddar cdddr \
   45 caaaar caaadr caadar caaddr cadaar cadadr caddar cadddr \
   46 cdaaar cdaadr cdadar cdaddr cddaar cddadr cdddar cddddr \
   47 case ceiling char->integer \
   48 char-alphabetic? char-ci<=? char-ci<? char-ci=? char-ci>=? char-ci>? \
   49 char-downcase char-lower-case? char-numeric? char-ready? \
   50 char-upcase char-upper-case? char-whitespace? \
   51 char<=? char<? char=? char>=? char>? char? \
   52 close-input-port close-output-port complex? cond cons cos \
   53 current-input-port current-output-port \
   54 define define-syntax delay denominator display do dynamic-wind \
   55 else eof-object? eq? equal? eqv? eval even? exact->inexact exact? \
   56 exp expt \
   57 floor for-each force \
   58 gcd \
   59 if imag-part inexact->exact inexact? input-port? integer->char integer? interaction-environment \
   60 lambda lcm length let let* let-syntax letrec letrec-syntax \
   61 list list->string list->vector list-ref list-tail list? load log \
   62 magnitude make-polar make-rectangular make-string make-vector \
   63 map max member memq memv min modulo \
   64 negative? newline not null-environment null? number->string number? numerator \
   65 odd? open-input-file open-output-file or output-port? \
   66 pair? peek-char input-port? output-port? positive? procedure? \
   67 quasiquote quote quotient \
   68 rational? rationalize read read-char real-part real? remainder reverse round \
   69 scheme-report-environment set! set-car! set-cdr! sin sqrt string \
   70 string->list string->number string->symbol string-append \
   71 string-ci<=? string-ci<? string-ci=? string-ci>=? string-ci>? \
   72 string-copy string-fill! string-length string-ref string-set! \
   73 string<=? string<? string=? string>=? string>? string? \
   74 substring symbol->string symbol? syntax-rules \
   75 transcript-off transcript-on truncate \
   76 unquote unquote-splicing \
   77 values vector vector->list vector-fill! vector-length vector-ref vector-set! vector? \
   78 with-input-from-file with-output-to-file write write-char \
   79 zero?
   80 
   81 word.chars.scheme=$(chars.alpha)$(chars.numeric)!$%&*/:<=>?^_~+-.@
   82 word.characters.$(file.patterns.scheme)=$(word.chars.scheme)
   83 
   84 
   85 comment.block.lisp=;
   86 comment.box.start.lisp=;;
   87 comment.box.middle.lisp=;;
   88 comment.box.end.lisp=;;
   89 
   90 
   91 # LISP styles
   92 
   93 # Default
   94 style.lisp.32=$(font.base)
   95 # White space
   96 style.lisp.0=fore:#808080
   97 # Line Comment
   98 style.lisp.1=$(colour.code.comment.box),$(font.code.comment.box)
   99 # Number
  100 style.lisp.2=$(colour.number)
  101 # Keyword
  102 style.lisp.3=$(colour.keyword),bold
  103 # Keyword 2
  104 style.lisp.4=fore:#EE00AA
  105 # Symbol
  106 style.lisp.5=fore:#DD9900
  107 # String
  108 style.lisp.6=$(colour.string)
  109 # Operators
  110 style.lisp.10=$(colour.operator),bold
  111 # Identifiers
  112 style.lisp.9=
  113 # End of line where string is not closed
  114 style.lisp.8=fore:#000000,font:Verdana,size:9,back:#fefecc,eolfilled
  115 # Special
  116 style.lisp.11=fore:#60AA00
  117 # Multi-line comment
  118 style.lisp.12=$(colour.code.comment.box),$(font.code.comment.box)
  119 # Matched Operators
  120 style.lisp.34=fore:#0000FF,bold
  121 style.lisp.35=fore:#FF0000,bold
  122 # Braces are only matched in operator style
  123 braces.lisp.style=10
  124 
  125 #command.go.$(file.patterns.scheme)=c:\tools\pscheme\pscheme.exe /r $(FilePath)
  126 command.go.$(file.patterns.scheme)=c:\tools\gambit\gsi.exe -f $(FilePath)
  127 #command.go.$(file.patterns.scheme)=c:\tools\plt\mzscheme.exe -r $(FilePath)
  128 command.go.subsystem.$(file.patterns.scheme)=0