dmbcs/guile
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

doc: Added very minimal doc strings to exported symbols of (srfi srfi-9 gnu).

Browse source 
* module/srfi/srfi-9/gnu.scm: Added some doc strings.
This commit is contained in:
Dale Mellor 2020-05-03 19:35:52 +01:00
commit 4ced14afa0
1 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

8
module/srfi/srfi-9/gnu.scm
View file

@ -31,19 +31,25 @@
set-fields))
(define (set-record-type-printer! type proc)
"Set PROC as the custom printer for TYPE."
"- Scheme Procedure: set-record-type-printer! TYPE PROC
Set PROC as the custom printer for TYPE."
(struct-set! type vtable-index-printer proc))
(define-syntax-rule (define-immutable-record-type name ctor pred fields ...)
"- Scheme Procedure: define-immutable-record-type NAME CTOR PRED (FIELD GETTER [SETTER]) ..."
((@@ (srfi srfi-9) %define-record-type)
#t (define-immutable-record-type name ctor pred fields ...)
name ctor pred fields ...))
(define-syntax-rule (set-field s (getter ...) expr)
"- Scheme Procedure: set-field RECORD (GETTER ...) EXPR
Set the field in RECORD with the GETTER, to the value of EXPR."
(%set-fields #t (set-field s (getter ...) expr) ()
s ((getter ...) expr)))
(define-syntax-rule (set-fields s . rest)
"- Scheme Procedure: set-fields RECORD ((GETTER ...) EXPR) ...
Set the fields in the RECORD with the given GETTERs to the corresponding EXPRessions."
(%set-fields #t (set-fields s . rest) ()
s . rest))