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

rename drop and lift in Slideshow; minor doc fixes

Browse Source 
svn: r9066
This commit is contained in:
Matthew Flatt 2008-03-22 13:48:35 +00:00
parent 5803928195
commit a796029a56
4 changed files with 12 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/scribblings/guide/apply.scrbl
View File

@ -8,7 +8,7 @@
An expression of the form An expression of the form
@specsubform[ @specsubform[
(_proc-expr _arg-expr ...) (proc-expr arg-expr ...)
] ]
is a function call---also known as a @defterm{procedure is a function call---also known as a @defterm{procedure
@ -49,7 +49,7 @@ by-position arguments. For that case, an @scheme[_arg] can be an
@guideother{@secref["keywords"] introduces keywords.} @guideother{@secref["keywords"] introduces keywords.}
@specform/subs[ @specform/subs[
(_proc-expr _arg ...) (_proc-expr arg ...)
([arg arg-expr ([arg arg-expr
(code:line arg-keyword arg-expr)]) (code:line arg-keyword arg-expr)])
] ]

2
collects/scribblings/reference/control-lib.scrbl
View File

@ -65,7 +65,7 @@ The essential reduction rules are:
@schemeblock[ @schemeblock[
(prompt _val) => _val (prompt _val) => _val
(prompt _E[(control _k _expr)]) => (prompt ((lambda (_k) _expr) (prompt _E[(control _k _expr)]) => (prompt ((lambda (_k) _expr)
(lambda (_v) _E[_v]))) (lambda (_v) _E[_v])))
(code:comment #, @t{where @scheme[_E] has no @scheme[prompt]}) (code:comment #, @t{where @scheme[_E] has no @scheme[prompt]})
]} ]}

6
collects/scribblings/slideshow/picts.scrbl
View File

@ -1,6 +1,6 @@
#lang scribble/doc #lang scribble/doc
@(require "ss.ss" @(require "ss.ss"
(for-label (except-in scheme/gui drop) (for-label scheme/gui
slideshow/code slideshow/code
slideshow/flash slideshow/flash
slideshow/face slideshow/face
@ -520,12 +520,12 @@ to the corresponding sides; ascent and descent are extended, too.}
Truncates @scheme[pict]'s @tech{bounding box} by removing the descent part.} Truncates @scheme[pict]'s @tech{bounding box} by removing the descent part.}
@defproc[(lift [pict pict?] [amt real?]) pict?]{ @defproc[(lift-above-baseline [pict pict?] [amt real?]) pict?]{
Lifts @scheme[pict] relative to its baseline, extending the Lifts @scheme[pict] relative to its baseline, extending the
@tech{bounding-box} height if necessary.} @tech{bounding-box} height if necessary.}
@defproc[(drop [pict pict?] [amt real?]) pict?]{ @defproc[(drop-below-ascent [pict pict?] [amt real?]) pict?]{
Drops @scheme[pict] relative to its ascent line, extending the Drops @scheme[pict] relative to its ascent line, extending the
@tech{bounding-box} height if necessary.} @tech{bounding-box} height if necessary.}

7
collects/slideshow/pict.ss
View File

@ -129,7 +129,12 @@
find-rc find-rc
find-rb find-rb
find-rtl find-rtl
find-rbl) find-rbl
drop
lift)
(rename-out [drop drop-below-ascent]
[lift lift-above-baseline])
(except-out (all-from-out texpict/utils) (except-out (all-from-out texpict/utils)