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

support older Cairo and GDK versions

Browse Source 
original commit: b971f9f4ebe0cdad9b3e4e9d5bf5d4547a8c14a4
This commit is contained in:
Matthew Flatt 2014-02-28 08:56:28 -07:00
parent 0bc6e6d6d2
commit 76cf6ffe1f
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkgs/gui-pkgs/gui-lib/mred/private/wx/gtk/window.rkt
View File

@ -786,7 +786,9 @@
(define-gdk gdk_window_thaw_updates (_fun _GdkWindow -> _void)) (define-gdk gdk_window_thaw_updates (_fun _GdkWindow -> _void))
(define-gdk gdk_window_invalidate_rect (_fun _GdkWindow _pointer _gboolean -> _void)) (define-gdk gdk_window_invalidate_rect (_fun _GdkWindow _pointer _gboolean -> _void))
(define-gdk gdk_window_process_all_updates (_fun -> _void)) (define-gdk gdk_window_process_all_updates (_fun -> _void))
(define-gdk gdk_window_ensure_native (_fun _GdkWindow -> _gboolean)) (define-gdk gdk_window_ensure_native (_fun _GdkWindow -> _gboolean)
;; Requires 2.18
#:fail (lambda () (lambda (win) #f)))
(define (win-box-valid? win-box) (define (win-box-valid? win-box)
(mcar win-box)) (mcar win-box))