From bd567cdd45aab7dc545170e9cbc66fc8972ac177 Mon Sep 17 00:00:00 2001 From: Mike Kestner Date: Thu, 11 Oct 2001 10:14:14 +0000 Subject: [PATCH] 2001-10-11 Mike Kestner * makefile : Add the codegen directory * codegen/defs-parse.pl : Moved here from topdir and updated to parse the new defs format for enums and flags. * codegen/gtk-types.defs : Borrowed from pygtk. * codegen/makefile : new * gtk/makefile : remove generation step. * gtk/gtk.defs : removed, now in codegen dir. svn path=/trunk/gtk-sharp/; revision=1139 --- ChangeLog | 10 + codegen/defs-parse.pl | 77 ++ codegen/gtk-types.defs | 1968 ++++++++++++++++++++++++++++++++++++ codegen/makefile | 10 + defs-parse.pl | 54 - gtk/Widget.cs | 8 +- gtk/gtk.defs | 2153 ---------------------------------------- gtk/makefile | 4 +- makefile | 2 +- sample/ButtonApp.cs | 2 +- sample/HelloWorld.cs | 2 +- 11 files changed, 2073 insertions(+), 2217 deletions(-) create mode 100755 codegen/defs-parse.pl create mode 100644 codegen/gtk-types.defs create mode 100755 codegen/makefile delete mode 100755 defs-parse.pl delete mode 100644 gtk/gtk.defs diff --git a/ChangeLog b/ChangeLog index a2a6e1505..85e379f56 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,13 @@ +2001-10-11 Mike Kestner + + * makefile : Add the codegen directory + * codegen/defs-parse.pl : Moved here from topdir and updated to parse + the new defs format for enums and flags. + * codegen/gtk-types.defs : Borrowed from pygtk. + * codegen/makefile : new + * gtk/makefile : remove generation step. + * gtk/gtk.defs : removed, now in codegen dir. + 2001-10-07 Mike Kestner * gtk/Button.cs : Some nomenclature changes. s/EmitClicked/Click, etc. diff --git a/codegen/defs-parse.pl b/codegen/defs-parse.pl new file mode 100755 index 000000000..32e83a75b --- /dev/null +++ b/codegen/defs-parse.pl @@ -0,0 +1,77 @@ +#!/usr/bin/perl + +while ($line = ) { + + if ($line =~ /^\(define-(enum|flags)/) { + parse_enum_flags (); + } +} + +sub parse_enum_flags () +{ + $line =~ /^\(define-(enum|flags) (\w+)/; + $type = $1; + $typename = $2; + + $line = ; + $line =~ /\(in-module "(\w+)"/; + $namespace = $1; + + do { $line = ; } until ($line =~ /\(values/); + + @enums = (); + while ($line = ) { + last if ($line =~ /^\s*\)/); + + if ($line =~ /\((.+)\)/) { + ($name, $dontcare, $val) = split (/ /, $1); + $name =~ s/\"//g; + $name =~ s/^([a-z])/\u\1/; + $name =~ s/\-([a-z])/\u\1/g; + $name =~ s/\-(\d)/\1/g; + @enums = (@enums, "$name:$val"); + } else { + die $line; + } + } + + $dir = lc ($namespace); + if (! -e "../$dir") { + `mkdir ../$dir`; + } + + open (OUTFILE, ">../$dir/$typename.cs") || die "can't open file"; + + print OUTFILE "// Generated file: Do not modify\n\n"; + print OUTFILE "namespace $namespace {\n\n"; + print OUTFILE "\t/// $typename Enumeration \n"; + print OUTFILE "\t/// \n\t///\t Valid values:\n"; + foreach $enum (@enums) { + ($name) = split (/:/, $enum); + print OUTFILE "\t///\t\t$name\n" + } + print OUTFILE "\t/// \n\n"; + + if ($type eq "flags") { + print OUTFILE "\tusing System;\n\n\t[Flags]\n"; + } + print OUTFILE "\tpublic enum $typename {\n"; + + $flag = 1; + foreach $enum (@enums) { + ($name, $val) = split (/:/, $enum); + if ($val) { + print OUTFILE "\t\t$name = $val,\n"; + } elsif ($type eq "enum") { + print OUTFILE "\t\t$name,\n"; + } else { + print OUTFILE "\t\t$name = $flag,\n"; + $flag *= 2; + } + } + + print OUTFILE "\t}\n\n}\n"; + + close (OUTFILE); +} + diff --git a/codegen/gtk-types.defs b/codegen/gtk-types.defs new file mode 100644 index 000000000..5a803b239 --- /dev/null +++ b/codegen/gtk-types.defs @@ -0,0 +1,1968 @@ +;; -*- scheme -*- + +; object definitions ... + +(define-object AccelGroup + (in-module "Gtk") + (parent "GObject") + (c-name "GtkAccelGroup") + (gtype-id "GTK_TYPE_ACCEL_GROUP") +) + +(define-object IconFactory + (in-module "Gtk") + (parent "GObject") + (c-name "GtkIconFactory") + (gtype-id "GTK_TYPE_ICON_FACTORY") +) + +(define-interface Editable + (in-module "Gtk") + (c-name "GtkEditable") + (gtype-id "GTK_TYPE_EDITABLE") +) + +(define-object Object + (in-module "Gtk") + (parent "GObject") + (c-name "GtkObject") + (gtype-id "GTK_TYPE_OBJECT") +) + +(define-object ItemFactory + (in-module "Gtk") + (parent "GtkObject") + (c-name "GtkItemFactory") + (gtype-id "GTK_TYPE_ITEM_FACTORY") +) + +(define-object IMContext + (in-module "Gtk") + (parent "GtkObject") + (c-name "GtkIMContext") + (gtype-id "GTK_TYPE_IM_CONTEXT") +) + +(define-object IMMulticontext + (in-module "Gtk") + (parent "GtkIMContext") + (c-name "GtkIMMulticontext") + (gtype-id "GTK_TYPE_IM_MULTICONTEXT") +) + +(define-object CellRenderer + (in-module "Gtk") + (parent "GtkObject") + (c-name "GtkCellRenderer") + (gtype-id "GTK_TYPE_CELL_RENDERER") +) + +(define-object CellRendererToggle + (in-module "Gtk") + (parent "GtkCellRenderer") + (c-name "GtkCellRendererToggle") + (gtype-id "GTK_TYPE_CELL_RENDERER_TOGGLE") +) + +(define-object CellRendererText + (in-module "Gtk") + (parent "GtkCellRenderer") + (c-name "GtkCellRendererText") + (gtype-id "GTK_TYPE_CELL_RENDERER_TEXT") +) + +(define-object CellRendererPixbuf + (in-module "Gtk") + (parent "GtkCellRenderer") + (c-name "GtkCellRendererPixbuf") + (gtype-id "GTK_TYPE_CELL_RENDERER_PIXBUF") +) + +(define-object Adjustment + (in-module "Gtk") + (parent "GtkObject") + (c-name "GtkAdjustment") + (gtype-id "GTK_TYPE_ADJUSTMENT") + (fields + '("gfloat" "value") + '("gfloat" "lower") + '("gfloat" "upper") + '("gfloat" "step_increment") + '("gfloat" "page_increment") + '("gfloat" "page_size") + ) +) + +(define-object RcStyle + (in-module "Gtk") + (parent "GObject") + (c-name "GtkRcStyle") + (gtype-id "GTK_TYPE_RC_STYLE") +) + +(define-object Settings + (in-module "Gtk") + (parent "GObject") + (c-name "GtkSettings") + (gtype-id "GTK_TYPE_SETTINGS") +) + +(define-object SizeGroup + (in-module "Gtk") + (parent "GObject") + (c-name "GtkSizeGroup") + (gtype-id "GTK_TYPE_SIZE_GROUP") +) + +(define-object Style + (in-module "Gtk") + (parent "GObject") + (c-name "GtkStyle") + (fields + '("GdkColor" "white") + '("GdkColor" "black") + ) + (gtype-id "GTK_TYPE_STYLE") +) + +(define-object TextBuffer + (in-module "Gtk") + (parent "GObject") + (c-name "GtkTextBuffer") + (gtype-id "GTK_TYPE_TEXT_BUFFER") + (fields + '("GtkTextTagTable*" "tag_table") + ) +) + +(define-object TextChildAnchor + (in-module "Gtk") + (parent "GObject") + (c-name "GtkTextChildAnchor") + (gtype-id "GTK_TYPE_TEXT_CHILD_ANCHOR") +) + +(define-object TextMark + (in-module "Gtk") + (parent "GObject") + (c-name "GtkTextMark") + (gtype-id "GTK_TYPE_TEXT_MARK") +) + +(define-object TextTag + (in-module "Gtk") + (parent "GObject") + (c-name "GtkTextTag") + (gtype-id "GTK_TYPE_TEXT_TAG") +) + +(define-object TextTagTable + (in-module "Gtk") + (parent "GObject") + (c-name "GtkTextTagTable") + (gtype-id "GTK_TYPE_TEXT_TAG_TABLE") +) + +(define-object Tooltips + (in-module "Gtk") + (parent "GtkObject") + (c-name "GtkTooltips") + (gtype-id "GTK_TYPE_TOOLTIPS") +) + +(define-interface TreeModel + (in-module "Gtk") + (c-name "GtkTreeModel") + (gtype-id "GTK_TYPE_TREE_MODEL") +) + +(define-interface TreeDragSource + (in-module "Gtk") + (c-name "GtkTreeDragSource") + (gtype-id "GTK_TYPE_TREE_DRAG_SOURCE") +) + +(define-interface TreeDragDest + (in-module "Gtk") + (c-name "GtkTreeDragDest") + (gtype-id "GTK_TYPE_TREE_DRAG_DEST") +) + +(define-interface TreeSortable + (in-module "Gtk") + (c-name "GtkTreeSortable") + (gtype-id "GTK_TYPE_TREE_SORTABLE") +) + +(define-object ListStore + (in-module "Gtk") + (parent "GObject") + (c-name "GtkListStore") + (gtype-id "GTK_TYPE_LIST_STORE") + (implements "GtkTreeModel") + (implements "GtkTreeDragSource") + (implements "GtkTreeDragDest") + (implements "GtkTreeSortable") +) + +(define-object TreeModelSort + (in-module "Gtk") + (parent "GObject") + (c-name "GtkTreeModelSort") + (gtype-id "GTK_TYPE_TREE_MODEL_SORT") + (implements "GtkTreeModel") +) + +(define-object TreeSelection + (in-module "Gtk") + (parent "GtkObject") + (c-name "GtkTreeSelection") + (gtype-id "GTK_TYPE_TREE_SELECTION") +) + +(define-object TreeStore + (in-module "Gtk") + (parent "GObject") + (c-name "GtkTreeStore") + (gtype-id "GTK_TYPE_TREE_STORE") + (implements "GtkTreeModel") + (implements "GtkTreeDragSource") + (implements "GtkTreeDragDest") + (implements "GtkTreeSortable") +) + +(define-object TreeViewColumn + (in-module "Gtk") + (parent "GtkObject") + (c-name "GtkTreeViewColumn") + (gtype-id "GTK_TYPE_TREE_VIEW_COLUMN") +) + +(define-object Widget + (in-module "Gtk") + (parent "GtkObject") + (c-name "GtkWidget") + (gtype-id "GTK_TYPE_WIDGET") + (fields + '("GtkStyle*" "style") + '("GdkWindow*" "window") + '("GtkWidget*" "parent") + ) +) + +(define-object Separator + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkSeparator") + (gtype-id "GTK_TYPE_SEPARATOR") +) + +(define-object VSeparator + (in-module "Gtk") + (parent "GtkSeparator") + (c-name "GtkVSeparator") + (gtype-id "GTK_TYPE_VSEPARATOR") +) + +(define-object HSeparator + (in-module "Gtk") + (parent "GtkSeparator") + (c-name "GtkHSeparator") + (gtype-id "GTK_TYPE_HSEPARATOR") +) + +(define-object Ruler + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkRuler") + (gtype-id "GTK_TYPE_RULER") +) + +(define-object VRuler + (in-module "Gtk") + (parent "GtkRuler") + (c-name "GtkVRuler") + (gtype-id "GTK_TYPE_VRULER") +) + +(define-object HRuler + (in-module "Gtk") + (parent "GtkRuler") + (c-name "GtkHRuler") + (gtype-id "GTK_TYPE_HRULER") +) + +(define-object Range + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkRange") + (gtype-id "GTK_TYPE_RANGE") +) + +(define-object Scrollbar + (in-module "Gtk") + (parent "GtkRange") + (c-name "GtkScrollbar") + (gtype-id "GTK_TYPE_SCROLLBAR") +) + +(define-object VScrollbar + (in-module "Gtk") + (parent "GtkScrollbar") + (c-name "GtkVScrollbar") + (gtype-id "GTK_TYPE_VSCROLLBAR") +) + +(define-object HScrollbar + (in-module "Gtk") + (parent "GtkScrollbar") + (c-name "GtkHScrollbar") + (gtype-id "GTK_TYPE_HSCROLLBAR") +) + +(define-object Scale + (in-module "Gtk") + (parent "GtkRange") + (c-name "GtkScale") + (gtype-id "GTK_TYPE_SCALE") +) + +(define-object VScale + (in-module "Gtk") + (parent "GtkScale") + (c-name "GtkVScale") + (gtype-id "GTK_TYPE_VSCALE") +) + +(define-object HScale + (in-module "Gtk") + (parent "GtkScale") + (c-name "GtkHScale") + (gtype-id "GTK_TYPE_HSCALE") +) + +(define-object Progress + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkProgress") + (gtype-id "GTK_TYPE_PROGRESS") +) + +(define-object ProgressBar + (in-module "Gtk") + (parent "GtkProgress") + (c-name "GtkProgressBar") + (gtype-id "GTK_TYPE_PROGRESS_BAR") +) + +(define-object Preview + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkPreview") + (gtype-id "GTK_TYPE_PREVIEW") +) + +(define-object OldEditable + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkOldEditable") + (gtype-id "GTK_TYPE_OLD_EDITABLE") + (implements "GtkEditable") +) + +(define-object Misc + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkMisc") + (gtype-id "GTK_TYPE_MISC") +) + +(define-object Pixmap + (in-module "Gtk") + (parent "GtkMisc") + (c-name "GtkPixmap") + (gtype-id "GTK_TYPE_PIXMAP") +) + +(define-object Arrow + (in-module "Gtk") + (parent "GtkMisc") + (c-name "GtkArrow") + (gtype-id "GTK_TYPE_ARROW") +) + +(define-object Image + (in-module "Gtk") + (parent "GtkMisc") + (c-name "GtkImage") + (gtype-id "GTK_TYPE_IMAGE") +) + +(define-object Label + (in-module "Gtk") + (parent "GtkMisc") + (c-name "GtkLabel") + (gtype-id "GTK_TYPE_LABEL") +) + +(define-object AccelLabel + (in-module "Gtk") + (parent "GtkLabel") + (c-name "GtkAccelLabel") + (gtype-id "GTK_TYPE_ACCEL_LABEL") +) + +(define-object Invisible + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkInvisible") + (gtype-id "GTK_TYPE_INVISIBLE") +) + +(define-object Entry + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkEntry") + (gtype-id "GTK_TYPE_ENTRY") + (implements "GtkEditable") +) + +(define-object SpinButton + (in-module "Gtk") + (parent "GtkEntry") + (c-name "GtkSpinButton") + (gtype-id "GTK_TYPE_SPIN_BUTTON") +) + +(define-object DrawingArea + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkDrawingArea") + (gtype-id "GTK_TYPE_DRAWING_AREA") +) + +(define-object Curve + (in-module "Gtk") + (parent "GtkDrawingArea") + (c-name "GtkCurve") + (gtype-id "GTK_TYPE_CURVE") +) + +(define-object Container + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkContainer") + (gtype-id "GTK_TYPE_CONTAINER") +) + +(define-object TreeView + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkTreeView") + (gtype-id "GTK_TYPE_TREE_VIEW") +) + +(define-object Toolbar + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkToolbar") + (gtype-id "GTK_TYPE_TOOLBAR") +) + +(define-object TextView + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkTextView") + (gtype-id "GTK_TYPE_TEXT_VIEW") +) + +(define-object Table + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkTable") + (gtype-id "GTK_TYPE_TABLE") +) + +(define-object Socket + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkSocket") + (gtype-id "GTK_TYPE_SOCKET") +) + +(define-object Paned + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkPaned") + (gtype-id "GTK_TYPE_PANED") +) + +(define-object VPaned + (in-module "Gtk") + (parent "GtkPaned") + (c-name "GtkVPaned") + (gtype-id "GTK_TYPE_VPANED") +) + +(define-object HPaned + (in-module "Gtk") + (parent "GtkPaned") + (c-name "GtkHPaned") + (gtype-id "GTK_TYPE_HPANED") +) + +(define-object Notebook + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkNotebook") + (gtype-id "GTK_TYPE_NOTEBOOK") + (fields + '("GtkPositionType" "tab_pos") + ) +) + +(define-object MenuShell + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkMenuShell") + (gtype-id "GTK_TYPE_MENU_SHELL") +) + +(define-object Menu + (in-module "Gtk") + (parent "GtkMenuShell") + (c-name "GtkMenu") + (gtype-id "GTK_TYPE_MENU") +) + +(define-object MenuBar + (in-module "Gtk") + (parent "GtkMenuShell") + (c-name "GtkMenuBar") + (gtype-id "GTK_TYPE_MENU_BAR") +) + +(define-object List + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkList") + (gtype-id "GTK_TYPE_LIST") + (fields + '("GList*" "selection") + ) +) + +(define-object Layout + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkLayout") + (gtype-id "GTK_TYPE_LAYOUT") +) + +(define-object Fixed + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkFixed") + (gtype-id "GTK_TYPE_FIXED") +) + +(define-object Bin + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkBin") + (gtype-id "GTK_TYPE_BIN") + (fields + '("GtkWidget*" "child") + ) +) + +(define-object Viewport + (in-module "Gtk") + (parent "GtkBin") + (c-name "GtkViewport") + (gtype-id "GTK_TYPE_VIEWPORT") +) + +(define-object ScrolledWindow + (in-module "Gtk") + (parent "GtkBin") + (c-name "GtkScrolledWindow") + (gtype-id "GTK_TYPE_SCROLLED_WINDOW") +) + +(define-object Item + (in-module "Gtk") + (parent "GtkBin") + (c-name "GtkItem") + (gtype-id "GTK_TYPE_ITEM") +) + +(define-object MenuItem + (in-module "Gtk") + (parent "GtkItem") + (c-name "GtkMenuItem") + (gtype-id "GTK_TYPE_MENU_ITEM") +) + +(define-object TearoffMenuItem + (in-module "Gtk") + (parent "GtkMenuItem") + (c-name "GtkTearoffMenuItem") + (gtype-id "GTK_TYPE_TEAROFF_MENU_ITEM") +) + +(define-object SeparatorMenuItem + (in-module "Gtk") + (parent "GtkMenuItem") + (c-name "GtkSeparatorMenuItem") + (gtype-id "GTK_TYPE_SEPARATOR_MENU_ITEM") +) + +(define-object CheckMenuItem + (in-module "Gtk") + (parent "GtkMenuItem") + (c-name "GtkCheckMenuItem") + (gtype-id "GTK_TYPE_CHECK_MENU_ITEM") + (fields + '("gboolean" "active") + ) +) + +(define-object RadioMenuItem + (in-module "Gtk") + (parent "GtkCheckMenuItem") + (c-name "GtkRadioMenuItem") + (gtype-id "GTK_TYPE_RADIO_MENU_ITEM") +) + +(define-object ImageMenuItem + (in-module "Gtk") + (parent "GtkMenuItem") + (c-name "GtkImageMenuItem") + (gtype-id "GTK_TYPE_IMAGE_MENU_ITEM") +) + +(define-object ListItem + (in-module "Gtk") + (parent "GtkItem") + (c-name "GtkListItem") + (gtype-id "GTK_TYPE_LIST_ITEM") +) + +(define-object HandleBox + (in-module "Gtk") + (parent "GtkBin") + (c-name "GtkHandleBox") + (gtype-id "GTK_TYPE_HANDLE_BOX") +) + +(define-object Frame + (in-module "Gtk") + (parent "GtkBin") + (c-name "GtkFrame") + (gtype-id "GTK_TYPE_FRAME") +) + +(define-object AspectFrame + (in-module "Gtk") + (parent "GtkFrame") + (c-name "GtkAspectFrame") + (gtype-id "GTK_TYPE_ASPECT_FRAME") +) + +(define-object EventBox + (in-module "Gtk") + (parent "GtkBin") + (c-name "GtkEventBox") + (gtype-id "GTK_TYPE_EVENT_BOX") +) + +(define-object Alignment + (in-module "Gtk") + (parent "GtkBin") + (c-name "GtkAlignment") + (gtype-id "GTK_TYPE_ALIGNMENT") +) + +(define-object Button + (in-module "Gtk") + (parent "GtkBin") + (c-name "GtkButton") + (gtype-id "GTK_TYPE_BUTTON") +) + +(define-object ToggleButton + (in-module "Gtk") + (parent "GtkButton") + (c-name "GtkToggleButton") + (gtype-id "GTK_TYPE_TOGGLE_BUTTON") + (fields + '("gboolean" "draw_indicator") + ) +) + +(define-object CheckButton + (in-module "Gtk") + (parent "GtkToggleButton") + (c-name "GtkCheckButton") + (gtype-id "GTK_TYPE_CHECK_BUTTON") +) + +(define-object RadioButton + (in-module "Gtk") + (parent "GtkCheckButton") + (c-name "GtkRadioButton") + (gtype-id "GTK_TYPE_RADIO_BUTTON") +) + +(define-object OptionMenu + (in-module "Gtk") + (parent "GtkButton") + (c-name "GtkOptionMenu") + (gtype-id "GTK_TYPE_OPTION_MENU") +) + +(define-object Box + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkBox") + (gtype-id "GTK_TYPE_BOX") +) + +(define-object VBox + (in-module "Gtk") + (parent "GtkBox") + (c-name "GtkVBox") + (gtype-id "GTK_TYPE_VBOX") +) + +(define-object ColorSelection + (in-module "Gtk") + (parent "GtkVBox") + (c-name "GtkColorSelection") + (gtype-id "GTK_TYPE_COLOR_SELECTION") +) + +(define-object FontSelection + (in-module "Gtk") + (parent "GtkVBox") + (c-name "GtkFontSelection") + (gtype-id "GTK_TYPE_FONT_SELECTION") +) + +(define-object GammaCurve + (in-module "Gtk") + (parent "GtkVBox") + (c-name "GtkGammaCurve") + (gtype-id "GTK_TYPE_GAMMA_CURVE") + (fields + '("GtkWidget*" "table") + '("GtkWidget*" "curve") + '("gfloat" "gamma") + '("GtkWidget*" "gamma_dialog") + '("GtkWidget*" "gamma_text") + ) +) + +(define-object HBox + (in-module "Gtk") + (parent "GtkBox") + (c-name "GtkHBox") + (gtype-id "GTK_TYPE_HBOX") +) + +(define-object Statusbar + (in-module "Gtk") + (parent "GtkHBox") + (c-name "GtkStatusbar") + (gtype-id "GTK_TYPE_STATUSBAR") +) + +(define-object Combo + (in-module "Gtk") + (parent "GtkHBox") + (c-name "GtkCombo") + (gtype-id "GTK_TYPE_COMBO") + (fields + '("GtkWidget*" "entry") + '("GtkWidget*" "list") + ) +) + +(define-object ButtonBox + (in-module "Gtk") + (parent "GtkBox") + (c-name "GtkButtonBox") + (gtype-id "GTK_TYPE_BUTTON_BOX") +) + +(define-object VButtonBox + (in-module "Gtk") + (parent "GtkButtonBox") + (c-name "GtkVButtonBox") + (gtype-id "GTK_TYPE_VBUTTON_BOX") +) + +(define-object HButtonBox + (in-module "Gtk") + (parent "GtkButtonBox") + (c-name "GtkHButtonBox") + (gtype-id "GTK_TYPE_HBUTTON_BOX") +) + +(define-object CList + (in-module "Gtk") + (parent "GtkContainer") + (c-name "GtkCList") + (gtype-id "GTK_TYPE_CLIST") + (fields + '("GList*" "selection") + '("gint" "focus_row") + '("gint" "rows") + '("gint" "columns") + ) +) + +(define-object CTree + (in-module "Gtk") + (parent "GtkCList") + (c-name "GtkCTree") + (gtype-id "GTK_TYPE_CTREE") + (fields + '("GList*" "selection") + ) +) + +(define-object Calendar + (in-module "Gtk") + (parent "GtkWidget") + (c-name "GtkCalendar") + (gtype-id "GTK_TYPE_CALENDAR") +) + +(define-object Window + (in-module "Gtk") + (parent "GtkBin") + (c-name "GtkWindow") + (gtype-id "GTK_TYPE_WINDOW") +) + +(define-object Plug + (in-module "Gtk") + (parent "GtkWindow") + (c-name "GtkPlug") + (gtype-id "GTK_TYPE_PLUG") +) + +(define-object Dialog + (in-module "Gtk") + (parent "GtkWindow") + (c-name "GtkDialog") + (gtype-id "GTK_TYPE_DIALOG") + (fields + '("GtkWidget*" "vbox") + '("GtkWidget*" "action_area") + ) +) + +(define-object MessageDialog + (in-module "Gtk") + (parent "GtkDialog") + (c-name "GtkMessageDialog") + (gtype-id "GTK_TYPE_MESSAGE_DIALOG") +) + +(define-object InputDialog + (in-module "Gtk") + (parent "GtkDialog") + (c-name "GtkInputDialog") + (gtype-id "GTK_TYPE_INPUT_DIALOG") +) + +(define-object FontSelectionDialog + (in-module "Gtk") + (parent "GtkDialog") + (c-name "GtkFontSelectionDialog") + (gtype-id "GTK_TYPE_FONT_SELECTION_DIALOG") + (fields + '("GtkWidget*" "fontsel") + '("GtkWidget*" "main_vbox") + '("GtkWidget*" "action_area") + '("GtkWidget*" "ok_button") + '("GtkWidget*" "apply_button") + '("GtkWidget*" "cancel_button") + ) +) + +(define-object FileSelection + (in-module "Gtk") + (parent "GtkDialog") + (c-name "GtkFileSelection") + (gtype-id "GTK_TYPE_FILE_SELECTION") +) + +(define-object ColorSelectionDialog + (in-module "Gtk") + (parent "GtkDialog") + (c-name "GtkColorSelectionDialog") + (gtype-id "GTK_TYPE_COLOR_SELECTION_DIALOG") + (fields + '("GtkWidget*" "colorsel") + '("GtkWidget*" "ok_button") + '("GtkWidget*" "cancel_button") + '("GtkWidget*" "help_button") + ) +) + + +;; Boxed types ... + +(define-boxed CTreeNode + (in-module "Gtk") + (c-name "GtkCTreeNode") + (gtype-id "GTK_TYPE_CTREE_NODE") + (fields + '("GtkCTreeNode*" "parent") + '("GtkCTreeNode*" "children") + '("GtkCTreeNode*" "sibling") + '("guint16" "level") + '("guint" "is_leaf") + '("guint" "expanded") + ) +) + +(define-boxed SelectionData + (in-module "Gtk") + (c-name "GtkSelectionData") + (gtype-id "GTK_TYPE_SELECTION_DATA") + (copy-func "gtk_selection_data_copy") + (release-func "gtk_selection_data_free") + (fields + '("GdkAtom" "selection") + '("GdkAtom" "target") + '("GdkAtom" "type") + '("gint" "format") + '("guchar*" "data") + ) +) + +(define-boxed TextIter + (in-module "Gtk") + (c-name "GtkTextIter") + (gtype-id "GTK_TYPE_TEXT_ITER") + (copy-func "gtk_text_iter_copy") + (release-func "gtk_text_iter_free") +) + +(define-boxed TreeIter + (in-module "Gtk") + (c-name "GtkTreeIter") + (gtype-id "GTK_TYPE_TREE_ITER") + (copy-func "gtk_tree_iter_copy") + (release-func "gtk_tree_iter_free") +) + + +;; Enumerations and flags ... + +(define-flags AccelFlags + (in-module "Gtk") + (c-name "GtkAccelFlags") + (gtype-id "GTK_TYPE_ACCEL_FLAGS") + (values + '("visible" "GTK_ACCEL_VISIBLE") + '("signal-visible" "GTK_ACCEL_SIGNAL_VISIBLE") + '("locked" "GTK_ACCEL_LOCKED") + '("mask" "GTK_ACCEL_MASK") + ) +) + +(define-flags CalendarDisplayOptions + (in-module "Gtk") + (c-name "GtkCalendarDisplayOptions") + (gtype-id "GTK_TYPE_CALENDAR_DISPLAY_OPTIONS") + (values + '("show-heading" "GTK_CALENDAR_SHOW_HEADING") + '("show-day-names" "GTK_CALENDAR_SHOW_DAY_NAMES") + '("no-month-change" "GTK_CALENDAR_NO_MONTH_CHANGE") + '("show-week-numbers" "GTK_CALENDAR_SHOW_WEEK_NUMBERS") + '("week-start-monday" "GTK_CALENDAR_WEEK_START_MONDAY") + ) +) + +(define-flags CellRendererState + (in-module "Gtk") + (c-name "GtkCellRendererState") + (gtype-id "GTK_TYPE_CELL_RENDERER_STATE") + (values + '("selected" "GTK_CELL_RENDERER_SELECTED") + '("prelit" "GTK_CELL_RENDERER_PRELIT") + '("insensitive" "GTK_CELL_RENDERER_INSENSITIVE") + '("sorted" "GTK_CELL_RENDERER_SORTED") + ) +) + +(define-enum CellType + (in-module "Gtk") + (c-name "GtkCellType") + (gtype-id "GTK_TYPE_CELL_TYPE") + (values + '("empty" "GTK_CELL_EMPTY") + '("text" "GTK_CELL_TEXT") + '("pixmap" "GTK_CELL_PIXMAP") + '("pixtext" "GTK_CELL_PIXTEXT") + '("widget" "GTK_CELL_WIDGET") + ) +) + +(define-enum CListDragPos + (in-module "Gtk") + (c-name "GtkCListDragPos") + (gtype-id "GTK_TYPE_CLIST_DRAG_POS") + (values + '("none" "GTK_CLIST_DRAG_NONE") + '("before" "GTK_CLIST_DRAG_BEFORE") + '("into" "GTK_CLIST_DRAG_INTO") + '("after" "GTK_CLIST_DRAG_AFTER") + ) +) + +(define-flags ButtonAction + (in-module "Gtk") + (c-name "GtkButtonAction") + (gtype-id "GTK_TYPE_BUTTON_ACTION") + (values + '("ignored" "GTK_BUTTON_IGNORED") + '("selects" "GTK_BUTTON_SELECTS") + '("drags" "GTK_BUTTON_DRAGS") + '("expands" "GTK_BUTTON_EXPANDS") + ) +) + +(define-enum CTreePos + (in-module "Gtk") + (c-name "GtkCTreePos") + (gtype-id "GTK_TYPE_CTREE_POS") + (values + '("before" "GTK_CTREE_POS_BEFORE") + '("as-child" "GTK_CTREE_POS_AS_CHILD") + '("after" "GTK_CTREE_POS_AFTER") + ) +) + +(define-enum CTreeLineStyle + (in-module "Gtk") + (c-name "GtkCTreeLineStyle") + (gtype-id "GTK_TYPE_CTREE_LINE_STYLE") + (values + '("none" "GTK_CTREE_LINES_NONE") + '("solid" "GTK_CTREE_LINES_SOLID") + '("dotted" "GTK_CTREE_LINES_DOTTED") + '("tabbed" "GTK_CTREE_LINES_TABBED") + ) +) + +(define-enum CTreeExpanderStyle + (in-module "Gtk") + (c-name "GtkCTreeExpanderStyle") + (gtype-id "GTK_TYPE_CTREE_EXPANDER_STYLE") + (values + '("none" "GTK_CTREE_EXPANDER_NONE") + '("square" "GTK_CTREE_EXPANDER_SQUARE") + '("triangle" "GTK_CTREE_EXPANDER_TRIANGLE") + '("circular" "GTK_CTREE_EXPANDER_CIRCULAR") + ) +) + +(define-enum CTreeExpansionType + (in-module "Gtk") + (c-name "GtkCTreeExpansionType") + (gtype-id "GTK_TYPE_CTREE_EXPANSION_TYPE") + (values + '("expand" "GTK_CTREE_EXPANSION_EXPAND") + '("expand-recursive" "GTK_CTREE_EXPANSION_EXPAND_RECURSIVE") + '("collapse" "GTK_CTREE_EXPANSION_COLLAPSE") + '("collapse-recursive" "GTK_CTREE_EXPANSION_COLLAPSE_RECURSIVE") + '("toggle" "GTK_CTREE_EXPANSION_TOGGLE") + '("toggle-recursive" "GTK_CTREE_EXPANSION_TOGGLE_RECURSIVE") + ) +) + +(define-flags DebugFlag + (in-module "Gtk") + (c-name "GtkDebugFlag") + (gtype-id "GTK_TYPE_DEBUG_FLAG") + (values + '("misc" "GTK_DEBUG_MISC") + '("dnd" "GTK_DEBUG_DND") + '("plugsocket" "GTK_DEBUG_PLUGSOCKET") + '("text" "GTK_DEBUG_TEXT") + '("tree" "GTK_DEBUG_TREE") + '("updates" "GTK_DEBUG_UPDATES") + ) +) + +(define-enum DialogFlags + (in-module "Gtk") + (c-name "GtkDialogFlags") + (gtype-id "GTK_TYPE_DIALOG_FLAGS") + (values + '("modal" "GTK_DIALOG_MODAL") + '("destroy-with-parent" "GTK_DIALOG_DESTROY_WITH_PARENT") + '("no-separator" "GTK_DIALOG_NO_SEPARATOR") + ) +) + +(define-enum ResponseType + (in-module "Gtk") + (c-name "GtkResponseType") + (gtype-id "GTK_TYPE_RESPONSE_TYPE") + (values + '("none" "GTK_RESPONSE_NONE") + '("reject" "GTK_RESPONSE_REJECT") + '("accept" "GTK_RESPONSE_ACCEPT") + '("delete-event" "GTK_RESPONSE_DELETE_EVENT") + '("ok" "GTK_RESPONSE_OK") + '("cancel" "GTK_RESPONSE_CANCEL") + '("close" "GTK_RESPONSE_CLOSE") + '("yes" "GTK_RESPONSE_YES") + '("no" "GTK_RESPONSE_NO") + '("apply" "GTK_RESPONSE_APPLY") + '("help" "GTK_RESPONSE_HELP") + ) +) + +(define-flags DestDefaults + (in-module "Gtk") + (c-name "GtkDestDefaults") + (gtype-id "GTK_TYPE_DEST_DEFAULTS") + (values + '("motion" "GTK_DEST_DEFAULT_MOTION") + '("highlight" "GTK_DEST_DEFAULT_HIGHLIGHT") + '("drop" "GTK_DEST_DEFAULT_DROP") + '("all" "GTK_DEST_DEFAULT_ALL") + ) +) + +(define-flags TargetFlags + (in-module "Gtk") + (c-name "GtkTargetFlags") + (gtype-id "GTK_TYPE_TARGET_FLAGS") + (values + '("app" "GTK_TARGET_SAME_APP") + '("widget" "GTK_TARGET_SAME_WIDGET") + ) +) + +(define-enum AnchorType + (in-module "Gtk") + (c-name "GtkAnchorType") + (gtype-id "GTK_TYPE_ANCHOR_TYPE") + (values + '("center" "GTK_ANCHOR_CENTER") + '("north" "GTK_ANCHOR_NORTH") + '("north-west" "GTK_ANCHOR_NORTH_WEST") + '("north-east" "GTK_ANCHOR_NORTH_EAST") + '("south" "GTK_ANCHOR_SOUTH") + '("south-west" "GTK_ANCHOR_SOUTH_WEST") + '("south-east" "GTK_ANCHOR_SOUTH_EAST") + '("west" "GTK_ANCHOR_WEST") + '("east" "GTK_ANCHOR_EAST") + '("n" "GTK_ANCHOR_N") + '("nw" "GTK_ANCHOR_NW") + '("ne" "GTK_ANCHOR_NE") + '("s" "GTK_ANCHOR_S") + '("sw" "GTK_ANCHOR_SW") + '("se" "GTK_ANCHOR_SE") + '("w" "GTK_ANCHOR_W") + '("e" "GTK_ANCHOR_E") + ) +) + +(define-enum ArrowType + (in-module "Gtk") + (c-name "GtkArrowType") + (gtype-id "GTK_TYPE_ARROW_TYPE") + (values + '("up" "GTK_ARROW_UP") + '("down" "GTK_ARROW_DOWN") + '("left" "GTK_ARROW_LEFT") + '("right" "GTK_ARROW_RIGHT") + ) +) + +(define-flags AttachOptions + (in-module "Gtk") + (c-name "GtkAttachOptions") + (gtype-id "GTK_TYPE_ATTACH_OPTIONS") + (values + '("expand" "GTK_EXPAND") + '("shrink" "GTK_SHRINK") + '("fill" "GTK_FILL") + ) +) + +(define-enum ButtonBoxStyle + (in-module "Gtk") + (c-name "GtkButtonBoxStyle") + (gtype-id "GTK_TYPE_BUTTON_BOX_STYLE") + (values + '("default-style" "GTK_BUTTONBOX_DEFAULT_STYLE") + '("spread" "GTK_BUTTONBOX_SPREAD") + '("edge" "GTK_BUTTONBOX_EDGE") + '("start" "GTK_BUTTONBOX_START") + '("end" "GTK_BUTTONBOX_END") + ) +) + +(define-enum CurveType + (in-module "Gtk") + (c-name "GtkCurveType") + (gtype-id "GTK_TYPE_CURVE_TYPE") + (values + '("linear" "GTK_CURVE_TYPE_LINEAR") + '("spline" "GTK_CURVE_TYPE_SPLINE") + '("free" "GTK_CURVE_TYPE_FREE") + ) +) + +(define-enum DeleteType + (in-module "Gtk") + (c-name "GtkDeleteType") + (gtype-id "GTK_TYPE_DELETE_TYPE") + (values + '("chars" "GTK_DELETE_CHARS") + '("word-ends" "GTK_DELETE_WORD_ENDS") + '("words" "GTK_DELETE_WORDS") + '("display-lines" "GTK_DELETE_DISPLAY_LINES") + '("display-line-ends" "GTK_DELETE_DISPLAY_LINE_ENDS") + '("paragraph-ends" "GTK_DELETE_PARAGRAPH_ENDS") + '("paragraphs" "GTK_DELETE_PARAGRAPHS") + '("whitespace" "GTK_DELETE_WHITESPACE") + ) +) + +(define-enum DirectionType + (in-module "Gtk") + (c-name "GtkDirectionType") + (gtype-id "GTK_TYPE_DIRECTION_TYPE") + (values + '("tab-forward" "GTK_DIR_TAB_FORWARD") + '("tab-backward" "GTK_DIR_TAB_BACKWARD") + '("up" "GTK_DIR_UP") + '("down" "GTK_DIR_DOWN") + '("left" "GTK_DIR_LEFT") + '("right" "GTK_DIR_RIGHT") + ) +) + +(define-enum ExpanderStyle + (in-module "Gtk") + (c-name "GtkExpanderStyle") + (gtype-id "GTK_TYPE_EXPANDER_STYLE") + (values + '("collapsed" "GTK_EXPANDER_COLLAPSED") + '("semi-collapsed" "GTK_EXPANDER_SEMI_COLLAPSED") + '("semi-expanded" "GTK_EXPANDER_SEMI_EXPANDED") + '("expanded" "GTK_EXPANDER_EXPANDED") + ) +) + +(define-enum IconSize + (in-module "Gtk") + (c-name "GtkIconSize") + (gtype-id "GTK_TYPE_ICON_SIZE") + (values + '("invalid" "GTK_ICON_SIZE_INVALID") + '("menu" "GTK_ICON_SIZE_MENU") + '("small-toolbar" "GTK_ICON_SIZE_SMALL_TOOLBAR") + '("large-toolbar" "GTK_ICON_SIZE_LARGE_TOOLBAR") + '("button" "GTK_ICON_SIZE_BUTTON") + '("dialog" "GTK_ICON_SIZE_DIALOG") + ) +) + +(define-enum SideType + (in-module "Gtk") + (c-name "GtkSideType") + (gtype-id "GTK_TYPE_SIDE_TYPE") + (values + '("top" "GTK_SIDE_TOP") + '("bottom" "GTK_SIDE_BOTTOM") + '("left" "GTK_SIDE_LEFT") + '("right" "GTK_SIDE_RIGHT") + ) +) + +(define-enum TextDirection + (in-module "Gtk") + (c-name "GtkTextDirection") + (gtype-id "GTK_TYPE_TEXT_DIRECTION") + (values + '("none" "GTK_TEXT_DIR_NONE") + '("ltr" "GTK_TEXT_DIR_LTR") + '("rtl" "GTK_TEXT_DIR_RTL") + ) +) + +(define-enum Justification + (in-module "Gtk") + (c-name "GtkJustification") + (gtype-id "GTK_TYPE_JUSTIFICATION") + (values + '("left" "GTK_JUSTIFY_LEFT") + '("right" "GTK_JUSTIFY_RIGHT") + '("center" "GTK_JUSTIFY_CENTER") + '("fill" "GTK_JUSTIFY_FILL") + ) +) + +(define-enum MatchType + (in-module "Gtk") + (c-name "GtkMatchType") + (gtype-id "GTK_TYPE_MATCH_TYPE") + (values + '("all" "GTK_MATCH_ALL") + '("all-tail" "GTK_MATCH_ALL_TAIL") + '("head" "GTK_MATCH_HEAD") + '("tail" "GTK_MATCH_TAIL") + '("exact" "GTK_MATCH_EXACT") + '("last" "GTK_MATCH_LAST") + ) +) + +(define-enum MenuDirectionType + (in-module "Gtk") + (c-name "GtkMenuDirectionType") + (gtype-id "GTK_TYPE_MENU_DIRECTION_TYPE") + (values + '("parent" "GTK_MENU_DIR_PARENT") + '("child" "GTK_MENU_DIR_CHILD") + '("next" "GTK_MENU_DIR_NEXT") + '("prev" "GTK_MENU_DIR_PREV") + ) +) + +(define-enum MetricType + (in-module "Gtk") + (c-name "GtkMetricType") + (gtype-id "GTK_TYPE_METRIC_TYPE") + (values + '("pixels" "GTK_PIXELS") + '("inches" "GTK_INCHES") + '("centimeters" "GTK_CENTIMETERS") + ) +) + +(define-enum MovementStep + (in-module "Gtk") + (c-name "GtkMovementStep") + (gtype-id "GTK_TYPE_MOVEMENT_STEP") + (values + '("logical-positions" "GTK_MOVEMENT_LOGICAL_POSITIONS") + '("visual-positions" "GTK_MOVEMENT_VISUAL_POSITIONS") + '("words" "GTK_MOVEMENT_WORDS") + '("display-lines" "GTK_MOVEMENT_DISPLAY_LINES") + '("display-line-ends" "GTK_MOVEMENT_DISPLAY_LINE_ENDS") + '("paragraphs" "GTK_MOVEMENT_PARAGRAPHS") + '("paragraph-ends" "GTK_MOVEMENT_PARAGRAPH_ENDS") + '("pages" "GTK_MOVEMENT_PAGES") + '("buffer-ends" "GTK_MOVEMENT_BUFFER_ENDS") + ) +) + +(define-enum Orientation + (in-module "Gtk") + (c-name "GtkOrientation") + (gtype-id "GTK_TYPE_ORIENTATION") + (values + '("horizontal" "GTK_ORIENTATION_HORIZONTAL") + '("vertical" "GTK_ORIENTATION_VERTICAL") + ) +) + +(define-enum CornerType + (in-module "Gtk") + (c-name "GtkCornerType") + (gtype-id "GTK_TYPE_CORNER_TYPE") + (values + '("top-left" "GTK_CORNER_TOP_LEFT") + '("bottom-left" "GTK_CORNER_BOTTOM_LEFT") + '("top-right" "GTK_CORNER_TOP_RIGHT") + '("bottom-right" "GTK_CORNER_BOTTOM_RIGHT") + ) +) + +(define-enum PackType + (in-module "Gtk") + (c-name "GtkPackType") + (gtype-id "GTK_TYPE_PACK_TYPE") + (values + '("start" "GTK_PACK_START") + '("end" "GTK_PACK_END") + ) +) + +(define-enum PathPriorityType + (in-module "Gtk") + (c-name "GtkPathPriorityType") + (gtype-id "GTK_TYPE_PATH_PRIORITY_TYPE") + (values + '("lowest" "GTK_PATH_PRIO_LOWEST") + '("gtk" "GTK_PATH_PRIO_GTK") + '("application" "GTK_PATH_PRIO_APPLICATION") + '("rc" "GTK_PATH_PRIO_RC") + '("highest" "GTK_PATH_PRIO_HIGHEST") + '("mask" "GTK_PATH_PRIO_MASK") + ) +) + +(define-enum PathType + (in-module "Gtk") + (c-name "GtkPathType") + (gtype-id "GTK_TYPE_PATH_TYPE") + (values + '("widget" "GTK_PATH_WIDGET") + '("widget-class" "GTK_PATH_WIDGET_CLASS") + '("class" "GTK_PATH_CLASS") + ) +) + +(define-enum PolicyType + (in-module "Gtk") + (c-name "GtkPolicyType") + (gtype-id "GTK_TYPE_POLICY_TYPE") + (values + '("always" "GTK_POLICY_ALWAYS") + '("automatic" "GTK_POLICY_AUTOMATIC") + '("never" "GTK_POLICY_NEVER") + ) +) + +(define-enum PositionType + (in-module "Gtk") + (c-name "GtkPositionType") + (gtype-id "GTK_TYPE_POSITION_TYPE") + (values + '("left" "GTK_POS_LEFT") + '("right" "GTK_POS_RIGHT") + '("top" "GTK_POS_TOP") + '("bottom" "GTK_POS_BOTTOM") + ) +) + +(define-enum PreviewType + (in-module "Gtk") + (c-name "GtkPreviewType") + (gtype-id "GTK_TYPE_PREVIEW_TYPE") + (values + '("color" "GTK_PREVIEW_COLOR") + '("grayscale" "GTK_PREVIEW_GRAYSCALE") + ) +) + +(define-enum ReliefStyle + (in-module "Gtk") + (c-name "GtkReliefStyle") + (gtype-id "GTK_TYPE_RELIEF_STYLE") + (values + '("normal" "GTK_RELIEF_NORMAL") + '("half" "GTK_RELIEF_HALF") + '("none" "GTK_RELIEF_NONE") + ) +) + +(define-enum ResizeMode + (in-module "Gtk") + (c-name "GtkResizeMode") + (gtype-id "GTK_TYPE_RESIZE_MODE") + (values + '("parent" "GTK_RESIZE_PARENT") + '("queue" "GTK_RESIZE_QUEUE") + '("immediate" "GTK_RESIZE_IMMEDIATE") + ) +) + +(define-enum ScrollType + (in-module "Gtk") + (c-name "GtkScrollType") + (gtype-id "GTK_TYPE_SCROLL_TYPE") + (values + '("none" "GTK_SCROLL_NONE") + '("step-backward" "GTK_SCROLL_STEP_BACKWARD") + '("step-forward" "GTK_SCROLL_STEP_FORWARD") + '("page-backward" "GTK_SCROLL_PAGE_BACKWARD") + '("page-forward" "GTK_SCROLL_PAGE_FORWARD") + '("jump" "GTK_SCROLL_JUMP") + '("step-up" "GTK_SCROLL_STEP_UP") + '("step-down" "GTK_SCROLL_STEP_DOWN") + '("page-up" "GTK_SCROLL_PAGE_UP") + '("page-down" "GTK_SCROLL_PAGE_DOWN") + '("step-left" "GTK_SCROLL_STEP_LEFT") + '("step-right" "GTK_SCROLL_STEP_RIGHT") + '("page-left" "GTK_SCROLL_PAGE_LEFT") + '("page-right" "GTK_SCROLL_PAGE_RIGHT") + ) +) + +(define-enum SelectionMode + (in-module "Gtk") + (c-name "GtkSelectionMode") + (gtype-id "GTK_TYPE_SELECTION_MODE") + (values + '("single" "GTK_SELECTION_SINGLE") + '("browse" "GTK_SELECTION_BROWSE") + '("multiple" "GTK_SELECTION_MULTIPLE") + '("extended" "GTK_SELECTION_EXTENDED") + ) +) + +(define-enum ShadowType + (in-module "Gtk") + (c-name "GtkShadowType") + (gtype-id "GTK_TYPE_SHADOW_TYPE") + (values + '("none" "GTK_SHADOW_NONE") + '("in" "GTK_SHADOW_IN") + '("out" "GTK_SHADOW_OUT") + '("etched-in" "GTK_SHADOW_ETCHED_IN") + '("etched-out" "GTK_SHADOW_ETCHED_OUT") + ) +) + +(define-enum StateType + (in-module "Gtk") + (c-name "GtkStateType") + (gtype-id "GTK_TYPE_STATE_TYPE") + (values + '("normal" "GTK_STATE_NORMAL") + '("active" "GTK_STATE_ACTIVE") + '("prelight" "GTK_STATE_PRELIGHT") + '("selected" "GTK_STATE_SELECTED") + '("insensitive" "GTK_STATE_INSENSITIVE") + ) +) + +(define-enum SubmenuDirection + (in-module "Gtk") + (c-name "GtkSubmenuDirection") + (gtype-id "GTK_TYPE_SUBMENU_DIRECTION") + (values + '("left" "GTK_DIRECTION_LEFT") + '("right" "GTK_DIRECTION_RIGHT") + ) +) + +(define-enum SubmenuPlacement + (in-module "Gtk") + (c-name "GtkSubmenuPlacement") + (gtype-id "GTK_TYPE_SUBMENU_PLACEMENT") + (values + '("top-bottom" "GTK_TOP_BOTTOM") + '("left-right" "GTK_LEFT_RIGHT") + ) +) + +(define-enum ToolbarStyle + (in-module "Gtk") + (c-name "GtkToolbarStyle") + (gtype-id "GTK_TYPE_TOOLBAR_STYLE") + (values + '("icons" "GTK_TOOLBAR_ICONS") + '("text" "GTK_TOOLBAR_TEXT") + '("both" "GTK_TOOLBAR_BOTH") + '("both-horiz" "GTK_TOOLBAR_BOTH_HORIZ") + ) +) + +(define-enum UpdateType + (in-module "Gtk") + (c-name "GtkUpdateType") + (gtype-id "GTK_TYPE_UPDATE_TYPE") + (values + '("continuous" "GTK_UPDATE_CONTINUOUS") + '("discontinuous" "GTK_UPDATE_DISCONTINUOUS") + '("delayed" "GTK_UPDATE_DELAYED") + ) +) + +(define-enum Visibility + (in-module "Gtk") + (c-name "GtkVisibility") + (gtype-id "GTK_TYPE_VISIBILITY") + (values + '("none" "GTK_VISIBILITY_NONE") + '("partial" "GTK_VISIBILITY_PARTIAL") + '("full" "GTK_VISIBILITY_FULL") + ) +) + +(define-enum WindowPosition + (in-module "Gtk") + (c-name "GtkWindowPosition") + (gtype-id "GTK_TYPE_WINDOW_POSITION") + (values + '("none" "GTK_WIN_POS_NONE") + '("center" "GTK_WIN_POS_CENTER") + '("mouse" "GTK_WIN_POS_MOUSE") + '("center-always" "GTK_WIN_POS_CENTER_ALWAYS") + '("center-on-parent" "GTK_WIN_POS_CENTER_ON_PARENT") + ) +) + +(define-enum WindowType + (in-module "Gtk") + (c-name "GtkWindowType") + (gtype-id "GTK_TYPE_WINDOW_TYPE") + (values + '("toplevel" "GTK_WINDOW_TOPLEVEL") + '("popup" "GTK_WINDOW_POPUP") + ) +) + +(define-enum WrapMode + (in-module "Gtk") + (c-name "GtkWrapMode") + (gtype-id "GTK_TYPE_WRAP_MODE") + (values + '("none" "GTK_WRAP_NONE") + '("char" "GTK_WRAP_CHAR") + '("word" "GTK_WRAP_WORD") + ) +) + +(define-enum SortType + (in-module "Gtk") + (c-name "GtkSortType") + (gtype-id "GTK_TYPE_SORT_TYPE") + (values + '("ascending" "GTK_SORT_ASCENDING") + '("descending" "GTK_SORT_DESCENDING") + ) +) + +(define-enum ImageType + (in-module "Gtk") + (c-name "GtkImageType") + (gtype-id "GTK_TYPE_IMAGE_TYPE") + (values + '("empty" "GTK_IMAGE_EMPTY") + '("pixmap" "GTK_IMAGE_PIXMAP") + '("image" "GTK_IMAGE_IMAGE") + '("pixbuf" "GTK_IMAGE_PIXBUF") + '("stock" "GTK_IMAGE_STOCK") + '("icon-set" "GTK_IMAGE_ICON_SET") + '("animation" "GTK_IMAGE_ANIMATION") + ) +) + +(define-enum MessageType + (in-module "Gtk") + (c-name "GtkMessageType") + (gtype-id "GTK_TYPE_MESSAGE_TYPE") + (values + '("info" "GTK_MESSAGE_INFO") + '("warning" "GTK_MESSAGE_WARNING") + '("question" "GTK_MESSAGE_QUESTION") + '("error" "GTK_MESSAGE_ERROR") + ) +) + +(define-enum ButtonsType + (in-module "Gtk") + (c-name "GtkButtonsType") + (gtype-id "GTK_TYPE_BUTTONS_TYPE") + (values + '("none" "GTK_BUTTONS_NONE") + '("ok" "GTK_BUTTONS_OK") + '("close" "GTK_BUTTONS_CLOSE") + '("cancel" "GTK_BUTTONS_CANCEL") + '("yes-no" "GTK_BUTTONS_YES_NO") + '("ok-cancel" "GTK_BUTTONS_OK_CANCEL") + ) +) + +(define-enum NotebookTab + (in-module "Gtk") + (c-name "GtkNotebookTab") + (gtype-id "GTK_TYPE_NOTEBOOK_TAB") + (values + '("first" "GTK_NOTEBOOK_TAB_FIRST") + '("last" "GTK_NOTEBOOK_TAB_LAST") + ) +) + +(define-flags ObjectFlags + (in-module "Gtk") + (c-name "GtkObjectFlags") + (gtype-id "GTK_TYPE_OBJECT_FLAGS") + (values + '("destroyed" "GTK_DESTROYED") + '("floating" "GTK_FLOATING") + '("reserved-1" "GTK_RESERVED_1") + '("reserved-2" "GTK_RESERVED_2") + ) +) + +(define-flags ArgFlags + (in-module "Gtk") + (c-name "GtkArgFlags") + (gtype-id "GTK_TYPE_ARG_FLAGS") + (values + '("readable" "GTK_ARG_READABLE") + '("writable" "GTK_ARG_WRITABLE") + '("construct" "GTK_ARG_CONSTRUCT") + '("construct-only" "GTK_ARG_CONSTRUCT_ONLY") + '("child-arg" "GTK_ARG_CHILD_ARG") + ) +) + +(define-flags PrivateFlags + (in-module "Gtk") + (c-name "GtkPrivateFlags") + (gtype-id "GTK_TYPE_PRIVATE_FLAGS") + (values + '("user-style" "PRIVATE_GTK_USER_STYLE") + '("resize-pending" "PRIVATE_GTK_RESIZE_PENDING") + '("resize-needed" "PRIVATE_GTK_RESIZE_NEEDED") + '("leave-pending" "PRIVATE_GTK_LEAVE_PENDING") + '("has-shape-mask" "PRIVATE_GTK_HAS_SHAPE_MASK") + '("in-reparent" "PRIVATE_GTK_IN_REPARENT") + '("direction-set" "PRIVATE_GTK_DIRECTION_SET") + '("direction-ltr" "PRIVATE_GTK_DIRECTION_LTR") + '("anchored" "PRIVATE_GTK_ANCHORED") + ) +) + +(define-enum ProgressBarStyle + (in-module "Gtk") + (c-name "GtkProgressBarStyle") + (gtype-id "GTK_TYPE_PROGRESS_BAR_STYLE") + (values + '("continuous" "GTK_PROGRESS_CONTINUOUS") + '("discrete" "GTK_PROGRESS_DISCRETE") + ) +) + +(define-enum ProgressBarOrientation + (in-module "Gtk") + (c-name "GtkProgressBarOrientation") + (gtype-id "GTK_TYPE_PROGRESS_BAR_ORIENTATION") + (values + '("left-to-right" "GTK_PROGRESS_LEFT_TO_RIGHT") + '("right-to-left" "GTK_PROGRESS_RIGHT_TO_LEFT") + '("bottom-to-top" "GTK_PROGRESS_BOTTOM_TO_TOP") + '("top-to-bottom" "GTK_PROGRESS_TOP_TO_BOTTOM") + ) +) + +(define-flags RcFlags + (in-module "Gtk") + (c-name "GtkRcFlags") + (gtype-id "GTK_TYPE_RC_FLAGS") + (values + '("fg" "GTK_RC_FG") + '("bg" "GTK_RC_BG") + '("text" "GTK_RC_TEXT") + '("base" "GTK_RC_BASE") + ) +) + +(define-enum RcTokenType + (in-module "Gtk") + (c-name "GtkRcTokenType") + (gtype-id "GTK_TYPE_RC_TOKEN_TYPE") + (values + '("invalid" "GTK_RC_TOKEN_INVALID") + '("include" "GTK_RC_TOKEN_INCLUDE") + '("normal" "GTK_RC_TOKEN_NORMAL") + '("active" "GTK_RC_TOKEN_ACTIVE") + '("prelight" "GTK_RC_TOKEN_PRELIGHT") + '("selected" "GTK_RC_TOKEN_SELECTED") + '("insensitive" "GTK_RC_TOKEN_INSENSITIVE") + '("fg" "GTK_RC_TOKEN_FG") + '("bg" "GTK_RC_TOKEN_BG") + '("text" "GTK_RC_TOKEN_TEXT") + '("base" "GTK_RC_TOKEN_BASE") + '("xthickness" "GTK_RC_TOKEN_XTHICKNESS") + '("ythickness" "GTK_RC_TOKEN_YTHICKNESS") + '("font" "GTK_RC_TOKEN_FONT") + '("fontset" "GTK_RC_TOKEN_FONTSET") + '("font-name" "GTK_RC_TOKEN_FONT_NAME") + '("bg-pixmap" "GTK_RC_TOKEN_BG_PIXMAP") + '("pixmap-path" "GTK_RC_TOKEN_PIXMAP_PATH") + '("style" "GTK_RC_TOKEN_STYLE") + '("binding" "GTK_RC_TOKEN_BINDING") + '("bind" "GTK_RC_TOKEN_BIND") + '("widget" "GTK_RC_TOKEN_WIDGET") + '("widget-class" "GTK_RC_TOKEN_WIDGET_CLASS") + '("class" "GTK_RC_TOKEN_CLASS") + '("lowest" "GTK_RC_TOKEN_LOWEST") + '("gtk" "GTK_RC_TOKEN_GTK") + '("application" "GTK_RC_TOKEN_APPLICATION") + '("rc" "GTK_RC_TOKEN_RC") + '("highest" "GTK_RC_TOKEN_HIGHEST") + '("engine" "GTK_RC_TOKEN_ENGINE") + '("module-path" "GTK_RC_TOKEN_MODULE_PATH") + '("im-module-path" "GTK_RC_TOKEN_IM_MODULE_PATH") + '("im-module-file" "GTK_RC_TOKEN_IM_MODULE_FILE") + '("stock" "GTK_RC_TOKEN_STOCK") + '("ltr" "GTK_RC_TOKEN_LTR") + '("rtl" "GTK_RC_TOKEN_RTL") + '("last" "GTK_RC_TOKEN_LAST") + ) +) + +(define-enum SizeGroupMode + (in-module "Gtk") + (c-name "GtkSizeGroupMode") + (gtype-id "GTK_TYPE_SIZE_GROUP_MODE") + (values + '("none" "GTK_SIZE_GROUP_NONE") + '("horizontal" "GTK_SIZE_GROUP_HORIZONTAL") + '("vertical" "GTK_SIZE_GROUP_VERTICAL") + '("both" "GTK_SIZE_GROUP_BOTH") + ) +) + +(define-enum SpinButtonUpdatePolicy + (in-module "Gtk") + (c-name "GtkSpinButtonUpdatePolicy") + (gtype-id "GTK_TYPE_SPIN_BUTTON_UPDATE_POLICY") + (values + '("always" "GTK_UPDATE_ALWAYS") + '("if-valid" "GTK_UPDATE_IF_VALID") + ) +) + +(define-enum SpinType + (in-module "Gtk") + (c-name "GtkSpinType") + (gtype-id "GTK_TYPE_SPIN_TYPE") + (values + '("step-forward" "GTK_SPIN_STEP_FORWARD") + '("step-backward" "GTK_SPIN_STEP_BACKWARD") + '("page-forward" "GTK_SPIN_PAGE_FORWARD") + '("page-backward" "GTK_SPIN_PAGE_BACKWARD") + '("home" "GTK_SPIN_HOME") + '("end" "GTK_SPIN_END") + '("user-defined" "GTK_SPIN_USER_DEFINED") + ) +) + +(define-enum TextWindowType + (in-module "Gtk") + (c-name "GtkTextWindowType") + (gtype-id "GTK_TYPE_TEXT_WINDOW_TYPE") + (values + '("private" "GTK_TEXT_WINDOW_PRIVATE") + '("widget" "GTK_TEXT_WINDOW_WIDGET") + '("text" "GTK_TEXT_WINDOW_TEXT") + '("left" "GTK_TEXT_WINDOW_LEFT") + '("right" "GTK_TEXT_WINDOW_RIGHT") + '("top" "GTK_TEXT_WINDOW_TOP") + '("bottom" "GTK_TEXT_WINDOW_BOTTOM") + ) +) + +(define-enum ToolbarChildType + (in-module "Gtk") + (c-name "GtkToolbarChildType") + (gtype-id "GTK_TYPE_TOOLBAR_CHILD_TYPE") + (values + '("space" "GTK_TOOLBAR_CHILD_SPACE") + '("button" "GTK_TOOLBAR_CHILD_BUTTON") + '("togglebutton" "GTK_TOOLBAR_CHILD_TOGGLEBUTTON") + '("radiobutton" "GTK_TOOLBAR_CHILD_RADIOBUTTON") + '("widget" "GTK_TOOLBAR_CHILD_WIDGET") + ) +) + +(define-enum ToolbarSpaceStyle + (in-module "Gtk") + (c-name "GtkToolbarSpaceStyle") + (gtype-id "GTK_TYPE_TOOLBAR_SPACE_STYLE") + (values + '("empty" "GTK_TOOLBAR_SPACE_EMPTY") + '("line" "GTK_TOOLBAR_SPACE_LINE") + ) +) + +(define-enum TreeViewMode + (in-module "Gtk") + (c-name "GtkTreeViewMode") + (gtype-id "GTK_TYPE_TREE_VIEW_MODE") + (values + '("line" "GTK_TREE_VIEW_LINE") + '("item" "GTK_TREE_VIEW_ITEM") + ) +) + +(define-flags TreeModelFlags + (in-module "Gtk") + (c-name "GtkTreeModelFlags") + (gtype-id "GTK_TYPE_TREE_MODEL_FLAGS") + (values + '("t" "GTK_TREE_MODEL_ITERS_PERSIST") + ) +) + +(define-enum TreeViewDropPosition + (in-module "Gtk") + (c-name "GtkTreeViewDropPosition") + (gtype-id "GTK_TYPE_TREE_VIEW_DROP_POSITION") + (values + '("before" "GTK_TREE_VIEW_DROP_BEFORE") + '("after" "GTK_TREE_VIEW_DROP_AFTER") + '("into-or-before" "GTK_TREE_VIEW_DROP_INTO_OR_BEFORE") + '("into-or-after" "GTK_TREE_VIEW_DROP_INTO_OR_AFTER") + ) +) + +(define-enum TreeViewColumnSizing + (in-module "Gtk") + (c-name "GtkTreeViewColumnSizing") + (gtype-id "GTK_TYPE_TREE_VIEW_COLUMN_SIZING") + (values + '("resizeable" "GTK_TREE_VIEW_COLUMN_RESIZEABLE") + '("autosize" "GTK_TREE_VIEW_COLUMN_AUTOSIZE") + '("fixed" "GTK_TREE_VIEW_COLUMN_FIXED") + ) +) + +(define-flags WidgetFlags + (in-module "Gtk") + (c-name "GtkWidgetFlags") + (gtype-id "GTK_TYPE_WIDGET_FLAGS") + (values + '("toplevel" "GTK_TOPLEVEL") + '("no-window" "GTK_NO_WINDOW") + '("realized" "GTK_REALIZED") + '("mapped" "GTK_MAPPED") + '("visible" "GTK_VISIBLE") + '("sensitive" "GTK_SENSITIVE") + '("parent-sensitive" "GTK_PARENT_SENSITIVE") + '("can-focus" "GTK_CAN_FOCUS") + '("has-focus" "GTK_HAS_FOCUS") + '("can-default" "GTK_CAN_DEFAULT") + '("has-default" "GTK_HAS_DEFAULT") + '("has-grab" "GTK_HAS_GRAB") + '("rc-style" "GTK_RC_STYLE") + '("composite-child" "GTK_COMPOSITE_CHILD") + '("no-reparent" "GTK_NO_REPARENT") + '("app-paintable" "GTK_APP_PAINTABLE") + '("receives-default" "GTK_RECEIVES_DEFAULT") + '("double-buffered" "GTK_DOUBLE_BUFFERED") + ) +) + +(define-enum WidgetHelpType + (in-module "Gtk") + (c-name "GtkWidgetHelpType") + (gtype-id "GTK_TYPE_WIDGET_HELP_TYPE") + (values + '("tooltip" "GTK_WIDGET_HELP_TOOLTIP") + '("whats-this" "GTK_WIDGET_HELP_WHATS_THIS") + ) +) + diff --git a/codegen/makefile b/codegen/makefile new file mode 100755 index 000000000..0a16abcaf --- /dev/null +++ b/codegen/makefile @@ -0,0 +1,10 @@ +all: + @echo "You must use 'make windows' or 'make unix'." + @echo "'make unix' is broken for now." + +windows: + ./defs-parse.pl < gtk-types.defs + +unix: + @echo "'make unix' is broken for now." + diff --git a/defs-parse.pl b/defs-parse.pl deleted file mode 100755 index 81718058e..000000000 --- a/defs-parse.pl +++ /dev/null @@ -1,54 +0,0 @@ -#!/usr/bin/perl - -while ($line = ) { - - if ($line =~ /^\(define-(enum|flags) (Gtk|G|Gdk)(\w+)/) { - if (!defined ($namespace)) { - print "// Generated file: Do not modify\n\n"; - print "namespace $2 {\n\n\tusing System;\n\n"; - } elsif ($2 ne $namespace) { - print "}\n\nnamespace $2 {\n\n"; - } - - $type = $1; - $namespace = $2; - $typename = $3; - - foreach $paren ($line =~ /[\(\)]/g) { - ($paren eq "(") ? $nest++ : $nest--; - } - - if ($type eq "flags") { - print "\t[Flags]\n"; - } - print "\tpublic enum $typename {\n"; - - $val = 1; - while ($nest > 0) { - $line = ; - if ($line =~ /\((.*) .*\)/) { - $name = $1; - $name =~ s/^([a-z])/\u\1/; - $name =~ s/\-([a-z])/\u\1/g; - $name =~ s/\-(\d)/\1/g; - if ($type eq "enum") { - print "\t\t$name,\n"; - } else { - print "\t\t$name = $val,\n"; - $val *= 2; - } - } - - foreach $paren ($line =~ /[\(\)]/g) { - ($paren eq "(") ? $nest++ : $nest--; - } - } - - print "\t}\n\n"; - } - -} - -if (defined ($namespace)) { - print "}\n"; -} diff --git a/gtk/Widget.cs b/gtk/Widget.cs index ee3798eb2..ac8a73f78 100755 --- a/gtk/Widget.cs +++ b/gtk/Widget.cs @@ -16,8 +16,6 @@ namespace Gtk { public class Widget : Object { - private static readonly string DelEvName = "delete-event"; - private Hashtable Signals = new Hashtable (); // Properties @@ -271,7 +269,7 @@ namespace Gtk { } /// - /// DeleteEvent Event + /// Deleted Event /// /// /// @@ -279,7 +277,9 @@ namespace Gtk { /// windowing environment. /// - public event EventHandler DeleteEvent { + private static readonly string DelEvName = "delete-event"; + + public event EventHandler Deleted { add { if (Events [DelEvName] == null) Signals [DelEvName] = new SimpleEvent ( diff --git a/gtk/gtk.defs b/gtk/gtk.defs deleted file mode 100644 index 872e8738b..000000000 --- a/gtk/gtk.defs +++ /dev/null @@ -1,2153 +0,0 @@ - -;; Generated data (by glib-mkenums) - -; enumerations from "gtkaccelgroup.h" - -(define-flags GtkAccelFlags - (visible GTK_ACCEL_VISIBLE) - (signal-visible GTK_ACCEL_SIGNAL_VISIBLE) - (locked GTK_ACCEL_LOCKED) - (mask GTK_ACCEL_MASK) -) -; enumerations from "gtkcalendar.h" - -(define-flags GtkCalendarDisplayOptions - (show-heading GTK_CALENDAR_SHOW_HEADING) - (show-day-names GTK_CALENDAR_SHOW_DAY_NAMES) - (no-month-change GTK_CALENDAR_NO_MONTH_CHANGE) - (show-week-numbers GTK_CALENDAR_SHOW_WEEK_NUMBERS) - (week-start-monday GTK_CALENDAR_WEEK_START_MONDAY) -) -; enumerations from "gtkclist.h" - -(define-enum GtkCellType - (empty GTK_CELL_EMPTY) - (text GTK_CELL_TEXT) - (pixmap GTK_CELL_PIXMAP) - (pixtext GTK_CELL_PIXTEXT) - (widget GTK_CELL_WIDGET) -) -(define-enum GtkCListDragPos - (none GTK_CLIST_DRAG_NONE) - (before GTK_CLIST_DRAG_BEFORE) - (into GTK_CLIST_DRAG_INTO) - (after GTK_CLIST_DRAG_AFTER) -) -(define-flags GtkButtonAction - (ignored GTK_BUTTON_IGNORED) - (selects GTK_BUTTON_SELECTS) - (drags GTK_BUTTON_DRAGS) - (expands GTK_BUTTON_EXPANDS) -) -; enumerations from "gtkctree.h" - -(define-enum GtkCTreePos - (before GTK_CTREE_POS_BEFORE) - (as-child GTK_CTREE_POS_AS_CHILD) - (after GTK_CTREE_POS_AFTER) -) -(define-enum GtkCTreeLineStyle - (none GTK_CTREE_LINES_NONE) - (solid GTK_CTREE_LINES_SOLID) - (dotted GTK_CTREE_LINES_DOTTED) - (tabbed GTK_CTREE_LINES_TABBED) -) -(define-enum GtkCTreeExpanderStyle - (none GTK_CTREE_EXPANDER_NONE) - (square GTK_CTREE_EXPANDER_SQUARE) - (triangle GTK_CTREE_EXPANDER_TRIANGLE) - (circular GTK_CTREE_EXPANDER_CIRCULAR) -) -(define-enum GtkCTreeExpansionType - (expand GTK_CTREE_EXPANSION_EXPAND) - (expand-recursive GTK_CTREE_EXPANSION_EXPAND_RECURSIVE) - (collapse GTK_CTREE_EXPANSION_COLLAPSE) - (collapse-recursive GTK_CTREE_EXPANSION_COLLAPSE_RECURSIVE) - (toggle GTK_CTREE_EXPANSION_TOGGLE) - (toggle-recursive GTK_CTREE_EXPANSION_TOGGLE_RECURSIVE) -) -; enumerations from "gtkcellrenderer.h" - -(define-flags GtkCellRendererState - (selected GTK_CELL_RENDERER_SELECTED) - (prelit GTK_CELL_RENDERER_PRELIT) - (insensitive GTK_CELL_RENDERER_INSENSITIVE) - (sorted GTK_CELL_RENDERER_SORTED) -) -; enumerations from "gtkdebug.h" - -(define-flags GtkDebugFlag - (misc GTK_DEBUG_MISC) - (dnd GTK_DEBUG_DND) - (plugsocket GTK_DEBUG_PLUGSOCKET) - (text GTK_DEBUG_TEXT) - (tree GTK_DEBUG_TREE) - (updates GTK_DEBUG_UPDATES) -) -; enumerations from "gtkdialog.h" - -(define-enum GtkDialogFlags - (modal GTK_DIALOG_MODAL) - (destroy-with-parent GTK_DIALOG_DESTROY_WITH_PARENT) - (no-separator GTK_DIALOG_NO_SEPARATOR) -) -(define-enum GtkResponseType - (none GTK_RESPONSE_NONE) - (reject GTK_RESPONSE_REJECT) - (accept GTK_RESPONSE_ACCEPT) - (delete-event GTK_RESPONSE_DELETE_EVENT) - (ok GTK_RESPONSE_OK) - (cancel GTK_RESPONSE_CANCEL) - (close GTK_RESPONSE_CLOSE) - (yes GTK_RESPONSE_YES) - (no GTK_RESPONSE_NO) - (apply GTK_RESPONSE_APPLY) - (help GTK_RESPONSE_HELP) -) -; enumerations from "gtkdnd.h" - -(define-flags GtkDestDefaults - (motion GTK_DEST_DEFAULT_MOTION) - (highlight GTK_DEST_DEFAULT_HIGHLIGHT) - (drop GTK_DEST_DEFAULT_DROP) - (all GTK_DEST_DEFAULT_ALL) -) -(define-flags GtkTargetFlags - (same-app GTK_TARGET_SAME_APP) - (same-widget GTK_TARGET_SAME_WIDGET) -) -; enumerations from "gtkenums.h" - -(define-enum GtkAnchorType - (center GTK_ANCHOR_CENTER) - (north GTK_ANCHOR_NORTH) - (north-west GTK_ANCHOR_NORTH_WEST) - (north-east GTK_ANCHOR_NORTH_EAST) - (south GTK_ANCHOR_SOUTH) - (south-west GTK_ANCHOR_SOUTH_WEST) - (south-east GTK_ANCHOR_SOUTH_EAST) - (west GTK_ANCHOR_WEST) - (east GTK_ANCHOR_EAST) - (n GTK_ANCHOR_N) - (nw GTK_ANCHOR_NW) - (ne GTK_ANCHOR_NE) - (s GTK_ANCHOR_S) - (sw GTK_ANCHOR_SW) - (se GTK_ANCHOR_SE) - (w GTK_ANCHOR_W) - (e GTK_ANCHOR_E) -) -(define-enum GtkArrowType - (up GTK_ARROW_UP) - (down GTK_ARROW_DOWN) - (left GTK_ARROW_LEFT) - (right GTK_ARROW_RIGHT) -) -(define-flags GtkAttachOptions - (expand GTK_EXPAND) - (shrink GTK_SHRINK) - (fill GTK_FILL) -) -(define-enum GtkButtonBoxStyle - (default-style GTK_BUTTONBOX_DEFAULT_STYLE) - (spread GTK_BUTTONBOX_SPREAD) - (edge GTK_BUTTONBOX_EDGE) - (start GTK_BUTTONBOX_START) - (end GTK_BUTTONBOX_END) -) -(define-enum GtkCurveType - (linear GTK_CURVE_TYPE_LINEAR) - (spline GTK_CURVE_TYPE_SPLINE) - (free GTK_CURVE_TYPE_FREE) -) -(define-enum GtkDeleteType - (chars GTK_DELETE_CHARS) - (word-ends GTK_DELETE_WORD_ENDS) - (words GTK_DELETE_WORDS) - (display-lines GTK_DELETE_DISPLAY_LINES) - (display-line-ends GTK_DELETE_DISPLAY_LINE_ENDS) - (paragraph-ends GTK_DELETE_PARAGRAPH_ENDS) - (paragraphs GTK_DELETE_PARAGRAPHS) - (whitespace GTK_DELETE_WHITESPACE) -) -(define-enum GtkDirectionType - (tab-forward GTK_DIR_TAB_FORWARD) - (tab-backward GTK_DIR_TAB_BACKWARD) - (up GTK_DIR_UP) - (down GTK_DIR_DOWN) - (left GTK_DIR_LEFT) - (right GTK_DIR_RIGHT) -) -(define-enum GtkIconSize - (invalid GTK_ICON_SIZE_INVALID) - (menu GTK_ICON_SIZE_MENU) - (small-toolbar GTK_ICON_SIZE_SMALL_TOOLBAR) - (large-toolbar GTK_ICON_SIZE_LARGE_TOOLBAR) - (button GTK_ICON_SIZE_BUTTON) - (dnd GTK_ICON_SIZE_DND) - (dialog GTK_ICON_SIZE_DIALOG) -) -(define-enum GtkSideType - (top GTK_SIDE_TOP) - (bottom GTK_SIDE_BOTTOM) - (left GTK_SIDE_LEFT) - (right GTK_SIDE_RIGHT) -) -(define-enum GtkTextDirection - (none GTK_TEXT_DIR_NONE) - (ltr GTK_TEXT_DIR_LTR) - (rtl GTK_TEXT_DIR_RTL) -) -(define-enum GtkJustification - (left GTK_JUSTIFY_LEFT) - (right GTK_JUSTIFY_RIGHT) - (center GTK_JUSTIFY_CENTER) - (fill GTK_JUSTIFY_FILL) -) -(define-enum GtkMatchType - (all GTK_MATCH_ALL) - (all-tail GTK_MATCH_ALL_TAIL) - (head GTK_MATCH_HEAD) - (tail GTK_MATCH_TAIL) - (exact GTK_MATCH_EXACT) - (last GTK_MATCH_LAST) -) -(define-enum GtkMenuDirectionType - (parent GTK_MENU_DIR_PARENT) - (child GTK_MENU_DIR_CHILD) - (next GTK_MENU_DIR_NEXT) - (prev GTK_MENU_DIR_PREV) -) -(define-enum GtkMetricType - (pixels GTK_PIXELS) - (inches GTK_INCHES) - (centimeters GTK_CENTIMETERS) -) -(define-enum GtkMovementStep - (logical-positions GTK_MOVEMENT_LOGICAL_POSITIONS) - (visual-positions GTK_MOVEMENT_VISUAL_POSITIONS) - (words GTK_MOVEMENT_WORDS) - (display-lines GTK_MOVEMENT_DISPLAY_LINES) - (display-line-ends GTK_MOVEMENT_DISPLAY_LINE_ENDS) - (paragraphs GTK_MOVEMENT_PARAGRAPHS) - (paragraph-ends GTK_MOVEMENT_PARAGRAPH_ENDS) - (pages GTK_MOVEMENT_PAGES) - (buffer-ends GTK_MOVEMENT_BUFFER_ENDS) -) -(define-enum GtkOrientation - (horizontal GTK_ORIENTATION_HORIZONTAL) - (vertical GTK_ORIENTATION_VERTICAL) -) -(define-enum GtkCornerType - (top-left GTK_CORNER_TOP_LEFT) - (bottom-left GTK_CORNER_BOTTOM_LEFT) - (top-right GTK_CORNER_TOP_RIGHT) - (bottom-right GTK_CORNER_BOTTOM_RIGHT) -) -(define-enum GtkPackType - (start GTK_PACK_START) - (end GTK_PACK_END) -) -(define-enum GtkPathPriorityType - (lowest GTK_PATH_PRIO_LOWEST) - (gtk GTK_PATH_PRIO_GTK) - (application GTK_PATH_PRIO_APPLICATION) - (theme GTK_PATH_PRIO_THEME) - (rc GTK_PATH_PRIO_RC) - (highest GTK_PATH_PRIO_HIGHEST) - (mask GTK_PATH_PRIO_MASK) -) -(define-enum GtkPathType - (widget GTK_PATH_WIDGET) - (widget-class GTK_PATH_WIDGET_CLASS) - (class GTK_PATH_CLASS) -) -(define-enum GtkPolicyType - (always GTK_POLICY_ALWAYS) - (automatic GTK_POLICY_AUTOMATIC) - (never GTK_POLICY_NEVER) -) -(define-enum GtkPositionType - (left GTK_POS_LEFT) - (right GTK_POS_RIGHT) - (top GTK_POS_TOP) - (bottom GTK_POS_BOTTOM) -) -(define-enum GtkPreviewType - (color GTK_PREVIEW_COLOR) - (grayscale GTK_PREVIEW_GRAYSCALE) -) -(define-enum GtkReliefStyle - (normal GTK_RELIEF_NORMAL) - (half GTK_RELIEF_HALF) - (none GTK_RELIEF_NONE) -) -(define-enum GtkResizeMode - (parent GTK_RESIZE_PARENT) - (queue GTK_RESIZE_QUEUE) - (immediate GTK_RESIZE_IMMEDIATE) -) -(define-flags GtkSignalRunType - (first GTK_RUN_FIRST) - (last GTK_RUN_LAST) - (both GTK_RUN_BOTH) - (no-recurse GTK_RUN_NO_RECURSE) - (action GTK_RUN_ACTION) - (no-hooks GTK_RUN_NO_HOOKS) -) -(define-enum GtkScrollType - (none GTK_SCROLL_NONE) - (jump GTK_SCROLL_JUMP) - (step-backward GTK_SCROLL_STEP_BACKWARD) - (step-forward GTK_SCROLL_STEP_FORWARD) - (page-backward GTK_SCROLL_PAGE_BACKWARD) - (page-forward GTK_SCROLL_PAGE_FORWARD) - (step-up GTK_SCROLL_STEP_UP) - (step-down GTK_SCROLL_STEP_DOWN) - (page-up GTK_SCROLL_PAGE_UP) - (page-down GTK_SCROLL_PAGE_DOWN) - (step-left GTK_SCROLL_STEP_LEFT) - (step-right GTK_SCROLL_STEP_RIGHT) - (page-left GTK_SCROLL_PAGE_LEFT) - (page-right GTK_SCROLL_PAGE_RIGHT) - (start GTK_SCROLL_START) - (end GTK_SCROLL_END) -) -(define-enum GtkSelectionMode - (single GTK_SELECTION_SINGLE) - (browse GTK_SELECTION_BROWSE) - (multiple GTK_SELECTION_MULTIPLE) - (extended GTK_SELECTION_EXTENDED) -) -(define-enum GtkShadowType - (none GTK_SHADOW_NONE) - (in GTK_SHADOW_IN) - (out GTK_SHADOW_OUT) - (etched-in GTK_SHADOW_ETCHED_IN) - (etched-out GTK_SHADOW_ETCHED_OUT) -) -(define-enum GtkStateType - (normal GTK_STATE_NORMAL) - (active GTK_STATE_ACTIVE) - (prelight GTK_STATE_PRELIGHT) - (selected GTK_STATE_SELECTED) - (insensitive GTK_STATE_INSENSITIVE) -) -(define-enum GtkSubmenuDirection - (left GTK_DIRECTION_LEFT) - (right GTK_DIRECTION_RIGHT) -) -(define-enum GtkSubmenuPlacement - (top-bottom GTK_TOP_BOTTOM) - (left-right GTK_LEFT_RIGHT) -) -(define-enum GtkToolbarStyle - (icons GTK_TOOLBAR_ICONS) - (text GTK_TOOLBAR_TEXT) - (both GTK_TOOLBAR_BOTH) - (both-horiz GTK_TOOLBAR_BOTH_HORIZ) -) -(define-enum GtkUpdateType - (continuous GTK_UPDATE_CONTINUOUS) - (discontinuous GTK_UPDATE_DISCONTINUOUS) - (delayed GTK_UPDATE_DELAYED) -) -(define-enum GtkVisibility - (none GTK_VISIBILITY_NONE) - (partial GTK_VISIBILITY_PARTIAL) - (full GTK_VISIBILITY_FULL) -) -(define-enum GtkWindowPosition - (none GTK_WIN_POS_NONE) - (center GTK_WIN_POS_CENTER) - (mouse GTK_WIN_POS_MOUSE) - (center-always GTK_WIN_POS_CENTER_ALWAYS) - (center-on-parent GTK_WIN_POS_CENTER_ON_PARENT) -) -(define-enum GtkWindowType - (toplevel GTK_WINDOW_TOPLEVEL) - (popup GTK_WINDOW_POPUP) -) -(define-enum GtkWrapMode - (none GTK_WRAP_NONE) - (char GTK_WRAP_CHAR) - (word GTK_WRAP_WORD) -) -(define-enum GtkSortType - (ascending GTK_SORT_ASCENDING) - (descending GTK_SORT_DESCENDING) -) -; enumerations from "gtkimage.h" - -(define-enum GtkImageType - (empty GTK_IMAGE_EMPTY) - (pixmap GTK_IMAGE_PIXMAP) - (image GTK_IMAGE_IMAGE) - (pixbuf GTK_IMAGE_PIXBUF) - (stock GTK_IMAGE_STOCK) - (icon-set GTK_IMAGE_ICON_SET) - (animation GTK_IMAGE_ANIMATION) -) -; enumerations from "gtkmessagedialog.h" - -(define-enum GtkMessageType - (info GTK_MESSAGE_INFO) - (warning GTK_MESSAGE_WARNING) - (question GTK_MESSAGE_QUESTION) - (error GTK_MESSAGE_ERROR) -) -(define-enum GtkButtonsType - (none GTK_BUTTONS_NONE) - (ok GTK_BUTTONS_OK) - (close GTK_BUTTONS_CLOSE) - (cancel GTK_BUTTONS_CANCEL) - (yes-no GTK_BUTTONS_YES_NO) - (ok-cancel GTK_BUTTONS_OK_CANCEL) -) -; enumerations from "gtknotebook.h" - -(define-enum GtkNotebookTab - (first GTK_NOTEBOOK_TAB_FIRST) - (last GTK_NOTEBOOK_TAB_LAST) -) -; enumerations from "gtkobject.h" - -(define-flags GtkObjectFlags - (destroyed GTK_DESTROYED) - (floating GTK_FLOATING) - (reserved-1 GTK_RESERVED_1) - (reserved-2 GTK_RESERVED_2) -) -(define-flags GtkArgFlags - (readable GTK_ARG_READABLE) - (writable GTK_ARG_WRITABLE) - (construct GTK_ARG_CONSTRUCT) - (construct-only GTK_ARG_CONSTRUCT_ONLY) - (child-arg GTK_ARG_CHILD_ARG) -) -; enumerations from "gtkprivate.h" - -(define-flags GtkPrivateFlags - (user-style PRIVATE_GTK_USER_STYLE) - (resize-pending PRIVATE_GTK_RESIZE_PENDING) - (resize-needed PRIVATE_GTK_RESIZE_NEEDED) - (leave-pending PRIVATE_GTK_LEAVE_PENDING) - (has-shape-mask PRIVATE_GTK_HAS_SHAPE_MASK) - (in-reparent PRIVATE_GTK_IN_REPARENT) - (direction-set PRIVATE_GTK_DIRECTION_SET) - (direction-ltr PRIVATE_GTK_DIRECTION_LTR) - (anchored PRIVATE_GTK_ANCHORED) - (child-visible PRIVATE_GTK_CHILD_VISIBLE) -) -; enumerations from "gtkprogressbar.h" - -(define-enum GtkProgressBarStyle - (continuous GTK_PROGRESS_CONTINUOUS) - (discrete GTK_PROGRESS_DISCRETE) -) -(define-enum GtkProgressBarOrientation - (left-to-right GTK_PROGRESS_LEFT_TO_RIGHT) - (right-to-left GTK_PROGRESS_RIGHT_TO_LEFT) - (bottom-to-top GTK_PROGRESS_BOTTOM_TO_TOP) - (top-to-bottom GTK_PROGRESS_TOP_TO_BOTTOM) -) -; enumerations from "gtkrc.h" - -(define-flags GtkRcFlags - (fg GTK_RC_FG) - (bg GTK_RC_BG) - (text GTK_RC_TEXT) - (base GTK_RC_BASE) -) -(define-enum GtkRcTokenType - (invalid GTK_RC_TOKEN_INVALID) - (include GTK_RC_TOKEN_INCLUDE) - (normal GTK_RC_TOKEN_NORMAL) - (active GTK_RC_TOKEN_ACTIVE) - (prelight GTK_RC_TOKEN_PRELIGHT) - (selected GTK_RC_TOKEN_SELECTED) - (insensitive GTK_RC_TOKEN_INSENSITIVE) - (fg GTK_RC_TOKEN_FG) - (bg GTK_RC_TOKEN_BG) - (text GTK_RC_TOKEN_TEXT) - (base GTK_RC_TOKEN_BASE) - (xthickness GTK_RC_TOKEN_XTHICKNESS) - (ythickness GTK_RC_TOKEN_YTHICKNESS) - (font GTK_RC_TOKEN_FONT) - (fontset GTK_RC_TOKEN_FONTSET) - (font-name GTK_RC_TOKEN_FONT_NAME) - (bg-pixmap GTK_RC_TOKEN_BG_PIXMAP) - (pixmap-path GTK_RC_TOKEN_PIXMAP_PATH) - (style GTK_RC_TOKEN_STYLE) - (binding GTK_RC_TOKEN_BINDING) - (bind GTK_RC_TOKEN_BIND) - (widget GTK_RC_TOKEN_WIDGET) - (widget-class GTK_RC_TOKEN_WIDGET_CLASS) - (class GTK_RC_TOKEN_CLASS) - (lowest GTK_RC_TOKEN_LOWEST) - (gtk GTK_RC_TOKEN_GTK) - (application GTK_RC_TOKEN_APPLICATION) - (theme GTK_RC_TOKEN_THEME) - (rc GTK_RC_TOKEN_RC) - (highest GTK_RC_TOKEN_HIGHEST) - (engine GTK_RC_TOKEN_ENGINE) - (module-path GTK_RC_TOKEN_MODULE_PATH) - (im-module-path GTK_RC_TOKEN_IM_MODULE_PATH) - (im-module-file GTK_RC_TOKEN_IM_MODULE_FILE) - (stock GTK_RC_TOKEN_STOCK) - (ltr GTK_RC_TOKEN_LTR) - (rtl GTK_RC_TOKEN_RTL) - (last GTK_RC_TOKEN_LAST) -) -; enumerations from "gtksizegroup.h" - -(define-enum GtkSizeGroupMode - (none GTK_SIZE_GROUP_NONE) - (horizontal GTK_SIZE_GROUP_HORIZONTAL) - (vertical GTK_SIZE_GROUP_VERTICAL) - (both GTK_SIZE_GROUP_BOTH) -) -; enumerations from "gtkspinbutton.h" - -(define-enum GtkSpinButtonUpdatePolicy - (always GTK_UPDATE_ALWAYS) - (if-valid GTK_UPDATE_IF_VALID) -) -(define-enum GtkSpinType - (step-forward GTK_SPIN_STEP_FORWARD) - (step-backward GTK_SPIN_STEP_BACKWARD) - (page-forward GTK_SPIN_PAGE_FORWARD) - (page-backward GTK_SPIN_PAGE_BACKWARD) - (home GTK_SPIN_HOME) - (end GTK_SPIN_END) - (user-defined GTK_SPIN_USER_DEFINED) -) -; enumerations from "gtktextview.h" - -(define-enum GtkTextWindowType - (private GTK_TEXT_WINDOW_PRIVATE) - (widget GTK_TEXT_WINDOW_WIDGET) - (text GTK_TEXT_WINDOW_TEXT) - (left GTK_TEXT_WINDOW_LEFT) - (right GTK_TEXT_WINDOW_RIGHT) - (top GTK_TEXT_WINDOW_TOP) - (bottom GTK_TEXT_WINDOW_BOTTOM) -) -; enumerations from "gtktoolbar.h" - -(define-enum GtkToolbarChildType - (space GTK_TOOLBAR_CHILD_SPACE) - (button GTK_TOOLBAR_CHILD_BUTTON) - (togglebutton GTK_TOOLBAR_CHILD_TOGGLEBUTTON) - (radiobutton GTK_TOOLBAR_CHILD_RADIOBUTTON) - (widget GTK_TOOLBAR_CHILD_WIDGET) -) -(define-enum GtkToolbarSpaceStyle - (empty GTK_TOOLBAR_SPACE_EMPTY) - (line GTK_TOOLBAR_SPACE_LINE) -) -; enumerations from "gtktree.h" - -(define-enum GtkTreeViewMode - (line GTK_TREE_VIEW_LINE) - (item GTK_TREE_VIEW_ITEM) -) -; enumerations from "gtktreemodel.h" - -(define-flags GtkTreeModelFlags - (iters-persist GTK_TREE_MODEL_ITERS_PERSIST) - (list-only GTK_TREE_MODEL_LIST_ONLY) -) -; enumerations from "gtktreeselection.h" - -(define-enum GtkTreeSelectionMode - (single GTK_TREE_SELECTION_SINGLE) - (multi GTK_TREE_SELECTION_MULTI) -) -; enumerations from "gtktreesortable.h" - -(define-enum GtkTreeSortOrder - (ascending GTK_TREE_SORT_ASCENDING) - (descending GTK_TREE_SORT_DESCENDING) -) -; enumerations from "gtktreeview.h" - -(define-enum GtkTreeViewDropPosition - (before GTK_TREE_VIEW_DROP_BEFORE) - (after GTK_TREE_VIEW_DROP_AFTER) - (into-or-before GTK_TREE_VIEW_DROP_INTO_OR_BEFORE) - (into-or-after GTK_TREE_VIEW_DROP_INTO_OR_AFTER) -) -; enumerations from "gtktreeviewcolumn.h" - -(define-enum GtkTreeViewColumnSizing - (resizable GTK_TREE_VIEW_COLUMN_RESIZABLE) - (autosize GTK_TREE_VIEW_COLUMN_AUTOSIZE) - (fixed GTK_TREE_VIEW_COLUMN_FIXED) -) -; enumerations from "gtkwidget.h" - -(define-flags GtkWidgetFlags - (toplevel GTK_TOPLEVEL) - (no-window GTK_NO_WINDOW) - (realized GTK_REALIZED) - (mapped GTK_MAPPED) - (visible GTK_VISIBLE) - (sensitive GTK_SENSITIVE) - (parent-sensitive GTK_PARENT_SENSITIVE) - (can-focus GTK_CAN_FOCUS) - (has-focus GTK_HAS_FOCUS) - (can-default GTK_CAN_DEFAULT) - (has-default GTK_HAS_DEFAULT) - (has-grab GTK_HAS_GRAB) - (rc-style GTK_RC_STYLE) - (composite-child GTK_COMPOSITE_CHILD) - (no-reparent GTK_NO_REPARENT) - (app-paintable GTK_APP_PAINTABLE) - (receives-default GTK_RECEIVES_DEFAULT) - (double-buffered GTK_DOUBLE_BUFFERED) -) -(define-enum GtkWidgetHelpType - (tooltip GTK_WIDGET_HELP_TOOLTIP) - (whats-this GTK_WIDGET_HELP_WHATS_THIS) -) - -;; Generated data ends here - -;; -*- scheme -*- - - -;;; -;;; manual portion from gtk-boxed.defs -;;; - - - -;;; Gtk boxed types - -(define-boxed GtkAccelGroup - gtk_accel_group_ref - gtk_accel_group_unref) - -(define-boxed GtkBorder - gtk_border_copy - gtk_border_free - "sizeof(GtkBorder)") - -(define-boxed GtkSelectionData - gtk_selection_data_copy - gtk_selection_data_free) - -(define-boxed GtkRequisition - gtk_requisition_copy - gtk_requisition_free - "sizeof(GtkRequisition)") - -;; TextView - -(define-boxed GtkTextIter - gtk_text_iter_copy - gtk_text_iter_free) - -(define-boxed GtkTextAttributes - gtk_text_attributes_ref - gtk_text_attributes_unref) - -;; TreeView -(define-boxed GtkTreeIter - gtk_tree_iter_copy - gtk_tree_iter_free) - -(define-boxed GtkTreePath - gtk_tree_path_copy - gtk_tree_path_free) - -;;; Gdk boxed types - - ;(define-boxed GdkPoint - ; gdk_point_copy - ; gdk_point_destroy) - -;(define-boxed GdkVisual -; gdk_visual_ref -; gdk_visual_unref) - -;(define-boxed GdkFont -; gdk_font_ref -; gdk_font_unref) - -;(define-boxed GdkEvent -; gdk_event_copy -; gdk_event_free -; "sizeof(GdkEvent)") - -;(define-boxed GdkColor -; gdk_color_copy -; gdk_color_free -; "sizeof(GdkColor)") - -(define-func gtk_style_get_white_interp - GdkColor - ((GtkStyle style))) - -;;; Functions - -;; Gdk - -(define-func gdk_font_load - GdkFont - ((string name))) - -;; main - -(define-func gtk_exit - none - ((int code (= "0")))) - -(define-func gtk_main - none - ()) - -(define-func gtk_main_quit - none - ()) - -(define-func gtk_main_iteration - bool - ()) - -(define-func gtk_timeout_add_interp - int - ((int interval) - (callback function))) - -(define-func gtk_timeout_remove - none - ((int tag))) - -(define-func gtk_idle_add_interp - int - ((callback function))) - -(define-func gtk_idle_remove - none - ((int tag))) - -(define-func gtk_input_add_interp - int - ((int source) - (GdkInputCondition condition) - (callback callback))) - -(define-func gtk_input_remove - none - ((int tag))) - -(define-func gtk_rc_parse - none - ((string file))) - -(define-func g_mem_chunk_info - none - ()) - -;; GtkObject - -(define-func gtk_object_destroy - none - ((GtkObject object))) - -;; Signals - -(define-func gtk_signal_connect_interp - int - ((GtkObject object) - (string name) - (callback func) - (bool after (= "0")))) - -;; GtkWidget - -(define-object GtkWidget (GtkObject) - (fields - (GtkStyle style))) - -(define-func gtk_grab_add - none - ((GtkWidget widget))) - -(define-func gtk_grab_remove - none - ((GtkWidget widget))) - -(define-func GTK_WIDGET_STATE - GtkStateType - ((GtkWidget widget))) - -(define-func GTK_WIDGET_FLAGS - GtkWidgetFlags - ((GtkWidget widget))) - -(define-func GTK_WIDGET_SET_FLAGS - none - ((GtkWidget widget) - (GtkWidgetFlags flags))) - -(define-func GTK_WIDGET_UNSET_FLAGS - none - ((GtkWidget widget) - (GtkWidgetFlags flags))) - -(define-func gtk_widget_destroy - none - ((GtkWidget widget))) - -(define-func gtk_widget_unparent - none - ((GtkWidget widget))) - -(define-func gtk_widget_show - none - ((GtkWidget widget))) - -(define-func gtk_widget_hide - none - ((GtkWidget widget))) - -(define-func gtk_widget_map - none - ((GtkWidget widget))) - -(define-func gtk_widget_unmap - none - ((GtkWidget widget))) - -(define-func gtk_widget_realize - none - ((GtkWidget widget))) - -(define-func gtk_widget_unrealize - none - ((GtkWidget widget))) - -(define-func gtk_widget_add_accelerator - none - ((GtkWidget widget) - (string accel_signal) - (GtkAccelGroup accel_group) - (guint accel_key) - (guint accel_mods) - (GtkAccelFlags accel_flags))) - -(define-func gtk_widget_remove_accelerator - none - ((GtkWidget widget) - (GtkAccelGroup accel_group) - (guint accel_key) - (guint accel_mods))) - -(define-func gtk_widget_event - bool - ((GtkWidget widget) - (GdkEvent event))) - -(define-func gtk_widget_activate - none - ((GtkWidget widget))) - -(define-func gtk_widget_reparent - none - ((GtkWidget widget) - (GtkWidget new_parent))) - -(define-func gtk_widget_popup - none - ((GtkWidget widget) - (int x) - (int y))) - -(define-func gtk_widget_basic - bool - ((GtkWidget widget))) - -(define-func gtk_widget_grab_focus - none - ((GtkWidget widget))) - -(define-func gtk_widget_grab_default - none - ((GtkWidget widget))) - -(define-func gtk_widget_restore_state - none - ((GtkWidget widget))) - -(define-func gtk_widget_set_name - none - ((GtkWidget widget) - (string name))) - -(define-func gtk_widget_get_name - static_string - ((GtkWidget widget))) - -(define-func gtk_widget_set_state - none - ((GtkWidget widget) - (GtkStateType state))) - -(define-func gtk_widget_set_sensitive - none - ((GtkWidget widget) - (bool sensitive))) - -(define-func gtk_widget_set_style - none - ((GtkWidget widget) - (GtkStyle style))) - -(define-func gtk_widget_set_uposition - none - ((GtkWidget widget) - (int x) - (int y))) - -(define-func gtk_widget_set_usize - none - ((GtkWidget widget) - (int height) - (int width))) - -(define-func gtk_widget_set_events - none - ((GtkWidget widget) - (GdkEventMask events))) - -(define-func gtk_widget_set_extension_events - none - ((GtkWidget widget) - (GdkEventMask events))) - -(define-func gtk_widget_get_toplevel - GtkWidget - ((GtkWidget widget))) - - ;(define-func gtk_widget_get_ancestor - ; GtkWidget - ; ((GtkWidget widget) - ; (GtkType type))) - -(define-func gtk_widget_get_colormap - GdkColormap - ((GtkWidget widget))) - -(define-func gtk_widget_get_visual - GdkVisual - ((GtkWidget widget))) - -(define-func gtk_widget_get_style - GtkStyle - ((GtkWidget widget))) - -(define-func gtk_widget_get_events - GdkEventMask - ((GtkWidget widget))) - -(define-func gtk_widget_get_extension_events - GdkEventMask - ((GtkWidget widget))) - -(define-func gtk_widget_push_colormap - none - ((GdkColormap cmap))) - -(define-func gtk_widget_push_visual - none - ((GdkVisual visual))) - -(define-func gtk_widget_push_style - none - ((GtkStyle style))) - -(define-func gtk_widget_pop_colormap - none - ()) - -(define-func gtk_widget_pop_visual - none - ()) - -(define-func gtk_widget_pop_style - none - ()) - -(define-func gtk_widget_set_default_colormap - none - ((GdkColormap cmap))) - -(define-func gtk_widget_set_default_visual - none - ((GdkVisual visual))) - -(define-func gtk_widget_set_default_style - none - ((GtkStyle style))) - -(define-func gtk_widget_get_default_colormap - GdkColormap - ()) - -(define-func gtk_widget_get_default_visual - GdkVisual - ()) - -(define-func gtk_widget_get_default_style - GtkStyle - ()) - -;;; Container - -(define-object GtkContainer (GtkWidget)) - -(define-func gtk_container_border_width - none - ((GtkContainer container) - (int border_width))) - -(define-func gtk_container_add - none - ((GtkContainer container) - (GtkWidget widget))) - -(define-func gtk_container_remove - none - ((GtkContainer container) - (GtkWidget widget))) - -(define-func gtk_container_disable_resize - none - ((GtkContainer container))) - -(define-func gtk_container_enable_resize - none - ((GtkContainer container))) - -(define-func gtk_container_block_resize - none - ((GtkContainer container))) - -(define-func gtk_container_unblock_resize - none - ((GtkContainer container))) - -(define-func gtk_container_need_resize - bool - ((GtkContainer container))) - -(define-func gtk_container_focus - GtkDirectionType - ((GtkContainer container) - (GtkDirectionType direction))) - -;;; Bin - -(define-object GtkBin (GtkContainer)) - -;;; Window - -(define-object GtkWindow (GtkBin)) - -(define-func gtk_window_new - GtkWidget - ((GtkWindowType type))) - -(define-func gtk_window_set_title - none - ((GtkWindow window) - (string title))) - -(define-func gtk_window_set_focus - none - ((GtkWindow window) - (GtkWidget focus))) - -(define-func gtk_window_set_default - none - ((GtkWindow window) - (GtkWidget default))) - -(define-func gtk_window_set_policy - none - ((GtkWindow window) - (bool allow_shrink) - (bool allow_grow) - (bool auto_shrink))) - -(define-func gtk_window_add_accel_group - none - ((GtkWindow window) - (GtkAccelGroup accel_group))) - -(define-func gtk_window_remove_accel_group - none - ((GtkWindow window) - (GtkAccelGroup accel_group))) - -(define-func gtk_window_position - none - ((GtkWindow window) - (GtkWindowPosition position))) - -;;; Box - -(define-object GtkBox (GtkContainer)) - -(define-func gtk_box_pack_start - none - ((GtkBox box) - (GtkWidget child) - (bool expand (= "TRUE")) - (bool fill (= "TRUE")) - (int padding (= "0")))) - -(define-func gtk_box_pack_end - none - ((GtkBox box) - (GtkWidget child) - (bool expand (= "TRUE")) - (bool fill (= "TRUE")) - (int padding (= "0")))) - -(define-func gtk_box_pack_start_defaults - none - ((GtkBox box) - (GtkWidget child))) - -(define-func gtk_box_pack_end_defaults - none - ((GtkBox box) - (GtkWidget child))) - -(define-func gtk_box_set_homogeneous - none - ((GtkBox box) - (bool homogenous))) - -(define-func gtk_box_set_spacing - none - ((GtkBox box) - (int spacing))) - -;;; Table - -(define-object GtkTable (GtkContainer)) - -(define-func gtk_table_new - GtkWidget - ((int rows) - (int columns) - (bool homogenous))) - -(define-func gtk_table_attach - none - ((GtkTable table) - (GtkWidget child) - (int left_attach) - (int right_attach) - (int top_attach) - (int bottom_attach) - (GtkAttachOptions xoptions (= "GTK_EXPAND|GTK_FILL")) - (GtkAttachOptions yoptions (= "GTK_EXPAND|GTK_FILL")) - (int xpadding (= "0")) - (int ypadding (= "0")))) - -(define-func gtk_table_attach_defaults - none - ((GtkTable table) - (GtkWidget child) - (int left_attach) - (int right_attach) - (int top_attach) - (int bottom_attach))) - -(define-func gtk_table_set_row_spacing - none - ((GtkTable table) - (int row) - (int spacing))) - -(define-func gtk_table_set_col_spacing - none - ((GtkTable table) - (int column) - (int spacing))) - -(define-func gtk_table_set_row_spacings - none - ((GtkTable table) - (int spacing))) - -(define-func gtk_table_set_col_spacings - none - ((GtkTable table) - (int spacing))) - -;;; Button - -(define-object GtkButton (GtkContainer)) - -(define-func gtk_button_new - GtkWidget - ()) - -(define-func gtk_button_new_with_label - GtkWidget - ((string label))) - -(define-func gtk_button_pressed - none - ((GtkButton button))) - -(define-func gtk_button_released - none - ((GtkButton button))) - -(define-func gtk_button_clicked - none - ((GtkButton button))) - -(define-func gtk_button_enter - none - ((GtkButton button))) - -(define-func gtk_button_leave - none - ((GtkButton button))) - -;;; ToggleButton - -(define-object GtkToggleButton (GtkButton)) - -(define-func gtk_toggle_button_new - GtkWidget - ()) - -(define-func gtk_toggle_button_new_with_label - GtkWidget - ((string label))) - -(define-func gtk_toggle_button_set_mode - none - ((GtkToggleButton toggle_button) - (bool draw_indicator))) - -(define-func gtk_toggle_button_set_state - none - ((GtkToggleButton toggle_button) - (bool state))) - -(define-func gtk_toggle_button_toggled - none - ((GtkToggleButton toggle_button))) - -;;; CheckButton - -(define-object GtkCheckButton (GtkToggleButton)) - -(define-func gtk_check_button_new - GtkWidget - ()) - -(define-func gtk_check_button_new_with_label - GtkWidget - ((string label))) - -;;; RadioButton - -(define-object GtkRadioButton (GtkCheckButton)) - -(define-func gtk_radio_button_new_interp - GtkWidget - ((GtkRadioButton group (null-ok)))) - -(define-func gtk_radio_button_new_with_label_interp - GtkWidget - ((GtkRadioButton group (null-ok)) - (string label))) - -;;; Misc - -(define-object GtkMisc (GtkWidget)) - -(define-func gtk_misc_set_alignment - none - ((GtkMisc misc) - (float xalign) - (float yalign))) - -(define-func gtk_misc_set_padding - none - ((GtkMisc misc) - (int xpad) - (int ypad))) - -;;; Label - -(define-object GtkLabel (GtkMisc)) - -(define-func gtk_label_new - GtkWidget - ((string str))) - -(define-func gtk_label_set - none - ((GtkLabel label) - (string str))) - -(define-func gtk_label_get_interp - static_string - ((GtkLabel label))) - -;; VBox - -(define-object GtkVBox (GtkBox)) - -(define-func gtk_vbox_new - GtkWidget - ((bool homogenous) - (int spacing))) - -;; HBox - -(define-object GtkHBox (GtkBox)) - -(define-func gtk_hbox_new - GtkWidget - ((bool homogenous) - (int spacing))) - -;; Separator - -(define-object GtkSeparator (GtkWidget)) - -;; HSeparator - -(define-object GtkHSeparator (GtkSeparator)) - -(define-func gtk_hseparator_new - GtkWidget - ()) - -;; VSeparator - -(define-object GtkVSeparator (GtkSeparator)) - -(define-func gtk_vseparator_new - GtkWidget - ()) - -;; Frame - -(define-object GtkFrame (GtkBin)) - -(define-func gtk_frame_new - GtkWidget - ((string label (null-ok)))) - -(define-func gtk_frame_set_label - none - ((GtkFrame frame) - (string label))) - -(define-func gtk_frame_set_label_align - none - ((GtkFrame frame) - (float xalign) - (float yalign))) - -(define-func gtk_frame_set_shadow_type - none - ((GtkFrame frame) - (GtkShadowType type))) - -;; Progress Bar - -(define-object GtkProgressBar (GtkWidget) - (fields - (float percentage))) - -(define-func gtk_progress_bar_new - GtkWidget - ()) - -(define-func gtk_progress_bar_update - none - ((GtkProgressBar progress_bar) - (float percentage))) - - ;(define-func gtk_progress_bar_percentage - ; float - ; ((GtkProgressBar progress_bar))) - -;; Tooltips - -(define-object GtkTooltips (GtkData)) - -(define-func gtk_tooltips_new - GtkTooltips - ()) - -(define-func gtk_tooltips_destroy - none - ((GtkTooltips tooltips))) - -(define-func gtk_tooltips_enable - none - ((GtkTooltips tooltips))) - -(define-func gtk_tooltips_disable - none - ((GtkTooltips tooltips))) - -(define-func gtk_tooltips_set_delay - none - ((GtkTooltips tooltips) - (int delay))) - -(define-func gtk_tooltips_set_tips - none - ((GtkTooltips tooltips) - (GtkWidget widget) - (string tips_text (null-ok)))) - -(define-func gtk_tooltips_set_colors - none - ((GtkTooltips tooltips) - (GdkColor background) - (GdkColor foreground))) - -;; MenuShell - -(define-object GtkMenuShell (GtkContainer)) - -(define-func gtk_menu_shell_append - none - ((GtkMenuShell menu_shell) - (GtkWidget child))) - -(define-func gtk_menu_shell_prepend - none - ((GtkMenuShell menu_shell) - (GtkWidget child))) - -(define-func gtk_menu_shell_insert - none - ((GtkMenuShell menu_shell) - (GtkWidget child) - (int position))) - -(define-func gtk_menu_shell_deactivate - none - ((GtkMenuShell menu_shell))) - -;; MenuBar - -(define-object GtkMenuBar (GtkMenuShell)) - -(define-func gtk_menu_bar_new - GtkWidget - ()) - -(define-func gtk_menu_bar_append - none - ((GtkMenuBar menu_bar) - (GtkWidget child))) - -(define-func gtk_menu_bar_prepend - none - ((GtkMenuBar menu_bar) - (GtkWidget child))) - -(define-func gtk_menu_bar_insert - none - ((GtkMenuBar menu_bar) - (GtkWidget child) - (int position))) - -;; Menu - -(define-object GtkMenu (GtkMenuShell)) - -(define-func gtk_menu_new - GtkWidget - ()) - -(define-func gtk_menu_append - none - ((GtkMenu menu) - (GtkWidget child))) - -(define-func gtk_menu_prepend - none - ((GtkMenu menu) - (GtkWidget child))) - -(define-func gtk_menu_insert - none - ((GtkMenu menu) - (GtkWidget child) - (int position))) - -(define-func gtk_menu_popup_interp - none - ((GtkMenu menu) - (GtkWidget parent_menu_shell) - (GtkWidget parent_menu_item) - (int button) - (int activate_time))) - -(define-func gtk_menu_popdown - none - ((GtkMenu menu))) - -(define-func gtk_menu_get_active - GtkWidget - ((GtkMenu menu))) - -(define-func gtk_menu_set_active - none - ((GtkMenu menu) - (int index))) - -(define-func gtk_menu_set_accel_group - none - ((GtkMenu menu) - (GtkAccelGroup accel_group))) - - -;; Item - -(define-object GtkItem (GtkBin)) - -(define-func gtk_item_select - none - ((GtkItem item))) - -(define-func gtk_item_deselect - none - ((GtkItem item))) - -(define-func gtk_item_toggle - none - ((GtkItem item))) - -;; MenuItem - -(define-object GtkMenuItem (GtkItem)) - -(define-func gtk_menu_item_new - GtkWidget - ()) - -(define-func gtk_menu_item_new_with_label - GtkWidget - ((string label))) - -(define-func gtk_menu_item_set_submenu - none - ((GtkMenuItem menu_item) - (GtkWidget submenu))) - -(define-func gtk_menu_item_set_placement - none - ((GtkMenuItem menu_item) - (GtkSubmenuPlacement placement))) - -(define-func gtk_menu_item_configure - none - ((GtkMenuItem menu_item) - (bool show_toggle_indicator) - (bool show_submenu_indicator))) - -(define-func gtk_menu_item_select - none - ((GtkMenuItem menu_item))) - -(define-func gtk_menu_item_deselect - none - ((GtkMenuItem menu_item))) - -(define-func gtk_menu_item_activate - none - ((GtkMenuItem menu_item))) - -;; CheckMenuItem - -(define-object GtkCheckMenuItem (GtkMenuItem)) - -(define-func gtk_check_menu_item_new - GtkWidget - ()) - -(define-func gtk_check_menu_item_new_with_label - GtkWidget - ((string label))) - -(define-func gtk_check_menu_item_set_state - none - ((GtkCheckMenuItem check_menu_item) - (bool state))) - -(define-func gtk_check_menu_item_toggled - none - ((GtkCheckMenuItem check_menu_item))) - -;; RadioMenuItem - -(define-object GtkRadioMenuItem (GtkCheckMenuItem)) - -(define-func gtk_radio_menu_item_new_interp - GtkWidget - ((GtkRadioMenuItem group (null-ok)))) - -(define-func gtk_radio_menu_item_new_with_label_interp - GtkWidget - ((GtkRadioMenuItem group (null-ok)) - (string label))) - -;; OptionMenu - -(define-object GtkOptionMenu (GtkButton)) - -(define-func gtk_option_menu_new - GtkWidget - ()) - -(define-func gtk_option_menu_get_menu - GtkWidget - ((GtkOptionMenu option_menu))) - -(define-func gtk_option_menu_set_menu - none - ((GtkOptionMenu option_menu) - (GtkWidget menu))) - -(define-func gtk_option_menu_remove_menu - none - ((GtkOptionMenu option_menu))) - -(define-func gtk_option_menu_set_history - none - ((GtkOptionMenu option_menu) - (int index))) - -;; Pixmaps - -(define-object GtkPixmap (GtkMisc)) - -(define-func gtk_pixmap_new_interp - GtkWidget - ((string xpm_file) - (GtkWidget intended_parent))) - -;; Data - -(define-object GtkData (GtkObject)) - -;; Adjustment - -(define-object GtkAdjustment (GtkData)) - -(define-func gtk_adjustment_new - GtkObject - ((float value) - (float lower) - (float upper) - (float step_increment) - (float page_increment) - (float page_size))) - -;; ScrolledWidow - -(define-object GtkScrolledWindow (GtkContainer)) - -(define-func gtk_scrolled_window_new - GtkWidget - ((GtkAdjustment hadjustment (null-ok) (= "NULL")) - (GtkAdjustment vadjustment (null-ok) (= "NULL")))) - -(define-func gtk_scrolled_window_get_hadjustment - GtkAdjustment - ((GtkScrolledWindow scrolled_window))) - -(define-func gtk_scrolled_window_get_vadjustment - GtkAdjustment - ((GtkScrolledWindow scrolled_window))) - -(define-func gtk_scrolled_window_set_policy - none - ((GtkScrolledWindow scrolled_window) - (GtkPolicyType hscrollbar_policy) - (GtkPolicyType vscrollbar_policy))) - -;; ListItem - -(define-object GtkListItem (GtkItem)) - -(define-func gtk_list_item_new - GtkWidget - ()) - -(define-func gtk_list_item_new_with_label - GtkWidget - ((string label))) - -(define-func gtk_list_item_select - none - ((GtkListItem list_item))) - -(define-func gtk_list_item_deselect - none - ((GtkListItem list_item))) - -;; List - -(define-object GtkList (GtkContainer)) - -(define-func gtk_list_new - GtkWidget - ()) - -(define-func gtk_list_append_item - none - ((GtkList list) - (GtkListItem item))) - -(define-func gtk_list_prepend_item - none - ((GtkList list) - (GtkListItem item))) - -;; XXX many missing - -(define-func gtk_list_clear_items - none - ((GtkList list) - (int start) - (int end))) - -(define-func gtk_list_select_item - none - ((GtkList list) - (int item))) - -(define-func gtk_list_unselect_item - none - ((GtkList list) - (int item))) - -(define-func gtk_list_select_child - none - ((GtkList list) - (GtkWidget child))) - -(define-func gtk_list_unselect_child - none - ((GtkList list) - (GtkWidget child))) - -(define-func gtk_list_child_position - int - ((GtkList list) - (GtkWidget child))) - -(define-func gtk_list_set_selection_mode - none - ((GtkList list) - (GtkSelectionMode mode))) - -;; Notebook - -(define-object GtkNotebook (GtkContainer) - (fields - (GtkPositionType tab_pos))) - -(define-func gtk_notebook_new - GtkWidget - ()) - -(define-func gtk_notebook_append_page - none - ((GtkNotebook notebook) - (GtkWidget child) - (GtkWidget tab_label))) - -(define-func gtk_notebook_prepend_page - none - ((GtkNotebook notebook) - (GtkWidget child) - (GtkWidget tab_label))) - -(define-func gtk_notebook_insert_page - none - ((GtkNotebook notebook) - (GtkWidget child) - (GtkWidget tab_label) - (int position))) - -(define-func gtk_notebook_remove_page - none - ((GtkNotebook notebook) - (int page_num))) - -(define-func gtk_notebook_current_page - int - ((GtkNotebook notebook))) - -(define-func gtk_notebook_set_page - none - ((GtkNotebook notebook) - (int page_num))) - -(define-func gtk_notebook_next_page - none - ((GtkNotebook notebook))) - -(define-func gtk_notebook_prev_page - none - ((GtkNotebook notebook))) - -(define-func gtk_notebook_set_tab_pos - none - ((GtkNotebook notebook) - (GtkPositionType pos))) - -(define-func gtk_notebook_set_show_tabs - none - ((GtkNotebook notebook) - (bool show_tabs))) - -(define-func gtk_notebook_set_show_border - none - ((GtkNotebook notebook) - (bool show_border))) - -;; Entry - -(define-object GtkEntry (GtkWidget)) - -(define-func gtk_entry_new - GtkWidget - ()) - -(define-func gtk_entry_set_text - none - ((GtkEntry entry) - (string text))) - -(define-func gtk_entry_append_text - none - ((GtkEntry entry) - (string text))) - -(define-func gtk_entry_prepend_text - none - ((GtkEntry entry) - (string text))) - -(define-func gtk_entry_set_position - none - ((GtkEntry entry) - (int position))) - -(define-func gtk_entry_get_text - static_string - ((GtkEntry entry))) - -;; Text - -(define-object GtkText (GtkWidget)) - -(define-func gtk_text_new - GtkWidget - ((GtkAdjustment hadj (null-ok)) - (GtkAdjustment vadj (null-ok)))) - -(define-func gtk_text_set_editable - none - ((GtkText text) - (bool editable))) - -(define-func gtk_text_set_adjustments - none - ((GtkText text) - (GtkAdjustment hadj) - (GtkAdjustment vadj))) - -(define-func gtk_text_set_point - none - ((GtkText text) - (uint index))) - -(define-func gtk_text_get_point - uint - ((GtkText text))) - -(define-func gtk_text_get_length - uint - ((GtkText text))) - -(define-func gtk_text_freeze - none - ((GtkText text))) - -(define-func gtk_text_thaw - none - ((GtkText text))) - -(define-func gtk_text_insert - none - ((GtkText text) - (GdkFont font (null-ok)) - (GdkColor fore (null-ok)) - (GdkColor back (null-ok)) - (string chars) - (int length))) - -(define-func gtk_text_backward_delete - none - ((GtkText text) - (uint nchars))) - -(define-func gtk_text_foreward_delete - none - ((GtkText text) - (uint nchars))) - -;; Alignment - -(define-object GtkAlignment (GtkBin)) - -(define-func gtk_alignment_new - GtkWidget - ((float xalign) - (float yalign) - (float xscale) - (float yscale))) - -(define-func gtk_alignment_set - none - ((GtkAlignment alignment) - (float xalign) - (float yalign) - (float xscale) - (float yscale))) - -;; Color - - ; XXX lots missing - -(define-func gdk_color_parse_interp - GdkColor - ((string spec))) - -;; Preview - -(define-object GtkPreview (GtkWidget)) - -;; XXX lots missing - -(define-func gtk_preview_set_install_cmap - none - ((bool install_cmap))) - -(define-func gtk_preview_set_reserved - none - ((int nreserved))) - -(define-func gtk_preview_get_visual - GdkVisual - ()) - -(define-func gtk_preview_get_cmap - GdkColormap - ()) - -;; ColorSelectionDialog - -(define-object GtkColorSelectionDialog (GtkWindow) - (fields - (GtkWidget colorsel) - (GtkWidget main_vbox) - (GtkWidget ok_button) - (GtkWidget reset_button) - (GtkWidget cancel_button) - (GtkWidget help_button))) - -(define-func gtk_color_selection_dialog_new - GtkWidget - ((string title))) - -;; ColorSelection - -(define-object GtkColorSelection (GtkVBox)) - -(define-func gtk_color_selection_new - GtkWidget - ()) - -(define-func gtk_color_selection_set_update_policy - none - ((GtkColorSelection colorsel) - (GtkUpdateType policy))) - -(define-func gtk_color_selection_set_opacity - none - ((GtkColorSelection colorsel) - (bool use_opacity))) - -;; Range - -(define-object GtkRange (GtkWidget)) - -(define-func gtk_range_get_adjustment - GtkAdjustment - ((GtkRange range))) - -(define-func gtk_range_set_update_policy - none - ((GtkRange range) - (GtkUpdateType policy))) - -(define-func gtk_range_set_adjustment - none - ((GtkRange range) - (GtkAdjustment adjustment))) - -;; Scale - -(define-object GtkScale (GtkRange)) - -(define-func gtk_scale_set_digits - none - ((GtkScale scale) - (bool digits))) - -(define-func gtk_scale_set_draw_value - none - ((GtkScale scale) - (bool draw_value))) - -(define-func gtk_scale_set_value_pos - none - ((GtkScale scale) - (GtkPositionType pos))) - -;; HScale - -(define-object GtkHScale (GtkScale)) - -(define-func gtk_hscale_new - GtkWidget - ((GtkAdjustment adjustment))) - -;; VScale - -(define-object GtkVScale (GtkScale)) - -(define-func gtk_vscale_new - GtkWidget - ((GtkAdjustment adjustment))) - -;; Scrollbar - -(define-object GtkScrollbar (GtkRange)) - -;; HScrollbar - -(define-object GtkHScrollbar (GtkScrollbar)) - -(define-func gtk_hscrollbar_new - GtkWidget - ((GtkAdjustment adjustment))) - -;; VScrollbar - -(define-object GtkVScrollbar (GtkScrollbar)) - -(define-func gtk_vscrollbar_new - GtkWidget - ((GtkAdjustment adjustment))) - -;; Dialog - -(define-object GtkDialog (GtkWindow) - (fields - (GtkWidget vbox) - (GtkWidget action_area))) - -(define-func gtk_dialog_new - GtkWidget - ()) - -;; Paned - -(define-object GtkPaned (GtkContainer)) - -(define-func gtk_paned_add1 - none - ((GtkPaned paned) - (GtkWidget child))) - -(define-func gtk_paned_add2 - none - ((GtkPaned paned) - (GtkWidget child))) - -(define-func gtk_paned_handle_size - none - ((GtkPaned paned) - (int size))) - -(define-func gtk_paned_gutter_size - none - ((GtkPaned paned) - (int size))) - -;; HPaned - -(define-object GtkHPaned (GtkPaned)) - -(define-func gtk_hpaned_new - GtkWidget - ()) - -;; VPaned - -(define-object GtkVPaned (GtkPaned)) - -(define-func gtk_vpaned_new - GtkWidget - ()) - -;;; hack - -;(define-func panel_register_toy -; none -; ((gpointer panel) -; (GtkWidget applet) -; (string id) -; (string params) -; (int x) -; (int y) -; (int flags))) - -;(define-func panel_quit -; none -; ((gpointer panel))) - -;(define-func panel_new_applet -; none -; ((gpointer panel) -; (string applet) -; (string params))) diff --git a/gtk/makefile b/gtk/makefile index cc0767e68..9e74c4be0 100755 --- a/gtk/makefile +++ b/gtk/makefile @@ -2,11 +2,9 @@ all: @echo "You must use 'make windows' or 'make unix'." @echo "'make unix' is broken for now." -windows: defs +windows: $(CSC) /unsafe /target:library /r:../glib/glib-sharp.dll /r:../gdk/gdk-sharp.dll /out:gtk-sharp.dll /recurse:*.cs unix: @echo "'make unix' is broken for now." -defs: - ../defs-parse.pl < gtk.defs > generated.cs diff --git a/makefile b/makefile index 8b1b5f7be..65bc3cffe 100644 --- a/makefile +++ b/makefile @@ -1,4 +1,4 @@ -DIRS=glib gdk gtk sample +DIRS=codegen glib gdk gtk sample ROOT=//$(subst \,/,$(subst :\,/,$(SYSTEMROOT))) CSC=$(ROOT)/microsoft.net/framework/v1.0.2914/csc.exe diff --git a/sample/ButtonApp.cs b/sample/ButtonApp.cs index 9514b8177..37cbb2731 100755 --- a/sample/ButtonApp.cs +++ b/sample/ButtonApp.cs @@ -16,7 +16,7 @@ namespace GtkSamples { { Application.Init (ref args); Window win = new Window ("Button Tester"); - win.DeleteEvent += new EventHandler (Window_Delete); + win.Deleted += new EventHandler (Window_Delete); Button btn = new Button (); btn.Clicked += new EventHandler (btn_click); btn.SizeRequest = new Size (32, 24); diff --git a/sample/HelloWorld.cs b/sample/HelloWorld.cs index 77f6c7db9..2f3cdd638 100755 --- a/sample/HelloWorld.cs +++ b/sample/HelloWorld.cs @@ -20,7 +20,7 @@ namespace GtkSamples { System.Console.WriteLine (win.Title); System.Console.WriteLine (win.DefaultSize); System.Console.WriteLine (win.AllowShrink); - win.DeleteEvent += new EventHandler (Window_Delete); + win.Deleted += new EventHandler (Window_Delete); win.Show (); Application.Run (); return 0;