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

cocoa: fix a double vs. float mismatch in getting scroll positions

Browse Source
This commit is contained in:
Matthew Flatt 2010-11-06 21:22:46 -06:00
parent 9b7e09f4b4
commit 53febbeb6c
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/mred/private/wx/cocoa/canvas.rkt
View File

@ -561,7 +561,7 @@
0.0)))]
[(scroller)
(if scroller
(->long (round (* (tell #:type _double (scroller-cocoa scroller) floatValue)
(->long (round (* (tell #:type _float (scroller-cocoa scroller) floatValue)
(scroller-range scroller))))
0)]))