Update of /cvsroot/wisp/wisp/doc
In directory usw-pr-cvs1:/tmp/cvs-serv1563/doc
Modified Files:
paw.txt wisp.vim worth.vim
Log Message:
Implemented |<u8vector>|.
Index: paw.txt
===================================================================
RCS file: /cvsroot/wisp/wisp/doc/paw.txt,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -d -r1.10 -r1.11
--- paw.txt 4 Sep 2002 14:33:22 -0000 1.10
+++ paw.txt 18 Sep 2002 21:15:12 -0000 1.11
@@ -59,7 +59,7 @@
* |vector-set!|.
-3. Prefer |ref| where possible <new>
+3. Prefer |ref| where possible <act>
The |ref| procedure should be the preferred way to access members
of strings and vectors of any kind. Accordingly, PAW-3
obsoletes |string-ref| and |vector-ref| of R5RS and the
@@ -90,8 +90,8 @@
(|len| /vector/).
-5. Prefer |len| where possible <new>
- The |len| procedure should be the preferred way to access length of
+5. Prefer |length| where possible <act>
+ The |length| procedure should be the preferred way to access length of
simple compound objects of any kind. Accordingly, PAW-5 obsoletes
|string-length| and |vector-length| of R5RS. Furthermore, PAW-5
obsoletes the |record-type-slot-count| procedure.
Index: wisp.vim
===================================================================
RCS file: /cvsroot/wisp/wisp/doc/wisp.vim,v
retrieving revision 1.229
retrieving revision 1.230
diff -u -d -r1.229 -r1.230
--- wisp.vim 18 Sep 2002 21:11:05 -0000 1.229
+++ wisp.vim 18 Sep 2002 21:15:12 -0000 1.230
@@ -114,6 +114,12 @@
syn keyword wispSyntax string-template sub swap! syntax-rules try type
syn keyword wispSyntax unless unquote use when while
+" FIXME: I don't really think types should be lumped together with
+" syntax ...
+
+syn keyword wispSyntax <box> <c16string> <macro> <record-type>
+syn keyword wispSyntax <u8vector> <vector>
+
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
@@ -208,7 +214,7 @@
syn keyword wispFunc system-constant tcchangeattr tcgetattr
syn keyword wispFunc tcgetattr-raw tcsetattr-raw tenth third toposplit
syn keyword wispFunc transcript-off transcript-on translate tree-copy
-syn keyword wispFunc truncate tty? type-of ubyte? unix-time
+syn keyword wispFunc truncate tty? type-of u8vector? ubyte? unix-time
syn keyword wispFunc unpack-be-integer unpack-le-integer unsure-collect
syn keyword wispFunc utf-8->c16string utf-8-first-byte->length uwyde?
syn keyword wispFunc vector vector->list vector-append vector-copy
Index: worth.vim
===================================================================
RCS file: /cvsroot/wisp/wisp/doc/worth.vim,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -d -r1.23 -r1.24
--- worth.vim 18 Sep 2002 21:14:22 -0000 1.23
+++ worth.vim 18 Sep 2002 21:15:12 -0000 1.24
@@ -21,7 +21,7 @@
syn keyword wispSyntax ->reg ->ureg :> <: again begin believe binary
syn keyword wispSyntax conform copy delete else flush if if-empty
syn keyword wispSyntax if-int-const register repeat stack<=! stack=!
-syn keyword wispSyntax stack>=! then until while
+syn keyword wispSyntax stack>=! then unless until while
syn keyword wispFunc * + - --byte@ --cell@ --tetra@ --wyde@ -2rot
syn keyword wispFunc ->wisp-bool -rot / /mod 0= 1+ 1- 2* 2drop 2dup
@@ -29,11 +29,12 @@
syn keyword wispFunc WEXITSTATUS WIFEXITED WIFSIGNALED WIFSTOPPED
syn keyword wispFunc WSTOPSIG WTERMSIG abs and argc argc-argv-envp
syn keyword wispFunc argv-envp arshift bsf bsr bury byte! byte@ byte@++
-syn keyword wispFunc cell! cell+ cell- cell@ cell@++ cellfill cellmove
-syn keyword wispFunc cells cr d+ d- d>s dhexprint dig drop dup emit
-syn keyword wispFunc emit-digit encode-digit fill get-type
-syn keyword wispFunc go-access-slot hexprint lshift m+ max min mod move
-syn keyword wispFunc negate nip not octas or over require-c8string
+syn keyword wispFunc bytefill bytemove cell! cell+ cell- cell@ cell@++
+syn keyword wispFunc cellfill cellmove cells cr d+ d- d>s decons
+syn keyword wispFunc dhexprint dig drop dup emit emit-digit
+syn keyword wispFunc encode-digit fill get-type go-access-slot hexprint
+syn keyword wispFunc lshift m+ max min mod move negate nip not octas or
+syn keyword wispFunc over require-c8string require-cons
syn keyword wispFunc require-record-type require-string-length
syn keyword wispFunc require-vector rol ror rot rshift s>d sp! sp@
syn keyword wispFunc space square string-data string-length swap
|
