[cells-gtk-cvs] CVS update: root/gtk-ffi/gtk-list-tree.lisp
Peter Denno
pdenno at common-lisp.net
Sat Feb 26 22:38:50 UTC 2005
Update of /project/cells-gtk/cvsroot/root/gtk-ffi
In directory common-lisp.net:/tmp/cvs-serv8415/gtk-ffi
Modified Files:
gtk-list-tree.lisp
Log Message:
Declaration of foreign functions for tree store path manipulation.
Date: Sat Feb 26 23:38:50 2005
Author: pdenno
Index: root/gtk-ffi/gtk-list-tree.lisp
diff -u root/gtk-ffi/gtk-list-tree.lisp:1.1 root/gtk-ffi/gtk-list-tree.lisp:1.2
--- root/gtk-ffi/gtk-list-tree.lisp:1.1 Mon Dec 6 21:03:00 2004
+++ root/gtk-ffi/gtk-list-tree.lisp Sat Feb 26 23:38:50 2005
@@ -61,6 +61,24 @@
int)
(gtk-tree-view-get-selection ((tree-view c-pointer))
c-pointer)
+ (gtk-tree-view-get-path-at-pos ((tree-view c-pointer)
+ (x int)
+ (y int)
+ (path c-pointer)
+ (column c-pointer)
+ (cell-x c-pointer)
+ (cell-y c-pointer))
+ boolean)
+ (gtk-tree-view-widget-to-tree-coords ((tree-view c-pointer)
+ (wx int)
+ (wy int)
+ (tx c-pointer)
+ (ty c-pointer)))
+ (gtk-tree-view-tree-to-widget-coords ((tree-view c-pointer)
+ (wx int)
+ (wy int)
+ (tx c-pointer)
+ (ty c-pointer)))
;;tree-model
(gtk-tree-model-get ((tree-model c-pointer)
@@ -76,6 +94,8 @@
;;tree-path
(gtk-tree-path-new-from-string ((path c-string))
c-pointer)
+ (gtk-tree-path-to-string ((path c-pointer))
+ c-string)
(gtk-tree-path-free ((path c-pointer)))
;;tree-selection
@@ -146,4 +166,7 @@
(gtk-cell-renderer-toggle-new ()
c-pointer)
(gtk-cell-renderer-pixbuf-new ()
- c-pointer))
\ No newline at end of file
+ c-pointer)
+ (gtk-cell-renderer-set-fixed-size ((cell c-pointer)
+ (width int)
+ (height int))))
More information about the Cells-gtk-cvs
mailing list