projects
/
cl-gtk2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Initialize types GdkGLPixmap, GdkGLWindow.
[cl-gtk2.git]
/
gtk-glext
/
gtkglext.lisp
diff --git
a/gtk-glext/gtkglext.lisp
b/gtk-glext/gtkglext.lisp
index
f6b8434
..
962f209
100644
(file)
--- a/
gtk-glext/gtkglext.lisp
+++ b/
gtk-glext/gtkglext.lisp
@@
-227,7
+227,7
@@
;; OpenGL Pixmap
;; OpenGL Pixmap
-(define-g-object-class "GdkGLPixmap" gdk-gl-pixmap (:superclass drawable :export t :interfaces ("GdkGLDrawable"))
+(define-g-object-class "GdkGLPixmap" gdk-gl-pixmap (:superclass drawable :export t :interfaces ("GdkGLDrawable") :type-initializer "gdk_gl_pixmap_get_type")
())
(defcfun gdk-gl-pixmap-new :pointer
())
(defcfun gdk-gl-pixmap-new :pointer
@@
-269,8
+269,8
@@
;; OpenGL Window
;; OpenGL Window
-(define-g-object-class "GdkGLWindow" gdk-gl-window (:superclass drawable :export t :interfaces ("GdkGLDrawable"))
- ((:cffi window gdk-gl-window-gdk-window (g-object gdk-window) "gdk_gl_window_get_type" nil)))
+(define-g-object-class "GdkGLWindow" gdk-gl-window (:superclass drawable :export t :interfaces ("GdkGLDrawable") :type-initializer "gdk_gl_window_get_type")
+ ())
(defcfun gdk-gl-window-new :pointer
(gl-config (g-object gdk-gl-config))
(defcfun gdk-gl-window-new :pointer
(gl-config (g-object gdk-gl-config))