Update of /cvsroot/wisp/wisp/modules
In directory usw-pr-cvs1:/tmp/cvs-serv29769/modules
Modified Files:
builtin.wid
Log Message:
Added the |length| dispatcher slot to record types.
Index: builtin.wid
===================================================================
RCS file: /cvsroot/wisp/wisp/modules/builtin.wid,v
retrieving revision 1.176
retrieving revision 1.177
diff -u -d -r1.176 -r1.177
--- builtin.wid 18 Sep 2002 21:03:52 -0000 1.176
+++ builtin.wid 18 Sep 2002 21:04:55 -0000 1.177
@@ -1930,18 +1930,22 @@
make-record-type
- (|make-record-type| /slot-count/ [/referrer-generator/])
+ (|make-record-type| /slot-count/ {/dispatch-name/ /generator/})
=> (/record-type/ /constructor/ /accessor/ ...)
|Creates| a new record type. There will be as much /accessor/s as
- /slot-count/ indicates. If /referrer-generator/ is given, it is
- called with all the arguments in the list that |make-record-type|
- eventually returns and its result will be used as the referrer
- procedure of the new record type (see |ref|).
+ /slot-count/ indicates. The pairs of /dispatch-name/s and /generator/s
+ specify dispatch points: each generator is called with all the
+ arguments in the list that |make-record-type| eventually returns and
+ the results will be used as the actual dispatch points. Currently,
+ the following dispatch names are recognized:
+
+ * ~ref~;
+ * ~length~.
:Conforms to: Wisp extension.
- :See also: |ref|, |record-type-discriminator|.
+ :See also: |ref|, |length|, |record-type-discriminator|.
make-string
|
