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

contract on text

Browse Source 
svn: r10159
This commit is contained in:
Matthias Felleisen 2008-06-05 21:22:21 +00:00
parent e3aa0e0e5b
commit 8b7e57b0a9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/teachpack/htdp/scribblings/image.scrbl
View File

@ -91,7 +91,7 @@ angle.
See @scheme[add-line] below.
}
@defproc[(text [s string?] [f (and/c number? positive?)] [c (unsyntax @tech{Color})]) Image]{
@defproc[(text [s (and/c string? (lambda (s) (not (string=? s ""))))] [f (and/c number? positive?)] [c (unsyntax @tech{Color})]) Image]{
Creates an image of the text @scheme[s] at point size @scheme[f]
and painted in color @scheme[c].