[rep-gtk] GtkListStore basics

[Christopher Bratusek <chrisb src gnome org>]

commit d517e54e8e9a9c30615ee07299f82f077bab56bd
Author: Christopher Roy Bratusek <chris nanolx org>
Date:   Thu Jan 7 15:35:26 2010 +0100

    GtkListStore basics

 ChangeLog               |    5 +++++
 examples/gtktreeview.jl |    4 +++-
 gtktree.defs            |   19 +++++++++++++++++++
 3 files changed, 27 insertions(+), 1 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index 7f75231..f1a7264 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -12,6 +12,11 @@
 	gtk_tree_sortable_set_default_sort_func
 	gtk_tree_sortable_has_default_sort_func
 	== GtkTreeSortable 2.12 API complete ==
+	****************** gtkliststore.h ***************
+	GtkListStore (object)
+	gtk_list_store_new
+	gtk_list_store_newv
+	gtk_list_store_set_column_types
 
 2010-01-06  Christopher Bratusek <zanghar freenet de>
 	* gtktree.defs:
diff --git a/examples/gtktreeview.jl b/examples/gtktreeview.jl
index 2237a31..b60f5f1 100755
--- a/examples/gtktreeview.jl
+++ b/examples/gtktreeview.jl
@@ -12,7 +12,9 @@ exec rep --batch "$0" "$@"
 
   ;; Widgets
   (define MainWindow (gtk-window-new 'toplevel))
-  (define TreeView (gtk-tree-view-new))
+ ; (define ListStore (gtk-list-store-newv 1 G_TYPE_STRING))
+ ; (define TreeView (gtk-tree-view-new-with-model ListStore))
+   (define TreeView (gtk-tree-view-new))
 
   ;; Windowborder
   (gtk-container-set-border-width MainWindow 10)
diff --git a/gtktree.defs b/gtktree.defs
index 5084d10..0f6daeb 100644
--- a/gtktree.defs
+++ b/gtktree.defs
@@ -772,6 +772,25 @@
   bool
   ((GtkTreeSortable sortable)))
 
+;; GtkListStore
+
+(define-object GtkListStore (GObject))
+
+(define-func gtk_list_store_new
+  GtkListStore
+  ((int columns)))
+
+(define-func gtk_list_store_newv
+  GtkListStore
+  ((int columns)
+   ((tvec type in) type)))
+
+(define-func gtk_list_store_set_column_types
+  none
+  ((GtkListStore store)
+   (int columns)
+   ((tvec type in) type)))
+
 ;; GtkTreeView [Base]
 
 (define-object GtkTreeView (GtkContainer))