win32: sync display on event

original commit: b2444e210506a1c1b1e2e50d4640f6fa79180784
This commit is contained in:
Matthew Flatt 2010-12-10 18:51:53 -07:00
parent 77b082f08f
commit 313fe0d34c

View File

@ -650,11 +650,11 @@
(define/private (pre-event-refresh key?) (define/private (pre-event-refresh key?)
;; Since we break the connection between the ;; Since we break the connection between the
;; Cocoa queue and event handling, we ;; Win32 queue and event handling, we
;; re-sync the display in case a stream of ;; re-sync the display in case a stream of
;; events (e.g., key repeat) have a corresponding ;; events (e.g., key repeat) have a corresponding
;; stream of screen updates. ;; stream of screen updates.
(void)) (flush-display))
(define/public (get-dialog-level) (send parent get-dialog-level))) (define/public (get-dialog-level) (send parent get-dialog-level)))