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

exported and documented label-string?

Browse Source 
svn: r18335
This commit is contained in:
Robby Findler 2010-02-25 13:03:38 +00:00
parent dcb01829a0
commit f39e8ebe0c
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/mred/mred.ss
View File

@ -40,7 +40,8 @@
"private/repl.ss" "private/repl.ss"
"private/afm.ss" "private/afm.ss"
"private/helper.ss" "private/helper.ss"
"private/dynamic.ss") "private/dynamic.ss"
"private/check.ss")
;; Initialize AFM/PS: ;; Initialize AFM/PS:
(wx:set-ps-procs (wx:set-ps-procs
@ -318,4 +319,5 @@
current-ps-afm-file-paths current-ps-afm-file-paths
current-ps-cmap-file-paths current-ps-cmap-file-paths
hide-cursor-until-moved hide-cursor-until-moved
system-position-ok-before-cancel?)) system-position-ok-before-cancel?
label-string?))

3
collects/scribblings/gui/miscwin-funcs.scrbl
View File

@ -470,3 +470,6 @@ If @scheme[value] is an integer outside a platform-specific range,
See also @scheme[get-resource].} See also @scheme[get-resource].}
@defproc[(label-string? [v any/c]) boolean?]{
Returns @scheme[#t] if @scheme[v] is a string whose length is less than or equal to @scheme[200].
}