projects
/
cl-gtk2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Use new GType designators
[cl-gtk2.git]
/
gtk
/
gtk.cell-renderer.lisp
diff --git
a/gtk/gtk.cell-renderer.lisp
b/gtk/gtk.cell-renderer.lisp
index
4de7f00
..
25dda52
100644
(file)
--- a/
gtk/gtk.cell-renderer.lisp
+++ b/
gtk/gtk.cell-renderer.lisp
@@
-15,9
+15,9
@@
; TODO: gtk_cell_renderer_stop_editing
(defcfun gtk-cell-renderer-get-fixed-size :void
; TODO: gtk_cell_renderer_stop_editing
(defcfun gtk-cell-renderer-get-fixed-size :void
- (cell g-object)
- (width :pointer)
- (height :pointer))
+ (cell (g-object cell-renderer))
+ (width (:pointer :int))
+ (height (:pointer :int)))
(defun cell-renderer-get-fixed-size (cell)
(with-foreign-objects ((width :int) (height :int))
(defun cell-renderer-get-fixed-size (cell)
(with-foreign-objects ((width :int) (height :int))
@@
-27,14
+27,11
@@
(export 'cell-renderer-get-fixed-size)
(export 'cell-renderer-get-fixed-size)
-(defcfun gtk-cell-renderer-set-fixed-size :void
- (cell g-object)
+(defcfun (cell-renderer-set-fixed-size "gtk_cell_renderer_set_fixed_size") :void
+ (cell (g-object cell-renderer))
(width :int)
(height :int))
(width :int)
(height :int))
-(defun cell-renderer-set-fixed-size (cell width height)
- (gtk-cell-renderer-set-fixed-size cell width height))
-
(export 'cell-renderer-set-fixed-size)
; TODO: GtkCellRendererAccel
(export 'cell-renderer-set-fixed-size)
; TODO: GtkCellRendererAccel