From fa85ea058a2d5930698c96d00860f17327dc2eb8 Mon Sep 17 00:00:00 2001 From: Dmitry Kalyanov Date: Sat, 31 Oct 2009 22:59:01 +0300 Subject: [PATCH] Fix gtkglext:with-gl-context macro by wrapping body in progn inside unwind-protect --- gtk-glext/gtkglext.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/gtk-glext/gtkglext.lisp b/gtk-glext/gtkglext.lisp index 682d5d4..f6b8434 100644 --- a/gtk-glext/gtkglext.lisp +++ b/gtk-glext/gtkglext.lisp @@ -453,7 +453,8 @@ (,drawable (gtk-widget-gl-window ,w))) (if (and ,context ,drawable (gdk-gl-drawable-gl-begin ,drawable ,context)) (unwind-protect - ,@body + (progn + ,@body) (progn (when ,swap-p (when (gdk-gl-drawable-is-double-buffered ,drawable) -- 1.7.10.4