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

changed union to or/c

Browse Source 
svn: r8748

original commit: 5a0abb116e03c458bbf047805580458e3fe354b9
This commit is contained in:
Robby Findler 2008-02-20 23:27:17 +00:00
parent 57cd0ce3ac
commit a366ccb1d3
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/mrlib/name-message.ss
View File

@ -10,7 +10,7 @@
(pad-xywh (number? number? (>=/c 0) (>=/c 0) . -> . (values number? number? (>=/c 0) (>=/c 0))))
(draw-button-label
(->d ([dc (is-a?/c dc<%>)]
[label (union false/c string?)]
[label (or/c false/c string?)]
[x number?]
[y number?]
[w (and/c number? (min-w h))]