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

One more time. Oh, well.

Browse Source 
svn: r11745
This commit is contained in:
Stevie Strickland 2008-09-14 06:27:22 +00:00
parent 0cdb21157e
commit 6c2f2bc60d
2 changed files with 61 additions and 61 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mzlib/scribblings/contract.scrbl
View File

@ -112,7 +112,7 @@ where the reference to the defined variable occurs. Instead, it uses
the source location of the reference to the variable as the name of
that definition.
@interaction[#:eval (parameterize ([sandbox-output 'string]
@examples[#:eval (parameterize ([sandbox-output 'string]
[sandbox-error-output 'string]
[sandbox-eval-limits #f])
(make-evaluator 'mzscheme))

8
collects/scribblings/reference/contracts.scrbl
View File

@ -662,9 +662,9 @@ exported without a contract.
The @scheme[blame-id] is used for the positive positions of
contracts paired with exported @scheme[id]s. Contracts broken
within the @scheme[with-contract] @scheme[body] will use the
@scheme[blame-id] for their negative position.}
@scheme[blame-id] for their negative position.
@interaction[(require scheme/contract)
@examples[(require scheme/contract)
(with-contract odd-even
([odd? (-> number? boolean?)]
[even? (-> number? boolean?)])
@ -685,7 +685,7 @@ within the @scheme[with-contract] @scheme[body] will use the
(f 'a)
(g "foo")
(g 0)
(g 3)]
(g 3)]}
@defform*[[(define/contract id contract-expr init-value-expr)
(define/contract (head args) contract-expr body ...+)]]{
@ -701,7 +701,7 @@ of the contract. It is equivalent to wrapping a single @scheme[define]
with a @scheme[with-contract] form that pairs the @scheme[contract-expr]
with the bound identifier.
@interaction[(require scheme/contract)
@examples[(require scheme/contract)
(define/contract a number? #t)
a
(define/contract (f x)