From 13b1d0733a8e686e7b17bf33cfff9f43bcfd5604 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sun, 26 Jan 2014 18:35:30 -0700 Subject: [PATCH] racket/gui cocoa: fix atomicity of refresh 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. --- pkgs/gui-pkgs/gui-lib/mred/private/wx/cocoa/panel.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/pkgs/gui-pkgs/gui-lib/mred/private/wx/cocoa/panel.rkt b/pkgs/gui-pkgs/gui-lib/mred/private/wx/cocoa/panel.rkt index 00a91c12bd..bdb3043c7b 100644 --- a/pkgs/gui-pkgs/gui-lib/mred/private/wx/cocoa/panel.rkt +++ b/pkgs/gui-pkgs/gui-lib/mred/private/wx/cocoa/panel.rkt @@ -22,8 +22,8 @@ (define-objc-class FrameView NSView [] - (- #:async-apply (box (void)) - _void (drawRect: [_NSRect r]) + (-a #:async-apply (box (void)) + _void (drawRect: [_NSRect r]) (let ([ctx (tell NSGraphicsContext currentContext)]) (tellv ctx saveGraphicsState) (let ([cg (tell #:type _CGContextRef ctx graphicsPort)]