suzanne.soy/scribble-enhanced
1
0
Fork 0
Code Issues 1 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

remove 'else' and '=>' bindings from 'mzscheme'

Browse Source 
svn: r7859

original commit: 8930f31115e68e4858cd742aeb4ad69b3a1698f1
This commit is contained in:
Matthew Flatt 2007-11-29 14:08:08 +00:00
parent 590e5c012f
commit 85ce73089c
5 changed files with 29 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
collects/scribble/basic.ss
View File

@ -191,11 +191,10 @@
key key
content))) content)))
(define (index-section tag) (define (index-section #:tag [tag #f])
(make-unnumbered-part (make-unnumbered-part
#f #f
`((part , (or tag `((part ,(or tag "doc-index")))
(make-generated-tag))))
'("Index") '("Index")
'index 'index
null null

19
collects/scribble/manual.ss
View File

@ -998,16 +998,15 @@
(map (lambda (f) (map (lambda (f)
(list 'accessor name '- (field-name f))) (list 'accessor name '- (field-name f)))
fields) fields)
(if immutable? (filter
null values
(filter (map (lambda (f)
values (if (or (not immutable?)
(map (lambda (f) (and (pair? (car f))
(if (and (pair? (car f)) (memq '#:mutable (car f))))
(memq '#:mutable (car f))) (list 'mutator 'set- name '- (field-name f) '!)
(list 'mutator 'set- name '- (field-name f) '!) #f))
#f)) fields))))))])
fields)))))))])
(if (pair? name) (if (pair? name)
(to-element (list just-name (to-element (list just-name
(make-just-context (cadr name) stx-id))) (make-just-context (cadr name) stx-id)))

5
collects/scribblings/scribble/basic.scrbl
View File

@ -178,11 +178,10 @@ section by @scheme[decode]. The @scheme[word]s serve as both the keys
and as the rendered forms of the keys.} and as the rendered forms of the keys.}
@defproc[(index-section [tag string?])]{ @defproc[(index-section [#:tag tag (or/c false/c string?) "doc-index"])]{
Produces a section that shows the index the enclosing document. The Produces a section that shows the index the enclosing document. The
@scheme[tag] is required to be unique for each index among a set of optional @scheme[tag] argument is used as the index section's tag.}
documents that share ``collected'' information.}
@; ------------------------------------------------------------------------ @; ------------------------------------------------------------------------

15
collects/scribblings/scribble/manual.scrbl
View File

@ -448,6 +448,21 @@ Like @scheme[defproc], but for a method within a @scheme[defclass] or
Like @scheme[defproc*], but for a method within a @scheme[defclass] or Like @scheme[defproc*], but for a method within a @scheme[defclass] or
@scheme[definterface] body.} @scheme[definterface] body.}
@defform[(method class/intf-id method-id)]{
Creates a hyperlink to the method named by @scheme[method-id] in the
class or interface named by @scheme[class/intf-id]. The hyperlink
names the method, only; see also @scheme[xmethod].
For-label binding information is used with @scheme[class/intf-id], but
not @scheme[method-id].}
@defform[(xmethod class/intf-id method-id)]{
Like @scheme[method], but the hyperlink shows both the method name and
the containing class/interface.}
@; ------------------------------------------------------------------------ @; ------------------------------------------------------------------------
@section{Various String Forms} @section{Various String Forms}

2
collects/scribblings/scribble/scribble.scrbl
View File

@ -94,4 +94,4 @@ information.
@include-section["manual.scrbl"] @include-section["manual.scrbl"]
@include-section["eval.scrbl"] @include-section["eval.scrbl"]
@index-section["scribble-index"] @index-section[]