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

racket/gui cocoa: fix atomicity of refresh

Browse Source 
Atomicity was accidentally turned off in ca0418d47d.

For whatever reason, this bug seems to cause lots of trouble with
32-bit Mac OS X and not as much for 64-bit Mac OS X.
This commit is contained in:
Matthew Flatt 2014-01-26 18:35:30 -07:00
parent bc018585ac
commit 13b1d0733a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkgs/gui-pkgs/gui-lib/mred/private/wx/cocoa/panel.rkt
View File

@ -22,8 +22,8 @@
(define-objc-class FrameView NSView (define-objc-class FrameView NSView
[] []
(- #:async-apply (box (void)) (-a #:async-apply (box (void))
_void (drawRect: [_NSRect r]) _void (drawRect: [_NSRect r])
(let ([ctx (tell NSGraphicsContext currentContext)]) (let ([ctx (tell NSGraphicsContext currentContext)])
(tellv ctx saveGraphicsState) (tellv ctx saveGraphicsState)
(let ([cg (tell #:type _CGContextRef ctx graphicsPort)] (let ([cg (tell #:type _CGContextRef ctx graphicsPort)]