Update of /cvsroot/wisp/wisp/doc
In directory usw-pr-cvs1:/tmp/cvs-serv32029/doc
Modified Files:
wisp.vim
Log Message:
Implemented fluid cells.
Index: wisp.vim
===================================================================
RCS file: /cvsroot/wisp/wisp/doc/wisp.vim,v
retrieving revision 1.219
retrieving revision 1.220
diff -u -d -r1.219 -r1.220
--- wisp.vim 4 Sep 2002 14:33:22 -0000 1.219
+++ wisp.vim 4 Sep 2002 14:36:23 -0000 1.220
@@ -18,8 +18,8 @@
set lispwords=acons!,begin,bind,call-with-input-file
set lispwords+=,call-with-output-file,call-with-pipe-from
set lispwords+=,call-with-pipe-to,case,collect-string,define,defmacro,do
-set lispwords+=,except,finally,if,hide,hold,intermingle,lambda,let,let*
-set lispwords+=,letrec,make-record-type,my,my-port,phase
+set lispwords+=,except,finally,fluid-my,if,hide,hold,intermingle,lambda
+set lispwords+=,let,let*,letrec,make-record-type,my,my-port,phase
set lispwords+=,read-char-sequence,run-tests,set!,simple-encode,try,use
set lispwords+=,while
@@ -106,21 +106,21 @@
syn keyword wispSyntax -> ... <...> <> => acons! and assert begin bind
syn keyword wispSyntax car! case cdr! cond cons! current-globals cut
syn keyword wispSyntax cute decr! define define-syntax defmacro delay
-syn keyword wispSyntax do else except export finally hide hide* hold if
-syn keyword wispSyntax incr! lambda lambda-pack let let* let-syntax
-syn keyword wispSyntax letrec letrec-syntax metacode module my my-port
-syn keyword wispSyntax or phase quasiquote quote rec serial set!
-syn keyword wispSyntax splicing sub swap! syntax-rules try type unless
-syn keyword wispSyntax unquote use when while
+syn keyword wispSyntax do else except export finally fluid-my hide
+syn keyword wispSyntax hide* hold if incr! lambda lambda-pack let let*
+syn keyword wispSyntax let-syntax letrec letrec-syntax metacode module
+syn keyword wispSyntax my my-port or phase quasiquote quote rec serial
+syn keyword wispSyntax set! splicing sub swap! syntax-rules try type
+syn keyword wispSyntax unless unquote use when while
syn keyword wispFunc * + - / /= < << <= = > >= >> abs address-of
syn keyword wispFunc alist->dict alist->vector alist-copy analyse angle
syn keyword wispFunc append append-reverse apply assert-object-type
syn keyword wispFunc assoc assq assv atom? big-integer? bit?
syn keyword wispFunc bitstring-ref boolean? box-empty! box-empty?
-syn keyword wispFunc box-ref box? broketed? c16string? c8string? caaaar
-syn keyword wispFunc caaadr caaar caadar caaddr caadr caar cadaar
-syn keyword wispFunc cadadr cadar caddar cadddr caddr cadr
+syn keyword wispFunc box-ref box? broketed? builtin-modules c16string?
+syn keyword wispFunc c8string? caaaar caaadr caaar caadar caaddr caadr
+syn keyword wispFunc caar cadaar cadadr cadar caddar cadddr caddr cadr
syn keyword wispFunc call-with-in/out-files call-with-input-file
syn keyword wispFunc call-with-output-file car car* cardinal? catch
syn keyword wispFunc cdaaar cdaadr cdaar cdadar cdaddr cdadr cdar
@@ -230,13 +230,13 @@
syn keyword wispLibFunc display dot-tail dotted-list? drop-right
syn keyword wispLibFunc drop-right! drop-while env-vec every fdset-ref
syn keyword wispLibFunc filename-suffix filter-map find-first-char
-syn keyword wispLibFunc find-last-char fold fold-right
+syn keyword wispLibFunc find-last-char fluid? fold fold-right
syn keyword wispLibFunc for-all-xml-children for-each-in-table force
syn keyword wispLibFunc getopt group-from-left group-from-right iota
syn keyword wispLibFunc last list->string list-tabulate list=
syn keyword wispLibFunc lset-adjoin lset-diff+intersection
syn keyword wispLibFunc lset-difference lset-intersection lset-union
-syn keyword wispLibFunc lset<= lset= make-fdset make-list
+syn keyword wispLibFunc lset<= lset= make-fdset make-fluid make-list
syn keyword wispLibFunc normalize-phrase not-cons? output-xml-message
syn keyword wispLibFunc pad-left pad-right parse-encoding-name
syn keyword wispLibFunc parse-path parse-uri parse-wid-file
@@ -277,8 +277,8 @@
syn keyword wispLibFunc sys:tcsetattr sys:truncate sys:unlink
syn keyword wispLibFunc sys:waitpid sys:write take take! take-right
syn keyword wispLibFunc unzip1 unzip2 unzip3 unzip4 unzip5 urldecode
-syn keyword wispLibFunc vector->string write-as-code write-as-string
-syn keyword wispLibFunc xcons zip
+syn keyword wispLibFunc vector->string with-fluid write-as-code
+syn keyword wispLibFunc write-as-string xcons zip
syn keyword wispArrow ==> -/->
|