suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

finish mzlib docs, except for contracts

Browse Source 
svn: r8623

original commit: b03e7426ebda7a56827a3818ad96dea7e2cc5346
This commit is contained in:
Matthew Flatt 2008-02-11 21:37:03 +00:00
parent 24f7a22c89
commit f5386ada87
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
collects/scribble/manual.ss
View File

@ -716,10 +716,14 @@
(syntax-rules () (syntax-rules ()
[(_ name fields #:mutable #:inspector #f desc ...) [(_ name fields #:mutable #:inspector #f desc ...)
(**defstruct name fields #f #t desc ...)] (**defstruct name fields #f #t desc ...)]
[(_ name fields #:mutable #:transparent desc ...)
(**defstruct name fields #f #t desc ...)]
[(_ name fields #:mutable desc ...) [(_ name fields #:mutable desc ...)
(**defstruct name fields #f #f desc ...)] (**defstruct name fields #f #f desc ...)]
[(_ name fields #:inspector #f desc ...) [(_ name fields #:inspector #f desc ...)
(**defstruct name fields #t #t desc ...)] (**defstruct name fields #t #t desc ...)]
[(_ name fields #:transparent desc ...)
(**defstruct name fields #t #t desc ...)]
[(_ name fields desc ...) [(_ name fields desc ...)
(**defstruct name fields #t #f desc ...)])) (**defstruct name fields #t #f desc ...)]))
(define-syntax **defstruct (define-syntax **defstruct
@ -1521,9 +1525,7 @@
(to-flow spacer) (to-flow spacer)
(to-flow (make-element (to-flow (make-element
#f #f
(list (to-element '#:inspector) (list (to-element '#:transparent)
spacer
(to-element #f)
(schemeparenfont ")")))) (schemeparenfont ")"))))
'cont 'cont
'cont))] 'cont))]
@ -1543,9 +1545,7 @@
(to-flow spacer) (to-flow spacer)
(to-flow (make-element (to-flow (make-element
#f #f
(list (to-element '#:inspector) (list (to-element '#:transparent)
spacer
(to-element #f)
(schemeparenfont ")")))) (schemeparenfont ")"))))
'cont 'cont
'cont))] 'cont))]