some edits to the contract guide

svn: r8245

original commit: 6f2791a5031595c5de65c71d2aa94a8ac0105b28
This commit is contained in:
Matthew Flatt 2008-01-07 12:48:38 +00:00
parent be502f0d4f
commit 9c7e96a14c
3 changed files with 21 additions and 2 deletions

View File

@ -235,13 +235,14 @@
litchar litchar
verbatim) verbatim)
(provide image onscreen menuitem defterm (provide image onscreen menuitem defterm emph
schemefont schemevalfont schemeresultfont schemeidfont schemevarfont schemefont schemevalfont schemeresultfont schemeidfont schemevarfont
schemeparenfont schemekeywordfont schememetafont schememodfont schemeparenfont schemekeywordfont schememetafont schememodfont
filepath exec envvar Flag DFlag PFlag DPFlag filepath exec envvar Flag DFlag PFlag DPFlag
indexed-file indexed-envvar indexed-file indexed-envvar
link procedure link procedure
idefterm) idefterm
inset-flow)
;; String String *-> Element ;; String String *-> Element
;; an in-lined image, relative to the current directory ;; an in-lined image, relative to the current directory
@ -255,6 +256,8 @@
(make-element 'sf (decode-content str))) (make-element 'sf (decode-content str)))
(define (menuitem menu item) (define (menuitem menu item)
(make-element 'sf (list menu "|" item))) (make-element 'sf (list menu "|" item)))
(define (emph . str)
(make-element 'italic (decode-content str)))
(define (defterm . str) (define (defterm . str)
(make-element 'italic (decode-content str))) (make-element 'italic (decode-content str)))
(define (idefterm . str) (define (idefterm . str)
@ -313,6 +316,11 @@
(define (t . str) (define (t . str)
(decode-paragraph str)) (decode-paragraph str))
(define (inset-flow . c)
(make-blockquote
"insetpara"
(flow-paragraphs (decode-flow c))))
;; ---------------------------------------- ;; ----------------------------------------
(define (gen-absolute-tag) (define (gen-absolute-tag)

View File

@ -133,6 +133,11 @@
margin-right: 0em; margin-right: 0em;
} }
.insetpara {
margin-left: 1em;
margin-right: 1em;
}
.toclink { .toclink {
text-decoration: none; text-decoration: none;
color: blue; color: blue;

View File

@ -162,6 +162,9 @@ sub-form in a procedure being documented).}
@scheme[schemefont], but colored as meta-syntax, such as backquote or @scheme[schemefont], but colored as meta-syntax, such as backquote or
unquote.} unquote.}
@defproc[(schemeerror [pre-content any/c] ...) element?]{Like
@scheme[schemefont], but colored as error-message text.}
@defproc[(procedure [pre-content any/c] ...) element?]{Typesets @defproc[(procedure [pre-content any/c] ...) element?]{Typesets
@tech{decode}d @scheme[pre-content] as a procedure name in a REPL @tech{decode}d @scheme[pre-content] as a procedure name in a REPL
result (e.g., in typewriter font with a @litchar{#<procedure:} prefix result (e.g., in typewriter font with a @litchar{#<procedure:} prefix
@ -574,6 +577,9 @@ the containing class/interface.}
@; ------------------------------------------------------------------------ @; ------------------------------------------------------------------------
@section{Various String Forms} @section{Various String Forms}
@defproc[(emph [pre-content any/c] ...) element?]{Typesets the
@tech{decode}d @scheme[pre-content] with emphasis (e.g., in italic).}
@defproc[(defterm [pre-content any/c] ...) element?]{Typesets the @defproc[(defterm [pre-content any/c] ...) element?]{Typesets the
@tech{decode}d @scheme[pre-content] as a defined term (e.g., in @tech{decode}d @scheme[pre-content] as a defined term (e.g., in
italic). Consider using @scheme[deftech] instead, though, so that uses italic). Consider using @scheme[deftech] instead, though, so that uses