From 98cf0e893e14a7fe524e18f56165f7f08df062f3 Mon Sep 17 00:00:00 2001 From: Mike Kestner Date: Sat, 24 Aug 2002 05:32:26 +0000 Subject: [PATCH] Clean out a bunch of cruft from the tree. svn path=/trunk/gtk-sharp/; revision=6988 --- HACKING | 7 - codegen/defs-parse.pl | 675 -- codegen/gdk-structs.defs | 570 - codegen/gdk-types.defs | 912 -- codegen/get-props-from-source.pl | 144 - codegen/get-signals-from-source.pl | 96 - codegen/get-structs-from-source.pl | 66 - codegen/gtk-props.defs | 282 - codegen/gtk-signals.defs | 423 - codegen/gtk-structs.defs | 1088 -- codegen/gtk-types.defs | 1968 ---- codegen/gtk.defs | 15379 --------------------------- codegen/hardcoded.defs | 30 - codegen/makefile | 10 - codegen/pango-structs.defs | 412 - codegen/pango-types.defs | 271 - codegen/pango.defs | 1738 --- parser/README | 16 - parser/TODO | 3 - todo/Makefile | 5 - todo/todo.xml | 21 - todo/todo.xsl | 34 - 22 files changed, 24150 deletions(-) delete mode 100755 codegen/defs-parse.pl delete mode 100644 codegen/gdk-structs.defs delete mode 100644 codegen/gdk-types.defs delete mode 100755 codegen/get-props-from-source.pl delete mode 100755 codegen/get-signals-from-source.pl delete mode 100755 codegen/get-structs-from-source.pl delete mode 100644 codegen/gtk-props.defs delete mode 100644 codegen/gtk-signals.defs delete mode 100644 codegen/gtk-structs.defs delete mode 100644 codegen/gtk-types.defs delete mode 100644 codegen/gtk.defs delete mode 100644 codegen/hardcoded.defs delete mode 100755 codegen/makefile delete mode 100644 codegen/pango-structs.defs delete mode 100644 codegen/pango-types.defs delete mode 100644 codegen/pango.defs delete mode 100644 parser/README delete mode 100644 parser/TODO delete mode 100644 todo/Makefile delete mode 100644 todo/todo.xml delete mode 100644 todo/todo.xsl diff --git a/HACKING b/HACKING index e3cc7e2c3..c89be5de0 100755 --- a/HACKING +++ b/HACKING @@ -6,10 +6,3 @@ Prior to checking anything into CVS, please send a patch to the mailing list for approval. Any patches should be submitted in diff -u format. Also, it is assumed that the submitter has verified that the patch does not break the build, and hopefully that it doesn't break runtime. - -Patches without Documentation comments will be seriously frowned upon, -if not outright rejected. All classes, methods, properties, events, etc... -that are non-private should be documented with XML comment tags. At a minimum, -the summary and remarks tags, plus returns and params, if applicable. Doing -this as we go is the only feasible way to make sure that our docs won't end -up sucking bigtime. diff --git a/codegen/defs-parse.pl b/codegen/defs-parse.pl deleted file mode 100755 index 877dbda22..000000000 --- a/codegen/defs-parse.pl +++ /dev/null @@ -1,675 +0,0 @@ -#!/usr/bin/perl -# -# defs-parse.pl : Gtk+ defs format parser and code generator. -# -# Author: Mike Kestner -# -# 2001 Mike Kestner - -%maptypes = ( - 'none', "void", 'gboolean', "bool", 'gint', "int", 'guint', "uint", - 'guint32', "uint", 'const-gchar', "String", 'GObject', "GLib.Object", - 'gchar', "String", 'gfloat', "float", 'gdouble', "double", - 'GList', "IntPtr", 'GSList', "IntPtr", 'gpointer', "IntPtr", - 'long', "long", 'gint8', "byte", 'guint8', "byte", 'gint16', "short", - 'guint16', "ushort", 'char', "String", 'GPtrArray', "IntPtr[]", - 'const-char', "String", 'gushort', "ushort", 'gshort', "short", - 'guint1', "bool", 'guchar', "byte", 'GValue', "GLib.Value", - 'GtkType', "int", 'glong', "long", 'gulong', "ulong", 'GQuark', "int", - 'va_list', "IntPtr", 'GParamSpec', "IntPtr", 'int', "int", - 'double', "double", 'gunichar', "String", 'uint1', "bool", - 'GtkSignalFunc', "IntPtr"); - -%marshaltypes = ( - 'none', "void", 'gboolean', "bool", 'gint', "int", 'guint', "uint", - 'guint32', "uint", 'const-gchar', "IntPtr", 'GObject', "IntPtr", - 'gchar', "IntPtr", 'gfloat', "float", 'gdouble', "double", - 'GList', "IntPtr", 'GSList', "IntPtr", 'gpointer', "IntPtr", - 'long', "long", 'gint8', "byte", 'guint8', "byte", 'gint16', "short", - 'guint16', "ushort", 'char', "IntPtr", 'GPtrArray', "IntPtr[]", - 'const-char', "IntPtr", 'gushort', "ushort", 'gshort', "short", - 'guint1', "bool", 'guchar', "byte", 'GValue', "GLib.Value", - 'GtkType', "int", 'glong', "long", 'gulong', "ulong", 'GQuark', "int", - 'va_list', "IntPtr", 'GParamSpec', "IntPtr", 'int', "int", - 'double', "double", 'gunichar', "Unicode", 'uint1', "bool", - 'GtkSignalFunc', "IntPtr"); - - -%usings = ( - 'GLib', "System,System.Collections,System.Runtime.InteropServices,GLib", - 'Pango', "System,System.Collections,System.Runtime.InteropServices,GLib,Pango", - 'Gdk', "System,System.Collections,System.Runtime.InteropServices,GLib,Pango,Gdk", - 'Gtk', "System,System.Collections,System.Runtime.InteropServices,GLib,Pango,Gdk,Gtk,GtkSharp", - 'GtkSharp', "System,System.Collections,System.Runtime.InteropServices,GLib,Pango,Gdk,Gtk"); - -`mkdir -p ../glib/generated`; -`mkdir -p ../pango/generated`; -`mkdir -p ../gdk/generated`; -`mkdir -p ../gtk/generated`; - -while ($def = get_def()) { - - if ($def =~ /^\(define-(enum|flags)/) { - gen_enum (split (/\n/, $def)); - } elsif ($def =~ /^\(define-struct (\w+)/) { - $name = $1; - $def =~ /c-name "(\w+)"/; - $cname=$1; - $def =~ s/\r?\n\s*//g; - $structs{$cname} = $def; - $maptypes{$cname} = $name; - $marshaltypes{$cname} = $name; - } elsif ($def =~ /^\(define-object (\w+)/) { - $name = $1; - $def =~ /c-name "(\w+)"/; - $cname=$1; - $def =~ s/\r?\n\s*//g; - $objects{$cname} = $def; - $maptypes{$cname} = $name; - $marshaltypes{$cname} = "IntPtr"; - } elsif ($def =~ /^\(define-(prop|signal|method)/) { - $def =~ /of-object "(\w+)"/; - $cname=$1; - if (exists($objects{$cname})) { - $def =~ s/\r?\n\s*//g; - $objects{$cname} .= "\n$def"; - } - } elsif ($def =~ /^\(define-function/) { - if (($def =~ /is-constructor-of (\w+)\)/) && - (exists($objects{$1}))) { - $cname=$1; - $def =~ s/\r?\n\s*//g; - $objects{$cname} .= "\n$def"; - } - } elsif ($def =~ /^\(define-(interface)/) { - # Nothing much to do here, I think. - } elsif ($def =~ /^\(define-boxed/) { - # Probably need to handle these though... - } else { - die "Unexpected definition $def\n"; - } - -} - -foreach $key (keys (%structs)) { - next if ($key =~ /GtkTree|GtkText/); - gen_struct ($key, $structs{$key}); -} - -foreach $key (keys (%objects)) { - next if ($key =~ /GtkTree|GtkText/); - gen_object (split (/\n/, $objects{$key})); -} - -############### -# subroutines -############### - -# Gets a single definition from the input stream. -sub get_def -{ - while ($line = ) { - next if ($line !~ /^\(define/); - $expr = $line; - do { - $line = ; - $expr .= $line; - } until ($line =~ /^\)/); - return $expr; - } - return; -} - -# Converts a dash or underscore separated name to StudlyCaps. -sub StudCaps -{ - my ($symb) = @_; - $symb =~ s/^([a-z])/\u\1/; - $symb =~ s/[-_]([a-z])/\u\1/g; - $symb =~ s/[-_](\d)/\1/g; - return $symb; -} - -# Code generation for the enum and flags definitions. -sub gen_enum -{ - my (@lines) = @_; - $line = $lines[$pos=0]; - $line =~ /^\(define-(enum|flags) (\w+)/; - $type = $1; - $typename = $2; - - $line = $lines[++$pos]; - $line =~ /\(in-module "(\w+)"/; - $namespace = $1; - - $maptypes{"$namespace$typename"} = $typename; - $marshaltypes{"$namespace$typename"} = "int"; - - do { $line = $lines[++$pos]; } until ($line =~ /\(values/); - - @enums = (); - while ($line = $lines[++$pos]) { - last if ($line =~ /^\s*\)/); - if ($line =~ /\((.+)\)/) { - ($name, $dontcare, $val) = split (/ /, $1); - $name =~ s/\"//g; - $name = StudCaps ($name); - @enums = (@enums, "$name:$val"); - } - } - - $dir = "../" . lc ($namespace) . "/generated"; - - 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/// Valid values:\n"; - print OUTFILE "\t///\t\n"; - foreach $enum (@enums) { - ($name) = split (/:/, $enum); - print OUTFILE "\t///\t\t $name \n" - } - print OUTFILE "\t///\t\n\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); -} - -# Code generation for the structure definitions. -sub gen_struct -{ - my ($cname, $def) = @_; - - $def =~ /define-struct (\w+)/; - $name = $1; - - $def =~ /in-module "(\w+)"/; - $namespace = $1; - - $dir = "../" . lc ($namespace) . "/generated"; - open (OUTFILE, ">$dir/$name.cs") || die "can't open file"; - - print OUTFILE "// Generated file: Do not modify\n\n"; - print OUTFILE "namespace $namespace {\n\n"; - foreach $ns (split (/,/, $usings{$namespace})) { - print OUTFILE "\tusing $ns;\n"; - } - print OUTFILE "\n\t/// $name Structure \n"; - print OUTFILE "\t/// \n\t///\tFIXME: Add docs.\n"; - print OUTFILE "\t/// \n\n"; - - print OUTFILE "\t[StructLayout(LayoutKind.Sequential)]\n"; - print OUTFILE "\tpublic class $name {\n"; - - if ($def =~ /fields'\((.*)\)\)\)/) { - foreach $parm (split(/\)'\(/, $1)) { - $parm =~ s/\*//g; - $parm =~ /"(.*)" "(.*)"/; - $ptype = $maptypes{$1}; - $pname = $2; - if ($pname =~ /(\w+)\s*\(.*\)/) { - $pname = $1; - $ptype = "IntPtr"; # FIXME: delegate? - } - $pname =~ s/object/objekt/; - $pname =~ s/string/str1ng/; - $pname =~ s/\bin\b/in_/; - if ($pname =~ /(\w+)\s*\[\d+\]/) { - $ptype .= "[]"; - $pname = $1; - } elsif ($pname =~ /(\w+)\s*\:\s*(\d+)/) { - $pname = $1; - if ($2 == 1) { - $ptype = "bool"; - } - } - print OUTFILE "\t\tpublic $ptype $pname;\n"; - } - } - - print OUTFILE "\t}\n\n}\n"; - close (OUTFILE); -} - -# Code generation for objects. -sub gen_object -{ - my ($objdef, @defs) = @_; - my ($key, $typename, $parent, $dir, $namespace, $abstract, $def); - - $objdef =~ /define-object (\w+)/; - $typename = $1; - $objdef =~ /parent "(\w+)"/; - $parent = $maptypes{$1}; - $objdef =~ /in-module "(\w+)"/; - $namespace = $1; - $dir = "../" . lc ($namespace) . "/generated"; - - open (OUTFILE, ">$dir/$typename.cs") || die "can't open file $dir/$typename.cs"; - - %props = (); - %signals = (); - %methods = (); - @ctors = (); - foreach $def (@defs) { - if ($def =~ /define-property (\w+)/) { - $props{StudCaps($1)} = $def; - } elsif ($def =~ /define-signal (\w+)/) { - $signals{StudCaps($1)} = $def; - } elsif ($def =~ /define-method (\w+)/) { - $methods{StudCaps($1)} = $def; - } elsif ($def =~ /is-constructor-of/) { - @ctors = (@ctors, $def); - } - } - - print OUTFILE "// Generated file: Do not modify\n\n"; - print OUTFILE "namespace $namespace {\n\n"; - foreach $ns (split (/,/, $usings{$namespace})) { - print OUTFILE "\tusing $ns;\n"; - } - print OUTFILE "\n\t/// $typename Class \n"; - print OUTFILE "\t/// \n\t///\t FIXME: Generate docs\n"; - print OUTFILE "\t/// \n\n"; - print OUTFILE "\tpublic "; - if (@ctors == 0) { - print OUTFILE "abstract "; - } - print OUTFILE "class $typename : $parent {\n\n"; - - # Only generate the wrapper ctor if other ctors exist - if (@ctors) { - print OUTFILE "\t\t/// \n"; - print OUTFILE "\t\t///\t$typename Constructor\n"; - print OUTFILE "\t\t/// \n"; - print OUTFILE "\t\t/// \n"; - print OUTFILE "\t\t///\tWraps a raw GObject reference.\n"; - print OUTFILE "\t\t/// \n\n"; - print OUTFILE "\t\tpublic $typename (IntPtr o)\n\t\t{\n"; - print OUTFILE "\t\t\tRawObject = o;\n\t\t}\n\n"; - } - - foreach $ctor (@ctors) { - print OUTFILE gen_ctor ($ctor, "gtk-1.3.dll"); - } - - foreach $key (sort (keys (%props))) { - print OUTFILE gen_prop ($key, $props{$key}, "gtk-1.3.dll"); - } - - if (%signals) { - print OUTFILE "\t\tprivate Hashtable Signals = new Hashtable ();\n\n"; - } - - foreach $key (sort (keys (%signals))) { - print OUTFILE gen_signal ($key, $signals{$key}, "gtk-1.3.dll"); - } - - foreach $key (sort (keys (%methods))) { - next if (($key =~ /^(Get|Set)(\w+)/) && exists($props{$2})); - my $mod = ""; - if (exists($signals{$key})) { - $mod = "Emit"; - } - print OUTFILE gen_method ("$mod$key", $methods{$key}, "gtk-1.3.dll"); - } - - $custom = "../" . lc ($namespace) . "/$typename.custom"; - print OUTFILE `cat $custom` if -e $custom; - print OUTFILE "\t}\n}\n"; - close (OUTFILE); -} - -# Code generation for signal definitions. -sub gen_signal -{ - my ($name, $def, $dll) = @_; - my ($marsh, $cname, @plist, $ret, $sret, $mret, $code); - - $def =~ /define-signal (\w+)/; - $cname = "\"$1\""; - - $def =~ /return-type \"(\w+)\"/; - $ret = $1; - - $def =~ /parameters\s*'\((.*)\)\)\)/; - @plist = split(/\)'\(/, $1); - - $marsh = get_sighandler ($def); - - $code = "\t\t/// $name Event \n"; - $code .= "\t\t/// \n\t\t///\tFIXME: Get some docs.\n"; - $code .= "\t\t/// \n\n"; - $code .= "\t\tpublic event EventHandler $name {\n"; - $code .= "\t\t\tadd {\n"; - $code .= "\t\t\t\tif (Events [$cname] == null)\n"; - $code .= "\t\t\t\t\tSignals [$cname] = new $marsh (this, RawObject, "; - $code .= "$cname, value);\n"; - $code .= "\t\t\t\tEvents.AddHandler ($cname, value);\n\t\t\t}\n"; - $code .= "\t\t\tremove {\n"; - $code .= "\t\t\t\tEvents.RemoveHandler ($cname, value);\n"; - $code .= "\t\t\t\tif (Events [$cname] == null)\n"; - $code .= "\t\t\t\t\tSignals.Remove ($cname);\n\t\t\t}\n\t\t}\n\n"; - return $code; -} - -# Code generation for property definitions. -sub gen_prop -{ - my ($name, $def, $dll) = @_; - my ($cname, $mode, $sret, $mret, $docs, $code); - - $def =~ /define-property (\w+)/; - $cname = $1; - - $def =~ /prop-type "(\w+)/; - if (exists ($objects{$1}) || ($1 =~ /GObject/)) { - $sret = $maptypes{$1}; - $mret = "GLib.Object"; - } elsif ($maptypes{$1} eq "String") { - $sret = $mret = "String"; - } elsif (exists ($maptypes{$1})) { - $sret = $maptypes{$1}; - $mret = $marshaltypes{$1}; - } else { - $sret = $mret = $1; - } - - $def =~ /doc-string "(.+)"\)/; - $docs = $1; - - $mode = 0; - if ($def =~ /\(readable #t\)/) { - $mode = 1; - } - - if (($def =~ /\(writeable #t\)/) && ($def !~ /\(construct-only #t\)/)) { - $mode += 2; - } - - $code = "\t\t/// $name Property \n"; - $code .= "\t\t/// \n\t\t///\t$docs\n"; - $code .= "\t\t/// \n\n"; - $code .= "\t\tpublic $sret $name {\n"; - if ($mode & 1) { - $code .= "\t\t\tget {\n\t\t\t\t$mret val;\n"; - $code .= "\t\t\t\tGetProperty (\"$cname\", out val);\n"; - $code .= "\t\t\t\treturn "; - if ($sret ne $mret) { - $code .= "($sret)"; - } - $code .= "val;\n\t\t\t}\n"; - } - if ($mode & 2) { - $code .= "\t\t\tset {\n"; - $code .= "\t\t\t\tSetProperty (\"$cname\", ($mret) value);\n"; - $code .= "\t\t\t}\n"; - } - $code .= "\t\t}\n\n"; - return $code; -} - -# Generate the code for a constructor definition. -sub gen_ctor -{ - my ($def, $dll) = @_; - my ($cname, $sret, $ret, $mret, $sig, $call, $pinv, $code); - - $def =~ /\(c-name "(\w+)"/; - $cname = $1; - - $def =~ /is-constructor-of (\w+)\)/; - if (exists ($maptypes{$1})) { - $sret = $maptypes{$1}; - $mret = $marshaltypes{$1}; - $ret = $1; - } else { - die "Unexpected return type in constructor: $1\n"; - } - - ($call, $pinv, $sig) = gen_param_strings($def); - - $code = "\t\t/// $sret Constructor \n"; - $code .= "\t\t/// \n\t\t///\t FIXME: Generate docs\n"; - $code .= "\t\t/// \n\n"; - $code .= "\t\t[DllImport(\"$dll\", CharSet=CharSet.Ansi,\n"; - $code .= "\t\t\t CallingConvention=CallingConvention.Cdecl)]\n"; - $code .= "\t\tstatic extern $mret $cname ($pinv);\n\n"; - $code .= "\t\tpublic $sret ($sig)\n"; - $code .= "\t\t{\n\t\t\t"; - $code .= "RawObject = $cname ($call);\n\t\t}\n\n"; -} - -# Generate the code for a method definition. -sub gen_method -{ - my ($name, $def, $dll) = @_; - my ($cname, $sret, $ret, $mret, $sig, $call, $pinv, $code); - - $def =~ /\(c-name "(\w+)"/; - $cname = $1; - - $def =~ /return-type "(const-)*(\w+)/; - if (exists ($maptypes{$2})) { - $sret = $maptypes{$2}; - $mret = $marshaltypes{$2}; - $ret = $2; - } else { - $sret = $mret = $ret = $2; - } - - ($call, $pinv, $sig) = gen_param_strings($def); - - $code = "\t\t/// $name Method \n"; - $code .= "\t\t/// \n\t\t///\t FIXME: Generate docs\n"; - $code .= "\t\t/// \n\n"; - $code .= "\t\t[DllImport(\"$dll\", CharSet=CharSet.Ansi,\n"; - $code .= "\t\t\t CallingConvention=CallingConvention.Cdecl)]\n"; - $code .= "\t\tstatic extern $mret $cname (IntPtr obj"; - if ($pinv) { - $code .= ", $pinv"; - } - $code .= ");\n\n"; - $code .= "\t\tpublic $sret $name ($sig)\n"; - $code .= "\t\t{\n\t\t\t"; - if ($sret ne "void") { $code .= "return "; } - if ($call) { - $call = "$cname (RawObject, $call)"; - } else { - $call = "$cname (RawObject)"; - } - if ($sret eq $mret) { - $code .= "$call"; - } elsif ($sret eq "String") { - $code .= "Marshal.PtrToStringAnsi($call)"; - } elsif ($mret eq "int") { - $code .= "($sret) $call"; - } elsif (exists ($objects{$ret}) || ($ret =~ /GObject/)) { - $code .= "($sret) GLib.Object.GetObject($call)"; - } else { - die "Unexpected return type match $sret:$mret\n"; - } - $code .= ";\n\t\t}\n\n"; - return $code; -} - -# Generate the DllImport, signature, and call parameter strings. -sub gen_param_strings -{ - my ($def) = @_; - my ($call, $parm, $pinv, $pname, $ptype, $sig); - - $call = $pinv = $sig = ""; - if ($def =~ /parameters'\((.*)\)\)\)/) { - foreach $parm (split(/\)'\(/, $1)) { - $parm =~ s/\*//g; - $parm =~ /"(\S*)"\s+"(\S*)"/; - $ptype = $1; - $pname = $2; - $ptype =~ s/const-//; - $pname =~ s/object/objekt/; - $pname =~ s/event/ev3nt/; - if ($sig) { - $sig .= ', '; - $call .= ', '; - $pinv .= ', '; - } - if ($marshaltypes{$ptype} eq "Unicode") { - $pinv .= "IntPtr $pname"; - } else { - $pinv .= "$marshaltypes{$ptype} $pname"; - } - $sig .= "$maptypes{$ptype} $pname"; - if ($maptypes{$ptype} eq $marshaltypes{$ptype}) { - $call .= "$pname"; - } elsif (exists ($objects{$ptype}) || - ($ptype =~ /GObject/)) { - $call .= "$pname.Handle"; - } elsif ($maptypes{$ptype} eq "String") { - if ($marshaltypes{$ptype} eq "IntPtr") { - $call .= "Marshal.StringToHGlobalAnsi($pname)"; - } else { - $call .= "Marshal.StringToHGlobalUni($pname)"; - } - } elsif ($marshaltypes{$ptype} eq "int") { - $call .= "(int) $pname"; - } else { - die "Unexpected type encountered $ptype\n"; - } - } - } - return ($call, $pinv, $sig); -} - -# Code generation for signal handlers. -sub get_sighandler -{ - my ($def) = @_; - my ($key, $name, $dir, $ns, $nspace, $tok); - - $def =~ /return-type \"(\w+)/; - my $ret = $1; - - $def =~ /parameters'\((.*)\)\)\)/; - my @parms = split(/\)'\(/, $1); - - $key = ""; - for ($i = 1; $i < @parms; $i++) { - $parms[$i] =~ /^\"(\w+)/; - $key .= ":$1"; - } - $key = $ret . $key; - - if (exists($sighandlers{$key})) { - return $sighandlers{$key}; - } - - my ($call, $pinv, $sig) = gen_param_strings($def); - - if ($key =~ /Gtk/) { - $dir = "../gtk/generated"; - $nspace = "Gtk"; - } elsif ($key =~ /Gdk/) { - $dir = "../gdk/generated"; - $nspace = "Gdk"; - } else { - $dir = "../glib/generated"; - $nspace = "GLib"; - } - - $name = ""; - foreach $tok (split(/:/, $key)) { - if (exists($objects{$tok})) { - $name .= "Object"; - } elsif (exists($maptypes{$tok})) { - $name .= "$maptypes{$tok}"; - } else { - die "Whassup with $tok?"; - } - } - my $sname = $name . "Signal"; - my $dname = $name . "Delegate"; - my $cbname = $name . "Callback"; - - $sighandlers{$key} = $sname; - - open (SIGFILE, ">$dir/$sname.cs") || die "can't open file"; - - print SIGFILE "// Generated file: Do not modify\n\n"; - print SIGFILE "namespace GtkSharp {\n\n"; - foreach $ns (split (/,/, $usings{$nspace})) { - print SIGFILE "\tusing $ns;\n"; - } - print SIGFILE "\n\tpublic delegate $marshaltypes{$ret} "; - print SIGFILE "$dname($pinv, int key);\n\n"; - print SIGFILE "\tpublic class $sname : SignalCallback {\n\n"; - print SIGFILE "\t\tprivate static $dname _Delegate;\n\n"; - print SIGFILE "\t\tprivate static $maptypes{$ret} "; - print SIGFILE "$cbname($pinv, int key)\n\t\t{\n"; - print SIGFILE "\t\t\tif (!_Instances.Contains(key))\n"; - print SIGFILE "\t\t\t\tthrow new Exception(\"Unexpected signal key\");"; - print SIGFILE "\n\n\t\t\t$sname inst = ($sname) _Instances[key];\n"; - print SIGFILE "\t\t\tSignalArgs args = new SignalArgs ();\n"; - if ($def =~ /parameters'\((.*)\)\)\)/) { - my (@parms) = split(/\)'\(/, $1); - for ($idx=0; $idx < $#parms; $idx++) { - $parms[$idx+1] =~ s/\*//g; - $parms[$idx+1] =~ /"(\S*)"\s+"(\S*)"/; - $ptype = $1; - $pname = $2; - $pname =~ s/object/objekt/; - $pname =~ s/event/ev3nt/; - if (exists($objects{$ptype})) { - print SIGFILE "\t\t\targs.Args[$idx] = GLib.Object.GetObject($pname);\n"; - } elsif (exists($maptypes{$ptype})) { - print SIGFILE "\t\t\targs.Args[$idx] = $pname;\n"; - } else { warn "Whassup wit $ptype?"; } - } - } - print SIGFILE "\t\t\tinst._handler (inst._obj, args);\n"; - if ($ret ne "none") { - print SIGFILE "\t\t\treturn ($maptypes{$ret}) args.RetVal;\n"; - } - print SIGFILE "\t\t}\n\n"; - print SIGFILE "\t\t[DllImport(\"gobject-1.3.dll\", "; - print SIGFILE "CharSet=CharSet.Ansi, "; - print SIGFILE "CallingConvention=CallingConvention.Cdecl)]\n"; - print SIGFILE "\t\tstatic extern void g_signal_connect_data("; - print SIGFILE "IntPtr obj, IntPtr name, $dname cb, int key, IntPtr p,"; - print SIGFILE " int flags);\n\n"; - print SIGFILE "\t\tpublic $sname(GLib.Object obj, IntPtr raw, "; - print SIGFILE "String name, EventHandler eh) : base(obj, eh)"; - print SIGFILE "\n\t\t{\n\t\t\tif (_Delegate == null) {\n"; - print SIGFILE "\t\t\t\t_Delegate = new $dname($cbname);\n\t\t\t}\n"; - print SIGFILE "\t\t\tg_signal_connect_data(raw, "; - print SIGFILE "Marshal.StringToHGlobalAnsi(name), _Delegate, _key, "; - print SIGFILE "new IntPtr(0), 0);\n\t\t}\n\n"; - print SIGFILE "\t\t~$sname()\n{\t\t\t_Instances.Remove(_key);\n"; - print SIGFILE "\t\t\tif(_Instances.Count == 0) {\n"; - print SIGFILE "\t\t\t\t_Delegate = null;\n\t\t\t}\n\t\t}\n"; - print SIGFILE "\t}\n}\n"; - close (SIGFILE); - - return $sighandlers{$key}; -} diff --git a/codegen/gdk-structs.defs b/codegen/gdk-structs.defs deleted file mode 100644 index 9cf8e9e09..000000000 --- a/codegen/gdk-structs.defs +++ /dev/null @@ -1,570 +0,0 @@ -(define-struct Atom - (in-module "Gdk") - (c-name "GdkAtom") - (fields - ) -) - -(define-struct Bitmap - (in-module "Gdk") - (c-name "GdkBitmap") - (fields - '("GObject" "parent_instance") - ) -) - -(define-struct Color - (in-module "Gdk") - (c-name "GdkColor") - (fields - '("guint32" "pixel") - '("guint16" "red") - '("guint16" "green") - '("guint16" "blue") - ) -) - -(define-struct Cursor - (in-module "Gdk") - (c-name "GdkCursor") - (fields - '("GdkCursorType" "type") - '("guint" "ref_count") - ) -) - -(define-struct DeviceAxis - (in-module "Gdk") - (c-name "GdkDeviceAxis") - (fields - '("GdkAxisUse" "use") - '("gdouble" "min") - '("gdouble" "max") - ) -) - -(define-struct DeviceKey - (in-module "Gdk") - (c-name "GdkDeviceKey") - (fields - '("guint" "keyval") - '("GdkModifierType" "modifiers") - ) -) - -(define-struct EventAny - (in-module "Gdk") - (c-name "GdkEventAny") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - ) -) - -(define-struct EventButton - (in-module "Gdk") - (c-name "GdkEventButton") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("guint32" "time") - '("gdouble" "x") - '("gdouble" "y") - '("gdouble*" "axes") - '("guint" "state") - '("guint" "button") - '("GdkDevice*" "device") - '("gdouble" "x_root") - '("gdouble" "y_root") - ) -) - -(define-struct EventClient - (in-module "Gdk") - (c-name "GdkEventClient") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("GdkAtom" "message_type") - '("gushort" "data_format") - '("gint8" "data_b[20]") - ) -) - -(define-struct EventConfigure - (in-module "Gdk") - (c-name "GdkEventConfigure") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-struct EventCrossing - (in-module "Gdk") - (c-name "GdkEventCrossing") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("GdkWindow*" "subwindow") - '("guint32" "time") - '("gdouble" "x") - '("gdouble" "y") - '("gdouble" "x_root") - '("gdouble" "y_root") - '("GdkCrossingMode" "mode") - '("GdkNotifyType" "detail") - '("gboolean" "focus") - '("guint" "state") - ) -) - -(define-struct EventDND - (in-module "Gdk") - (c-name "GdkEventDND") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("GdkDragContext*" "context") - '("guint32" "time") - '("gshort" "x_root") - '("gshort" "y_root") - ) -) - -(define-struct EventExpose - (in-module "Gdk") - (c-name "GdkEventExpose") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("GdkRectangle" "area") - '("GdkRegion*" "region") - '("gint" "count") - ) -) - -(define-struct EventFocus - (in-module "Gdk") - (c-name "GdkEventFocus") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("gint16" "in") - ) -) - -(define-struct EventKey - (in-module "Gdk") - (c-name "GdkEventKey") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("guint32" "time") - '("guint" "state") - '("guint" "keyval") - '("gint" "length") - '("gchar*" "string") - '("guint16" "hardware_keycode") - '("guint8" "group") - ) -) - -(define-struct EventMotion - (in-module "Gdk") - (c-name "GdkEventMotion") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("guint32" "time") - '("gdouble" "x") - '("gdouble" "y") - '("gdouble*" "axes") - '("guint" "state") - '("gint16" "is_hint") - '("GdkDevice*" "device") - '("gdouble" "x_root") - '("gdouble" "y_root") - ) -) - -(define-struct EventNoExpose - (in-module "Gdk") - (c-name "GdkEventNoExpose") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - ) -) - -(define-struct EventProperty - (in-module "Gdk") - (c-name "GdkEventProperty") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("GdkAtom" "atom") - '("guint32" "time") - '("guint" "state") - ) -) - -(define-struct EventProximity - (in-module "Gdk") - (c-name "GdkEventProximity") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("guint32" "time") - '("GdkDevice*" "device") - ) -) - -(define-struct EventScroll - (in-module "Gdk") - (c-name "GdkEventScroll") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("guint32" "time") - '("gdouble" "x") - '("gdouble" "y") - '("guint" "state") - '("GdkScrollDirection" "direction") - '("GdkDevice*" "device") - '("gdouble" "x_root") - '("gdouble" "y_root") - ) -) - -(define-struct EventSelection - (in-module "Gdk") - (c-name "GdkEventSelection") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("GdkAtom" "selection") - '("GdkAtom" "target") - '("GdkAtom" "property") - '("guint32" "time") - '("GdkNativeWindow" "requestor") - ) -) - -(define-struct EventSetting - (in-module "Gdk") - (c-name "GdkEventSetting") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("GdkSettingAction" "action") - '("char*" "name") - ) -) - -(define-struct EventVisibility - (in-module "Gdk") - (c-name "GdkEventVisibility") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("GdkVisibilityState" "state") - ) -) - -(define-struct EventWindowState - (in-module "Gdk") - (c-name "GdkEventWindowState") - (fields - '("GdkEventType" "type") - '("GdkWindow*" "window") - '("gint8" "send_event") - '("GdkWindowState" "changed_mask") - '("GdkWindowState" "new_window_state") - ) -) - -(define-struct Font - (in-module "Gdk") - (c-name "GdkFont") - (fields - '("GdkFontType" "type") - '("gint" "ascent") - '("gint" "descent") - ) -) - -(define-struct GCValues - (in-module "Gdk") - (c-name "GdkGCValues") - (fields - '("GdkColor" "foreground") - '("GdkColor" "background") - '("GdkFont*" "font") - '("GdkFunction" "function") - '("GdkFill" "fill") - '("GdkPixmap*" "tile") - '("GdkPixmap*" "stipple") - '("GdkPixmap*" "clip_mask") - '("GdkSubwindowMode" "subwindow_mode") - '("gint" "ts_x_origin") - '("gint" "ts_y_origin") - '("gint" "clip_x_origin") - '("gint" "clip_y_origin") - '("gint" "graphics_exposures") - '("gint" "line_width") - '("GdkLineStyle" "line_style") - '("GdkCapStyle" "cap_style") - '("GdkJoinStyle" "join_style") - ) -) - -(define-struct Geometry - (in-module "Gdk") - (c-name "GdkGeometry") - (fields - '("gint" "min_width") - '("gint" "min_height") - '("gint" "max_width") - '("gint" "max_height") - '("gint" "base_width") - '("gint" "base_height") - '("gint" "width_inc") - '("gint" "height_inc") - '("gdouble" "min_aspect") - '("gdouble" "max_aspect") - '("GdkGravity" "win_gravity") - ) -) - -(define-struct KeymapKey - (in-module "Gdk") - (c-name "GdkKeymapKey") - (fields - '("guint" "keycode") - '("gint" "group") - '("gint" "level") - ) -) - -(define-struct NativeWindow - (in-module "Gdk") - (c-name "GdkNativeWindow") - (fields - ) -) - -(define-struct PangoAttrEmbossed - (in-module "Gdk") - (c-name "GdkPangoAttrEmbossed") - (fields - '("PangoAttribute" "attr") - '("gboolean" "embossed") - ) -) - -(define-struct PangoAttrStipple - (in-module "Gdk") - (c-name "GdkPangoAttrStipple") - (fields - '("PangoAttribute" "attr") - '("GdkBitmap*" "stipple") - ) -) - -(define-struct Pixmap - (in-module "Gdk") - (c-name "GdkPixmap") - (fields - '("GObject" "parent_instance") - ) -) - -(define-struct Point - (in-module "Gdk") - (c-name "GdkPoint") - (fields - '("gint" "x") - '("gint" "y") - ) -) - -#(define-struct PointerHooks -# (in-module "Gdk") -# (c-name "GdkPointerHooks") -# (fields -# '("GdkWindow*" "(*get_pointer) (GdkWindow* window") -# '("GdkWindow*" "gint *x") -# '("GdkWindow*" "gint *y") -# '("GdkWindow*" "GdkModifierType *mask)") -# '("GdkWindow*" "(*window_at_pointer) (GdkScreen* screen") -# '("GdkWindow*" "gint *win_x") -# '("GdkWindow*" "gint *win_y)") -# ) -#) - -(define-struct Rectangle - (in-module "Gdk") - (c-name "GdkRectangle") - (fields - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-struct Region - (in-module "Gdk") - (c-name "GdkRegion") - (fields - '("long" "size") - '("long" "numRects") - '("GdkRegionBox*" "rects") - '("GdkRegionBox" "extents") - ) -) - -(define-struct RegionBox - (in-module "Gdk") - (c-name "GdkRegionBox") - (fields - '("gint" "x1") - '("gint" "y1") - '("gint" "x2") - '("gint" "y2") - ) -) - -(define-struct RgbCmap - (in-module "Gdk") - (c-name "GdkRgbCmap") - (fields - '("guint32" "colors[256]") - '("gint" "n_colors") - '("GSList*" "info_list") - ) -) - -(define-struct Screen - (in-module "Gdk") - (c-name "GdkScreen") - (fields - ) -) - -(define-struct Segment - (in-module "Gdk") - (c-name "GdkSegment") - (fields - '("gint" "x1") - '("gint" "y1") - '("gint" "x2") - '("gint" "y2") - ) -) - -(define-struct Selection - (in-module "Gdk") - (c-name "GdkSelection") - (fields - ) -) - -(define-struct SelectionType - (in-module "Gdk") - (c-name "GdkSelectionType") - (fields - ) -) - -(define-struct Span - (in-module "Gdk") - (c-name "GdkSpan") - (fields - '("gint" "x") - '("gint" "y") - '("gint" "width") - ) -) - -(define-struct Target - (in-module "Gdk") - (c-name "GdkTarget") - (fields - ) -) - -(define-struct TimeCoord - (in-module "Gdk") - (c-name "GdkTimeCoord") - (fields - '("guint32" "time") - '("gdouble" "axes[128]") - ) -) - -(define-struct WChar - (in-module "Gdk") - (c-name "GdkWChar") - (fields - ) -) - -(define-struct Window - (in-module "Gdk") - (c-name "GdkWindow") - (fields - '("GObject" "parent_instance") - ) -) - -(define-struct WindowAttr - (in-module "Gdk") - (c-name "GdkWindowAttr") - (fields - '("gchar*" "title") - '("gint" "event_mask") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GdkWindowClass" "wclass") - '("GdkVisual*" "visual") - '("GdkColormap*" "colormap") - '("GdkWindowType" "window_type") - '("GdkCursor*" "cursor") - '("gchar*" "wmclass_name") - '("gchar*" "wmclass_class") - '("gboolean" "override_redirect") - ) -) - -(define-struct XEvent - (in-module "Gdk") - (c-name "GdkXEvent") - (fields - ) -) - diff --git a/codegen/gdk-types.defs b/codegen/gdk-types.defs deleted file mode 100644 index 7191e4ff9..000000000 --- a/codegen/gdk-types.defs +++ /dev/null @@ -1,912 +0,0 @@ -;; -*- scheme -*- -; object definitions ... -(define-object Colormap - (in-module "Gdk") - (parent "GObject") - (c-name "GdkColormap") - (gtype-id "GDK_TYPE_COLORMAP") -) - -(define-object Device - (in-module "Gdk") - (parent "GObject") - (c-name "GdkDevice") - (gtype-id "GDK_TYPE_DEVICE") - (fields - '("gchar*" "name") - '("GdkInputSource" "source") - '("GdkInputMode" "mode") - '("gboolean" "has_cursor") - '("gint" "num_axes") - '("GdkDeviceAxis*" "axes") - '("gint" "num_keys") - '("GdkDeviceKey*" "keys") - ) -) - -(define-object DragContext - (in-module "Gdk") - (parent "GObject") - (c-name "GdkDragContext") - (gtype-id "GDK_TYPE_DRAG_CONTEXT") - (fields - '("GdkDragProtocol" "protocol") - '("gboolean" "is_source") - '("GdkWindow*" "source_window") - '("GdkWindow*" "dest_window") - '("GList*" "targets") - '("GdkDragAction" "actions") - '("GdkDragAction" "suggested_action") - '("GdkDragAction" "action") - '("guint32" "start_time") - ) -) - -(define-object Drawable - (in-module "Gdk") - (parent "GObject") - (c-name "GdkDrawable") - (gtype-id "GDK_TYPE_DRAWABLE") -) - -(define-object Window - (in-module "Gdk") - (parent "GdkDrawable") - (c-name "GdkWindow") - (gtype-id "GDK_TYPE_WINDOW") -) - -(define-object Pixmap - (in-module "Gdk") - (parent "GdkDrawable") - (c-name "GdkPixmap") - (gtype-id "GDK_TYPE_PIXMAP") -) - -(define-object GC - (in-module "Gdk") - (parent "GObject") - (c-name "GdkGC") - (gtype-id "GDK_TYPE_GC") -) - -(define-object Image - (in-module "Gdk") - (parent "GObject") - (c-name "GdkImage") - (gtype-id "GDK_TYPE_IMAGE") -) - -(define-object Pixbuf - (in-module "Gdk") - (parent "GObject") - (c-name "GdkPixbuf") - (gtype-id "GDK_TYPE_PIXBUF") -) - -(define-object PixbufAnimation - (in-module "Gdk") - (parent "GObject") - (c-name "GdkPixbufAnimation") - (gtype-id "GDK_TYPE_PIXBUF_ANIMATION") -) - -(define-object PixbufAnimationIter - (in-module "Gdk") - (parent "GObject") - (c-name "GdkPixbufAnimationIter") - (gtype-id "GDK_TYPE_PIXBUF_ANIMATION_ITER") -) - -(define-object Visual - (in-module "Gdk") - (parent "GObject") - (c-name "GdkVisual") - (gtype-id "GDK_TYPE_VISUAL") - (fields - '("GdkVisualType" "type") - '("gint" "depth") - '("GdkByteOrder" "byte_order") - '("gint" "colormap_size") - '("gint" "bits_per_rgb") - '("guint32" "red_mask") - '("gint" "red_shift") - '("gint" "red_prec") - '("guint32" "green_mask") - '("gint" "green_shift") - '("gint" "green_prec") - '("guint32" "blue_mask") - '("gint" "blue_shift") - '("gint" "blue_prec") - ) -) - - -;; Boxed types ... - -(define-boxed Event - (in-module "Gdk") - (c-name "GdkEvent") - (gtype-id "GDK_TYPE_EVENT") - (copy-func "gdk_event_copy") - (release-func "gdk_event_free") -) - -(define-boxed Font - (in-module "Gdk") - (c-name "GdkFont") - (gtype-id "GDK_TYPE_FONT") - (copy-func "gdk_font_ref") - (release-func "gdk_font_unref") - (fields - '("GdkFontType" "type") - '("gint" "ascent") - '("gint" "descent") - ) -) - -(define-boxed Color - (in-module "Gdk") - (c-name "GdkColor") - (gtype-id "GDK_TYPE_COLOR") - (copy-func "gdk_color_copy") - (release-func "gdk_color_free") - (fields - '("guint32" "pixel") - '("guint16" "red") - '("guint16" "green") - '("guint16" "blue") - ) -) - -(define-boxed Cursor - (in-module "Gdk") - (c-name "GdkCursor") - (gtype-id "GDK_TYPE_CURSOR") - (copy-func "gdk_cursor_ref") - (release-func "gdk_cursor_unref") - (fields - '("GdkCursorType" "type") - ) -) - -(define-boxed Rectangle - (in-module "Gdk") - (c-name "GdkRectangle") - (gtype-id "GDK_TYPE_RECTANGLE") - (copy-func "gdk_rectangle_copy") - (release-func "g_free") - (fields - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -;; Enumerations and flags ... - -(define-enum CursorType - (in-module "Gdk") - (c-name "GdkCursorType") - (gtype-id "GDK_TYPE_CURSOR_TYPE") -; (value (name #include) (c-name #include)) - (values - '("gdk-cursor-is-pixmap" "GDK_CURSOR_IS_PIXMAP") - ) -) - -(define-flags DragAction - (in-module "Gdk") - (c-name "GdkDragAction") - (gtype-id "GDK_TYPE_DRAG_ACTION") - (values - '("default" "GDK_ACTION_DEFAULT") - '("copy" "GDK_ACTION_COPY") - '("move" "GDK_ACTION_MOVE") - '("link" "GDK_ACTION_LINK") - '("private" "GDK_ACTION_PRIVATE") - '("ask" "GDK_ACTION_ASK") - ) -) - -(define-enum DragProtocol - (in-module "Gdk") - (c-name "GdkDragProtocol") - (gtype-id "GDK_TYPE_DRAG_PROTOCOL") - (values - '("motif" "GDK_DRAG_PROTO_MOTIF") - '("xdnd" "GDK_DRAG_PROTO_XDND") - '("rootwin" "GDK_DRAG_PROTO_ROOTWIN") - '("none" "GDK_DRAG_PROTO_NONE") - '("win32-dropfiles" "GDK_DRAG_PROTO_WIN32_DROPFILES") - '("ole2" "GDK_DRAG_PROTO_OLE2") - '("local" "GDK_DRAG_PROTO_LOCAL") - ) -) - -(define-enum FilterReturn - (in-module "Gdk") - (c-name "GdkFilterReturn") - (gtype-id "GDK_TYPE_FILTER_RETURN") - (values - '("continue" "GDK_FILTER_CONTINUE") - '("translate" "GDK_FILTER_TRANSLATE") - '("remove" "GDK_FILTER_REMOVE") - ) -) - -(define-enum EventType - (in-module "Gdk") - (c-name "GdkEventType") - (gtype-id "GDK_TYPE_EVENT_TYPE") - (values - '("nothing" "GDK_NOTHING") - '("delete" "GDK_DELETE") - '("destroy" "GDK_DESTROY") - '("expose" "GDK_EXPOSE") - '("motion-notify" "GDK_MOTION_NOTIFY") - '("button-press" "GDK_BUTTON_PRESS") - '("two-button-press" "GDK_2BUTTON_PRESS") - '("three-button-press" "GDK_3BUTTON_PRESS") - '("button-release" "GDK_BUTTON_RELEASE") - '("key-press" "GDK_KEY_PRESS") - '("key-release" "GDK_KEY_RELEASE") - '("enter-notify" "GDK_ENTER_NOTIFY") - '("leave-notify" "GDK_LEAVE_NOTIFY") - '("focus-change" "GDK_FOCUS_CHANGE") - '("configure" "GDK_CONFIGURE") - '("map" "GDK_MAP") - '("unmap" "GDK_UNMAP") - '("property-notify" "GDK_PROPERTY_NOTIFY") - '("selection-clear" "GDK_SELECTION_CLEAR") - '("selection-request" "GDK_SELECTION_REQUEST") - '("selection-notify" "GDK_SELECTION_NOTIFY") - '("proximity-in" "GDK_PROXIMITY_IN") - '("proximity-out" "GDK_PROXIMITY_OUT") - '("drag-enter" "GDK_DRAG_ENTER") - '("drag-leave" "GDK_DRAG_LEAVE") - '("drag-motion" "GDK_DRAG_MOTION") - '("drag-status" "GDK_DRAG_STATUS") - '("drop-start" "GDK_DROP_START") - '("drop-finished" "GDK_DROP_FINISHED") - '("client-event" "GDK_CLIENT_EVENT") - '("visibility-notify" "GDK_VISIBILITY_NOTIFY") - '("no-expose" "GDK_NO_EXPOSE") - '("scroll" "GDK_SCROLL") - '("window-state" "GDK_WINDOW_STATE") - '("setting" "GDK_SETTING") - ) -) - -(define-flags EventMask - (in-module "Gdk") - (c-name "GdkEventMask") - (gtype-id "GDK_TYPE_EVENT_MASK") - (values - '("exposure-mask" "GDK_EXPOSURE_MASK") - '("pointer-motion-mask" "GDK_POINTER_MOTION_MASK") - '("pointer-motion-hint-mask" "GDK_POINTER_MOTION_HINT_MASK") - '("button-motion-mask" "GDK_BUTTON_MOTION_MASK") - '("button1-motion-mask" "GDK_BUTTON1_MOTION_MASK") - '("button2-motion-mask" "GDK_BUTTON2_MOTION_MASK") - '("button3-motion-mask" "GDK_BUTTON3_MOTION_MASK") - '("button-press-mask" "GDK_BUTTON_PRESS_MASK") - '("button-release-mask" "GDK_BUTTON_RELEASE_MASK") - '("key-press-mask" "GDK_KEY_PRESS_MASK") - '("key-release-mask" "GDK_KEY_RELEASE_MASK") - '("enter-notify-mask" "GDK_ENTER_NOTIFY_MASK") - '("leave-notify-mask" "GDK_LEAVE_NOTIFY_MASK") - '("focus-change-mask" "GDK_FOCUS_CHANGE_MASK") - '("structure-mask" "GDK_STRUCTURE_MASK") - '("property-change-mask" "GDK_PROPERTY_CHANGE_MASK") - '("visibility-notify-mask" "GDK_VISIBILITY_NOTIFY_MASK") - '("proximity-in-mask" "GDK_PROXIMITY_IN_MASK") - '("proximity-out-mask" "GDK_PROXIMITY_OUT_MASK") - '("substructure-mask" "GDK_SUBSTRUCTURE_MASK") - '("scroll-mask" "GDK_SCROLL_MASK") - '("all-events-mask" "GDK_ALL_EVENTS_MASK") - ) -) - -(define-enum VisibilityState - (in-module "Gdk") - (c-name "GdkVisibilityState") - (gtype-id "GDK_TYPE_VISIBILITY_STATE") - (values - '("unobscured" "GDK_VISIBILITY_UNOBSCURED") - '("partial" "GDK_VISIBILITY_PARTIAL") - '("fully-obscured" "GDK_VISIBILITY_FULLY_OBSCURED") - ) -) - -(define-enum ScrollDirection - (in-module "Gdk") - (c-name "GdkScrollDirection") - (gtype-id "GDK_TYPE_SCROLL_DIRECTION") - (values - '("up" "GDK_SCROLL_UP") - '("down" "GDK_SCROLL_DOWN") - '("left" "GDK_SCROLL_LEFT") - '("right" "GDK_SCROLL_RIGHT") - ) -) - -(define-enum NotifyType - (in-module "Gdk") - (c-name "GdkNotifyType") - (gtype-id "GDK_TYPE_NOTIFY_TYPE") - (values - '("ancestor" "GDK_NOTIFY_ANCESTOR") - '("virtual" "GDK_NOTIFY_VIRTUAL") - '("inferior" "GDK_NOTIFY_INFERIOR") - '("nonlinear" "GDK_NOTIFY_NONLINEAR") - '("nonlinear-virtual" "GDK_NOTIFY_NONLINEAR_VIRTUAL") - '("unknown" "GDK_NOTIFY_UNKNOWN") - ) -) - -(define-enum CrossingMode - (in-module "Gdk") - (c-name "GdkCrossingMode") - (gtype-id "GDK_TYPE_CROSSING_MODE") - (values - '("normal" "GDK_CROSSING_NORMAL") - '("grab" "GDK_CROSSING_GRAB") - '("ungrab" "GDK_CROSSING_UNGRAB") - ) -) - -(define-enum PropertyState - (in-module "Gdk") - (c-name "GdkPropertyState") - (gtype-id "GDK_TYPE_PROPERTY_STATE") - (values - '("new-value" "GDK_PROPERTY_NEW_VALUE") - '("delete" "GDK_PROPERTY_DELETE") - ) -) - -(define-flags WindowState - (in-module "Gdk") - (c-name "GdkWindowState") - (gtype-id "GDK_TYPE_WINDOW_STATE") - (values - '("withdrawn" "GDK_WINDOW_STATE_WITHDRAWN") - '("iconified" "GDK_WINDOW_STATE_ICONIFIED") - '("maximized" "GDK_WINDOW_STATE_MAXIMIZED") - '("sticky" "GDK_WINDOW_STATE_STICKY") - ) -) - -(define-enum SettingAction - (in-module "Gdk") - (c-name "GdkSettingAction") - (gtype-id "GDK_TYPE_SETTING_ACTION") - (values - '("new" "GDK_SETTING_ACTION_NEW") - '("changed" "GDK_SETTING_ACTION_CHANGED") - '("deleted" "GDK_SETTING_ACTION_DELETED") - ) -) - -(define-enum FontType - (in-module "Gdk") - (c-name "GdkFontType") - (gtype-id "GDK_TYPE_FONT_TYPE") - (values - '("font" "GDK_FONT_FONT") - '("fontset" "GDK_FONT_FONTSET") - ) -) - -(define-enum CapStyle - (in-module "Gdk") - (c-name "GdkCapStyle") - (gtype-id "GDK_TYPE_CAP_STYLE") - (values - '("not-last" "GDK_CAP_NOT_LAST") - '("butt" "GDK_CAP_BUTT") - '("round" "GDK_CAP_ROUND") - '("projecting" "GDK_CAP_PROJECTING") - ) -) - -(define-enum Fill - (in-module "Gdk") - (c-name "GdkFill") - (gtype-id "GDK_TYPE_FILL") - (values - '("solid" "GDK_SOLID") - '("tiled" "GDK_TILED") - '("stippled" "GDK_STIPPLED") - '("opaque-stippled" "GDK_OPAQUE_STIPPLED") - ) -) - -(define-enum Function - (in-module "Gdk") - (c-name "GdkFunction") - (gtype-id "GDK_TYPE_FUNCTION") - (values - '("copy" "GDK_COPY") - '("invert" "GDK_INVERT") - '("xor" "GDK_XOR") - '("clear" "GDK_CLEAR") - '("and" "GDK_AND") - '("and-reverse" "GDK_AND_REVERSE") - '("and-invert" "GDK_AND_INVERT") - '("noop" "GDK_NOOP") - '("or" "GDK_OR") - '("equiv" "GDK_EQUIV") - '("or-reverse" "GDK_OR_REVERSE") - '("copy-invert" "GDK_COPY_INVERT") - '("or-invert" "GDK_OR_INVERT") - '("nand" "GDK_NAND") - '("nor" "GDK_NOR") - '("set" "GDK_SET") - ) -) - -(define-enum JoinStyle - (in-module "Gdk") - (c-name "GdkJoinStyle") - (gtype-id "GDK_TYPE_JOIN_STYLE") - (values - '("miter" "GDK_JOIN_MITER") - '("round" "GDK_JOIN_ROUND") - '("bevel" "GDK_JOIN_BEVEL") - ) -) - -(define-enum LineStyle - (in-module "Gdk") - (c-name "GdkLineStyle") - (gtype-id "GDK_TYPE_LINE_STYLE") - (values - '("solid" "GDK_LINE_SOLID") - '("on-off-dash" "GDK_LINE_ON_OFF_DASH") - '("double-dash" "GDK_LINE_DOUBLE_DASH") - ) -) - -(define-enum SubwindowMode - (in-module "Gdk") - (c-name "GdkSubwindowMode") - (gtype-id "GDK_TYPE_SUBWINDOW_MODE") - (values - '("clip-by-children" "GDK_CLIP_BY_CHILDREN") - '("include-inferiors" "GDK_INCLUDE_INFERIORS") - ) -) - -(define-flags GCValuesMask - (in-module "Gdk") - (c-name "GdkGCValuesMask") - (gtype-id "GDK_TYPE_GC_VALUES_MASK") - (values - '("foreground" "GDK_GC_FOREGROUND") - '("background" "GDK_GC_BACKGROUND") - '("font" "GDK_GC_FONT") - '("function" "GDK_GC_FUNCTION") - '("fill" "GDK_GC_FILL") - '("tile" "GDK_GC_TILE") - '("stipple" "GDK_GC_STIPPLE") - '("clip-mask" "GDK_GC_CLIP_MASK") - '("subwindow" "GDK_GC_SUBWINDOW") - '("ts-x-origin" "GDK_GC_TS_X_ORIGIN") - '("ts-y-origin" "GDK_GC_TS_Y_ORIGIN") - '("clip-x-origin" "GDK_GC_CLIP_X_ORIGIN") - '("clip-y-origin" "GDK_GC_CLIP_Y_ORIGIN") - '("exposures" "GDK_GC_EXPOSURES") - '("line-width" "GDK_GC_LINE_WIDTH") - '("line-style" "GDK_GC_LINE_STYLE") - '("cap-style" "GDK_GC_CAP_STYLE") - '("join-style" "GDK_GC_JOIN_STYLE") - ) -) - -(define-enum ImageType - (in-module "Gdk") - (c-name "GdkImageType") - (gtype-id "GDK_TYPE_IMAGE_TYPE") - (values - '("normal" "GDK_IMAGE_NORMAL") - '("shared" "GDK_IMAGE_SHARED") - '("fastest" "GDK_IMAGE_FASTEST") - ) -) - -(define-enum ExtensionMode - (in-module "Gdk") - (c-name "GdkExtensionMode") - (gtype-id "GDK_TYPE_EXTENSION_MODE") - (values - '("none" "GDK_EXTENSION_EVENTS_NONE") - '("all" "GDK_EXTENSION_EVENTS_ALL") - '("cursor" "GDK_EXTENSION_EVENTS_CURSOR") - ) -) - -(define-enum InputSource - (in-module "Gdk") - (c-name "GdkInputSource") - (gtype-id "GDK_TYPE_INPUT_SOURCE") - (values - '("mouse" "GDK_SOURCE_MOUSE") - '("pen" "GDK_SOURCE_PEN") - '("eraser" "GDK_SOURCE_ERASER") - '("cursor" "GDK_SOURCE_CURSOR") - ) -) - -(define-enum InputMode - (in-module "Gdk") - (c-name "GdkInputMode") - (gtype-id "GDK_TYPE_INPUT_MODE") - (values - '("disabled" "GDK_MODE_DISABLED") - '("screen" "GDK_MODE_SCREEN") - '("window" "GDK_MODE_WINDOW") - ) -) - -(define-enum AxisUse - (in-module "Gdk") - (c-name "GdkAxisUse") - (gtype-id "GDK_TYPE_AXIS_USE") - (values - '("ignore" "GDK_AXIS_IGNORE") - '("x" "GDK_AXIS_X") - '("y" "GDK_AXIS_Y") - '("pressure" "GDK_AXIS_PRESSURE") - '("xtilt" "GDK_AXIS_XTILT") - '("ytilt" "GDK_AXIS_YTILT") - '("wheel" "GDK_AXIS_WHEEL") - '("last" "GDK_AXIS_LAST") - ) -) - -(define-enum PropMode - (in-module "Gdk") - (c-name "GdkPropMode") - (gtype-id "GDK_TYPE_PROP_MODE") - (values - '("replace" "GDK_PROP_MODE_REPLACE") - '("prepend" "GDK_PROP_MODE_PREPEND") - '("append" "GDK_PROP_MODE_APPEND") - ) -) - -(define-enum FillRule - (in-module "Gdk") - (c-name "GdkFillRule") - (gtype-id "GDK_TYPE_FILL_RULE") - (values - '("even-odd-rule" "GDK_EVEN_ODD_RULE") - '("winding-rule" "GDK_WINDING_RULE") - ) -) - -(define-enum OverlapType - (in-module "Gdk") - (c-name "GdkOverlapType") - (gtype-id "GDK_TYPE_OVERLAP_TYPE") - (values - '("in" "GDK_OVERLAP_RECTANGLE_IN") - '("out" "GDK_OVERLAP_RECTANGLE_OUT") - '("part" "GDK_OVERLAP_RECTANGLE_PART") - ) -) - -(define-enum RgbDither - (in-module "Gdk") - (c-name "GdkRgbDither") - (gtype-id "GDK_TYPE_RGB_DITHER") - (values - '("none" "GDK_RGB_DITHER_NONE") - '("normal" "GDK_RGB_DITHER_NORMAL") - '("max" "GDK_RGB_DITHER_MAX") - ) -) - -(define-enum Selection - (in-module "Gdk") - (c-name "GdkSelection") - (gtype-id "GDK_TYPE_SELECTION") - (values - '("primary" "GDK_SELECTION_PRIMARY") - '("secondary" "GDK_SELECTION_SECONDARY") - ) -) - -(define-enum Target - (in-module "Gdk") - (c-name "GdkTarget") - (gtype-id "GDK_TYPE_TARGET") - (values - '("bitmap" "GDK_TARGET_BITMAP") - '("colormap" "GDK_TARGET_COLORMAP") - '("drawable" "GDK_TARGET_DRAWABLE") - '("pixmap" "GDK_TARGET_PIXMAP") - '("string" "GDK_TARGET_STRING") - ) -) - -(define-enum SelectionType - (in-module "Gdk") - (c-name "GdkSelectionType") - (gtype-id "GDK_TYPE_SELECTION_TYPE") - (values - '("atom" "GDK_SELECTION_TYPE_ATOM") - '("bitmap" "GDK_SELECTION_TYPE_BITMAP") - '("colormap" "GDK_SELECTION_TYPE_COLORMAP") - '("drawable" "GDK_SELECTION_TYPE_DRAWABLE") - '("integer" "GDK_SELECTION_TYPE_INTEGER") - '("pixmap" "GDK_SELECTION_TYPE_PIXMAP") - '("window" "GDK_SELECTION_TYPE_WINDOW") - '("string" "GDK_SELECTION_TYPE_STRING") - ) -) - -(define-enum ByteOrder - (in-module "Gdk") - (c-name "GdkByteOrder") - (gtype-id "GDK_TYPE_BYTE_ORDER") - (values - '("lsb-first" "GDK_LSB_FIRST") - '("msb-first" "GDK_MSB_FIRST") - ) -) - -(define-flags ModifierType - (in-module "Gdk") - (c-name "GdkModifierType") - (gtype-id "GDK_TYPE_MODIFIER_TYPE") - (values - '("shift-mask" "GDK_SHIFT_MASK") - '("lock-mask" "GDK_LOCK_MASK") - '("control-mask" "GDK_CONTROL_MASK") - '("mod1-mask" "GDK_MOD1_MASK") - '("mod2-mask" "GDK_MOD2_MASK") - '("mod3-mask" "GDK_MOD3_MASK") - '("mod4-mask" "GDK_MOD4_MASK") - '("mod5-mask" "GDK_MOD5_MASK") - '("button1-mask" "GDK_BUTTON1_MASK") - '("button2-mask" "GDK_BUTTON2_MASK") - '("button3-mask" "GDK_BUTTON3_MASK") - '("button4-mask" "GDK_BUTTON4_MASK") - '("button5-mask" "GDK_BUTTON5_MASK") - '("release-mask" "GDK_RELEASE_MASK") - '("modifier-mask" "GDK_MODIFIER_MASK") - ) -) - -(define-flags InputCondition - (in-module "Gdk") - (c-name "GdkInputCondition") - (gtype-id "GDK_TYPE_INPUT_CONDITION") - (values - '("read" "GDK_INPUT_READ") - '("write" "GDK_INPUT_WRITE") - '("exception" "GDK_INPUT_EXCEPTION") - ) -) - -(define-enum Status - (in-module "Gdk") - (c-name "GdkStatus") - (gtype-id "GDK_TYPE_STATUS") - (values - '("ok" "GDK_OK") - '("error" "GDK_ERROR") - '("error-param" "GDK_ERROR_PARAM") - '("error-file" "GDK_ERROR_FILE") - '("error-mem" "GDK_ERROR_MEM") - ) -) - -(define-enum GrabStatus - (in-module "Gdk") - (c-name "GdkGrabStatus") - (gtype-id "GDK_TYPE_GRAB_STATUS") - (values - '("success" "GDK_GRAB_SUCCESS") - '("already-grabbed" "GDK_GRAB_ALREADY_GRABBED") - '("invalid-time" "GDK_GRAB_INVALID_TIME") - '("not-viewable" "GDK_GRAB_NOT_VIEWABLE") - '("frozen" "GDK_GRAB_FROZEN") - ) -) - -(define-enum VisualType - (in-module "Gdk") - (c-name "GdkVisualType") - (gtype-id "GDK_TYPE_VISUAL_TYPE") - (values - '("static-gray" "GDK_VISUAL_STATIC_GRAY") - '("grayscale" "GDK_VISUAL_GRAYSCALE") - '("static-color" "GDK_VISUAL_STATIC_COLOR") - '("pseudo-color" "GDK_VISUAL_PSEUDO_COLOR") - '("true-color" "GDK_VISUAL_TRUE_COLOR") - '("direct-color" "GDK_VISUAL_DIRECT_COLOR") - ) -) - -(define-enum WindowClass - (in-module "Gdk") - (c-name "GdkWindowClass") - (gtype-id "GDK_TYPE_WINDOW_CLASS") - (values - '("utput" "GDK_INPUT_OUTPUT") - '("nly" "GDK_INPUT_ONLY") - ) -) - -(define-enum WindowType - (in-module "Gdk") - (c-name "GdkWindowType") - (gtype-id "GDK_TYPE_WINDOW_TYPE") - (values - '("root" "GDK_WINDOW_ROOT") - '("toplevel" "GDK_WINDOW_TOPLEVEL") - '("child" "GDK_WINDOW_CHILD") - '("dialog" "GDK_WINDOW_DIALOG") - '("temp" "GDK_WINDOW_TEMP") - '("foreign" "GDK_WINDOW_FOREIGN") - ) -) - -(define-flags WindowAttributesType - (in-module "Gdk") - (c-name "GdkWindowAttributesType") - (gtype-id "GDK_TYPE_WINDOW_ATTRIBUTES_TYPE") - (values - '("title" "GDK_WA_TITLE") - '("x" "GDK_WA_X") - '("y" "GDK_WA_Y") - '("cursor" "GDK_WA_CURSOR") - '("colormap" "GDK_WA_COLORMAP") - '("visual" "GDK_WA_VISUAL") - '("wmclass" "GDK_WA_WMCLASS") - '("noredir" "GDK_WA_NOREDIR") - ) -) - -(define-flags WindowHints - (in-module "Gdk") - (c-name "GdkWindowHints") - (gtype-id "GDK_TYPE_WINDOW_HINTS") - (values - '("pos" "GDK_HINT_POS") - '("min-size" "GDK_HINT_MIN_SIZE") - '("max-size" "GDK_HINT_MAX_SIZE") - '("base-size" "GDK_HINT_BASE_SIZE") - '("aspect" "GDK_HINT_ASPECT") - '("resize-inc" "GDK_HINT_RESIZE_INC") - '("win-gravity" "GDK_HINT_WIN_GRAVITY") - ) -) - -(define-enum WindowTypeHint - (in-module "Gdk") - (c-name "GdkWindowTypeHint") - (gtype-id "GDK_TYPE_WINDOW_TYPE_HINT") - (values - '("normal" "GDK_WINDOW_TYPE_HINT_NORMAL") - '("dialog" "GDK_WINDOW_TYPE_HINT_DIALOG") - '("menu" "GDK_WINDOW_TYPE_HINT_MENU") - '("toolbar" "GDK_WINDOW_TYPE_HINT_TOOLBAR") - ) -) - -(define-flags WMDecoration - (in-module "Gdk") - (c-name "GdkWMDecoration") - (gtype-id "GDK_TYPE_WM_DECORATION") - (values - '("all" "GDK_DECOR_ALL") - '("border" "GDK_DECOR_BORDER") - '("resizeh" "GDK_DECOR_RESIZEH") - '("title" "GDK_DECOR_TITLE") - '("menu" "GDK_DECOR_MENU") - '("minimize" "GDK_DECOR_MINIMIZE") - '("maximize" "GDK_DECOR_MAXIMIZE") - ) -) - -(define-flags WMFunction - (in-module "Gdk") - (c-name "GdkWMFunction") - (gtype-id "GDK_TYPE_WM_FUNCTION") - (values - '("all" "GDK_FUNC_ALL") - '("resize" "GDK_FUNC_RESIZE") - '("move" "GDK_FUNC_MOVE") - '("minimize" "GDK_FUNC_MINIMIZE") - '("maximize" "GDK_FUNC_MAXIMIZE") - '("close" "GDK_FUNC_CLOSE") - ) -) - -(define-enum Gravity - (in-module "Gdk") - (c-name "GdkGravity") - (gtype-id "GDK_TYPE_GRAVITY") - (values - '("north-west" "GDK_GRAVITY_NORTH_WEST") - '("north" "GDK_GRAVITY_NORTH") - '("north-east" "GDK_GRAVITY_NORTH_EAST") - '("west" "GDK_GRAVITY_WEST") - '("center" "GDK_GRAVITY_CENTER") - '("east" "GDK_GRAVITY_EAST") - '("south-west" "GDK_GRAVITY_SOUTH_WEST") - '("south" "GDK_GRAVITY_SOUTH") - '("south-east" "GDK_GRAVITY_SOUTH_EAST") - '("static" "GDK_GRAVITY_STATIC") - ) -) - -(define-enum WindowEdge - (in-module "Gdk") - (c-name "GdkWindowEdge") - (gtype-id "GDK_TYPE_WINDOW_EDGE") - (values - '("north-west" "GDK_WINDOW_EDGE_NORTH_WEST") - '("north" "GDK_WINDOW_EDGE_NORTH") - '("north-east" "GDK_WINDOW_EDGE_NORTH_EAST") - '("west" "GDK_WINDOW_EDGE_WEST") - '("east" "GDK_WINDOW_EDGE_EAST") - '("south-west" "GDK_WINDOW_EDGE_SOUTH_WEST") - '("south" "GDK_WINDOW_EDGE_SOUTH") - '("south-east" "GDK_WINDOW_EDGE_SOUTH_EAST") - ) -) - -(define-enum PixbufAlphaMode - (in-module "Gdk") - (c-name "GdkPixbufAlphaMode") - (gtype-id "GDK_TYPE_PIXBUF_ALPHA_MODE") - (values - '("bilevel" "GDK_PIXBUF_ALPHA_BILEVEL") - '("full" "GDK_PIXBUF_ALPHA_FULL") - ) -) - -(define-enum Colorspace - (in-module "Gdk") - (c-name "GdkColorspace") - (gtype-id "GDK_TYPE_COLORSPACE") - (values - '("b" "GDK_COLORSPACE_RGB") - ) -) - -(define-enum PixbufError - (in-module "Gdk") - (c-name "GdkPixbufError") - (gtype-id "GDK_TYPE_PIXBUF_ERROR") - (values - '("header-corrupt" "GDK_PIXBUF_ERROR_HEADER_CORRUPT") - '("pixel-corrupt" "GDK_PIXBUF_ERROR_PIXEL_CORRUPT") - '("unknown-format" "GDK_PIXBUF_ERROR_UNKNOWN_FORMAT") - '("corrupt-image" "GDK_PIXBUF_ERROR_CORRUPT_IMAGE") - '("insufficient-memory" "GDK_PIXBUF_ERROR_INSUFFICIENT_MEMORY") - '("bad-option-value" "GDK_PIXBUF_ERROR_BAD_OPTION_VALUE") - '("unknown-type" "GDK_PIXBUF_ERROR_UNKNOWN_TYPE") - '("unsupported-operation" "GDK_PIXBUF_ERROR_UNSUPPORTED_OPERATION") - '("failed" "GDK_PIXBUF_ERROR_FAILED") - ) -) - -(define-enum InterpType - (in-module "Gdk") - (c-name "GdkInterpType") - (gtype-id "GDK_TYPE_INTERP_TYPE") - (values - '("nearest" "GDK_INTERP_NEAREST") - '("tiles" "GDK_INTERP_TILES") - '("bilinear" "GDK_INTERP_BILINEAR") - '("hyper" "GDK_INTERP_HYPER") - ) -) diff --git a/codegen/get-props-from-source.pl b/codegen/get-props-from-source.pl deleted file mode 100755 index 0ef16d96f..000000000 --- a/codegen/get-props-from-source.pl +++ /dev/null @@ -1,144 +0,0 @@ -#!/usr/bin/perl - -open (SRCFILE, $ARGV[0]) || die "Could open $ARGV[0]"; - -@lines = ; -$linenum = 0; - -while ($linenum < @lines) { - - $line = $lines[$linenum]; - - if ($line =~ /^(\w+)_class_init/) { - $typename = StudCaps($1); - $fstr = ""; - - do { - $fstr .= $lines[$linenum++]; - } until ($lines[$linenum] =~ /^}/); - - parse_init_func ($typename, $fstr); - } - - $linenum++; -} - -sub parse_init_func -{ - my ($class, $func) = @_; - my @init_lines = split (/\n/, $func); - - my $linenum = 0; - while ($linenum < @init_lines) { - - my $line = $init_lines[$linenum]; - - while ($linenum < @init_lines) { - $line = $init_lines[$linenum]; - if ($line =~ /g_object_class_install_prop/) { - my $prop = $line; - do { - $prop .= $init_lines[++$linenum]; - } until ($init_lines[$linenum] =~ /;/); - print_prop ($prop, $class); - } elsif ($line =~ /g_signal_new/) { - my $sig = $line; - do { - $sig .= $init_lines[++$linenum]; - } until ($init_lines[$linenum] =~ /;/); - print_signal ($sig, $class); - } - $linenum++; - } - - $linenum++; - } -} - -sub print_signal -{ - my ($spec, $class) = @_; - $spec =~ s/\n\s*//g; - - $spec =~ /\((.*)\);/; - my @args = split (/,\s*/, $1); - - $args[0] =~ /\w+/; - my $name = $&; - - my $ret = $args[8]; - if ($ret =~ /G_TYPE_(\w+)/) { - $ret = lc ($1); - } - - my $param_cnt = $args[9]; - - my $pstr = "\t\n"; - $pstr .= "\t\t $ret \n"; - if ($param_cnt) { - $pstr .= "\t\t\n"; - for ($i=0; $i < $param_cnt; $i++) { - if ($args[$i+10] =~ /G_TYPE_(\w+)/) { - $args[$i+10] = lc ($1); - } - $pstr .= "\t\t\t $args[$i+10] \n"; - } - $pstr .= "\t\t\n"; - } - $pstr .= "\t\n\n"; - - $signals{$name} = $pstr; -} - -sub print_prop -{ - my ($spec, $class) = @_; - - $spec =~ /g_param_spec_(\w+)\s*\((.*)/; - $type = $1; - $params = $2; - - if ($type =~ /boolean|^u*int|pointer/) { - $params =~ /\"(.+)\",.+\".+\".+\"(.+)\".*(,\s*G_PARAM_\w+.*)\)\s*\)/; - $name = $1; $docs = $2; $mode = $3; - $type = "g$type"; - } elsif ($type =~ /string/) { - $params =~ /\"(.+)\",.+\".+\".+\"(.+)\".*(,\s*G_PARAM_\w+.*)\)\s*\)/; - $name = $1; $docs = $2; $mode = $3; - $type = "gchar*"; - } elsif ($type =~ /enum|flags/) { - $params =~ /\"(.+)\",.+,.+\"(.+)\".*,\s+(\w+),.*,(\s*G_PARAM_\w+.*)\)\s*\)/; - $name = $1; $docs = $2; $type = $3; $mode = $4; - $type =~ s/TYPE_//; - $type = StudCaps(lc($type)); - } elsif ($type =~ /object/) { - $params =~ /\"(.+)\",.+,.+\"(.+)\".*,\s+(\w+),(\s*G_PARAM_\w+.*)\)\s*\)/; - $name = $1; $docs = $2; $type = $3; $mode = $4; - $type =~ s/TYPE_//; - $type = StudCaps(lc($type)); - } - - - print "(define-property $name\n"; - print " (of-object \"$class\")\n"; - print " (prop-type \"$type\")\n"; - print " (doc-string \"$docs\")\n"; - - if ($mode =~ /READ/) { print " (readable #t)\n"; } - if ($mode =~ /WRIT/) { print " (writeable #t)\n"; } - if ($mode =~ /CONS/) { print " (construct-only #t)\n"; } - - print ")\n\n"; - - $props{$name} = $pstr; -} - -sub StudCaps -{ - my ($str) = @_; - - $str =~ s/^(\w)/\u\1/; - $str =~ s/[_-]([a-z])/\u\1/g; - $str =~ s/[_-](\d)/\1/g; - return $str; -} diff --git a/codegen/get-signals-from-source.pl b/codegen/get-signals-from-source.pl deleted file mode 100755 index c41319d55..000000000 --- a/codegen/get-signals-from-source.pl +++ /dev/null @@ -1,96 +0,0 @@ -#!/usr/bin/perl - -$hdrfile = $srcfile = $ARGV[0]; -$hdrfile =~ s/c$/h/; - -open (SRCFILE, $srcfile) || die "Could open $srcfile"; -@lines = ; - -open (SRCFILE, $hdrfile) || die "Could open $hdrfile"; -@hdrlines = ; - -$linenum = 0; - -while ($linenum < @lines) { - - $line = $lines[$linenum]; - - if ($line =~ /^(\w+)_class_init/) { - $typename = StudCaps($1); - } elsif ($line =~ /g_signal_new/) { - $str = $line; - do { - $str .= $lines[++$linenum]; - } until ($lines[$linenum] =~ /;/); - - print_signal ($str, $typename); - } - - $linenum++; -} - -sub print_signal -{ - my ($spec, $class) = @_; - $spec =~ s/\n\s*//g; - - $spec =~ /\(\"(\w+)\",.*G_SIGNAL_RUN_(\w+).*_OFFSET\s*\((.*)\),/; - $signame = $1; - $run = lc($2); - $class_method = $3; - - ($ret, $params) = lookup_method($class_method); - - print "(define-signal $signame\n"; - print " (of-object \"$class\")\n"; - print " (return-type \"$ret\")\n"; - print " (when \"$run\")\n"; - print $params; - print ")\n\n"; -} - -sub lookup_method -{ - my ($pstr) = @_; - my $lineno = 0; - ($classname, $method) = split(/,\s*/, $pstr); - - while ($hdrlines[$lineno] !~ /^struct\s*_$classname/) {$lineno++;} - - do { - if ($hdrlines[$lineno] =~ /$method/) { - $sig = ""; - while ($hdrlines[$lineno] !~ /;/) { - $sig .= $hdrlines[$lineno++]; - } - $sig .= $hdrlines[$lineno]; - $sig =~ s/\n\s*//g; - $sig =~ /(\S+)\s*\(\* $method\)\s*\((.*)\);/; - $ret = $1; - $parms = $2; - $ret =~ s/void/none/; - @plist = split(/,/, $parms); - $parms = " (parameters\n"; - foreach $parm (@plist) { - $parm =~ s/\s+\*/\* /; - $parm =~ s/(\S+)/"$1"/g; - $parms .= " '($parm)\n"; - } - $parms .= " )\n"; - return ($ret, $parms); - } - } until ($hdrlines[$lineno++] =~ /^}/); - - return (); - -} - -sub StudCaps -{ - my ($str) = @_; - - $str =~ s/^(\w)/\u\1/; - $str =~ s/[_-]([a-z])/\u\1/g; - $str =~ s/[_-](\d)/\1/g; - return $str; -} diff --git a/codegen/get-structs-from-source.pl b/codegen/get-structs-from-source.pl deleted file mode 100755 index 2d4d069f5..000000000 --- a/codegen/get-structs-from-source.pl +++ /dev/null @@ -1,66 +0,0 @@ -#!/usr/bin/perl -# -# get-structs-from-source.pl : Extracts define-struct expressions -# -# Author: Mike Kestner (mkestner@speakeasy.net) -# -# 2001 Mike Kestner - -while ($line = ) { - - if ($line =~ /typedef\s+struct\s+(\w+)\s+\**(\w+);/) { - $types{$2} = $1; - } elsif ($line =~ /typedef\s+(\w+)\s+(\w+);/) { - $types{$2} = $1; - } elsif ($line =~ /^struct\s+(\w+)/) { - $sname = $1; - $sdef = $line; - while ($line = ) { - $sdef .= $line; - last if ($line =~ /^}/); - } - $sdefs{$sname} = $sdef; - } -} - -foreach $key (sort (keys (%types))) { - next if (($key =~ /Class$/) || ($key =~ "Private") || - exists($types{$key."Class"})); - - if (exists($sdefs{$key})) { - $def = $sdefs{$key}; - } else { - $newkey = $types{$key}; - while ($newkey && !exists($sdefs{$newkey})) { - $newkey = $types{$newkey}; - } - warn "$key has no struct def\n" if ($newkey eq ""); - $def = $sdefs{$newkey}; - } - - $key =~ /$ARGV[0](\w+)/; - print "(define-struct $1\n"; - print " (in-module \"$ARGV[0]\")\n"; - print " (c-name \"$key\")\n"; - print " (fields\n"; - $def =~ s/\s+/ /g; - $def =~ s/\n\s*//g; - $def =~ s|/\*.*?\*/||g; - $def =~ /\{(.+)\}/; - foreach $mem (split (/;/, $1)) { - $mem =~ s/\s+(\*+)/\1 /g; - $mem =~ s/const /const\-/g; - if ($mem =~ /(\S+\s+\(\*)\s*(.+\))/) { - $type = $1; $fdesc = $2; - $type =~ s/\s+\(\*/\*/; - $fdesc =~ s/^(\w+)\)/\1/; - print " '(\"$type\" \"$fdesc\")\n"; - } elsif ($mem =~ /(\S+)\s+(.+)/) { - $type = $1; $symb = $2; - foreach $tok (split (/,\s*/, $symb)) { - print " '(\"$type\" \"$tok\")\n"; - } - } - } - print " )\n)\n\n"; -} diff --git a/codegen/gtk-props.defs b/codegen/gtk-props.defs deleted file mode 100644 index 525c5e83b..000000000 --- a/codegen/gtk-props.defs +++ /dev/null @@ -1,282 +0,0 @@ -(define-property name - (of-object "GtkWidget") - (prop-type "gchar*") - (doc-string "The name of the widget") - (readable #t) - (writeable #t) -) - -(define-property parent - (of-object "GtkWidget") - (prop-type "GtkContainer") - (doc-string "The parent widget of this widget. Must be a Container widget.") - (readable #t) - (writeable #t) -) - -(define-property width_request - (of-object "GtkWidget") - (prop-type "gint") - (doc-string "Override for width request of the widget, or -1 if natural request should be used.") - (readable #t) - (writeable #t) -) - -(define-property height_request - (of-object "GtkWidget") - (prop-type "gint") - (doc-string "Override for height request of the widget, or -1 if natural request should be used.") - (readable #t) - (writeable #t) -) - -(define-property visible - (of-object "GtkWidget") - (prop-type "gboolean") - (doc-string "Whether the widget is visible") - (readable #t) - (writeable #t) -) - -(define-property sensitive - (of-object "GtkWidget") - (prop-type "gboolean") - (doc-string "Whether the widget responds to input") - (readable #t) - (writeable #t) -) - -(define-property app_paintable - (of-object "GtkWidget") - (prop-type "gboolean") - (doc-string "Whether the application will paint directly on the widget") - (readable #t) - (writeable #t) -) - -(define-property can_focus - (of-object "GtkWidget") - (prop-type "gboolean") - (doc-string "Whether the widget can accept the input focus") - (readable #t) - (writeable #t) -) - -(define-property has_focus - (of-object "GtkWidget") - (prop-type "gboolean") - (doc-string "Whether the widget has the input focus") - (readable #t) - (writeable #t) -) - -(define-property can_default - (of-object "GtkWidget") - (prop-type "gboolean") - (doc-string "Whether the widget can be the default widget") - (readable #t) - (writeable #t) -) - -(define-property has_default - (of-object "GtkWidget") - (prop-type "gboolean") - (doc-string "Whether the widget is the default widget") - (readable #t) - (writeable #t) -) - -(define-property receives_default - (of-object "GtkWidget") - (prop-type "gboolean") - (doc-string "If TRUE, the widget will receive the default action when it is focused.") - (readable #t) - (writeable #t) -) - -(define-property composite_child - (of-object "GtkWidget") - (prop-type "gboolean") - (doc-string "Whether the widget is composed of other widgets") - (readable #t) -) - -(define-property style - (of-object "GtkWidget") - (prop-type "GtkStyle") - (doc-string "The style of the widget, which contains information about how it will look (colors etc).") - (readable #t) - (writeable #t) -) - -(define-property events - (of-object "GtkWidget") - (prop-type "GdkEventMask") - (doc-string "The event mask that decides what kind of GdkEvents this widget gets.") - (readable #t) - (writeable #t) -) - -(define-property extension_events - (of-object "GtkWidget") - (prop-type "GdkExtensionMode") - (doc-string "The mask that decides what kind of extension events this widget gets.") - (readable #t) - (writeable #t) -) - -(define-property user_data - (of-object "GtkObject") - (prop-type "gpointer") - (doc-string "Anonymous User Data Pointer") - (readable #t) - (writeable #t) -) - -(define-property resize_mode - (of-object "GtkContainer") - (prop-type "GtkResizeMode") - (doc-string "Specify how resize events are handled") - (readable #t) - (writeable #t) -) - -(define-property border_width - (of-object "GtkContainer") - (prop-type "guint") - (doc-string "The width of the empty border outside the containers children.") - (readable #t) - (writeable #t) -) - -(define-property child - (of-object "GtkContainer") - (prop-type "GtkWidget") - (doc-string "Can be used to add a new child to the container.") - (writeable #t) -) - -(define-property type - (of-object "GtkWindow") - (prop-type "GtkWindowType") - (doc-string "The type of the window") - (readable #t) - (writeable #t) - (construct-only #t) -) - -(define-property title - (of-object "GtkWindow") - (prop-type "gchar*") - (doc-string "The title of the window") - (readable #t) - (writeable #t) -) - -(define-property allow_shrink - (of-object "GtkWindow") - (prop-type "gboolean") - (doc-string "If TRUE, the window has no mimimum size. Setting this to TRUE is 99% of the time a bad idea.") - (readable #t) - (writeable #t) -) - -(define-property allow_grow - (of-object "GtkWindow") - (prop-type "gboolean") - (doc-string "If TRUE, users can expand the window beyond its minimum size.") - (readable #t) - (writeable #t) -) - -(define-property resizable - (of-object "GtkWindow") - (prop-type "gboolean") - (doc-string "If TRUE, users can resize the window.") - (readable #t) - (writeable #t) -) - -(define-property modal - (of-object "GtkWindow") - (prop-type "gboolean") - (doc-string "If TRUE, the window is modal (other windows are not usable while this one is up).") - (readable #t) - (writeable #t) -) - -(define-property window_position - (of-object "GtkWindow") - (prop-type "GtkWindowPosition") - (doc-string "The initial position of the window.") - (readable #t) - (writeable #t) -) - -(define-property default_width - (of-object "GtkWindow") - (prop-type "gint") - (doc-string "The default width of the window, used when initially showing the window.") - (readable #t) - (writeable #t) -) - -(define-property default_height - (of-object "GtkWindow") - (prop-type "gint") - (doc-string "The default height of the window, used when initially showing the window.") - (readable #t) - (writeable #t) -) - -(define-property destroy_with_parent - (of-object "GtkWindow") - (prop-type "gboolean") - (doc-string "If this window should be destroyed when the parent is destroyed") - (readable #t) - (writeable #t) -) - -(define-property icon - (of-object "GtkWindow") - (prop-type "GdkPixbuf") - (doc-string "Icon for this window") - (readable #t) - (writeable #t) -) - -(define-property label - (of-object "GtkButton") - (prop-type "gchar*") - (doc-string "Text of the label widget inside the button, if the button contains a label widget.") - (readable #t) - (writeable #t) - (construct-only #t) -) - -(define-property use_underline - (of-object "GtkButton") - (prop-type "gboolean") - (doc-string "If set, an underline in the text indicates the next character should be used for the mnemonic accelerator key") - (readable #t) - (writeable #t) - (construct-only #t) -) - -(define-property use_stock - (of-object "GtkButton") - (prop-type "gboolean") - (doc-string "If set, the label is used to pick a stock item instead of being displayed") - (readable #t) - (writeable #t) - (construct-only #t) -) - -(define-property relief - (of-object "GtkButton") - (prop-type "GtkReliefStyle") - (doc-string "The border relief style.") - (readable #t) - (writeable #t) -) - diff --git a/codegen/gtk-signals.defs b/codegen/gtk-signals.defs deleted file mode 100644 index cc94944ff..000000000 --- a/codegen/gtk-signals.defs +++ /dev/null @@ -1,423 +0,0 @@ -(define-signal set_focus - (of-object "GtkWindow") - (return-type "none") - (when "last") - (parameters - '("GtkWindow*" "window") - '("GtkWidget*" "focus") - ) -) - -(define-signal frame_event - (of-object "GtkWindow") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEvent*" "event") - ) -) - -(define-signal activate_focus - (of-object "GtkWindow") - (return-type "none") - (when "last") - (parameters - '("GtkWindow*" "window") - ) -) - -(define-signal activate_default - (of-object "GtkWindow") - (return-type "none") - (when "last") - (parameters - '("GtkWindow*" "window") - ) -) - -(define-signal move_focus - (of-object "GtkWindow") - (return-type "none") - (when "last") - (parameters - '("GtkWindow*" "window") - '("GtkDirectionType" "direction") - ) -) - -(define-signal size_request - (of-object "GtkWidget") - (return-type "none") - (when "first") - (parameters - '("GtkWidget*" "widget") - '("GtkRequisition*" "requisition") - ) -) - -(define-signal child_notify - (of-object "GtkWidget") - (return-type "none") - (when "first") - (parameters - '("GtkWidget*" "widget") - '("GParamSpec*" "pspec") - ) -) - -(define-signal focus - (of-object "GtkWidget") - (return-type "none") - (when "last") - (parameters - ) -) - -(define-signal event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEvent*" "event") - ) -) - -(define-signal button_press_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventButton*" "event") - ) -) - -(define-signal button_release_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventButton*" "event") - ) -) - -(define-signal scroll_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventScroll*" "event") - ) -) - -(define-signal motion_notify_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventMotion*" "event") - ) -) - -(define-signal delete_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventAny*" "event") - ) -) - -(define-signal destroy_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventAny*" "event") - ) -) - -(define-signal expose_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventExpose*" "event") - ) -) - -(define-signal key_press_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventKey*" "event") - ) -) - -(define-signal key_release_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventKey*" "event") - ) -) - -(define-signal enter_notify_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventCrossing*" "event") - ) -) - -(define-signal leave_notify_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventCrossing*" "event") - ) -) - -(define-signal configure_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventConfigure*" "event") - ) -) - -(define-signal focus_in_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventFocus*" "event") - ) -) - -(define-signal focus_out_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventFocus*" "event") - ) -) - -(define-signal map_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventAny*" "event") - ) -) - -(define-signal unmap_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventAny*" "event") - ) -) - -(define-signal property_notify_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventProperty*" "event") - ) -) - -(define-signal selection_clear_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventSelection*" "event") - ) -) - -(define-signal selection_request_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventSelection*" "event") - ) -) - -(define-signal selection_notify_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventSelection*" "event") - ) -) - -(define-signal selection_received - (of-object "GtkWidget") - (return-type "none") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GtkSelectionData*" "selection_data") - '("guint" "time") - ) -) - -(define-signal selection_get - (of-object "GtkWidget") - (return-type "none") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GtkSelectionData*" "selection_data") - '("guint" "info") - '("guint" "time") - ) -) - -(define-signal proximity_in_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventProximity*" "event") - ) -) - -(define-signal proximity_out_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventProximity*" "event") - ) -) - -(define-signal drag_motion - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkDragContext*" "context") - '("gint" "x") - '("gint" "y") - '("guint" "time") - ) -) - -(define-signal drag_drop - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkDragContext*" "context") - '("gint" "x") - '("gint" "y") - '("guint" "time") - ) -) - -(define-signal drag_data_get - (of-object "GtkWidget") - (return-type "none") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkDragContext*" "context") - '("GtkSelectionData*" "selection_data") - '("guint" "info") - '("guint" "time") - ) -) - -(define-signal drag_data_received - (of-object "GtkWidget") - (return-type "none") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkDragContext*" "context") - '("gint" "x") - '("gint" "y") - '("GtkSelectionData*" "selection_data") - '("guint" "info") - '("guint" "time") - ) -) - -(define-signal visibility_notify_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventVisibility*" "event") - ) -) - -(define-signal client_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventClient*" "event") - ) -) - -(define-signal no_expose_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventAny*" "event") - ) -) - -(define-signal window_state_event - (of-object "GtkWidget") - (return-type "gboolean") - (when "last") - (parameters - '("GtkWidget*" "widget") - '("GdkEventWindowState*" "event") - ) -) - diff --git a/codegen/gtk-structs.defs b/codegen/gtk-structs.defs deleted file mode 100644 index b88b55394..000000000 --- a/codegen/gtk-structs.defs +++ /dev/null @@ -1,1088 +0,0 @@ -(define-struct AccelGroupEntry - (in-module "Gtk") - (c-name "GtkAccelGroupEntry") - (fields - '("GtkAccelKey" "key") - '("GClosure*" "closure") - '("GQuark" "accel_path_quark") - ) -) - -(define-struct AccelKey - (in-module "Gtk") - (c-name "GtkAccelKey") - (fields - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - '("guint" "accel_flags : 16") - ) -) - -(define-struct Allocation - (in-module "Gtk") - (c-name "GtkAllocation") - (fields - ) -) - -(define-struct Arg - (in-module "Gtk") - (c-name "GtkArg") - (fields - '("GtkType" "type") - '("gchar*" "name") - '("union" "{ gchar char_data") - '("guchar" "uchar_data") - '("gboolean" "bool_data") - '("gint" "int_data") - '("guint" "uint_data") - '("glong" "long_data") - '("gulong" "ulong_data") - '("gfloat" "float_data") - '("gdouble" "double_data") - '("gchar*" "string_data") - '("GtkObject*" "object_data") - '("gpointer" "pointer_data") - '("struct" "{ GtkSignalFunc f") - '("gpointer" "d") - '("}" "signal_data") - '("}" "d") - ) -) - -(define-struct BindingArg - (in-module "Gtk") - (c-name "GtkBindingArg") - (fields - '("GtkType" "arg_type") - '("union" "{ glong long_data") - '("gdouble" "double_data") - '("gchar*" "string_data") - '("}" "d") - ) -) - -(define-struct BindingEntry - (in-module "Gtk") - (c-name "GtkBindingEntry") - (fields - '("guint" "keyval") - '("guint" "modifiers") - '("GtkBindingSet*" "binding_set") - '("guint" "destroyed : 1") - '("guint" "in_emission : 1") - '("GtkBindingEntry*" "set_next") - '("GtkBindingEntry*" "hash_next") - '("GtkBindingSignal*" "signals") - ) -) - -(define-struct BindingSet - (in-module "Gtk") - (c-name "GtkBindingSet") - (fields - '("gchar*" "set_name") - '("gint" "priority") - '("GSList*" "widget_path_pspecs") - '("GSList*" "widget_class_pspecs") - '("GSList*" "class_branch_pspecs") - '("GtkBindingEntry*" "entries") - '("GtkBindingEntry*" "current") - ) -) - -(define-struct BindingSignal - (in-module "Gtk") - (c-name "GtkBindingSignal") - (fields - '("GtkBindingSignal*" "next") - '("gchar*" "signal_name") - '("guint" "n_args") - '("GtkBindingArg*" "args") - ) -) - -(define-struct Border - (in-module "Gtk") - (c-name "GtkBorder") - (fields - '("gint" "left") - '("gint" "right") - '("gint" "top") - '("gint" "bottom") - ) -) - -(define-struct BoxChild - (in-module "Gtk") - (c-name "GtkBoxChild") - (fields - '("GtkWidget*" "widget") - '("guint16" "padding") - '("guint" "expand : 1") - '("guint" "fill : 1") - '("guint" "pack : 1") - '("guint" "is_secondary : 1") - ) -) - -(define-struct CListCellInfo - (in-module "Gtk") - (c-name "GtkCListCellInfo") - (fields - '("gint" "row") - '("gint" "column") - ) -) - -(define-struct CListColumn - (in-module "Gtk") - (c-name "GtkCListColumn") - (fields - '("gchar*" "title") - '("GdkRectangle" "area") - '("GtkWidget*" "button") - '("GdkWindow*" "window") - '("gint" "width") - '("gint" "min_width") - '("gint" "max_width") - '("GtkJustification" "justification") - '("guint" "visible : 1") - '("guint" "width_set : 1") - '("guint" "resizeable : 1") - '("guint" "auto_resize : 1") - '("guint" "button_passive : 1") - ) -) - -(define-struct CListDestInfo - (in-module "Gtk") - (c-name "GtkCListDestInfo") - (fields - '("GtkCListCellInfo" "cell") - '("GtkCListDragPos" "insert_pos") - ) -) - -(define-struct CListRow - (in-module "Gtk") - (c-name "GtkCListRow") - (fields - '("GtkCell*" "cell") - '("GtkStateType" "state") - '("GdkColor" "foreground") - '("GdkColor" "background") - '("GtkStyle*" "style") - '("gpointer" "data") - '("GtkDestroyNotify" "destroy") - '("guint" "fg_set : 1") - '("guint" "bg_set : 1") - '("guint" "selectable : 1") - ) -) - -(define-struct CTreeNode - (in-module "Gtk") - (c-name "GtkCTreeNode") - (fields - '("GList" "list") - ) -) - -(define-struct CTreeRow - (in-module "Gtk") - (c-name "GtkCTreeRow") - (fields - '("GtkCListRow" "row") - '("GtkCTreeNode*" "parent") - '("GtkCTreeNode*" "sibling") - '("GtkCTreeNode*" "children") - '("GdkPixmap*" "pixmap_closed") - '("GdkBitmap*" "mask_closed") - '("GdkPixmap*" "pixmap_opened") - '("GdkBitmap*" "mask_opened") - '("guint16" "level") - '("guint" "is_leaf : 1") - '("guint" "expanded : 1") - ) -) - -(define-struct Cell - (in-module "Gtk") - (c-name "GtkCell") - (fields - '("GtkCellType" "type") - '("gint16" "vertical") - '("gint16" "horizontal") - '("GtkStyle*" "style") - '("union" "{ gchar* text") - '("struct" "{ GdkPixmap* pixmap") - '("GdkBitmap*" "mask") - '("}" "pm") - '("struct" "{ gchar* text") - '("guint8" "spacing") - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask") - '("}" "pt") - '("GtkWidget*" "widget") - '("}" "u") - ) -) - -(define-struct CellEditable - (in-module "Gtk") - (c-name "GtkCellEditable") - (fields - ) -) - -(define-struct CellEditableIface - (in-module "Gtk") - (c-name "GtkCellEditableIface") - (fields - '("GTypeInterface" "g_iface") - '("void*" "editing_done (GtkCellEditable* cell_editable)") - '("void*" "remove_widget (GtkCellEditable* cell_editable)") - '("void*" "start_editing (GtkCellEditable* cell_editable, GdkEvent* event)") - ) -) - -(define-struct CellPixText - (in-module "Gtk") - (c-name "GtkCellPixText") - (fields - '("GtkCellType" "type") - '("gint16" "vertical") - '("gint16" "horizontal") - '("GtkStyle*" "style") - '("gchar*" "text") - '("guint8" "spacing") - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask") - ) -) - -(define-struct CellPixmap - (in-module "Gtk") - (c-name "GtkCellPixmap") - (fields - '("GtkCellType" "type") - '("gint16" "vertical") - '("gint16" "horizontal") - '("GtkStyle*" "style") - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask") - ) -) - -(define-struct CellText - (in-module "Gtk") - (c-name "GtkCellText") - (fields - '("GtkCellType" "type") - '("gint16" "vertical") - '("gint16" "horizontal") - '("GtkStyle*" "style") - '("gchar*" "text") - ) -) - -(define-struct CellWidget - (in-module "Gtk") - (c-name "GtkCellWidget") - (fields - '("GtkCellType" "type") - '("gint16" "vertical") - '("gint16" "horizontal") - '("GtkStyle*" "style") - '("GtkWidget*" "widget") - ) -) - -(define-struct ClassInitFunc - (in-module "Gtk") - (c-name "GtkClassInitFunc") - (fields - ) -) - -(define-struct Clipboard - (in-module "Gtk") - (c-name "GtkClipboard") - (fields - ) -) - -(define-struct EnumValue - (in-module "Gtk") - (c-name "GtkEnumValue") - (fields - ) -) - -(define-struct FixedChild - (in-module "Gtk") - (c-name "GtkFixedChild") - (fields - '("GtkWidget*" "widget") - '("gint" "x") - '("gint" "y") - ) -) - -(define-struct FlagValue - (in-module "Gtk") - (c-name "GtkFlagValue") - (fields - ) -) - -(define-struct IMContextInfo - (in-module "Gtk") - (c-name "GtkIMContextInfo") - (fields - '("const-gchar*" "context_id") - '("const-gchar*" "context_name") - '("const-gchar*" "domain") - '("const-gchar*" "domain_dirname") - '("const-gchar*" "default_locales") - ) -) - -(define-struct IconSet - (in-module "Gtk") - (c-name "GtkIconSet") - (fields - ) -) - -(define-struct IconSource - (in-module "Gtk") - (c-name "GtkIconSource") - (fields - ) -) - -(define-struct ImageAnimationData - (in-module "Gtk") - (c-name "GtkImageAnimationData") - (fields - '("GdkPixbufAnimation*" "anim") - '("GdkPixbufAnimationIter*" "iter") - '("guint" "frame_timeout") - ) -) - -(define-struct ImageIconSetData - (in-module "Gtk") - (c-name "GtkImageIconSetData") - (fields - '("GtkIconSet*" "icon_set") - ) -) - -(define-struct ImageImageData - (in-module "Gtk") - (c-name "GtkImageImageData") - (fields - '("GdkImage*" "image") - ) -) - -(define-struct ImagePixbufData - (in-module "Gtk") - (c-name "GtkImagePixbufData") - (fields - '("GdkPixbuf*" "pixbuf") - ) -) - -(define-struct ImagePixmapData - (in-module "Gtk") - (c-name "GtkImagePixmapData") - (fields - '("GdkPixmap*" "pixmap") - ) -) - -(define-struct ImageStockData - (in-module "Gtk") - (c-name "GtkImageStockData") - (fields - '("gchar*" "stock_id") - ) -) - -(define-struct ItemFactoryEntry - (in-module "Gtk") - (c-name "GtkItemFactoryEntry") - (fields - '("gchar*" "path") - '("gchar*" "accelerator") - '("GtkItemFactoryCallback" "callback") - '("guint" "callback_action") - '("gchar*" "item_type") - '("gconstpointer" "extra_data") - ) -) - -(define-struct ItemFactoryItem - (in-module "Gtk") - (c-name "GtkItemFactoryItem") - (fields - '("gchar*" "path") - '("GSList*" "widgets") - ) -) - -(define-struct LabelSelectionInfo - (in-module "Gtk") - (c-name "GtkLabelSelectionInfo") - (fields - ) -) - -(define-struct NotebookPage - (in-module "Gtk") - (c-name "GtkNotebookPage") - (fields - ) -) - -(define-struct ObjectInitFunc - (in-module "Gtk") - (c-name "GtkObjectInitFunc") - (fields - ) -) - -(define-struct PreviewInfo - (in-module "Gtk") - (c-name "GtkPreviewInfo") - (fields - '("guchar*" "lookup") - '("gdouble" "gamma") - ) -) - -(define-struct PropertyMark - (in-module "Gtk") - (c-name "GtkPropertyMark") - (fields - '("GList*" "property") - '("guint" "offset") - '("guint" "index") - ) -) - -(define-struct RBNode - (in-module "Gtk") - (c-name "GtkRBNode") - (fields - '("guint" "flags : 14") - '("guint" "parity : 1") - '("GtkRBNode*" "left") - '("GtkRBNode*" "right") - '("GtkRBNode*" "parent") - '("gint" "count") - '("gint" "offset") - '("GtkRBTree*" "children") - ) -) - -(define-struct RBTree - (in-module "Gtk") - (c-name "GtkRBTree") - (fields - '("GtkRBNode*" "root") - '("GtkRBNode*" "nil") - '("GtkRBTree*" "parent_tree") - '("GtkRBNode*" "parent_node") - ) -) - -(define-struct RBTreeView - (in-module "Gtk") - (c-name "GtkRBTreeView") - (fields - ) -) - -(define-struct RangeLayout - (in-module "Gtk") - (c-name "GtkRangeLayout") - (fields - ) -) - -(define-struct RangeStepTimer - (in-module "Gtk") - (c-name "GtkRangeStepTimer") - (fields - ) -) - -(define-struct RcContext - (in-module "Gtk") - (c-name "GtkRcContext") - (fields - ) -) - -(define-struct RcProperty - (in-module "Gtk") - (c-name "GtkRcProperty") - (fields - '("GQuark" "type_name") - '("GQuark" "property_name") - '("gchar*" "origin") - '("GValue" "value") - ) -) - -(define-struct Requisition - (in-module "Gtk") - (c-name "GtkRequisition") - (fields - '("gint" "width") - '("gint" "height") - ) -) - -(define-struct RulerMetric - (in-module "Gtk") - (c-name "GtkRulerMetric") - (fields - '("gchar*" "metric_name") - '("gchar*" "abbrev") - '("gdouble" "pixels_per_unit") - '("gdouble" "ruler_scale[10]") - '("gint" "subdivide[5]") - ) -) - -(define-struct SelectionData - (in-module "Gtk") - (c-name "GtkSelectionData") - (fields - '("GdkAtom" "selection") - '("GdkAtom" "target") - '("GdkAtom" "type") - '("gint" "format") - '("guchar*" "data") - '("gint" "length") - ) -) - -(define-struct SettingsValue - (in-module "Gtk") - (c-name "GtkSettingsValue") - (fields - '("gchar*" "origin") - '("GValue" "value") - ) -) - -(define-struct SignalMarshaller - (in-module "Gtk") - (c-name "GtkSignalMarshaller") - (fields - ) -) - -(define-struct StockItem - (in-module "Gtk") - (c-name "GtkStockItem") - (fields - '("gchar*" "stock_id") - '("gchar*" "label") - '("GdkModifierType" "modifier") - '("guint" "keyval") - '("gchar*" "translation_domain") - ) -) - -(define-struct TableChild - (in-module "Gtk") - (c-name "GtkTableChild") - (fields - '("GtkWidget*" "widget") - '("guint16" "left_attach") - '("guint16" "right_attach") - '("guint16" "top_attach") - '("guint16" "bottom_attach") - '("guint16" "xpadding") - '("guint16" "ypadding") - '("guint" "xexpand : 1") - '("guint" "yexpand : 1") - '("guint" "xshrink : 1") - '("guint" "yshrink : 1") - '("guint" "xfill : 1") - '("guint" "yfill : 1") - ) -) - -(define-struct TableRowCol - (in-module "Gtk") - (c-name "GtkTableRowCol") - (fields - '("guint16" "requisition") - '("guint16" "allocation") - '("guint16" "spacing") - '("guint" "need_expand : 1") - '("guint" "need_shrink : 1") - '("guint" "expand : 1") - '("guint" "shrink : 1") - '("guint" "empty : 1") - ) -) - -(define-struct TargetEntry - (in-module "Gtk") - (c-name "GtkTargetEntry") - (fields - '("gchar*" "target") - '("guint" "flags") - '("guint" "info") - ) -) - -(define-struct TargetList - (in-module "Gtk") - (c-name "GtkTargetList") - (fields - '("GList*" "list") - '("guint" "ref_count") - ) -) - -(define-struct TargetPair - (in-module "Gtk") - (c-name "GtkTargetPair") - (fields - '("GdkAtom" "target") - '("guint" "flags") - '("guint" "info") - ) -) - -(define-struct TextAppearance - (in-module "Gtk") - (c-name "GtkTextAppearance") - (fields - '("GdkColor" "bg_color") - '("GdkColor" "fg_color") - '("GdkBitmap*" "bg_stipple") - '("GdkBitmap*" "fg_stipple") - '("gint" "rise") - '("gpointer" "padding1") - '("guint" "underline : 4") - '("guint" "strikethrough : 1") - '("guint" "draw_bg : 1") - '("guint" "inside_selection : 1") - '("guint" "is_text : 1") - '("guint" "pad1 : 1") - '("guint" "pad2 : 1") - '("guint" "pad3 : 1") - '("guint" "pad4 : 1") - ) -) - -(define-struct TextAttrAppearance - (in-module "Gtk") - (c-name "GtkTextAttrAppearance") - (fields - '("PangoAttribute" "attr") - '("GtkTextAppearance" "appearance") - ) -) - -(define-struct TextAttributes - (in-module "Gtk") - (c-name "GtkTextAttributes") - (fields - '("guint" "refcount") - '("GtkTextAppearance" "appearance") - '("GtkJustification" "justification") - '("GtkTextDirection" "direction") - '("PangoFontDescription*" "font") - '("gdouble" "font_scale") - '("gint" "left_margin") - '("gint" "indent") - '("gint" "right_margin") - '("gint" "pixels_above_lines") - '("gint" "pixels_below_lines") - '("gint" "pixels_inside_wrap") - '("PangoTabArray*" "tabs") - '("GtkWrapMode" "wrap_mode") - '("PangoLanguage*" "language") - '("gpointer" "padding1") - '("guint" "invisible : 1") - '("guint" "bg_full_height : 1") - '("guint" "editable : 1") - '("guint" "realized : 1") - '("guint" "pad1 : 1") - '("guint" "pad2 : 1") - '("guint" "pad3 : 1") - '("guint" "pad4 : 1") - ) -) - -(define-struct TextBTree - (in-module "Gtk") - (c-name "GtkTextBTree") - (fields - ) -) - -(define-struct TextCounter - (in-module "Gtk") - (c-name "GtkTextCounter") - (fields - ) -) - -(define-struct TextCursorDisplay - (in-module "Gtk") - (c-name "GtkTextCursorDisplay") - (fields - '("gint" "x") - '("gint" "y") - '("gint" "height") - '("guint" "is_strong : 1") - '("guint" "is_weak : 1") - ) -) - -(define-struct TextFont - (in-module "Gtk") - (c-name "GtkTextFont") - (fields - ) -) - -(define-struct TextIter - (in-module "Gtk") - (c-name "GtkTextIter") - (fields - '("gpointer" "dummy1") - '("gpointer" "dummy2") - '("gint" "dummy3") - '("gint" "dummy4") - '("gint" "dummy5") - '("gint" "dummy6") - '("gint" "dummy7") - '("gint" "dummy8") - '("gpointer" "dummy9") - '("gpointer" "dummy10") - '("gint" "dummy11") - '("gint" "dummy12") - '("gint" "dummy13") - '("gpointer" "dummy14") - ) -) - -*(define-struct TextLine -* (in-module "Gtk") -* (c-name "GtkTextLine") -* (fields -* '("GtkTextBTreeNode*" "parent") -* '("GtkTextLine*" "next") -* '("GtkTextLineSegment*" "segments") -* '("GtkTextLineData*" "views") -* ) -*) - -(define-struct TextLineData - (in-module "Gtk") - (c-name "GtkTextLineData") - (fields - '("gpointer" "view_id") - '("GtkTextLineData*" "next") - '("gint" "height") - '("gint" "width : 24") - '("gint" "valid : 8") - ) -) - -(define-struct TextLineDisplay - (in-module "Gtk") - (c-name "GtkTextLineDisplay") - (fields - '("PangoLayout*" "layout") - '("GSList*" "cursors") - '("GSList*" "shaped_objects") - '("GtkTextDirection" "direction") - '("gint" "width") - '("gint" "total_width") - '("gint" "height") - '("gint" "x_offset") - '("gint" "left_margin") - '("gint" "right_margin") - '("gint" "top_margin") - '("gint" "bottom_margin") - '("gint" "insert_index") - '("gboolean" "size_only") - '("GtkTextLine*" "line") - ) -) - -(define-struct TextLogAttrCache - (in-module "Gtk") - (c-name "GtkTextLogAttrCache") - (fields - ) -) - -(define-struct TextMarkBody - (in-module "Gtk") - (c-name "GtkTextMarkBody") - (fields - ) -) - -(define-struct TextPendingScroll - (in-module "Gtk") - (c-name "GtkTextPendingScroll") - (fields - ) -) - -(define-struct TextTagInfo - (in-module "Gtk") - (c-name "GtkTextTagInfo") - (fields - '("GtkTextTag*" "tag") - '("GtkTextBTreeNode*" "tag_root") - '("gint" "toggle_count") - ) -) - -(define-struct TextToggleBody - (in-module "Gtk") - (c-name "GtkTextToggleBody") - (fields - '("GtkTextTagInfo*" "info") - '("gboolean" "inNodeCounts") - ) -) - -(define-struct TextWindow - (in-module "Gtk") - (c-name "GtkTextWindow") - (fields - ) -) - -(define-struct ThemeEngine - (in-module "Gtk") - (c-name "GtkThemeEngine") - (fields - ) -) - -(define-struct ToolbarChild - (in-module "Gtk") - (c-name "GtkToolbarChild") - (fields - '("GtkToolbarChildType" "type") - '("GtkWidget*" "widget") - '("GtkWidget*" "icon") - '("GtkWidget*" "label") - ) -) - -(define-struct TooltipsData - (in-module "Gtk") - (c-name "GtkTooltipsData") - (fields - '("GtkTooltips*" "tooltips") - '("GtkWidget*" "widget") - '("gchar*" "tip_text") - '("gchar*" "tip_private") - ) -) - -(define-struct TreeDataList - (in-module "Gtk") - (c-name "GtkTreeDataList") - (fields - '("GtkTreeDataList*" "next") - '("union" "{ gint v_int") - '("gint8" "v_char") - '("guint8" "v_uchar") - '("guint" "v_uint") - '("gfloat" "v_float") - '("gdouble" "v_double") - '("gpointer" "v_pointer") - '("}" "data") - ) -) - -(define-struct TreeDragDest - (in-module "Gtk") - (c-name "GtkTreeDragDest") - (fields - ) -) - -(define-struct TreeDragDestIface - (in-module "Gtk") - (c-name "GtkTreeDragDestIface") - (fields - '("GTypeInterface" "g_iface") - '("gboolean*" "drag_data_received (GtkTreeDragDest* drag_dest, GtkTreePath* dest, GtkSelectionData* selection_data)") - '("gboolean*" "row_drop_possible (GtkTreeDragDest* drag_dest, GtkTreePath* dest_path, GtkSelectionData* selection_data)") - ) -) - -(define-struct TreeDragSource - (in-module "Gtk") - (c-name "GtkTreeDragSource") - (fields - ) -) - -(define-struct TreeDragSourceIface - (in-module "Gtk") - (c-name "GtkTreeDragSourceIface") - (fields - '("GTypeInterface" "g_iface") - '("gboolean*" "row_draggable (GtkTreeDragSource* drag_source, GtkTreePath* path)") - '("gboolean*" "drag_data_get (GtkTreeDragSource* drag_source, GtkTreePath* path, GtkSelectionData* selection_data)") - '("gboolean*" "drag_data_delete (GtkTreeDragSource* drag_source, GtkTreePath* path)") - ) -) - -(define-struct TreeIter - (in-module "Gtk") - (c-name "GtkTreeIter") - (fields - '("gint" "stamp") - '("gpointer" "user_data") - '("gpointer" "user_data2") - '("gpointer" "user_data3") - ) -) - -(define-struct TreeModel - (in-module "Gtk") - (c-name "GtkTreeModel") - (fields - ) -) - -(define-struct TreeModelIface - (in-module "Gtk") - (c-name "GtkTreeModelIface") - (fields - '("GTypeInterface" "g_iface") - '("void*" "row_changed (GtkTreeModel* tree_model, GtkTreePath* path, GtkTreeIter* iter)") - '("void*" "row_inserted (GtkTreeModel* tree_model, GtkTreePath* path, GtkTreeIter* iter)") - '("void*" "row_has_child_toggled (GtkTreeModel* tree_model, GtkTreePath* path, GtkTreeIter* iter)") - '("void*" "row_deleted (GtkTreeModel* tree_model, GtkTreePath* path)") - '("void*" "rows_reordered (GtkTreeModel* tree_model, GtkTreePath* path, GtkTreeIter* iter, gint* new_order)") - '("GtkTreeModelFlags*" "get_flags (GtkTreeModel* tree_model)") - '("gint*" "get_n_columns (GtkTreeModel* tree_model)") - '("GType*" "get_column_type (GtkTreeModel* tree_model, gint index)") - '("gboolean*" "get_iter (GtkTreeModel* tree_model, GtkTreeIter* iter, GtkTreePath* path)") - '("GtkTreePath**" "get_path (GtkTreeModel* tree_model, GtkTreeIter* iter)") - '("void*" "get_value (GtkTreeModel* tree_model, GtkTreeIter* iter, gint column, GValue* value)") - '("gboolean*" "iter_next (GtkTreeModel* tree_model, GtkTreeIter* iter)") - '("gboolean*" "iter_children (GtkTreeModel* tree_model, GtkTreeIter* iter, GtkTreeIter* parent)") - '("gboolean*" "iter_has_child (GtkTreeModel* tree_model, GtkTreeIter* iter)") - '("gint*" "iter_n_children (GtkTreeModel* tree_model, GtkTreeIter* iter)") - '("gboolean*" "iter_nth_child (GtkTreeModel* tree_model, GtkTreeIter* iter, GtkTreeIter* parent, gint n)") - '("gboolean*" "iter_parent (GtkTreeModel* tree_model, GtkTreeIter* iter, GtkTreeIter* child)") - '("void*" "ref_node (GtkTreeModel* tree_model, GtkTreeIter* iter)") - '("void*" "unref_node (GtkTreeModel* tree_model, GtkTreeIter* iter)") - ) -) - -(define-struct TreePath - (in-module "Gtk") - (c-name "GtkTreePath") - (fields - ) -) - -(define-struct TreeRowReference - (in-module "Gtk") - (c-name "GtkTreeRowReference") - (fields - ) -) - -(define-struct TreeSortable - (in-module "Gtk") - (c-name "GtkTreeSortable") - (fields - ) -) - -#(define-struct TreeSortableIface -# (in-module "Gtk") -# (c-name "GtkTreeSortableIface") -# (fields -# '("GTypeInterface" "g_iface") -# '("void*" "sort_column_changed (GtkTreeSortable* sortable)") -# '("gboolean*" "get_sort_column_id (GtkTreeSortable* sortable, gint* sort_column_id, GtkSortType* order)") -# '("void*" "set_sort_column_id (GtkTreeSortable* sortable, gint sort_column_id, GtkSortType order)") -# '("void*" "set_sort_func (GtkTreeSortable* sortable, gint sort_column_id, GtkTreeIterCompareFunc func, gpointer data, GtkDestroyNotify destroy)") -# '("void*" "set_default_sort_func (GtkTreeSortable* sortable, GtkTreeIterCompareFunc func, gpointer data, GtkDestroyNotify destroy)") -# '("gboolean*" "has_default_sort_func (GtkTreeSortable* sortable)") -# ) -#) - -(define-struct TypeInfo - (in-module "Gtk") - (c-name "GtkTypeInfo") - (fields - '("gchar*" "type_name") - '("guint" "object_size") - '("guint" "class_size") - '("GtkClassInitFunc" "class_init_func") - '("GtkObjectInitFunc" "object_init_func") - '("gpointer" "reserved_1") - '("gpointer" "reserved_2") - '("GtkClassInitFunc" "base_class_init_func") - ) -) - -(define-struct TypeObject - (in-module "Gtk") - (c-name "GtkTypeObject") - (fields - ) -) - -(define-struct WidgetAuxInfo - (in-module "Gtk") - (c-name "GtkWidgetAuxInfo") - (fields - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("guint" "x_set : 1") - '("guint" "y_set : 1") - ) -) - -(define-struct WidgetShapeInfo - (in-module "Gtk") - (c-name "GtkWidgetShapeInfo") - (fields - '("gint16" "offset_x") - '("gint16" "offset_y") - '("GdkBitmap*" "shape_mask") - ) -) - -(define-struct WindowGeometryInfo - (in-module "Gtk") - (c-name "GtkWindowGeometryInfo") - (fields - ) -) - diff --git a/codegen/gtk-types.defs b/codegen/gtk-types.defs deleted file mode 100644 index 5a803b239..000000000 --- a/codegen/gtk-types.defs +++ /dev/null @@ -1,1968 +0,0 @@ -;; -*- 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/gtk.defs b/codegen/gtk.defs deleted file mode 100644 index 81b789050..000000000 --- a/codegen/gtk.defs +++ /dev/null @@ -1,15379 +0,0 @@ -;; -*- scheme -*- - -(include "gtk-extrafuncs.defs") -(include "gtk-types.defs") - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtk.h - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkaccelgroup.h - -(define-function gtk_accelerator_valid - (c-name "gtk_accelerator_valid") - (return-type "gboolean") - (parameters - '("guint" "keyval") - '("GdkModifierType" "modifiers") - ) -) - -(define-function gtk_accelerator_parse - (c-name "gtk_accelerator_parse") - (return-type "none") - (parameters - '("const-gchar*" "accelerator") - '("guint*" "accelerator_key") - '("GdkModifierType*" "accelerator_mods") - ) -) - -(define-function gtk_accelerator_name - (c-name "gtk_accelerator_name") - (return-type "gchar*") - (parameters - '("guint" "accelerator_key") - '("GdkModifierType" "accelerator_mods") - ) -) - -(define-function gtk_accelerator_set_default_mod_mask - (c-name "gtk_accelerator_set_default_mod_mask") - (return-type "none") - (parameters - '("GdkModifierType" "default_mod_mask") - ) -) - -(define-function gtk_accelerator_get_default_mod_mask - (c-name "gtk_accelerator_get_default_mod_mask") - (return-type "guint") -) - -(define-function gtk_accel_group_new - (is-constructor-of GtkAccelGroup) - (c-name "gtk_accel_group_new") - (return-type "GtkAccelGroup*") -) - -(define-function accel_group_get_default - (c-name "gtk_accel_group_get_default") - (return-type "GtkAccelGroup*") -) - -(define-method ref - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_ref") - (return-type "GtkAccelGroup*") -) - -(define-method unref - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_unref") - (return-type "none") -) - -(define-method lock - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_lock") - (return-type "none") -) - -(define-method unlock - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_unlock") - (return-type "none") -) - -(define-function groups_activate - (c-name "gtk_accel_groups_activate") - (return-type "gboolean") - (parameters - '("GObject*" "object") - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - ) -) - -(define-method activate - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_activate") - (return-type "gboolean") - (parameters - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - ) -) - -(define-method attach - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_attach") - (return-type "none") - (parameters - '("GObject*" "object") - ) -) - -(define-method detach - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_detach") - (return-type "none") - (parameters - '("GObject*" "object") - ) -) - -(define-method get_entry - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_get_entry") - (return-type "GtkAccelEntry*") - (parameters - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - ) -) - -(define-method lock_entry - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_lock_entry") - (return-type "none") - (parameters - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - ) -) - -(define-method unlock_entry - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_unlock_entry") - (return-type "none") - (parameters - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - ) -) - -(define-method add - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_add") - (return-type "none") - (parameters - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - '("GtkAccelFlags" "accel_flags") - '("GObject*" "object") - '("const-gchar*" "accel_signal") - ) -) - -(define-method remove - (of-object "GtkAccelGroup") - (c-name "gtk_accel_group_remove") - (return-type "none") - (parameters - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - '("GObject*" "object") - ) -) - -(define-function gtk_accel_group_handle_add - (c-name "gtk_accel_group_handle_add") - (return-type "none") - (parameters - '("GObject*" "object") - '("guint" "accel_signal_id") - '("GtkAccelGroup*" "accel_group") - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - '("GtkAccelFlags" "accel_flags") - ) -) - -(define-function gtk_accel_group_handle_remove - (c-name "gtk_accel_group_handle_remove") - (return-type "none") - (parameters - '("GtkObject*" "object") - '("GtkAccelGroup*" "accel_group") - '("guint" "accel_key") - '("GdkModifierType" "accel_mods") - ) -) - -(define-function gtk_accel_group_create_add - (c-name "gtk_accel_group_create_add") - (return-type "guint") - (parameters - '("GtkType" "class_type") - '("GtkSignalRunType" "signal_flags") - '("guint" "handler_offset") - ) -) - -(define-function gtk_accel_group_create_remove - (c-name "gtk_accel_group_create_remove") - (return-type "guint") - (parameters - '("GtkType" "class_type") - '("GtkSignalRunType" "signal_flags") - '("guint" "handler_offset") - ) -) - -(define-function gtk_accel_groups_from_object - (c-name "gtk_accel_groups_from_object") - (return-type "GSList*") - (parameters - '("GObject*" "object") - ) -) - -(define-function gtk_accel_group_entries_from_object - (c-name "gtk_accel_group_entries_from_object") - (return-type "GSList*") - (parameters - '("GObject*" "object") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkaccellabel.h - -(define-function gtk_accel_label_get_type - (c-name "gtk_accel_label_get_type") - (return-type "GtkType") -) - -(define-function gtk_accel_label_new - (c-name "gtk_accel_label_new") - (is-constructor-of GtkAccelLabel) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "string") - ) -) - -(define-method get_accel_object - (of-object "GtkAccelLabel") - (c-name "gtk_accel_label_get_accel_object") - (return-type "GObject*") -) - -(define-method get_accel_width - (of-object "GtkAccelLabel") - (c-name "gtk_accel_label_get_accel_width") - (return-type "guint") -) - -(define-method set_accel_object - (of-object "GtkAccelLabel") - (c-name "gtk_accel_label_set_accel_object") - (return-type "none") - (parameters - '("GObject*" "accel_object") - ) -) - -(define-method refetch - (of-object "GtkAccelLabel") - (c-name "gtk_accel_label_refetch") - (return-type "gboolean") -) - -; DEPRECATED -(define-method set_accel_widget - (of-object "GtkAccelLabel") - (c-name "gtk_accel_label_set_accel_widget") - (return-type "none") - (parameters - '("GtkWidget*" "accel_widget") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkadjustment.h - -(define-function gtk_adjustment_get_type - (c-name "gtk_adjustment_get_type") - (return-type "GtkType") -) - -(define-function gtk_adjustment_new - (c-name "gtk_adjustment_new") - (is-constructor-of GtkAdjustment) - (return-type "GtkObject*") - (parameters - '("gdouble" "value" (default "0")) - '("gdouble" "lower" (default "0")) - '("gdouble" "upper" (default "0")) - '("gdouble" "step_incr" (default "0")) - '("gdouble" "page_incr" (default "0")) - '("gdouble" "page_size" (default "0")) - ) -) - -(define-method changed - (of-object "GtkAdjustment") - (c-name "gtk_adjustment_changed") - (return-type "none") -) - -(define-method value_changed - (of-object "GtkAdjustment") - (c-name "gtk_adjustment_value_changed") - (return-type "none") -) - -(define-method clamp_page - (of-object "GtkAdjustment") - (c-name "gtk_adjustment_clamp_page") - (return-type "none") - (parameters - '("gdouble" "lower") - '("gdouble" "upper") - ) -) - -(define-method get_value - (of-object "GtkAdjustment") - (c-name "gtk_adjustment_get_value") - (return-type "gdouble") -) - -(define-method set_value - (of-object "GtkAdjustment") - (c-name "gtk_adjustment_set_value") - (return-type "none") - (parameters - '("gdouble" "value") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkalignment.h - -(define-function gtk_alignment_get_type - (c-name "gtk_alignment_get_type") - (return-type "GtkType") -) - -(define-function gtk_alignment_new - (c-name "gtk_alignment_new") - (is-constructor-of GtkAlignment) - (return-type "GtkWidget*") - (parameters - '("gfloat" "xalign" (default "0.0")) - '("gfloat" "yalign" (default "0.0")) - '("gfloat" "xscale" (default "0.0")) - '("gfloat" "yscale" (default "0.0")) - ) -) - -(define-method set - (of-object "GtkAlignment") - (c-name "gtk_alignment_set") - (return-type "none") - (parameters - '("gfloat" "xalign") - '("gfloat" "yalign") - '("gfloat" "xscale") - '("gfloat" "yscale") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkarrow.h - -(define-function gtk_arrow_get_type - (c-name "gtk_arrow_get_type") - (return-type "GtkType") -) - -(define-function gtk_arrow_new - (c-name "gtk_arrow_new") - (is-constructor-of GtkArrow) - (return-type "GtkWidget*") - (parameters - '("GtkArrowType" "arrow_type") - '("GtkShadowType" "shadow_type") - ) -) - -(define-method set - (of-object "GtkArrow") - (c-name "gtk_arrow_set") - (return-type "none") - (parameters - '("GtkArrowType" "arrow_type") - '("GtkShadowType" "shadow_type") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkaspectframe.h - -(define-function gtk_aspect_frame_get_type - (c-name "gtk_aspect_frame_get_type") - (return-type "GtkType") -) - -(define-function gtk_aspect_frame_new - (c-name "gtk_aspect_frame_new") - (is-constructor-of GtkAspectFrame) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label" (null-ok) (default "NULL")) - '("gfloat" "xalign" (default "0.5")) - '("gfloat" "yalign" (default "0.5")) - '("gfloat" "ratio" (default "1")) - '("gboolean" "obey_child" (default "TRUE")) - ) -) - -(define-method set - (of-object "GtkAspectFrame") - (c-name "gtk_aspect_frame_set") - (return-type "none") - (parameters - '("gfloat" "xalign" (default "0.0")) - '("gfloat" "yalign" (default "0.0")) - '("gfloat" "ratio" (default "1.0")) - '("gboolean" "obey_child" (default "1")) - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkbbox.h - -(define-function gtk_button_box_get_type - (c-name "gtk_button_box_get_type") - (return-type "GtkType") -) - -(define-method get_layout - (of-object "GtkButtonBox") - (c-name "gtk_button_box_get_layout") - (return-type "GtkButtonBoxStyle") -) - -(define-method set_layout - (of-object "GtkButtonBox") - (c-name "gtk_button_box_set_layout") - (return-type "none") - (parameters - '("GtkButtonBoxStyle" "layout_style") - ) -) - -(define-method set_child_secondary - (of-object "GtkButtonBox") - (c-name "gtk_button_box_set_child_secondary") - (return-type "none") - (parameters - '("GtkWidget" "child") - '("gboolean" "is_secondary") - ) -) - -(define-method set_child_size - (of-object "GtkButtonBox") - (c-name "gtk_button_box_set_child_size") - (return-type "none") - (parameters - '("gint" "min_width") - '("gint" "min_height") - ) -) - -(define-method set_child_ipadding - (of-object "GtkButtonBox") - (c-name "gtk_button_box_set_child_ipadding") - (return-type "none") - (parameters - '("gint" "ipad_x") - '("gint" "ipad_y") - ) -) - -(define-method get_child_size - (of-object "GtkButtonBox") - (c-name "gtk_button_box_get_child_size") - (return-type "none") - (parameters - '("gint*" "min_width") - '("gint*" "min_height") - ) -) - -(define-method get_child_ipadding - (of-object "GtkButtonBox") - (c-name "gtk_button_box_get_child_ipadding") - (return-type "none") - (parameters - '("gint*" "ipad_x") - '("gint*" "ipad_y") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkbin.h - -(define-function gtk_bin_get_type - (c-name "gtk_bin_get_type") - (return-type "GtkType") -) - -(define-method get_child - (of-object "GtkBin") - (c-name "gtk_bin_get_child") - (return-type "GtkWidget*") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkbindings.h - -(define-function gtk_binding_set_new - (c-name "gtk_binding_set_new") - (return-type "GtkBindingSet*") - (parameters - '("const-gchar*" "set_name") - ) -) - -(define-function gtk_binding_set_by_class - (c-name "gtk_binding_set_by_class") - (return-type "GtkBindingSet*") - (parameters - '("gpointer" "object_class") - ) -) - -(define-function gtk_binding_set_find - (c-name "gtk_binding_set_find") - (return-type "GtkBindingSet*") - (parameters - '("const-gchar*" "set_name") - ) -) - -(define-function bindings_activate - (c-name "gtk_bindings_activate") - (return-type "gboolean") - (parameters - '("GtkObject*" "object") - '("guint" "keyval") - '("guint" "modifiers") - ) -) - -(define-method activate - (of-object "GtkBindingSet") - (c-name "gtk_binding_set_activate") - (return-type "gboolean") - (parameters - '("guint" "keyval") - '("guint" "modifiers") - '("GtkObject*" "object") - ) -) - -(define-function binding_entry_clear - (c-name "gtk_binding_entry_clear") - (return-type "none") - (parameters - '("GtkBindingSet*" "binding_set") - '("guint" "keyval") - '("guint" "modifiers") - ) -) - -(define-function binding_entry_add_signal - (c-name "gtk_binding_entry_add_signal") - (return-type "none") - (parameters - '("GtkBindingSet*" "binding_set") - '("guint" "keyval") - '("guint" "modifiers") - '("const-gchar*" "signal_name") - '("guint" "n_args") - ) - (varargs #t) -) - -(define-method add_path - (of-object "GtkBindingSet") - (c-name "gtk_binding_set_add_path") - (return-type "none") - (parameters - '("GtkPathType" "path_type") - '("const-gchar*" "path_pattern") - '("GtkPathPriorityType" "priority") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkbox.h - -(define-function gtk_box_get_type - (c-name "gtk_box_get_type") - (return-type "GtkType") -) - -(define-method pack_start - (of-object "GtkBox") - (c-name "gtk_box_pack_start") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gboolean" "expand" (default "TRUE")) - '("gboolean" "fill" (default "TRUE")) - '("guint" "padding" (default "0")) - ) -) - -(define-method pack_end - (of-object "GtkBox") - (c-name "gtk_box_pack_end") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gboolean" "expand" (default "TRUE")) - '("gboolean" "fill" (default "TRUE")) - '("guint" "padding" (default "0")) - ) -) - -(define-method pack_start_defaults - (of-object "GtkBox") - (c-name "gtk_box_pack_start_defaults") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method pack_end_defaults - (of-object "GtkBox") - (c-name "gtk_box_pack_end_defaults") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method set_homogeneous - (of-object "GtkBox") - (c-name "gtk_box_set_homogeneous") - (return-type "none") - (parameters - '("gboolean" "homogeneous") - ) -) - -(define-method get_homogeneous - (of-object "GtkBox") - (c-name "gtk_box_get_homogeneous") - (return-type "gboolean") -) - -(define-method set_spacing - (of-object "GtkBox") - (c-name "gtk_box_set_spacing") - (return-type "none") - (parameters - '("gint" "spacing") - ) -) - -(define-method get_spacing - (of-object "GtkBox") - (c-name "gtk_box_get_spacing") - (return-type "gint") -) - -(define-method reorder_child - (of-object "GtkBox") - (c-name "gtk_box_reorder_child") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gint" "position") - ) -) - -(define-method query_child_packing - (of-object "GtkBox") - (c-name "gtk_box_query_child_packing") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gboolean*" "expand") - '("gboolean*" "fill") - '("guint*" "padding") - '("GtkPackType*" "pack_type") - ) -) - -(define-method set_child_packing - (of-object "GtkBox") - (c-name "gtk_box_set_child_packing") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gboolean" "expand") - '("gboolean" "fill") - '("guint" "padding") - '("GtkPackType" "pack_type") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkbutton.h - -(define-function gtk_button_get_type - (c-name "gtk_button_get_type") - (return-type "GtkType") -) - -(define-function gtk_button_new - (c-name "gtk_button_new") - (is-constructor-of GtkButton) - (return-type "GtkWidget*") -) - -(define-function gtk_button_new_with_label - (c-name "gtk_button_new_with_label") - (is-constructor-of GtkButton) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-function gtk_button_new_from_stock - (c-name "gtk_button_new_from_stock") - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "stock_id") - ) -) - -(define-function gtk_button_new_with_mnemonic - (c-name "gtk_button_new_with_mnemonic") - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-method pressed - (of-object "GtkButton") - (c-name "gtk_button_pressed") - (return-type "none") -) - -(define-method released - (of-object "GtkButton") - (c-name "gtk_button_released") - (return-type "none") -) - -(define-method clicked - (of-object "GtkButton") - (c-name "gtk_button_clicked") - (return-type "none") -) - -(define-method enter - (of-object "GtkButton") - (c-name "gtk_button_enter") - (return-type "none") -) - -(define-method leave - (of-object "GtkButton") - (c-name "gtk_button_leave") - (return-type "none") -) - -(define-method set_relief - (of-object "GtkButton") - (c-name "gtk_button_set_relief") - (return-type "none") - (parameters - '("GtkReliefStyle" "newstyle") - ) -) - -(define-method get_relief - (of-object "GtkButton") - (c-name "gtk_button_get_relief") - (return-type "GtkReliefStyle") -) - -(define-method set_label - (of-object "GtkButton") - (c-name "gtk_button_set_label") - (return-type "none") - (parameters - '("const-gchar*" "label") - ) -) - -(define-method get_label - (of-object "GtkButton") - (c-name "gtk_button_get_label") - (return-type "const-gchar*") -) - -(define-method set_use_underline - (of-object "GtkButton") - (c-name "gtk_button_set_use_underline") - (return-type "none") - (parameters - '("gboolean" "value") - ) -) - -(define-method get_use_underline - (of-object "GtkButton") - (c-name "gtk_button_get_use_underline") - (return-type "gboolean") -) - -(define-method set_use_stock - (of-object "GtkButton") - (c-name "gtk_button_set_use_stock") - (return-type "none") - (parameters - '("gboolean" "value") - ) -) - -(define-method get_use_stock - (of-object "GtkButton") - (c-name "gtk_button_get_use_stock") - (return-type "gboolean") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcalendar.h - -(define-function gtk_calendar_get_type - (c-name "gtk_calendar_get_type") - (return-type "GtkType") -) - -(define-function gtk_calendar_new - (c-name "gtk_calendar_new") - (is-constructor-of GtkCalendar) - (return-type "GtkWidget*") -) - -(define-method select_month - (of-object "GtkCalendar") - (c-name "gtk_calendar_select_month") - (return-type "gint") - (parameters - '("guint" "month") - '("guint" "year") - ) -) - -(define-method select_day - (of-object "GtkCalendar") - (c-name "gtk_calendar_select_day") - (return-type "none") - (parameters - '("guint" "day") - ) -) - -(define-method mark_day - (of-object "GtkCalendar") - (c-name "gtk_calendar_mark_day") - (return-type "gint") - (parameters - '("guint" "day") - ) -) - -(define-method unmark_day - (of-object "GtkCalendar") - (c-name "gtk_calendar_unmark_day") - (return-type "gint") - (parameters - '("guint" "day") - ) -) - -(define-method clear_marks - (of-object "GtkCalendar") - (c-name "gtk_calendar_clear_marks") - (return-type "none") -) - -(define-method display_options - (of-object "GtkCalendar") - (c-name "gtk_calendar_display_options") - (return-type "none") - (parameters - '("GtkCalendarDisplayOptions" "flags") - ) -) - -(define-method get_date - (of-object "GtkCalendar") - (c-name "gtk_calendar_get_date") - (return-type "none") - (parameters - '("guint*" "year") - '("guint*" "month") - '("guint*" "day") - ) -) - -(define-method freeze - (of-object "GtkCalendar") - (c-name "gtk_calendar_freeze") - (return-type "none") -) - -(define-method thaw - (of-object "GtkCalendar") - (c-name "gtk_calendar_thaw") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcellrenderer.h - -(define-function gtk_cell_renderer_get_type - (c-name "gtk_cell_renderer_get_type") - (return-type "GtkType") -) - -(define-method get_size - (of-object "GtkCellRenderer") - (c-name "gtk_cell_renderer_get_size") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("gint*" "width") - '("gint*" "height") - ) -) - -(define-method render - (of-object "GtkCellRenderer") - (c-name "gtk_cell_renderer_render") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkWidget*" "widget") - '("GdkRectangle*" "background_area") - '("GdkRectangle*" "cell_area") - '("GdkRectangle*" "expose_area") - '("guint" "flags") - ) -) - -(define-method activate - (of-object "GtkCellRenderer") - (c-name "gtk_cell_renderer_activate") - (return-type "gboolean") - (parameters - '("GdkEvent*" "event") - '("GtkWidget*" "widget") - '("gchar*" "path") - '("GdkRectangle*" "background_area") - '("GdkRectangle*" "cell_area") - '("guint" "flags") - ) -) - -(define-method start_editing - (of-object "GtkCellRenderer") - (c-name "gtk_cell_renderer_start_editing") - (return-type "none") - (parameters - '("GdkEvent*" "event") - '("GtkWidget*" "widget") - '("gchar*" "path") - '("GdkRectangle*" "background_area") - '("GdkRectangle*" "cell_area") - '("guint" "flags") - ) -) - -(define-method set_fixed_size - (of-object "GtkCellRenderer") - (c-name "gtk_cell_renderer_set_fixed_size") - (return-type "none") - (parameters - '("gint" "width") - '("gint" "height") - ) -) - -(define-method get_fixed_size - (of-object "GtkCellRenderer") - (c-name "gtk_cell_renderer_get_fixed_size") - (return-type "none") - (parameters - '("gint*" "width") - '("gint*" "height") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcellrendererpixbuf.h - -(define-function gtk_cell_renderer_pixbuf_get_type - (c-name "gtk_cell_renderer_pixbuf_get_type") - (return-type "GtkType") -) - -(define-function gtk_cell_renderer_pixbuf_new - (c-name "gtk_cell_renderer_pixbuf_new") - (is-constructor-of GtkCellRendererPixbuf) - (return-type "GtkCellRenderer*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcellrenderertext.h - -(define-function gtk_cell_renderer_text_get_type - (c-name "gtk_cell_renderer_text_get_type") - (return-type "GtkType") -) - -(define-function gtk_cell_renderer_text_new - (c-name "gtk_cell_renderer_text_new") - (is-constructor-of GtkCellRendererText) - (return-type "GtkCellRenderer*") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcellrenderertoggle.h - -(define-function gtk_cell_renderer_toggle_get_type - (c-name "gtk_cell_renderer_toggle_get_type") - (return-type "GtkType") -) - -(define-function gtk_cell_renderer_toggle_new - (c-name "gtk_cell_renderer_toggle_new") - (is-constructor-of GtkCellRendererToggle) - (return-type "GtkCellRenderer*") -) - -(define-method set_radio - (of-object "GtkCellRendererToggle") - (c-name "gtk_cell_renderer_toggle_set_radio") - (return-type "none") - (parameters - '("gboolean" "radio") - ) -) - -(define-method get_active - (of-object "GtkCellRendererToggle") - (c-name "gtk_cell_renderer_toggle_get_active") - (return-type "gboolean") -) - -(define-method set_active - (of-object "GtkCellRendererToggle") - (c-name "gtk_cell_renderer_toggle_set_active") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcheckbutton.h - -(define-function gtk_check_button_get_type - (c-name "gtk_check_button_get_type") - (return-type "GtkType") -) - -(define-function gtk_check_button_new - (c-name "gtk_check_button_new") - (is-constructor-of GtkCheckButton) - (return-type "GtkWidget*") -) - -(define-function gtk_check_button_new_with_label - (c-name "gtk_check_button_new_with_label") - (is-constructor-of GtkCheckButton) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-function gtk_check_button_new_with_mnemonic - (c-name "gtk_check_button_new_with_mnemonic") - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcheckmenuitem.h - -(define-function gtk_check_menu_item_get_type - (c-name "gtk_check_menu_item_get_type") - (return-type "GtkType") -) - -(define-function gtk_check_menu_item_new - (c-name "gtk_check_menu_item_new") - (is-constructor-of GtkCheckMenuItem) - (return-type "GtkWidget*") -) - -(define-function gtk_check_menu_item_new_with_label - (c-name "gtk_check_menu_item_new_with_label") - (is-constructor-of GtkCheckMenuItem) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-function gtk_check_menu_item_new_with_mnemonic - (c-name "gtk_check_menu_item_new_with_mnemonic") - (is-constructor-of GtkCheckMenuItem) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-method set_active - (of-object "GtkCheckMenuItem") - (c-name "gtk_check_menu_item_set_active") - (return-type "none") - (parameters - '("gboolean" "is_active") - ) -) - -(define-method get_active - (of-object "GtkCheckMenuItem") - (c-name "gtk_check_menu_item_get_active") - (return-type "gboolean") -) - -(define-method toggled - (of-object "GtkCheckMenuItem") - (c-name "gtk_check_menu_item_toggled") - (return-type "none") -) - -(define-method set_inconsistent - (of-object "GtkCheckMenuItem") - (c-name "gtk_check_menu_item_set_inconsistent") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_inconsistent - (of-object "GtkCheckMenuItem") - (c-name "gtk_check_menu_item_get_inconsistent") - (return-type "gboolean") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkclipboard.h - -(define-method set_with_data - (of-object "GtkClipboard") - (c-name "gtk_clipboard_set_with_data") - (return-type "gboolean") - (parameters - '("const-GtkTargetEntry*" "targets") - '("guint" "n_targets") - '("GtkClipboardGetFunc" "get_func") - '("GtkClipboardClearFunc" "clear_func") - '("gpointer" "user_data") - ) -) - -(define-method set_with_owner - (of-object "GtkClipboard") - (c-name "gtk_clipboard_set_with_owner") - (return-type "gboolean") - (parameters - '("const-GtkTargetEntry*" "targets") - '("guint" "n_targets") - '("GtkClipboardGetFunc" "get_func") - '("GtkClipboardClearFunc" "clear_func") - '("GObject*" "owner") - ) -) - -(define-method get_owner - (of-object "GtkClipboard") - (c-name "gtk_clipboard_get_owner") - (return-type "GObject*") -) - -(define-method clear - (of-object "GtkClipboard") - (c-name "gtk_clipboard_clear") - (return-type "none") -) - -(define-method set_text - (of-object "GtkClipboard") - (c-name "gtk_clipboard_set_text") - (return-type "none") - (parameters - '("const-gchar*" "text") - '("gint" "len") - ) -) - -(define-method request_contents - (of-object "GtkClipboard") - (c-name "gtk_clipboard_request_contents") - (return-type "none") - (parameters - '("GdkAtom" "target") - '("GtkClipboardReceivedFunc" "callback") - '("gpointer" "user_data") - ) -) - -(define-method request_text - (of-object "GtkClipboard") - (c-name "gtk_clipboard_request_text") - (return-type "none") - (parameters - '("GtkClipboardTextReceivedFunc" "callback") - '("gpointer" "user_data") - ) -) - -(define-method wait_for_contents - (of-object "GtkClipboard") - (c-name "gtk_clipboard_wait_for_contents") - (return-type "GtkSelectionData*") - (parameters - '("GdkAtom" "target") - ) -) - -(define-method wait_for_text - (of-object "GtkClipboard") - (c-name "gtk_clipboard_wait_for_text") - (return-type "gchar*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkclist.h - -(define-function gtk_clist_get_type - (c-name "gtk_clist_get_type") - (return-type "GtkType") -) - -(define-method construct - (of-object "GtkCList") - (c-name "gtk_clist_construct") - (return-type "none") - (parameters - '("gint" "columns" (default "1")) - '("gchar*[]" "titles") - ) -) - -(define-function gtk_clist_new - (c-name "gtk_clist_new") - (is-constructor-of GtkCList) - (return-type "GtkWidget*") - (parameters - '("gint" "columns" (default "1")) - ) -) - -(define-function gtk_clist_new_with_titles - (c-name "gtk_clist_new_with_titles") - (is-constructor-of GtkCList) - (return-type "GtkWidget*") - (parameters - '("gint" "columns" (default "1")) - '("gchar*[]" "titles") - ) -) - -(define-method set_hadjustment - (of-object "GtkCList") - (c-name "gtk_clist_set_hadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment") - ) -) - -(define-method set_vadjustment - (of-object "GtkCList") - (c-name "gtk_clist_set_vadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment") - ) -) - -(define-method get_hadjustment - (of-object "GtkCList") - (c-name "gtk_clist_get_hadjustment") - (return-type "GtkAdjustment*") -) - -(define-method get_vadjustment - (of-object "GtkCList") - (c-name "gtk_clist_get_vadjustment") - (return-type "GtkAdjustment*") -) - -(define-method set_shadow_type - (of-object "GtkCList") - (c-name "gtk_clist_set_shadow_type") - (return-type "none") - (parameters - '("GtkShadowType" "type") - ) -) - -(define-method set_selection_mode - (of-object "GtkCList") - (c-name "gtk_clist_set_selection_mode") - (return-type "none") - (parameters - '("GtkSelectionMode" "mode") - ) -) - -(define-method set_reorderable - (of-object "GtkCList") - (c-name "gtk_clist_set_reorderable") - (return-type "none") - (parameters - '("gboolean" "reorderable") - ) -) - -(define-method set_use_drag_icons - (of-object "GtkCList") - (c-name "gtk_clist_set_use_drag_icons") - (return-type "none") - (parameters - '("gboolean" "use_icons") - ) -) - -(define-method set_button_actions - (of-object "GtkCList") - (c-name "gtk_clist_set_button_actions") - (return-type "none") - (parameters - '("guint" "button") - '("guint8" "button_actions") - ) -) - -(define-method freeze - (of-object "GtkCList") - (c-name "gtk_clist_freeze") - (return-type "none") -) - -(define-method thaw - (of-object "GtkCList") - (c-name "gtk_clist_thaw") - (return-type "none") -) - -(define-method column_titles_show - (of-object "GtkCList") - (c-name "gtk_clist_column_titles_show") - (return-type "none") -) - -(define-method column_titles_hide - (of-object "GtkCList") - (c-name "gtk_clist_column_titles_hide") - (return-type "none") -) - -(define-method column_title_active - (of-object "GtkCList") - (c-name "gtk_clist_column_title_active") - (return-type "none") - (parameters - '("gint" "column") - ) -) - -(define-method column_title_passive - (of-object "GtkCList") - (c-name "gtk_clist_column_title_passive") - (return-type "none") - (parameters - '("gint" "column") - ) -) - -(define-method column_titles_active - (of-object "GtkCList") - (c-name "gtk_clist_column_titles_active") - (return-type "none") -) - -(define-method column_titles_passive - (of-object "GtkCList") - (c-name "gtk_clist_column_titles_passive") - (return-type "none") -) - -(define-method set_column_title - (of-object "GtkCList") - (c-name "gtk_clist_set_column_title") - (return-type "none") - (parameters - '("gint" "column") - '("const-gchar*" "title") - ) -) - -(define-method get_column_title - (of-object "GtkCList") - (c-name "gtk_clist_get_column_title") - (return-type "gchar*") - (parameters - '("gint" "column") - ) -) - -(define-method set_column_widget - (of-object "GtkCList") - (c-name "gtk_clist_set_column_widget") - (return-type "none") - (parameters - '("gint" "column") - '("GtkWidget*" "widget") - ) -) - -(define-method get_column_widget - (of-object "GtkCList") - (c-name "gtk_clist_get_column_widget") - (return-type "GtkWidget*") - (parameters - '("gint" "column") - ) -) - -(define-method set_column_justification - (of-object "GtkCList") - (c-name "gtk_clist_set_column_justification") - (return-type "none") - (parameters - '("gint" "column") - '("GtkJustification" "justification") - ) -) - -(define-method set_column_visibility - (of-object "GtkCList") - (c-name "gtk_clist_set_column_visibility") - (return-type "none") - (parameters - '("gint" "column") - '("gboolean" "visible") - ) -) - -(define-method set_column_resizeable - (of-object "GtkCList") - (c-name "gtk_clist_set_column_resizeable") - (return-type "none") - (parameters - '("gint" "column") - '("gboolean" "resizeable") - ) -) - -(define-method set_column_auto_resize - (of-object "GtkCList") - (c-name "gtk_clist_set_column_auto_resize") - (return-type "none") - (parameters - '("gint" "column") - '("gboolean" "auto_resize") - ) -) - -(define-method columns_autosize - (of-object "GtkCList") - (c-name "gtk_clist_columns_autosize") - (return-type "gint") -) - -(define-method optimal_column_width - (of-object "GtkCList") - (c-name "gtk_clist_optimal_column_width") - (return-type "gint") - (parameters - '("gint" "column") - ) -) - -(define-method set_column_width - (of-object "GtkCList") - (c-name "gtk_clist_set_column_width") - (return-type "none") - (parameters - '("gint" "column") - '("gint" "width") - ) -) - -(define-method set_column_min_width - (of-object "GtkCList") - (c-name "gtk_clist_set_column_min_width") - (return-type "none") - (parameters - '("gint" "column") - '("gint" "min_width") - ) -) - -(define-method set_column_max_width - (of-object "GtkCList") - (c-name "gtk_clist_set_column_max_width") - (return-type "none") - (parameters - '("gint" "column") - '("gint" "max_width") - ) -) - -(define-method set_row_height - (of-object "GtkCList") - (c-name "gtk_clist_set_row_height") - (return-type "none") - (parameters - '("guint" "height") - ) -) - -(define-method moveto - (of-object "GtkCList") - (c-name "gtk_clist_moveto") - (return-type "none") - (parameters - '("gint" "row") - '("gint" "column") - '("gfloat" "row_align") - '("gfloat" "col_align") - ) -) - -(define-method row_is_visible - (of-object "GtkCList") - (c-name "gtk_clist_row_is_visible") - (return-type "GtkVisibility") - (parameters - '("gint" "row") - ) -) - -(define-method get_cell_type - (of-object "GtkCList") - (c-name "gtk_clist_get_cell_type") - (return-type "GtkCellType") - (parameters - '("gint" "row") - '("gint" "column") - ) -) - -(define-method set_text - (of-object "GtkCList") - (c-name "gtk_clist_set_text") - (return-type "none") - (parameters - '("gint" "row") - '("gint" "column") - '("const-gchar*" "text") - ) -) - -(define-method get_text - (of-object "GtkCList") - (c-name "gtk_clist_get_text") - (return-type "gint") - (parameters - '("gint" "row") - '("gint" "column") - '("gchar**" "text") - ) -) - -(define-method set_pixmap - (of-object "GtkCList") - (c-name "gtk_clist_set_pixmap") - (return-type "none") - (parameters - '("gint" "row") - '("gint" "column") - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask" (null-ok) (default "NULL")) - ) -) - -(define-method get_pixmap - (of-object "GtkCList") - (c-name "gtk_clist_get_pixmap") - (return-type "gint") - (parameters - '("gint" "row") - '("gint" "column") - '("GdkPixmap**" "pixmap") - '("GdkBitmap**" "mask") - ) -) - -(define-method set_pixtext - (of-object "GtkCList") - (c-name "gtk_clist_set_pixtext") - (return-type "none") - (parameters - '("gint" "row") - '("gint" "column") - '("const-gchar*" "text") - '("guint8" "spacing") - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask") - ) -) - -(define-method get_pixtext - (of-object "GtkCList") - (c-name "gtk_clist_get_pixtext") - (return-type "gint") - (parameters - '("gint" "row") - '("gint" "column") - '("gchar**" "text") - '("guint8*" "spacing") - '("GdkPixmap**" "pixmap") - '("GdkBitmap**" "mask") - ) -) - -(define-method set_foreground - (of-object "GtkCList") - (c-name "gtk_clist_set_foreground") - (return-type "none") - (parameters - '("gint" "row") - '("GdkColor*" "color") - ) -) - -(define-method set_background - (of-object "GtkCList") - (c-name "gtk_clist_set_background") - (return-type "none") - (parameters - '("gint" "row") - '("GdkColor*" "color") - ) -) - -(define-method set_cell_style - (of-object "GtkCList") - (c-name "gtk_clist_set_cell_style") - (return-type "none") - (parameters - '("gint" "row") - '("gint" "column") - '("GtkStyle*" "style") - ) -) - -(define-method get_cell_style - (of-object "GtkCList") - (c-name "gtk_clist_get_cell_style") - (return-type "GtkStyle*") - (parameters - '("gint" "row") - '("gint" "column") - ) -) - -(define-method set_row_style - (of-object "GtkCList") - (c-name "gtk_clist_set_row_style") - (return-type "none") - (parameters - '("gint" "row") - '("GtkStyle*" "style") - ) -) - -(define-method get_row_style - (of-object "GtkCList") - (c-name "gtk_clist_get_row_style") - (return-type "GtkStyle*") - (parameters - '("gint" "row") - ) -) - -(define-method set_shift - (of-object "GtkCList") - (c-name "gtk_clist_set_shift") - (return-type "none") - (parameters - '("gint" "row") - '("gint" "column") - '("gint" "vertical") - '("gint" "horizontal") - ) -) - -(define-method set_selectable - (of-object "GtkCList") - (c-name "gtk_clist_set_selectable") - (return-type "none") - (parameters - '("gint" "row") - '("gboolean" "selectable") - ) -) - -(define-method get_selectable - (of-object "GtkCList") - (c-name "gtk_clist_get_selectable") - (return-type "gboolean") - (parameters - '("gint" "row") - ) -) - -(define-method prepend - (of-object "GtkCList") - (c-name "gtk_clist_prepend") - (return-type "gint") - (parameters - '("gchar*[]" "text") - ) -) - -(define-method append - (of-object "GtkCList") - (c-name "gtk_clist_append") - (return-type "gint") - (parameters - '("gchar*[]" "text") - ) -) - -(define-method insert - (of-object "GtkCList") - (c-name "gtk_clist_insert") - (return-type "gint") - (parameters - '("gint" "row") - '("gchar*[]" "text") - ) -) - -(define-method remove - (of-object "GtkCList") - (c-name "gtk_clist_remove") - (return-type "none") - (parameters - '("gint" "row") - ) -) - -(define-method set_row_data - (of-object "GtkCList") - (c-name "gtk_clist_set_row_data") - (return-type "none") - (parameters - '("gint" "row") - '("gpointer" "data") - ) -) - -(define-method set_row_data_full - (of-object "GtkCList") - (c-name "gtk_clist_set_row_data_full") - (return-type "none") - (parameters - '("gint" "row") - '("gpointer" "data") - '("GtkDestroyNotify" "destroy") - ) -) - -(define-method get_row_data - (of-object "GtkCList") - (c-name "gtk_clist_get_row_data") - (return-type "gpointer") - (parameters - '("gint" "row") - ) -) - -(define-method find_row_from_data - (of-object "GtkCList") - (c-name "gtk_clist_find_row_from_data") - (return-type "gint") - (parameters - '("gpointer" "data") - ) -) - -(define-method select_row - (of-object "GtkCList") - (c-name "gtk_clist_select_row") - (return-type "none") - (parameters - '("gint" "row") - '("gint" "column") - ) -) - -(define-method unselect_row - (of-object "GtkCList") - (c-name "gtk_clist_unselect_row") - (return-type "none") - (parameters - '("gint" "row") - '("gint" "column") - ) -) - -(define-method undo_selection - (of-object "GtkCList") - (c-name "gtk_clist_undo_selection") - (return-type "none") -) - -(define-method clear - (of-object "GtkCList") - (c-name "gtk_clist_clear") - (return-type "none") -) - -(define-method get_selection_info - (of-object "GtkCList") - (c-name "gtk_clist_get_selection_info") - (return-type "gint") - (parameters - '("gint" "x") - '("gint" "y") - '("gint*" "row") - '("gint*" "column") - ) -) - -(define-method select_all - (of-object "GtkCList") - (c-name "gtk_clist_select_all") - (return-type "none") -) - -(define-method unselect_all - (of-object "GtkCList") - (c-name "gtk_clist_unselect_all") - (return-type "none") -) - -(define-method swap_rows - (of-object "GtkCList") - (c-name "gtk_clist_swap_rows") - (return-type "none") - (parameters - '("gint" "row1") - '("gint" "row2") - ) -) - -(define-method row_move - (of-object "GtkCList") - (c-name "gtk_clist_row_move") - (return-type "none") - (parameters - '("gint" "source_row") - '("gint" "dest_row") - ) -) - -(define-method set_compare_func - (of-object "GtkCList") - (c-name "gtk_clist_set_compare_func") - (return-type "none") - (parameters - '("GtkCListCompareFunc" "cmp_func") - ) -) - -(define-method set_sort_column - (of-object "GtkCList") - (c-name "gtk_clist_set_sort_column") - (return-type "none") - (parameters - '("gint" "column") - ) -) - -(define-method set_sort_type - (of-object "GtkCList") - (c-name "gtk_clist_set_sort_type") - (return-type "none") - (parameters - '("GtkSortType" "sort_type") - ) -) - -(define-method sort - (of-object "GtkCList") - (c-name "gtk_clist_sort") - (return-type "none") -) - -(define-method set_auto_sort - (of-object "GtkCList") - (c-name "gtk_clist_set_auto_sort") - (return-type "none") - (parameters - '("gboolean" "auto_sort") - ) -) - -(define-method _create_cell_layout - (of-object "GtkCList") - (c-name "_gtk_clist_create_cell_layout") - (return-type "PangoLayout*") - (parameters - '("GtkCListRow*" "clist_row") - '("gint" "column") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcolorsel.h - -(define-function gtk_color_selection_get_type - (c-name "gtk_color_selection_get_type") - (return-type "GtkType") -) - -(define-function gtk_color_selection_new - (c-name "gtk_color_selection_new") - (is-constructor-of GtkColorSelection) - (return-type "GtkWidget*") -) - -(define-method get_has_opacity_control - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_get_has_opacity_control") - (return-type "gboolean") -) - -(define-method set_has_opacity_control - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_set_has_opacity_control") - (return-type "none") - (parameters - '("gboolean" "use_opacity") - ) -) - -(define-method get_has_palette - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_get_has_palette") - (return-type "gboolean") -) - -(define-method set_has_palette - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_set_has_palette") - (return-type "none") - (parameters - '("gboolean" "use_palette") - ) -) - -(define-method set_current_color - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_set_current_color") - (return-type "none") - (parameters - '("GdkColor*" "color") - ) -) - -(define-method set_current_alpha - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_set_current_alpha") - (return-type "none") - (parameters - '("guint16" "alpha") - ) -) - -(define-method get_current_color - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_get_current_color") - (return-type "none") - (parameters - '("GdkColor*" "color") - ) -) - -(define-method get_current_alpha - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_get_current_alpha") - (return-type "guint16") -) - -(define-method set_previous_color - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_set_previous_color") - (return-type "none") - (parameters - '("GdkColor*" "color") - ) -) - -(define-method set_previous_alpha - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_set_previous_alpha") - (return-type "none") - (parameters - '("guint16" "alpha") - ) -) - -(define-method get_previous_color - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_get_previous_color") - (return-type "none") - (parameters - '("GdkColor*" "color") - ) -) - -(define-method get_previous_alpha - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_get_previous_alpha") - (return-type "guint16") -) - -(define-method is_adjusting - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_is_adjusting") - (return-type "gboolean") -) - -(define-method set_update_policy - (of-object "GtkColorSelection") - (c-name "gtk_color_selection_set_update_policy") - (return-type "none") - (parameters - '("GtkUpdateType" "policy") - ) -) - -(define-function color_selection_palette_from_string - (c-name "gtk_color_selection_palette_from_string") - (return-type "gboolean") - (parameters - '("const-gchar*" "str") - '("GdkColor**" "colors") - '("gint" "n_colors") - ) -) - -(define-function color_selection_palette_to_string - (c-name "gtk_color_selection_palette_to_string") - (return-type "gchar*") - (parameters - '("const-GdkColor*" "colors") - '("gint" "n_colors") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcolorseldialog.h - -(define-function gtk_color_selection_dialog_get_type - (c-name "gtk_color_selection_dialog_get_type") - (return-type "GtkType") -) - -(define-function gtk_color_selection_dialog_new - (c-name "gtk_color_selection_dialog_new") - (is-constructor-of GtkColorSelectionDialog) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "title") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcombo.h - -(define-function gtk_combo_get_type - (c-name "gtk_combo_get_type") - (return-type "GtkType") -) - -(define-function gtk_combo_new - (c-name "gtk_combo_new") - (is-constructor-of GtkCombo) - (return-type "GtkWidget*") -) - -(define-method set_value_in_list - (of-object "GtkCombo") - (c-name "gtk_combo_set_value_in_list") - (return-type "none") - (parameters - '("gint" "val") - '("gint" "ok_if_empty") - ) -) - -(define-method set_use_arrows - (of-object "GtkCombo") - (c-name "gtk_combo_set_use_arrows") - (return-type "none") - (parameters - '("gint" "val") - ) -) - -(define-method set_use_arrows_always - (of-object "GtkCombo") - (c-name "gtk_combo_set_use_arrows_always") - (return-type "none") - (parameters - '("gint" "val") - ) -) - -(define-method set_case_sensitive - (of-object "GtkCombo") - (c-name "gtk_combo_set_case_sensitive") - (return-type "none") - (parameters - '("gint" "val") - ) -) - -(define-method set_item_string - (of-object "GtkCombo") - (c-name "gtk_combo_set_item_string") - (return-type "none") - (parameters - '("GtkItem*" "item") - '("const-gchar*" "item_value") - ) -) - -(define-method set_popdown_strings - (of-object "GtkCombo") - (c-name "gtk_combo_set_popdown_strings") - (return-type "none") - (parameters - '("GList*" "strings") - ) -) - -(define-method disable_activate - (of-object "GtkCombo") - (c-name "gtk_combo_disable_activate") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcompat.h - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcontainer.h - -(define-function gtk_container_get_type - (c-name "gtk_container_get_type") - (return-type "GtkType") -) - -(define-method set_border_width - (of-object "GtkContainer") - (c-name "gtk_container_set_border_width") - (return-type "none") - (parameters - '("guint" "border_width") - ) -) - -(define-method get_border_width - (of-object "GtkContainer") - (c-name "gtk_container_get_border_width") - (return-type "guint") -) - -(define-method add - (of-object "GtkContainer") - (c-name "gtk_container_add") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method remove - (of-object "GtkContainer") - (c-name "gtk_container_remove") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method set_resize_mode - (of-object "GtkContainer") - (c-name "gtk_container_set_resize_mode") - (return-type "none") - (parameters - '("GtkResizeMode" "resize_mode") - ) -) - -(define-method get_resize_mode - (of-object "GtkContainer") - (c-name "gtk_container_get_resize_mode") - (return-type "GtkResizeMode") -) - -(define-method check_resize - (of-object "GtkContainer") - (c-name "gtk_container_check_resize") - (return-type "none") -) - -(define-method foreach - (of-object "GtkContainer") - (c-name "gtk_container_foreach") - (return-type "none") - (parameters - '("GtkCallback" "callback") - '("gpointer" "callback_data") - ) -) - -(define-method foreach_full - (of-object "GtkContainer") - (c-name "gtk_container_foreach_full") - (return-type "none") - (parameters - '("GtkCallback" "callback") - '("GtkCallbackMarshal" "marshal") - '("gpointer" "callback_data") - '("GtkDestroyNotify" "notify") - ) -) - -(define-method get_children - (of-object "GtkContainer") - (c-name "gtk_container_get_children") - (return-type "GList*") -) - -; DEPRECATED -(define-method children - (of-object "GtkContainer") - (c-name "gtk_container_children") - (return-type "GList*") -) - -(define-method propagate_expose - (of-object "GtkContainer") - (c-name "gtk_container_propagate_expose") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GdkEventExpose*" "event") - ) -) - -(define-method set_focus_chain - (of-object "GtkContainer") - (c-name "gtk_container_set_focus_chain") - (return-type "none") - (parameters - '("GList*" "focusable_widgets") - ) -) - -(define-method get_focus_chain - (of-object "GtkContainer") - (c-name "gtk_container_get_focus_chain") - (return-type "gboolean") - (parameters - '("GList**" "focusable_widgets") - ) -) - -(define-method unset_focus_chain - (of-object "GtkContainer") - (c-name "gtk_container_unset_focus_chain") - (return-type "none") -) - -(define-method set_reallocate_redraws - (of-object "GtkContainer") - (c-name "gtk_container_set_reallocate_redraws") - (return-type "none") - (parameters - '("gboolean" "needs_redraws") - ) -) - -(define-method set_focus_child - (of-object "GtkContainer") - (c-name "gtk_container_set_focus_child") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method set_focus_vadjustment - (of-object "GtkContainer") - (c-name "gtk_container_set_focus_vadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment") - ) -) - -(define-method get_focus_vadjustment - (of-object "GtkContainer") - (c-name "gtk_container_get_focus_vadjustment") - (return-type "GtkAdjustment") -) - -(define-method set_focus_hadjustment - (of-object "GtkContainer") - (c-name "gtk_container_set_focus_hadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment") - ) -) - -(define-method get_focus_hadjustment - (of-object "GtkContainer") - (c-name "gtk_container_get_focus_hadjustment") - (return-type "GtkAdjustment") -) - -(define-method resize_children - (of-object "GtkContainer") - (c-name "gtk_container_resize_children") - (return-type "none") -) - -(define-method child_type - (of-object "GtkContainer") - (c-name "gtk_container_child_type") - (return-type "GtkType") -) - -; FIXME -; -;gtk_container_class_install_child_property -;gtk_container_class_find_child_property -;gtk_container_class_list_child_properties -;gtk_container_child_set_property -;gtk_container_child_get_property - -(define-method add_with_properties - (of-object "GtkContainer") - (c-name "gtk_container_add_with_properties") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("const-gchar*" "first_arg_name") - ) - (varargs #t) -) - -(define-method child_set - (of-object "GtkContainer") - (c-name "gtk_container_child_set") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("const-gchar*" "first_arg_name") - ) - (varargs #t) -) - -(define-method child_get - (of-object "GtkContainer") - (c-name "gtk_container_child_get") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("const-gchar*" "first_arg_name") - ) - (varargs #t) -) - -(define-method forall - (of-object "GtkContainer") - (c-name "gtk_container_forall") - (return-type "none") - (parameters - '("GtkCallback" "callback") - '("gpointer" "callback_data") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkctree.h - -(define-function gtk_ctree_get_type - (c-name "gtk_ctree_get_type") - (return-type "GtkType") -) - -(define-method construct - (of-object "GtkCTree") - (c-name "gtk_ctree_construct") - (return-type "none") - (parameters - '("gint" "columns" (default "1")) - '("gint" "tree_column" (default "0")) - '("gchar*[]" "titles") - ) -) - -(define-function gtk_ctree_new_with_titles - (c-name "gtk_ctree_new_with_titles") - (is-constructor-of GtkCTree) - (return-type "GtkWidget*") - (parameters - '("gint" "columns" (default "1")) - '("gint" "tree_column" (default "0")) - '("gchar*[]" "titles") - ) -) - -(define-function gtk_ctree_new - (c-name "gtk_ctree_new") - (is-constructor-of GtkCTree) - (return-type "GtkWidget*") - (parameters - '("gint" "columns" (default "1")) - '("gint" "tree_column" (default "0")) - ) -) - -(define-method base_nodes - (of-object "GtkCTree") - (c-name "gtk_ctree_base_nodes") - (return-type "GList*") -) - -(define-method insert_node - (of-object "GtkCTree") - (c-name "gtk_ctree_insert_node") - (return-type "GtkCTreeNode*") - (parameters - '("GtkCTreeNode*" "parent") - '("GtkCTreeNode*" "sibling") - '("gchar*" "text") - '("guint8" "spacing" (default "5")) - '("GdkPixmap*" "pixmap_closed" (null-ok) (default "NULL")) - '("GdkBitmap*" "mask_closed" (null-ok) (default "NULL")) - '("GdkPixmap*" "pixmap_opened" (null-ok) (default "NULL")) - '("GdkBitmap*" "mask_opened" (null-ok) (default "NULL")) - '("gboolean" "is_leaf" (default "1")) - '("gboolean" "expanded" (default "0")) - ) -) - -(define-method remove_node - (of-object "GtkCTree") - (c-name "gtk_ctree_remove_node") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method insert_gnode - (of-object "GtkCTree") - (c-name "gtk_ctree_insert_gnode") - (return-type "GtkCTreeNode*") - (parameters - '("GtkCTreeNode*" "parent") - '("GtkCTreeNode*" "sibling") - '("GNode*" "gnode") - '("GtkCTreeGNodeFunc" "func") - '("gpointer" "data") - ) -) - -(define-method export_to_gnode - (of-object "GtkCTree") - (c-name "gtk_ctree_export_to_gnode") - (return-type "GNode*") - (parameters - '("GNode*" "parent") - '("GNode*" "sibling") - '("GtkCTreeNode*" "node") - '("GtkCTreeGNodeFunc" "func") - '("gpointer" "data") - ) -) - -#(define-method post_recursive -# (of-object "GtkCTree") -# (c-name "gtk_ctree_post_recursive") -# (return-type "none") -# (parameters -# '("GtkCTreeNode*" "node") -# '("GtkCTreeFunc" "func") -# '("gpointer" "data") -# ) -#) - -#(define-method post_recursive_to_depth -# (of-object "GtkCTree") -# (c-name "gtk_ctree_post_recursive_to_depth") -# (return-type "none") -# (parameters -# '("GtkCTreeNode*" "node") -# '("gint" "depth") -# '("GtkCTreeFunc" "func") -# '("gpointer" "data") -# ) -#) - -#(define-method pre_recursive -# (of-object "GtkCTree") -# (c-name "gtk_ctree_pre_recursive") -# (return-type "none") -# (parameters -# '("GtkCTreeNode*" "node") -# '("GtkCTreeFunc" "func") -# '("gpointer" "data") -# ) -#) - -#(define-method pre_recursive_to_depth -# (of-object "GtkCTree") -# (c-name "gtk_ctree_pre_recursive_to_depth") -# (return-type "none") -# (parameters -# '("GtkCTreeNode*" "node") -# '("gint" "depth") -# '("GtkCTreeFunc" "func") -# '("gpointer" "data") -# ) -#) - -(define-method is_viewable - (of-object "GtkCTree") - (c-name "gtk_ctree_is_viewable") - (return-type "gboolean") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method last - (of-object "GtkCTree") - (c-name "gtk_ctree_last") - (return-type "GtkCTreeNode*") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method find_node_ptr - (of-object "GtkCTree") - (c-name "gtk_ctree_find_node_ptr") - (return-type "GtkCTreeNode*") - (parameters - '("GtkCTreeRow*" "ctree_row") - ) -) - -(define-method node_nth - (of-object "GtkCTree") - (c-name "gtk_ctree_node_nth") - (return-type "GtkCTreeNode*") - (parameters - '("guint" "row") - ) -) - -(define-method find - (of-object "GtkCTree") - (c-name "gtk_ctree_find") - (return-type "gboolean") - (parameters - '("GtkCTreeNode*" "node") - '("GtkCTreeNode*" "child") - ) -) - -(define-method is_ancestor - (of-object "GtkCTree") - (c-name "gtk_ctree_is_ancestor") - (return-type "gboolean") - (parameters - '("GtkCTreeNode*" "node") - '("GtkCTreeNode*" "child") - ) -) - -(define-method find_by_row_data - (of-object "GtkCTree") - (c-name "gtk_ctree_find_by_row_data") - (return-type "GtkCTreeNode*") - (parameters - '("GtkCTreeNode*" "node") - '("gpointer" "data") - ) -) - -(define-method find_all_by_row_data - (of-object "GtkCTree") - (c-name "gtk_ctree_find_all_by_row_data") - (return-type "GList*") - (parameters - '("GtkCTreeNode*" "node") - '("gpointer" "data") - ) -) - -(define-method find_by_row_data_custom - (of-object "GtkCTree") - (c-name "gtk_ctree_find_by_row_data_custom") - (return-type "GtkCTreeNode*") - (parameters - '("GtkCTreeNode*" "node") - '("gpointer" "data") - '("GCompareFunc" "func") - ) -) - -(define-method find_all_by_row_data_custom - (of-object "GtkCTree") - (c-name "gtk_ctree_find_all_by_row_data_custom") - (return-type "GList*") - (parameters - '("GtkCTreeNode*" "node") - '("gpointer" "data") - '("GCompareFunc" "func") - ) -) - -(define-method is_hot_spot - (of-object "GtkCTree") - (c-name "gtk_ctree_is_hot_spot") - (return-type "gboolean") - (parameters - '("gint" "x") - '("gint" "y") - ) -) - -(define-method move - (of-object "GtkCTree") - (c-name "gtk_ctree_move") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("GtkCTreeNode*" "new_parent" (null-ok)) - '("GtkCTreeNode*" "new_sibling" (null-ok)) - ) -) - -(define-method expand - (of-object "GtkCTree") - (c-name "gtk_ctree_expand") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method expand_recursive - (of-object "GtkCTree") - (c-name "gtk_ctree_expand_recursive") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method expand_to_depth - (of-object "GtkCTree") - (c-name "gtk_ctree_expand_to_depth") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "depth") - ) -) - -(define-method collapse - (of-object "GtkCTree") - (c-name "gtk_ctree_collapse") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method collapse_recursive - (of-object "GtkCTree") - (c-name "gtk_ctree_collapse_recursive") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method collapse_to_depth - (of-object "GtkCTree") - (c-name "gtk_ctree_collapse_to_depth") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "depth") - ) -) - -(define-method toggle_expansion - (of-object "GtkCTree") - (c-name "gtk_ctree_toggle_expansion") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method toggle_expansion_recursive - (of-object "GtkCTree") - (c-name "gtk_ctree_toggle_expansion_recursive") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method select - (of-object "GtkCTree") - (c-name "gtk_ctree_select") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method select_recursive - (of-object "GtkCTree") - (c-name "gtk_ctree_select_recursive") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method unselect - (of-object "GtkCTree") - (c-name "gtk_ctree_unselect") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method unselect_recursive - (of-object "GtkCTree") - (c-name "gtk_ctree_unselect_recursive") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method real_select_recursive - (of-object "GtkCTree") - (c-name "gtk_ctree_real_select_recursive") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "state") - ) -) - -(define-method node_set_text - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_text") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - '("const-gchar*" "text") - ) -) - -(define-method node_set_pixmap - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_pixmap") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask" (null-ok)) - ) -) - -(define-method node_set_pixtext - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_pixtext") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - '("const-gchar*" "text") - '("guint8" "spacing") - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask" (null-ok)) - ) -) - -(define-method set_node_info - (of-object "GtkCTree") - (c-name "gtk_ctree_set_node_info") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("const-gchar*" "text") - '("guint8" "spacing") - '("GdkPixmap*" "pixmap_closed" (null-ok)) - '("GdkBitmap*" "mask_closed" (null-ok)) - '("GdkPixmap*" "pixmap_opened" (null-ok)) - '("GdkBitmap*" "mask_opened" (null-ok)) - '("gboolean" "is_leaf") - '("gboolean" "expanded") - ) -) - -(define-method node_set_shift - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_shift") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - '("gint" "vertical") - '("gint" "horizontal") - ) -) - -(define-method node_set_selectable - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_selectable") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gboolean" "selectable") - ) -) - -(define-method node_get_selectable - (of-object "GtkCTree") - (c-name "gtk_ctree_node_get_selectable") - (return-type "gboolean") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method node_get_cell_type - (of-object "GtkCTree") - (c-name "gtk_ctree_node_get_cell_type") - (return-type "GtkCellType") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - ) -) - -(define-method node_get_text - (of-object "GtkCTree") - (c-name "gtk_ctree_node_get_text") - (return-type "gint") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - '("gchar**" "text") - ) -) - -(define-method node_get_pixmap - (of-object "GtkCTree") - (c-name "gtk_ctree_node_get_pixmap") - (return-type "gint") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - '("GdkPixmap**" "pixmap") - '("GdkBitmap**" "mask") - ) -) - -(define-method node_get_pixtext - (of-object "GtkCTree") - (c-name "gtk_ctree_node_get_pixtext") - (return-type "gint") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - '("gchar**" "text") - '("guint8*" "spacing") - '("GdkPixmap**" "pixmap") - '("GdkBitmap**" "mask") - ) -) - -(define-method get_node_info - (of-object "GtkCTree") - (c-name "gtk_ctree_get_node_info") - (return-type "gint") - (parameters - '("GtkCTreeNode*" "node") - '("gchar**" "text") - '("guint8*" "spacing") - '("GdkPixmap**" "pixmap_closed") - '("GdkBitmap**" "mask_closed") - '("GdkPixmap**" "pixmap_opened") - '("GdkBitmap**" "mask_opened") - '("gboolean*" "is_leaf") - '("gboolean*" "expanded") - ) -) - -(define-method node_set_row_style - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_row_style") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("GtkStyle*" "style") - ) -) - -(define-method node_get_row_style - (of-object "GtkCTree") - (c-name "gtk_ctree_node_get_row_style") - (return-type "GtkStyle*") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method node_set_cell_style - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_cell_style") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - '("GtkStyle*" "style") - ) -) - -(define-method node_get_cell_style - (of-object "GtkCTree") - (c-name "gtk_ctree_node_get_cell_style") - (return-type "GtkStyle*") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - ) -) - -(define-method node_set_foreground - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_foreground") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("GdkColor*" "color") - ) -) - -(define-method node_set_background - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_background") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("GdkColor*" "color") - ) -) - -(define-method node_set_row_data - (of-object "GtkCTree") - (c-name "gtk_ctree_node_set_row_data") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gpointer" "data") - ) -) - -#(define-method node_set_row_data_full -# (of-object "GtkCTree") -# (c-name "gtk_ctree_node_set_row_data_full") -# (return-type "none") -# (parameters -# '("GtkCTreeNode*" "node") -# '("gpointer" "data") -# '("GtkDestroyNotify" "destroy") -# ) -#) - -(define-method node_get_row_data - (of-object "GtkCTree") - (c-name "gtk_ctree_node_get_row_data") - (return-type "gpointer") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method node_moveto - (of-object "GtkCTree") - (c-name "gtk_ctree_node_moveto") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - '("gint" "column") - '("gfloat" "row_align") - '("gfloat" "col_align") - ) -) - -(define-method node_is_visible - (of-object "GtkCTree") - (c-name "gtk_ctree_node_is_visible") - (return-type "GtkVisibility") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method set_indent - (of-object "GtkCTree") - (c-name "gtk_ctree_set_indent") - (return-type "none") - (parameters - '("gint" "indent") - ) -) - -(define-method set_spacing - (of-object "GtkCTree") - (c-name "gtk_ctree_set_spacing") - (return-type "none") - (parameters - '("gint" "spacing") - ) -) - -(define-method set_show_stub - (of-object "GtkCTree") - (c-name "gtk_ctree_set_show_stub") - (return-type "none") - (parameters - '("gboolean" "show_stub") - ) -) - -(define-method set_line_style - (of-object "GtkCTree") - (c-name "gtk_ctree_set_line_style") - (return-type "none") - (parameters - '("GtkCTreeLineStyle" "line_style") - ) -) - -(define-method set_expander_style - (of-object "GtkCTree") - (c-name "gtk_ctree_set_expander_style") - (return-type "none") - (parameters - '("GtkCTreeExpanderStyle" "expander_style") - ) -) - -#(define-method set_drag_compare_func -# (of-object "GtkCTree") -# (c-name "gtk_ctree_set_drag_compare_func") -# (return-type "none") -# (parameters -# '("GtkCTreeCompareDragFunc" "cmp_func") -# ) -#) - -(define-method sort_node - (of-object "GtkCTree") - (c-name "gtk_ctree_sort_node") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-method sort_recursive - (of-object "GtkCTree") - (c-name "gtk_ctree_sort_recursive") - (return-type "none") - (parameters - '("GtkCTreeNode*" "node") - ) -) - -(define-function ctree_node_from_cobject - (c-name "gtk_ctree_node_from_cobject") - (return-type "GtkCTreeNode*") - (parameters - '("PyCObject*" "node") - ) -) - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkcurve.h - -(define-function gtk_curve_get_type - (c-name "gtk_curve_get_type") - (return-type "GtkType") -) - -(define-function gtk_curve_new - (c-name "gtk_curve_new") - (is-constructor-of GtkCurve) - (return-type "GtkWidget*") -) - -(define-method reset - (of-object "GtkCurve") - (c-name "gtk_curve_reset") - (return-type "none") -) - -(define-method set_gamma - (of-object "GtkCurve") - (c-name "gtk_curve_set_gamma") - (return-type "none") - (parameters - '("gfloat" "gamma") - ) -) - -(define-method set_range - (of-object "GtkCurve") - (c-name "gtk_curve_set_range") - (return-type "none") - (parameters - '("gfloat" "min_x") - '("gfloat" "max_x") - '("gfloat" "min_y") - '("gfloat" "max_y") - ) -) - -(define-method get_vector - (of-object "GtkCurve") - (c-name "gtk_curve_get_vector") - (return-type "none") - (parameters - '("int" "veclen") - '("gfloat[]" "vector") - ) -) - -(define-method set_vector - (of-object "GtkCurve") - (c-name "gtk_curve_set_vector") - (return-type "none") - (parameters - '("int" "veclen") - '("gfloat[]" "vector") - ) -) - -(define-method set_curve_type - (of-object "GtkCurve") - (c-name "gtk_curve_set_curve_type") - (return-type "none") - (parameters - '("GtkCurveType" "type") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkdebug.h - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkdialog.h - -(define-function gtk_dialog_get_type - (c-name "gtk_dialog_get_type") - (return-type "GtkType") -) - -(define-function gtk_dialog_new - (c-name "gtk_dialog_new") - (is-constructor-of GtkDialog) - (return-type "GtkWidget*") -) - -(define-function gtk_dialog_new_with_buttons - (c-name "gtk_dialog_new_with_buttons") - (is-constructor-of GtkDialog) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "title" (null-ok) (default "NULL")) - '("GtkWindow*" "parent" (null-ok) (default "NULL")) - '("GtkDialogFlags" "flags" (default "0")) - '("const-gchar*" "first_button_text" (null-ok) (default "NULL")) - ) - (varargs #t) -) - -(define-method add_action_widget - (of-object "GtkDialog") - (c-name "gtk_dialog_add_action_widget") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gint" "response_id") - ) -) - -(define-method add_button - (of-object "GtkDialog") - (c-name "gtk_dialog_add_button") - (return-type "none") - (parameters - '("const-gchar*" "button_text") - '("gint" "response_id") - ) -) - -(define-method add_buttons - (of-object "GtkDialog") - (c-name "gtk_dialog_add_buttons") - (return-type "none") - (parameters - '("const-gchar*" "first_button_text") - ) - (varargs #t) -) - -(define-method set_response_sensitive - (of-object "GtkDialog") - (c-name "gtk_dialog_set_response_sensitive") - (return-type "none") - (parameters - '("gint" "response_id") - '("gboolean" "setting") - ) -) - -(define-method set_default_response - (of-object "GtkDialog") - (c-name "gtk_dialog_set_default_response") - (return-type "none") - (parameters - '("gint" "response_id") - ) -) - -(define-method set_has_separator - (of-object "GtkDialog") - (c-name "gtk_dialog_set_has_separator") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_has_separator - (of-object "GtkDialog") - (c-name "gtk_dialog_get_has_separator") - (return-type "gboolean") -) - -(define-method response - (of-object "GtkDialog") - (c-name "gtk_dialog_response") - (return-type "none") - (parameters - '("gint" "response_id") - ) -) - -(define-method run - (of-object "GtkDialog") - (c-name "gtk_dialog_run") - (return-type "gint") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkdnd.h - -(define-method drag_get_data - (of-object "GtkWidget") - (c-name "gtk_drag_get_data") - (return-type "none") - (parameters - '("GdkDragContext*" "context") - '("GdkAtom" "target") - '("guint32" "time" (default "GDK_CURRENT_TIME")) - ) -) - - -;(define-method finish -; (of-object "GdkDragContext") -; (c-name "gtk_drag_finish") -; (return-type "none") -; (parameters -; '("gboolean" "success") -; '("gboolean" "del") -; '("guint32" "time" (default "GDK_CURRENT_TIME")) -; ) -;) - -;(define-method get_source_widget -; (of-object "GdkDragContext") -; (c-name "gtk_drag_get_source_widget") -; (return-type "GtkWidget*") -;) - -(define-method drag_highlight - (of-object "GtkWidget") - (c-name "gtk_drag_highlight") - (return-type "none") -) - -(define-method drag_unhighlight - (of-object "GtkWidget") - (c-name "gtk_drag_unhighlight") - (return-type "none") -) - -(define-method drag_dest_set - (of-object "GtkWidget") - (c-name "gtk_drag_dest_set") - (return-type "none") - (parameters - '("GtkDestDefaults" "flags") - '("const-GtkTargetEntry*" "targets") - '("gint" "n_targets") - '("GdkDragAction" "actions") - ) -) - -(define-method drag_dest_set_proxy - (of-object "GtkWidget") - (c-name "gtk_drag_dest_set_proxy") - (return-type "none") - (parameters - '("GdkWindow*" "proxy_window") - '("GdkDragProtocol" "protocol") - '("gboolean" "use_coordinates") - ) -) - -(define-method drag_dest_unset - (of-object "GtkWidget") - (c-name "gtk_drag_dest_unset") - (return-type "none") -) - -(define-method drag_dest_find_target - (of-object "GtkWidget") - (c-name "gtk_drag_dest_find_target") - (return-type "GdkAtom") - (parameters - '("GdkDragContext*" "context") - '("GtkTargetList*" "target_list") - ) -) - -(define-method drag_dest_get_target_list - (of-object "GtkWidget") - (c-name "gtk_drag_dest_get_target_list") - (return-type "GtkTargetList*") -) - -(define-method drag_dest_set_target_list - (of-object "GtkWidget") - (c-name "gtk_drag_dest_set_target_list") - (return-type "none") - (parameters - '("GtkTargetList*" "target_list") - ) -) - -(define-method drag_source_set - (of-object "GtkWidget") - (c-name "gtk_drag_source_set") - (return-type "none") - (parameters - '("GdkModifierType" "start_button_mask") - '("const-GtkTargetEntry*" "targets") - '("gint" "n_targets") - '("GdkDragAction" "actions") - ) -) - -(define-method drag_source_unset - (of-object "GtkWidget") - (c-name "gtk_drag_source_unset") - (return-type "none") -) - -(define-method drag_source_set_icon - (of-object "GtkWidget") - (c-name "gtk_drag_source_set_icon") - (return-type "none") - (parameters - '("GdkColormap*" "colormap") - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask") - ) -) - -(define-method drag_begin - (of-object "GtkWidget") - (c-name "gtk_drag_begin") - (return-type "GdkDragContext*") - (parameters - '("GtkTargetList*" "targets") - '("GdkDragAction" "actions") - '("gint" "button") - '("GdkEvent*" "event") - ) -) - -;(define-method set_icon_widget -; (of-object "GdkDragContext") -; (c-name "gtk_drag_set_icon_widget") -; (return-type "none") -; (parameters -; '("GtkWidget*" "widget") -; '("gint" "hot_x") -; '("gint" "hot_y") -; ) -;) - -;(define-method set_icon_pixmap -; (of-object "GdkDragContext") -; (c-name "gtk_drag_set_icon_pixmap") -; (return-type "none") -; (parameters -; '("GdkColormap*" "colormap") -; '("GdkPixmap*" "pixmap") -; '("GdkBitmap*" "mask") -; '("gint" "hot_x") -; '("gint" "hot_y") -; ) -;) - -;(define-method set_icon_default -; (of-object "GdkDragContext") -; (c-name "gtk_drag_set_icon_default") -; (return-type "none") -;) - -(define-function drag_set_default_icon - (c-name "gtk_drag_set_default_icon") - (return-type "none") - (parameters - '("GdkColormap*" "colormap") - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask") - '("gint" "hot_x") - '("gint" "hot_y") - ) -) - -(define-method drag_source_handle_event - (of-object "GtkWidget") - (c-name "gtk_drag_source_handle_event") - (return-type "none") - (parameters - '("GdkEvent*" "event") - ) -) - -(define-method drag_dest_handle_event - (of-object "GtkWidget") - (c-name "gtk_drag_dest_handle_event") - (return-type "none") - (parameters - '("GdkEvent*" "event") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkdrawingarea.h - -(define-function gtk_drawing_area_get_type - (c-name "gtk_drawing_area_get_type") - (return-type "GtkType") -) - -(define-function gtk_drawing_area_new - (c-name "gtk_drawing_area_new") - (is-constructor-of GtkDrawingArea) - (return-type "GtkWidget*") -) - -; DEPRECATED -(define-method size - (of-object "GtkDrawingArea") - (c-name "gtk_drawing_area_size") - (return-type "none") - (parameters - '("gint" "width") - '("gint" "height") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkeditable.h - -(define-function gtk_editable_get_type - (c-name "gtk_editable_get_type") - (return-type "GtkType") -) - -(define-method select_region - (of-object "GtkEditable") - (c-name "gtk_editable_select_region") - (return-type "none") - (parameters - '("gint" "start") - '("gint" "end") - ) -) - -(define-method get_selection_bounds - (of-object "GtkEditable") - (c-name "gtk_editable_get_selection_bounds") - (return-type "gboolean") - (parameters - '("gint*" "start") - '("gint*" "end") - ) -) - -(define-method insert_text - (of-object "GtkEditable") - (c-name "gtk_editable_insert_text") - (return-type "none") - (parameters - '("const-gchar*" "new_text") - '("gint" "new_text_length") - '("gint*" "position") - ) -) - -(define-method delete_text - (of-object "GtkEditable") - (c-name "gtk_editable_delete_text") - (return-type "none") - (parameters - '("gint" "start_pos") - '("gint" "end_pos") - ) -) - -(define-method get_chars - (of-object "GtkEditable") - (c-name "gtk_editable_get_chars") - (return-type "gchar*") - (parameters - '("gint" "start_pos") - '("gint" "end_pos") - ) -) - -(define-method cut_clipboard - (of-object "GtkEditable") - (c-name "gtk_editable_cut_clipboard") - (return-type "none") -) - -(define-method copy_clipboard - (of-object "GtkEditable") - (c-name "gtk_editable_copy_clipboard") - (return-type "none") -) - -(define-method paste_clipboard - (of-object "GtkEditable") - (c-name "gtk_editable_paste_clipboard") - (return-type "none") -) - -(define-method delete_selection - (of-object "GtkEditable") - (c-name "gtk_editable_delete_selection") - (return-type "none") -) - -(define-method set_position - (of-object "GtkEditable") - (c-name "gtk_editable_set_position") - (return-type "none") - (parameters - '("gint" "position") - ) -) - -(define-method get_position - (of-object "GtkEditable") - (c-name "gtk_editable_get_position") - (return-type "gint") -) - -(define-method set_editable - (of-object "GtkEditable") - (c-name "gtk_editable_set_editable") - (return-type "none") - (parameters - '("gboolean" "is_editable") - ) -) - -(define-method get_editable - (of-object "GtkEditable") - (c-name "gtk_editable_get_editable") - (return-type "gboolean") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkoldeditable.h - -(define-function gtk_old_editable_get_type - (c-name "gtk_old_editable_get_type") - (return-type "none") -) - -(define-method claim_selection - (of-object "GtkOldEditable") - (c-name "gtk_old_editable_claim_selection") - (return-type "none") - (parameters - '("gboolean" "claim") - '("guint" "time" (default "GDK_CURRENT_TIME")) - ) -) - -(define-method changed - (of-object "GtkOldEditable") - (c-name "gtk_old_editable_changed") - (return-type "none") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkentry.h - -(define-function gtk_entry_get_type - (c-name "gtk_entry_get_type") - (return-type "GtkType") -) - -(define-function gtk_entry_new - (c-name "gtk_entry_new") - (is-constructor-of GtkEntry) - (return-type "GtkWidget*") -) - -; DEPRECATED -(define-function gtk_entry_new_with_max_length - (c-name "gtk_entry_new_with_max_length") - (is-constructor-of GtkEntry) - (return-type "GtkWidget*") - (parameters - '("guint16" "max" (default "0")) - ) -) - -(define-method set_visibility - (of-object "GtkEntry") - (c-name "gtk_entry_set_visibility") - (return-type "none") - (parameters - '("gboolean" "visible") - ) -) - -(define-method get_visibility - (of-object "GtkEntry") - (c-name "gtk_entry_get_visibility") - (return-type "gboolean") -) - -(define-method set_invisible_char - (of-object "GtkEntry") - (c-name "gtk_entry_set_invisible_char") - (return-type "none") - (parameters - '("gunichar" "ch") - ) -) - -(define-method get_invisible_char - (of-object "GtkEntry") - (c-name "gtk_entry_get_invisible_char") - (return-type "gunichar") -) - -(define-method set_editable - (of-object "GtkEntry") - (c-name "gtk_entry_set_editable") - (return-type "none") - (parameters - '("gboolean" "editable") - ) -) - -(define-method set_has_frame - (of-object "GtkEntry") - (c-name "gtk_entry_set_has_frame") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_has_frame - (of-object "GtkEntry") - (c-name "gtk_entry_get_has_frame") - (return-type "gboolean") -) - -(define-method set_max_length - (of-object "GtkEntry") - (c-name "gtk_entry_set_max_length") - (return-type "none") - (parameters - '("gint" "max") - ) -) - -(define-method get_max_length - (of-object "GtkEntry") - (c-name "gtk_entry_get_max_length") - (return-type "gint") -) - -(define-method set_activates_default - (of-object "GtkEntry") - (c-name "gtk_entry_set_activates_default") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_activates_default - (of-object "GtkEntry") - (c-name "gtk_entry_get_activates_default") - (return-type "gboolean") -) - -(define-method set_width_chars - (of-object "GtkEntry") - (c-name "gtk_entry_set_width_chars") - (return-type "none") - (parameters - '("gint" "n_chars") - ) -) - -(define-method get_width_chars - (of-object "GtkEntry") - (c-name "gtk_entry_get_width_chars") - (return-type "gint") -) - -(define-method set_text - (of-object "GtkEntry") - (c-name "gtk_entry_set_text") - (return-type "none") - (parameters - '("const-gchar*" "text") - ) -) - -(define-method get_text - (of-object "GtkEntry") - (c-name "gtk_entry_get_text") - (return-type "const-gchar*") -) - -(define-method get_layout - (of-object "GtkEntry") - (c-name "gtk_entry_get_layout") - (return-type "PangoLayout*") -) - -(define-method get_layout_offsets - (of-object "GtkEntry") - (c-name "gtk_entry_get_layout_offsets") - (return-type "none") - (parameters - '("gint*" "x") - '("gint*" "y") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkenums.h - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkeventbox.h - -(define-function gtk_event_box_get_type - (c-name "gtk_event_box_get_type") - (return-type "GtkType") -) - -(define-function gtk_event_box_new - (c-name "gtk_event_box_new") - (is-constructor-of GtkEventBox) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkfilesel.h - -(define-function gtk_file_selection_get_type - (c-name "gtk_file_selection_get_type") - (return-type "GtkType") -) - -(define-function gtk_file_selection_new - (c-name "gtk_file_selection_new") - (is-constructor-of GtkFileSelection) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "title" (null-ok) (default "NULL")) - ) -) - -(define-method set_filename - (of-object "GtkFileSelection") - (c-name "gtk_file_selection_set_filename") - (return-type "none") - (parameters - '("const-gchar*" "filename") - ) -) - -(define-method get_filename - (of-object "GtkFileSelection") - (c-name "gtk_file_selection_get_filename") - (return-type "const-gchar*") -) - -(define-method complete - (of-object "GtkFileSelection") - (c-name "gtk_file_selection_complete") - (return-type "none") - (parameters - '("const-gchar*" "pattern") - ) -) - -(define-method show_fileop_buttons - (of-object "GtkFileSelection") - (c-name "gtk_file_selection_show_fileop_buttons") - (return-type "none") -) - -(define-method hide_fileop_buttons - (of-object "GtkFileSelection") - (c-name "gtk_file_selection_hide_fileop_buttons") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkfixed.h - -(define-function gtk_fixed_get_type - (c-name "gtk_fixed_get_type") - (return-type "GtkType") -) - -(define-function gtk_fixed_new - (c-name "gtk_fixed_new") - (is-constructor-of GtkFixed) - (return-type "GtkWidget*") -) - -(define-method put - (of-object "GtkFixed") - (c-name "gtk_fixed_put") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("gint16" "x") - '("gint16" "y") - ) -) - -(define-method move - (of-object "GtkFixed") - (c-name "gtk_fixed_move") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("gint16" "x") - '("gint16" "y") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkfontsel.h - -(define-function gtk_font_selection_get_type - (c-name "gtk_font_selection_get_type") - (return-type "GtkType") -) - -(define-function gtk_font_selection_new - (c-name "gtk_font_selection_new") - (is-constructor-of GtkFontSelection) - (return-type "GtkWidget*") -) - -(define-method get_font_name - (of-object "GtkFontSelection") - (c-name "gtk_font_selection_get_font_name") - (return-type "gchar*") -) - -; DEPRECATED -(define-method get_font - (of-object "GtkFontSelection") - (c-name "gtk_font_selection_get_font") - (return-type "GdkFont*") -) - -(define-method set_font_name - (of-object "GtkFontSelection") - (c-name "gtk_font_selection_set_font_name") - (return-type "gboolean") - (parameters - '("const-gchar*" "fontname") - ) -) - -(define-method get_preview_text - (of-object "GtkFontSelection") - (c-name "gtk_font_selection_get_preview_text") - (return-type "gchar*") -) - -(define-method set_preview_text - (of-object "GtkFontSelection") - (c-name "gtk_font_selection_set_preview_text") - (return-type "none") - (parameters - '("const-gchar*" "text") - ) -) - -(define-function gtk_font_selection_dialog_get_type - (c-name "gtk_font_selection_dialog_get_type") - (return-type "GtkType") -) - -(define-function gtk_font_selection_dialog_new - (c-name "gtk_font_selection_dialog_new") - (is-constructor-of GtkFontSelectionDialog) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "title") - ) -) - -(define-method get_font_name - (of-object "GtkFontSelectionDialog") - (c-name "gtk_font_selection_dialog_get_font_name") - (return-type "gchar*") -) - -; DEPRECATED -(define-method get_font - (of-object "GtkFontSelectionDialog") - (c-name "gtk_font_selection_dialog_get_font") - (return-type "GdkFont*") -) - -(define-method set_font_name - (of-object "GtkFontSelectionDialog") - (c-name "gtk_font_selection_dialog_set_font_name") - (return-type "gboolean") - (parameters - '("const-gchar*" "fontname") - ) -) - -(define-method get_preview_text - (of-object "GtkFontSelectionDialog") - (c-name "gtk_font_selection_dialog_get_preview_text") - (return-type "gchar*") -) - -(define-method set_preview_text - (of-object "GtkFontSelectionDialog") - (c-name "gtk_font_selection_dialog_set_preview_text") - (return-type "none") - (parameters - '("const-gchar*" "text") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkframe.h - -(define-function gtk_frame_get_type - (c-name "gtk_frame_get_type") - (return-type "GtkType") -) - -(define-function gtk_frame_new - (c-name "gtk_frame_new") - (is-constructor-of GtkFrame) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label" (null-ok) (default "NULL")) - ) -) - -(define-method set_label - (of-object "GtkFrame") - (c-name "gtk_frame_set_label") - (return-type "none") - (parameters - '("const-gchar*" "label" (null-ok)) - ) -) - -(define-method get_label - (of-object "GtkFrame") - (c-name "gtk_frame_get_label") - (return-type "none") -) - -(define-method set_label_widget - (of-object "GtkFrame") - (c-name "gtk_frame_set_label_widget") - (return-type "none") - (parameters - '("GtkWidget*" "label_widget") - ) -) - -(define-method get_label_widget - (of-object "GtkFrame") - (c-name "gtk_frame_get_label_widget") - (return-type "GtkWidget*") -) - -(define-method set_label_align - (of-object "GtkFrame") - (c-name "gtk_frame_set_label_align") - (return-type "none") - (parameters - '("gfloat" "xalign") - '("gfloat" "yalign") - ) -) - -(define-method get_label_align - (of-object "GtkFrame") - (c-name "gtk_frame_get_label_align") - (return-type "none") - (parameters - '("gfloat*" "xalign") - '("gfloat*" "yalign") - ) -) - -(define-method set_shadow_type - (of-object "GtkFrame") - (c-name "gtk_frame_set_shadow_type") - (return-type "none") - (parameters - '("GtkShadowType" "type") - ) -) - -(define-method get_shadow_type - (of-object "GtkFrame") - (c-name "gtk_frame_get_shadow_type") - (return-type "GtkShadowType") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkgamma.h - -(define-function gtk_gamma_curve_get_type - (c-name "gtk_gamma_curve_get_type") - (return-type "GtkType") -) - -(define-function gtk_gamma_curve_new - (c-name "gtk_gamma_curve_new") - (is-constructor-of GtkGammaCurve) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkgc.h - -(define-function gc_get - (c-name "gtk_gc_get") - (return-type "GdkGC*") - (parameters - '("gint" "depth") - '("GdkColormap*" "colormap") - '("GdkGCValues*" "values") - '("GdkValuesMask" "values_mask") - ) -) - -(define-function gc_release - (c-name "gtk_gc_release") - (return-type "none") - (parameters - '("GdkGC*" "gc") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkhandlebox.h - -(define-function gtk_handle_box_get_type - (c-name "gtk_handle_box_get_type") - (return-type "GtkType") -) - -(define-function gtk_handle_box_new - (c-name "gtk_handle_box_new") - (is-constructor-of GtkHandleBox) - (return-type "GtkWidget*") -) - -(define-method set_shadow_type - (of-object "GtkHandleBox") - (c-name "gtk_handle_box_set_shadow_type") - (return-type "none") - (parameters - '("GtkShadowType" "type") - ) -) - -(define-method get_shadow_type - (of-object "GtkHandleBox") - (c-name "gtk_handle_box_get_shadow_type") - (return-type "GtkShadowType") -) - -(define-method set_handle_position - (of-object "GtkHandleBox") - (c-name "gtk_handle_box_set_handle_position") - (return-type "none") - (parameters - '("GtkPositionType" "position") - ) -) - -(define-method get_handle_position - (of-object "GtkHandleBox") - (c-name "gtk_handle_box_get_handle_position") - (return-type "GtkPositionType") -) - -(define-method set_snap_edge - (of-object "GtkHandleBox") - (c-name "gtk_handle_box_set_snap_edge") - (return-type "none") - (parameters - '("GtkPositionType" "edge") - ) -) - -(define-method get_snap_edge - (of-object "GtkHandleBox") - (c-name "gtk_handle_box_get_snap_edge") - (return-type "GtkPositionType") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkhbbox.h - -(define-function gtk_hbutton_box_get_type - (c-name "gtk_hbutton_box_get_type") - (return-type "GtkType") -) - -(define-function gtk_hbutton_box_new - (c-name "gtk_hbutton_box_new") - (is-constructor-of GtkHButtonBox) - (return-type "GtkWidget*") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkhbox.h - -(define-function gtk_hbox_get_type - (c-name "gtk_hbox_get_type") - (return-type "GtkType") -) - -(define-function gtk_hbox_new - (c-name "gtk_hbox_new") - (is-constructor-of GtkHBox) - (return-type "GtkWidget*") - (parameters - '("gboolean" "homogeneous" (default "FALSE")) - '("gint" "spacing" (default "0")) - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkhpaned.h - -(define-function gtk_hpaned_get_type - (c-name "gtk_hpaned_get_type") - (return-type "GtkType") -) - -(define-function gtk_hpaned_new - (c-name "gtk_hpaned_new") - (is-constructor-of GtkHPaned) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkhruler.h - -(define-function gtk_hruler_get_type - (c-name "gtk_hruler_get_type") - (return-type "GtkType") -) - -(define-function gtk_hruler_new - (c-name "gtk_hruler_new") - (is-constructor-of GtkHRuler) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkhscale.h - -(define-function gtk_hscale_get_type - (c-name "gtk_hscale_get_type") - (return-type "GtkType") -) - -(define-function gtk_hscale_new - (c-name "gtk_hscale_new") - (is-constructor-of GtkHScale) - (return-type "GtkWidget*") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok) (default "NULL")) - ) -) - -(define-function gtk_hscale_new_with_range - (c-name "gtk_hscale_new_with_range") - (is-constructor-of GtkHScale) - (return-type "GtkWidget*") - (parameters - '("gdouble" "min") - '("gdouble" "max") - '("gdouble" "step") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkhscrollbar.h - -(define-function gtk_hscrollbar_get_type - (c-name "gtk_hscrollbar_get_type") - (return-type "GtkType") -) - -(define-function gtk_hscrollbar_new - (c-name "gtk_hscrollbar_new") - (is-constructor-of GtkHScrollbar) - (return-type "GtkWidget*") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok) (default "NULL")) - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkhseparator.h - -(define-function gtk_hseparator_get_type - (c-name "gtk_hseparator_get_type") - (return-type "GtkType") -) - -(define-function gtk_hseparator_new - (c-name "gtk_hseparator_new") - (is-constructor-of GtkHSeparator) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkiconfactory.h - -(define-function gtk_icon_factory_get_type - (c-name "gtk_icon_factory_get_type") - (return-type "GType") -) - -(define-function gtk_icon_factory_new - (c-name "gtk_icon_factory_new") - (is-constructor-of GtkIconFactory) - (return-type "GtkIconFactory*") -) - -(define-method add - (of-object "GtkIconFactory") - (c-name "gtk_icon_factory_add") - (return-type "none") - (parameters - '("const-gchar*" "stock_id") - '("GtkIconSet*" "icon_set") - ) -) - -(define-method lookup - (of-object "GtkIconFactory") - (c-name "gtk_icon_factory_lookup") - (return-type "GtkIconSet*") - (parameters - '("const-gchar*" "stock_id") - ) -) - -(define-method add_default - (of-object "GtkIconFactory") - (c-name "gtk_icon_factory_add_default") - (return-type "none") -) - -(define-method remove_default - (of-object "GtkIconFactory") - (c-name "gtk_icon_factory_remove_default") - (return-type "none") -) - -(define-function icon_factory_lookup_default - (c-name "gtk_icon_factory_lookup_default") - (return-type "GtkIconSet*") - (parameters - '("const-gchar*" "stock_id") - ) -) - -(define-function icon_size_lookup - (c-name "gtk_icon_size_lookup") - (return-type "gboolean") - (parameters - '("GtkIconSize" "size") - '("gint*" "width") - '("gint*" "height") - ) -) - -(define-function icon_size_register - (c-name "gtk_icon_size_register") - (return-type "GtkIconSize") - (parameters - '("const-gchar*" "alias") - '("gint" "width") - '("gint" "height") - ) -) - -(define-function icon_size_register_alias - (c-name "gtk_icon_size_register_alias") - (return-type "none") - (parameters - '("const-gchar*" "alias") - '("GtkIconSize" "target") - ) -) - -(define-function icon_size_from_name - (c-name "gtk_icon_size_from_name") - (return-type "GtkIconSize") - (parameters - '("const-gchar*" "name") - ) -) - -(define-function icon_size_get_name - (c-name "gtk_icon_size_get_name") - (return-type "const-gchar*") - (parameters - '("GtkIconSize" "size") - ) -) - -(define-function icon_set_new - (c-name "gtk_icon_set_new") - (return-type "GtkIconSet*") -) - -(define-function icon_set_new_from_pixbuf - (c-name "gtk_icon_set_new_from_pixbuf") - (return-type "GtkIconSet*") - (parameters - '("GdkPixbuf*" "pixbuf") - ) -) - -(define-method ref - (of-object "GtkIconSet") - (c-name "gtk_icon_set_ref") - (return-type "GtkIconSet*") -) - -(define-method unref - (of-object "GtkIconSet") - (c-name "gtk_icon_set_unref") - (return-type "none") -) - -(define-method copy - (of-object "GtkIconSet") - (c-name "gtk_icon_set_copy") - (return-type "GtkIconSet*") -) - -(define-method render_icon - (of-object "GtkIconSet") - (c-name "gtk_icon_set_render_icon") - (return-type "GdkPixbuf*") - (parameters - '("GtkStyle*" "style") - '("GtkTextDirection" "direction") - '("GtkStateType" "state") - '("const-gchar*" "size") - '("GtkWidget*" "widget") - '("const-char*" "detail") - ) -) - -(define-method add_source - (of-object "GtkIconSet") - (c-name "gtk_icon_set_add_source") - (return-type "none") - (parameters - '("const-GtkIconSource*" "source") - ) -) - -(define-method get_sizes - (of-object "GtkIconSet") - (c-name "gtk_icon_set_get_sizes") - (return-type "none") - (parameters - '("GtkIconSize**" "sizes") - '("gint*" "n_sizes") - ) -) - -(define-function icon_source_new - (c-name "gtk_icon_source_new") - (return-type "GtkIconSource*") -) - -(define-method copy - (of-object "GtkIconSource") - (c-name "gtk_icon_source_copy") - (return-type "GtkIconSource*") -) - -(define-method free - (of-object "GtkIconSource") - (c-name "gtk_icon_source_free") - (return-type "none") -) - -(define-method set_filename - (of-object "GtkIconSource") - (c-name "gtk_icon_source_set_filename") - (return-type "none") - (parameters - '("const-gchar*" "filename") - ) -) - -(define-method set_pixbuf - (of-object "GtkIconSource") - (c-name "gtk_icon_source_set_pixbuf") - (return-type "none") - (parameters - '("GdkPixbuf*" "pixbuf") - ) -) - -(define-method get_filename - (of-object "GtkIconSource") - (c-name "gtk_icon_source_get_filename") - (return-type "const-gchar*") -) - -(define-method get_pixbuf - (of-object "GtkIconSource") - (c-name "gtk_icon_source_get_pixbuf") - (return-type "GdkPixbuf*") -) - -(define-method set_direction_wildcarded - (of-object "GtkIconSource") - (c-name "gtk_icon_source_set_direction_wildcarded") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method set_state_wildcarded - (of-object "GtkIconSource") - (c-name "gtk_icon_source_set_state_wildcarded") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method set_size_wildcarded - (of-object "GtkIconSource") - (c-name "gtk_icon_source_set_size_wildcarded") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_size_wildcarded - (of-object "GtkIconSource") - (c-name "gtk_icon_source_get_size_wildcarded") - (return-type "gboolean") -) - -(define-method get_state_wildcarded - (of-object "GtkIconSource") - (c-name "gtk_icon_source_get_state_wildcarded") - (return-type "gboolean") -) - -(define-method get_direction_wildcarded - (of-object "GtkIconSource") - (c-name "gtk_icon_source_get_direction_wildcarded") - (return-type "gboolean") -) - -(define-method set_direction - (of-object "GtkIconSource") - (c-name "gtk_icon_source_set_direction") - (return-type "none") - (parameters - '("GtkTextDirection" "direction") - ) -) - -(define-method set_state - (of-object "GtkIconSource") - (c-name "gtk_icon_source_set_state") - (return-type "none") - (parameters - '("GtkStateType" "state") - ) -) - -(define-method set_size - (of-object "GtkIconSource") - (c-name "gtk_icon_source_set_size") - (return-type "none") - (parameters - '("GtkIconSize" "size") - ) -) - -(define-method get_direction - (of-object "GtkIconSource") - (c-name "gtk_icon_source_get_direction") - (return-type "GtkTextDirection") -) - -(define-method get_state - (of-object "GtkIconSource") - (c-name "gtk_icon_source_get_state") - (return-type "GtkStateType") -) - -(define-method get_size - (of-object "GtkIconSource") - (c-name "gtk_icon_source_get_size") - (return-type "GtkIconSize") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkimage.h - -(define-function gtk_image_get_type - (c-name "gtk_image_get_type") - (return-type "GtkType") -) - -(define-function gtk_image_new - (c-name "gtk_image_new") - (is-constructor-of GtkImage) - (return-type "GtkWidget*") -) - -(define-function gtk_image_new_from_pixmap - (c-name "gtk_image_new_from_pixmap") - (is-constructor-of GtkImage) - (return-type "GtkWidget*") - (parameters - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask") - ) -) - -(define-function gtk_image_new_from_image - (c-name "gtk_image_new_from_image") - (is-constructor-of GtkImage) - (return-type "GtkWidget*") - (parameters - '("GdkImage*" "image") - '("GdkBitmap*" "mask") - ) -) - -(define-function gtk_image_new_from_file - (c-name "gtk_image_new_from_file") - (is-constructor-of GtkImage) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "filename") - ) -) - -(define-function gtk_image_new_from_pixbuf - (c-name "gtk_image_new_from_pixbuf") - (is-constructor-of GtkImage) - (return-type "GtkWidget*") - (parameters - '("GdkPixbuf*" "pixbuf") - ) -) - -(define-function gtk_image_new_from_stock - (c-name "gtk_image_new_from_stock") - (is-constructor-of GtkImage) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "stock_id") - '("const-gchar*" "size") - ) -) - -(define-function gtk_image_new_from_icon_set - (c-name "gtk_image_new_from_icon_set") - (is-constructor-of GtkImage) - (return-type "GtkWidget*") - (parameters - '("GtkIconSet*" "icon_set") - '("const-gchar*" "size") - ) -) - -(define-function gtk_image_new_from_animation - (c-name "gtk_image_new_from_animation") - (is-constructor-of GtkImage) - (return-type "GtkWidget*") - (parameters - '("GdkPixbufAnimation*" "animation") - ) -) - -(define-function construct - (c-name "gtk_image_new") - (is-constructor-of GtkImage) - (return-type "GtkWidget*") -) - -(define-method set_from_pixmap - (of-object "GtkImage") - (c-name "gtk_image_set_from_pixmap") - (return-type "none") - (parameters - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask") - ) -) - -(define-method set_from_image - (of-object "GtkImage") - (c-name "gtk_image_set_from_image") - (return-type "none") - (parameters - '("GdkImage*" "gdk_image") - '("GdkBitmap*" "mask") - ) -) - -(define-method set_from_file - (of-object "GtkImage") - (c-name "gtk_image_set_from_file") - (return-type "none") - (parameters - '("const-gchar*" "filename") - ) -) - -(define-method set_from_pixbuf - (of-object "GtkImage") - (c-name "gtk_image_set_from_pixbuf") - (return-type "none") - (parameters - '("GdkPixbuf*" "pixbuf") - ) -) - -(define-method set_from_stock - (of-object "GtkImage") - (c-name "gtk_image_set_from_stock") - (return-type "none") - (parameters - '("const-gchar*" "stock_id") - '("GtkIconSize" "size") - ) -) - -(define-method set_from_icon_set - (of-object "GtkImage") - (c-name "gtk_image_set_from_icon_set") - (return-type "none") - (parameters - '("GtkIconSet*" "icon_set") - '("const-gchar*" "size") - ) -) - -(define-method set_from_animation - (of-object "GtkImage") - (c-name "gtk_image_set_from_animation") - (return-type "none") - (parameters - '("GdkPixbufAnimation*" "animation") - ) -) - -(define-method get_storage_type - (of-object "GtkImage") - (c-name "gtk_image_get_storage_type") - (return-type "GtkImageType") -) - -(define-method get_pixmap - (of-object "GtkImage") - (c-name "gtk_image_get_pixmap") - (return-type "none") - (parameters - '("GdkPixmap**" "pixmap") - '("GdkBitmap**" "mask") - ) -) - -(define-method get_image - (of-object "GtkImage") - (c-name "gtk_image_get_image") - (return-type "none") - (parameters - '("GdkImage**" "gdk_image") - '("GdkBitmap**" "mask") - ) -) - -(define-method get_pixbuf - (of-object "GtkImage") - (c-name "gtk_image_get_pixbuf") - (return-type "GdkPixbuf*") -) - -(define-method get_stock - (of-object "GtkImage") - (c-name "gtk_image_get_stock") - (return-type "none") - (parameters - '("gchar**" "stock_id") - '("gchar**" "size") - ) -) - -(define-method get_icon_set - (of-object "GtkImage") - (c-name "gtk_image_get_icon_set") - (return-type "none") - (parameters - '("GtkIconSet**" "icon_set") - '("gchar**" "size") - ) -) - -(define-method get_animation - (of-object "GtkImage") - (c-name "gtk_image_get_animation") - (return-type "GdkPixbufAnimation*") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkimagemenuitem.h - -(define-function gtk_image_menu_item_get_type - (c-name "gtk_image_menu_item_get_type") - (return-type "GtkType") -) - -(define-function gtk_image_menu_item_new - (c-name "gtk_image_menu_item_new") - (is-constructor-of GtkImageMenuItem) - (return-type "GtkWidget*") -) - -(define-function gtk_image_menu_item_new_with_label - (c-name "gtk_image_menu_item_new_with_label") - (is-constructor-of GtkImageMenuItem) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-function gtk_image_menu_item_new_with_mnemonic - (c-name "gtk_image_menu_item_new_with_mnemonic") - (is-constructor-of GtkImageMenuItem) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-function gtk_image_menu_item_new_from_stock - (c-name "gtk_image_menu_item_new_from_stock") - (is-constructor-of GtkImageMenuItem) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "stock_id") - '("GtkAccelGroup*" "accel_group") - ) -) - -(define-method set_image - (of-object "GtkImageMenuItem") - (c-name "gtk_image_menu_item_set_image") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method get_image - (of-object "GtkImageMenuItem") - (c-name "gtk_image_menu_item_get_image") - (return-type "GtkWidget*") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkimcontext.h - -(define-function gtk_im_context_get_type - (c-name "gtk_im_context_get_type") - (return-type "GtkType") -) - -(define-method set_client_window - (of-object "GtkIMContext") - (c-name "gtk_im_context_set_client_window") - (return-type "none") - (parameters - '("GdkWindow*" "window") - ) -) - -(define-method get_preedit_string - (of-object "GtkIMContext") - (c-name "gtk_im_context_get_preedit_string") - (return-type "none") - (parameters - '("char**" "str") - '("PangoAttrList**" "attrs") - ) -) - -(define-method filter_keypress - (of-object "GtkIMContext") - (c-name "gtk_im_context_filter_keypress") - (return-type "gboolean") - (parameters - '("GdkEventKey*" "event") - ) -) - -(define-method focus_in - (of-object "GtkIMContext") - (c-name "gtk_im_context_focus_in") - (return-type "none") -) - -(define-method focus_out - (of-object "GtkIMContext") - (c-name "gtk_im_context_focus_out") - (return-type "none") -) - -(define-method reset - (of-object "GtkIMContext") - (c-name "gtk_im_context_reset") - (return-type "none") -) - -(define-method set_cursor_location - (of-object "GtkIMContext") - (c-name "gtk_im_context_set_cursor_location") - (return-type "none") - (parameters - '("GdkRectangle*" "area") - ) -) - -(define-method set_use_preedit - (of-object "GtkIMContext") - (c-name "gtk_im_context_set_use_preedit") - (return-type "none") - (parameters - '("gboolean" "use_preedit") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkimmulticontext.h - -(define-function gtk_im_multicontext_get_type - (c-name "gtk_im_multicontext_get_type") - (return-type "GtkType") -) - -(define-function gtk_im_multicontext_new - (c-name "gtk_im_multicontext_new") - (is-constructor-of GtkIMMulticontext) - (return-type "GtkIMContext*") -) - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkinputdialog.h - -(define-function gtk_input_dialog_get_type - (c-name "gtk_input_dialog_get_type") - (return-type "GtkType") -) - -(define-function gtk_input_dialog_new - (c-name "gtk_input_dialog_new") - (is-constructor-of GtkInputDialog) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkinvisible.h - -(define-function gtk_invisible_get_type - (c-name "gtk_invisible_get_type") - (return-type "GtkType") -) - -(define-function gtk_invisible_new - (c-name "gtk_invisible_new") - (is-constructor-of GtkInvisible) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkitem.h - -(define-function gtk_item_get_type - (c-name "gtk_item_get_type") - (return-type "GtkType") -) - -(define-method select - (of-object "GtkItem") - (c-name "gtk_item_select") - (return-type "none") -) - -(define-method deselect - (of-object "GtkItem") - (c-name "gtk_item_deselect") - (return-type "none") -) - -(define-method toggle - (of-object "GtkItem") - (c-name "gtk_item_toggle") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkitemfactory.h - -(define-function gtk_item_factory_get_type - (c-name "gtk_item_factory_get_type") - (return-type "GtkType") -) - -(define-function gtk_item_factory_new - (c-name "gtk_item_factory_new") - (is-constructor-of GtkItemFactory) - (return-type "GtkItemFactory*") - (parameters - '("GtkType" "container_type") - '("const-gchar*" "path") - '("GtkAccelGroup*" "accel_group" (null-ok) (default "NULL")) - ) -) - -(define-method construct - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_construct") - (return-type "none") - (parameters - '("GtkType" "container_type") - '("const-gchar*" "path") - '("GtkAccelGroup*" "accel_group") - ) -) - -(define-function item_factory_parse_rc - (c-name "gtk_item_factory_parse_rc") - (return-type "none") - (parameters - '("const-gchar*" "file_name") - ) -) - -(define-function item_factory_parse_rc_string - (c-name "gtk_item_factory_parse_rc_string") - (return-type "none") - (parameters - '("const-gchar*" "rc_string") - ) -) - -(define-function item_factory_parse_rc_scanner - (c-name "gtk_item_factory_parse_rc_scanner") - (return-type "none") - (parameters - '("GScanner*" "scanner") - ) -) - -(define-function item_factory_add_foreign - (c-name "gtk_item_factory_add_foreign") - (return-type "none") - (parameters - '("GtkWidget*" "accel_widget") - '("const-gchar*" "full_path") - '("GtkAccelGroup*" "accel_group") - '("guint" "keyval") - '("GdkModifierType" "modifiers") - ) -) - -(define-function item_factory_from_widget - (c-name "gtk_item_factory_from_widget") - (return-type "GtkItemFactory*") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-function item_factory_path_from_widget - (c-name "gtk_item_factory_path_from_widget") - (return-type "gchar*") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method get_item - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_get_item") - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "path") - ) -) - -(define-method get_widget - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_get_widget") - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "path") - ) -) - -(define-method get_widget_by_action - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_get_widget_by_action") - (return-type "GtkWidget*") - (parameters - '("guint" "action") - ) -) - -(define-method get_item_by_action - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_get_item_by_action") - (return-type "GtkWidget*") - (parameters - '("guint" "action") - ) -) - -(define-function item_factory_dump_items - (c-name "gtk_item_factory_dump_items") - (return-type "none") - (parameters - '("GtkPatternSpec*" "path_pspec") - '("gboolean" "modified_only") - '("GtkPrintFunc" "print_func") - '("gpointer" "func_data") - ) -) - -(define-function item_factory_dump_rc - (c-name "gtk_item_factory_dump_rc") - (return-type "none") - (parameters - '("const-gchar*" "file_name") - '("GtkPatternSpec*" "path_pspec") - '("gboolean" "modified_only") - ) -) - -(define-function item_factory_print_func - (c-name "gtk_item_factory_print_func") - (return-type "none") - (parameters - '("gpointer" "FILE_pointer") - '("const-gchar*" "string") - ) -) - -(define-method create_item - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_create_item") - (return-type "none") - (parameters - '("GtkItemFactoryEntry*" "entry") - '("gpointer" "callback_data") - '("guint" "callback_type") - ) -) - -(define-method create_items - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_create_items") - (return-type "none") - (parameters - '("guint" "n_entries") - '("GtkItemFactoryEntry*" "entries") - '("gpointer" "callback_data") - ) -) - -(define-method delete_item - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_delete_item") - (return-type "none") - (parameters - '("const-gchar*" "path") - ) -) - -(define-method delete_entry - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_delete_entry") - (return-type "none") - (parameters - '("GtkItemFactoryEntry*" "entry") - ) -) - -(define-method delete_entries - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_delete_entries") - (return-type "none") - (parameters - '("guint" "n_entries") - '("GtkItemFactoryEntry*" "entries") - ) -) - -(define-method popup - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_popup") - (return-type "none") - (parameters - '("guint" "x") - '("guint" "y") - '("guint" "mouse_button") - '("guint32" "time" (default "GDK_CURRENT_TIME")) - ) -) - -(define-method popup_with_data - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_popup_with_data") - (return-type "none") - (parameters - '("gpointer" "popup_data") - '("GtkDestroyNotify" "destroy") - '("guint" "x") - '("guint" "y") - '("guint" "mouse_button") - '("guint32" "time" (default "GDK_CURRENT_TIME")) - ) -) - -(define-method popup_data - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_popup_data") - (return-type "gpointer") -) - -(define-function item_factory_popup_data_from_widget - (c-name "gtk_item_factory_popup_data_from_widget") - (return-type "gpointer") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method set_translate_func - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_set_translate_func") - (return-type "none") - (parameters - '("GtkTranslateFunc" "func") - '("gpointer" "data") - '("GtkDestroyNotify" "notify") - ) -) - -(define-function item_factory_from_path - (c-name "gtk_item_factory_from_path") - (return-type "GtkItemFactory*") - (parameters - '("const-gchar*" "path") - ) -) - -(define-function item_factory_create_menu_entries - (c-name "gtk_item_factory_create_menu_entries") - (return-type "none") - (parameters - '("guint" "n_entries") - '("GtkMenuEntry*" "entries") - ) -) - -(define-function item_factories_path_delete - (c-name "gtk_item_factories_path_delete") - (return-type "none") - (parameters - '("const-gchar*" "ifactory_path") - '("const-gchar*" "path") - ) -) - -(define-method create_items_ac - (of-object "GtkItemFactory") - (c-name "gtk_item_factory_create_items_ac") - (return-type "none") - (parameters - '("guint" "n_entries") - '("GtkItemFactoryEntry*" "entries") - '("gpointer" "callback_data") - '("guint" "callback_type") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtklabel.h - -(define-function gtk_label_get_type - (c-name "gtk_label_get_type") - (return-type "GtkType") -) - -(define-function gtk_label_new - (c-name "gtk_label_new") - (is-constructor-of GtkLabel) - (return-type "GtkWidget*") - (parameters - '("const-char*" "str") - ) -) - -(define-function gtk_label_new_with_mnemonic - (c-name "gtk_label_new_with_mnemonic") - (is-constructor-of GtkLabel) - (return-type "GtkWidget*") - (parameters - '("const-char*" "str") - ) -) - -(define-method set_text - (of-object "GtkLabel") - (c-name "gtk_label_set_text") - (return-type "none") - (parameters - '("const-char*" "str") - ) -) - -(define-method get_text - (of-object "GtkLabel") - (c-name "gtk_label_get_text") - (return-type "const-gchar*") -) - -(define-method set_attributes - (of-object "GtkLabel") - (c-name "gtk_label_set_attributes") - (return-type "none") - (parameters - '("PangoAttrList*" "attrs") - ) -) - -(define-method get_attributes - (of-object "GtkLabel") - (c-name "gtk_label_get_attributes") - (return-type "PangoAttrList*") -) - -(define-method set_label - (of-object "GtkLabel") - (c-name "gtk_label_set_label") - (return-type "none") - (parameters - '("const-char*" "label") - ) -) - -(define-method get_label - (of-object "GtkLabel") - (c-name "gtk_label_get_label") - (return-type "const-gchar*") -) - -(define-method set_markup - (of-object "GtkLabel") - (c-name "gtk_label_set_markup") - (return-type "none") - (parameters - '("const-gchar*" "str") - ) -) - -(define-method set_use_markup - (of-object "GtkLabel") - (c-name "gtk_label_set_use_markup") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_use_markup - (of-object "GtkLabel") - (c-name "gtk_label_get_use_markup") - (return-type "gboolean") -) - -(define-method set_use_underline - (of-object "GtkLabel") - (c-name "gtk_label_set_use_underline") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_use_underline - (of-object "GtkLabel") - (c-name "gtk_label_get_use_underline") - (return-type "gboolean") -) - -(define-method set_markup_with_mnemonic - (of-object "GtkLabel") - (c-name "gtk_label_set_markup_with_mnemonic") - (return-type "none") - (parameters - '("const-gchar*" "str") - ) -) - -(define-method get_mnemonic_keyval - (of-object "GtkLabel") - (c-name "gtk_label_get_mnemonic_keyval") - (return-type "guint") -) - -(define-method set_mnemonic_widget - (of-object "GtkLabel") - (c-name "gtk_label_set_mnemonic_widget") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method set_text_with_mnemonic - (of-object "GtkLabel") - (c-name "gtk_label_set_text_with_mnemonic") - (return-type "none") - (parameters - '("const-gchar*" "str") - ) -) - -(define-method set_justify - (of-object "GtkLabel") - (c-name "gtk_label_set_justify") - (return-type "none") - (parameters - '("GtkJustification" "jtype") - ) -) - -(define-method get_justify - (of-object "GtkLabel") - (c-name "gtk_label_get_justify") - (return-type "GtkJustification") -) - -(define-method set_pattern - (of-object "GtkLabel") - (c-name "gtk_label_set_pattern") - (return-type "none") - (parameters - '("const-gchar*" "pattern") - ) -) - -(define-method set_line_wrap - (of-object "GtkLabel") - (c-name "gtk_label_set_line_wrap") - (return-type "none") - (parameters - '("gboolean" "wrap") - ) -) - -(define-method set_selectable - (of-object "GtkLabel") - (c-name "gtk_label_set_selectable") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_selectable - (of-object "GtkLabel") - (c-name "gtk_label_get_selectable") - (return-type "gboolean") -) - -(define-method select_region - (of-object "GtkLabel") - (c-name "gtk_label_select_region") - (return-type "none") - (parameters - '("gint" "start_offset") - '("gint" "end_offset") - ) -) - -(define-method get_selection_bounds - (of-object "GtkLabel") - (c-name "gtk_label_get_selection_bounds") - (return-type "gboolean") - (parameters - '("gint*" "start") - '("gint*" "end") - ) -) - -(define-method get_layout - (of-object "GtkLabel") - (c-name "gtk_label_get_layout") - (return-type "PangoLayout*") -) - -(define-method get_layout_offsets - (of-object "GtkLabel") - (c-name "gtk_label_get_layout_offsets") - (return-type "none") - (parameters - '("gint*" "x") - '("gint*" "y") - ) -) - -; DEPRECATED -(define-method get - (of-object "GtkLabel") - (c-name "gtk_label_get") - (return-type "none") - (parameters - '("char**" "str") - ) -) - -; DEPRECATED -(define-method parse_uline - (of-object "GtkLabel") - (c-name "gtk_label_parse_uline") - (return-type "guint") - (parameters - '("const-gchar*" "string") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtklayout.h - -(define-function gtk_layout_get_type - (c-name "gtk_layout_get_type") - (return-type "GtkType") -) - -(define-function gtk_layout_new - (c-name "gtk_layout_new") - (is-constructor-of GtkLayout) - (return-type "GtkWidget*") - (parameters - '("GtkAdjustment*" "hadjustment" (null-ok) (default "NULL")) - '("GtkAdjustment*" "vadjustment" (null-ok) (default "NULL")) - ) -) - -(define-method put - (of-object "GtkLayout") - (c-name "gtk_layout_put") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("gint" "x") - '("gint" "y") - ) -) - -(define-method move - (of-object "GtkLayout") - (c-name "gtk_layout_move") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("gint" "x") - '("gint" "y") - ) -) - -(define-method set_size - (of-object "GtkLayout") - (c-name "gtk_layout_set_size") - (return-type "none") - (parameters - '("guint" "width") - '("guint" "height") - ) -) - -(define-method get_hadjustment - (of-object "GtkLayout") - (c-name "gtk_layout_get_hadjustment") - (return-type "GtkAdjustment*") -) - -(define-method get_vadjustment - (of-object "GtkLayout") - (c-name "gtk_layout_get_vadjustment") - (return-type "GtkAdjustment*") -) - -(define-method set_hadjustment - (of-object "GtkLayout") - (c-name "gtk_layout_set_hadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok)) - ) -) - -(define-method set_vadjustment - (of-object "GtkLayout") - (c-name "gtk_layout_set_vadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok)) - ) -) - -; DEPRECATED -(define-method freeze - (of-object "GtkLayout") - (c-name "gtk_layout_freeze") - (return-type "none") -) - -; DEPRECATED -(define-method thaw - (of-object "GtkLayout") - (c-name "gtk_layout_thaw") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtklist.h - -(define-function gtk_list_get_type - (c-name "gtk_list_get_type") - (return-type "GtkType") -) - -(define-function gtk_list_new - (c-name "gtk_list_new") - (is-constructor-of GtkList) - (return-type "GtkWidget*") -) - -(define-method insert_items - (of-object "GtkList") - (c-name "gtk_list_insert_items") - (return-type "none") - (parameters - '("GList*" "items") - '("gint" "position") - ) -) - -(define-method append_items - (of-object "GtkList") - (c-name "gtk_list_append_items") - (return-type "none") - (parameters - '("GList*" "items") - ) -) - -(define-method prepend_items - (of-object "GtkList") - (c-name "gtk_list_prepend_items") - (return-type "none") - (parameters - '("GList*" "items") - ) -) - -(define-method remove_items - (of-object "GtkList") - (c-name "gtk_list_remove_items") - (return-type "none") - (parameters - '("GList*" "items") - ) -) - -(define-method remove_items_no_unref - (of-object "GtkList") - (c-name "gtk_list_remove_items_no_unref") - (return-type "none") - (parameters - '("GList*" "items") - ) -) - -(define-method clear_items - (of-object "GtkList") - (c-name "gtk_list_clear_items") - (return-type "none") - (parameters - '("gint" "start") - '("gint" "end") - ) -) - -(define-method select_item - (of-object "GtkList") - (c-name "gtk_list_select_item") - (return-type "none") - (parameters - '("gint" "item") - ) -) - -(define-method unselect_item - (of-object "GtkList") - (c-name "gtk_list_unselect_item") - (return-type "none") - (parameters - '("gint" "item") - ) -) - -(define-method select_child - (of-object "GtkList") - (c-name "gtk_list_select_child") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method unselect_child - (of-object "GtkList") - (c-name "gtk_list_unselect_child") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method child_position - (of-object "GtkList") - (c-name "gtk_list_child_position") - (return-type "gint") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method set_selection_mode - (of-object "GtkList") - (c-name "gtk_list_set_selection_mode") - (return-type "none") - (parameters - '("GtkSelectionMode" "mode") - ) -) - -(define-method extend_selection - (of-object "GtkList") - (c-name "gtk_list_extend_selection") - (return-type "none") - (parameters - '("GtkScrollType" "scroll_type") - '("gfloat" "position") - '("gboolean" "auto_start_selection") - ) -) - -(define-method start_selection - (of-object "GtkList") - (c-name "gtk_list_start_selection") - (return-type "none") -) - -(define-method end_selection - (of-object "GtkList") - (c-name "gtk_list_end_selection") - (return-type "none") -) - -(define-method select_all - (of-object "GtkList") - (c-name "gtk_list_select_all") - (return-type "none") -) - -(define-method unselect_all - (of-object "GtkList") - (c-name "gtk_list_unselect_all") - (return-type "none") -) - -(define-method scroll_horizontal - (of-object "GtkList") - (c-name "gtk_list_scroll_horizontal") - (return-type "none") - (parameters - '("GtkScrollType" "scroll_type") - '("gfloat" "position") - ) -) - -(define-method scroll_vertical - (of-object "GtkList") - (c-name "gtk_list_scroll_vertical") - (return-type "none") - (parameters - '("GtkScrollType" "scroll_type") - '("gfloat" "position") - ) -) - -(define-method toggle_add_mode - (of-object "GtkList") - (c-name "gtk_list_toggle_add_mode") - (return-type "none") -) - -(define-method toggle_focus_row - (of-object "GtkList") - (c-name "gtk_list_toggle_focus_row") - (return-type "none") -) - -(define-method toggle_row - (of-object "GtkList") - (c-name "gtk_list_toggle_row") - (return-type "none") - (parameters - '("GtkWidget*" "item") - ) -) - -(define-method undo_selection - (of-object "GtkList") - (c-name "gtk_list_undo_selection") - (return-type "none") -) - -(define-method end_drag_selection - (of-object "GtkList") - (c-name "gtk_list_end_drag_selection") - (return-type "none") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtklistitem.h - -(define-function gtk_list_item_get_type - (c-name "gtk_list_item_get_type") - (return-type "GtkType") -) - -(define-function gtk_list_item_new - (c-name "gtk_list_item_new") - (is-constructor-of GtkListItem) - (return-type "GtkWidget*") -) - -(define-function gtk_list_item_new_with_label - (c-name "gtk_list_item_new_with_label") - (is-constructor-of GtkListItem) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-method select - (of-object "GtkListItem") - (c-name "gtk_list_item_select") - (return-type "none") -) - -(define-method deselect - (of-object "GtkListItem") - (c-name "gtk_list_item_deselect") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkliststore.h - -(define-function gtk_list_store_get_type - (c-name "gtk_list_store_get_type") - (return-type "GtkType") -) - -(define-function gtk_list_store_new - (c-name "gtk_list_store_new") - (is-constructor-of GtkListStore) - (return-type "GtkListStore*") - (parameters - '("gint" "n_columns") - ) - (varargs #t) -) - -(define-function gtk_list_store_newv - (c-name "gtk_list_store_newv") - (is-constructor-of GtkListStore) - (return-type "GtkListStore*") - (parameters - '("gint" "n_columns") - '("GType*" "value") - ) -) - -(define-method set_value - (of-object "GtkListStore") - (c-name "gtk_list_store_set_value") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("gint" "column") - '("GValue*" "value") - ) -) - -(define-method set - (of-object "GtkListStore") - (c-name "gtk_list_store_set") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) - (varargs #t) -) - -(define-method remove - (of-object "GtkListStore") - (c-name "gtk_list_store_remove") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method insert - (of-object "GtkListStore") - (c-name "gtk_list_store_insert") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("gint" "position") - ) -) - -(define-method insert_before - (of-object "GtkListStore") - (c-name "gtk_list_store_insert_before") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "sibling") - ) -) - -(define-method insert_after - (of-object "GtkListStore") - (c-name "gtk_list_store_insert_after") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "sibling") - ) -) - -(define-method prepend - (of-object "GtkListStore") - (c-name "gtk_list_store_prepend") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method append - (of-object "GtkListStore") - (c-name "gtk_list_store_append") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method clear - (of-object "GtkListStore") - (c-name "gtk_list_store_clear") - (return-type "none") -) - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkmain.h - - -(define-function check_version - (c-name "gtk_check_version") - (return-type "gchar*") - (parameters - '("guint" "required_major") - '("guint" "required_minor") - '("guint" "required_micro") - ) -) - -(define-function init - (c-name "gtk_init") - (return-type "none") - (parameters - '("int*" "argc") - '("char***" "argv") - ) -) - -(define-function init_check - (c-name "gtk_init_check") - (return-type "gboolean") - (parameters - '("int*" "argc") - '("char***" "argv") - ) -) - -(define-function set_locale - (c-name "gtk_set_locale") - (return-type "gchar*") -) - -(define-function get_default_language - (c-name "gtk_get_default_language") - (return-type "PangoLanguage*") -) - -(define-function events_pending - (c-name "gtk_events_pending") - (return-type "gint") -) - -(define-function main_do_event - (c-name "gtk_main_do_event") - (return-type "none") - (parameters - '("GdkEvent*" "event") - ) -) - -(define-function main - (c-name "gtk_main") - (return-type "none") -) - -(define-function main_level - (c-name "gtk_main_level") - (return-type "guint") -) - -(define-function main_quit - (c-name "gtk_main_quit") - (return-type "none") -) - -(define-function main_iteration - (c-name "gtk_main_iteration") - (return-type "gint") -) - -(define-function main_iteration_do - (c-name "gtk_main_iteration_do") - (return-type "gint") - (parameters - '("gboolean" "blocking" (default "TRUE")) - ) -) - -(define-function true - (c-name "gtk_true") - (return-type "gint") -) - -(define-function false - (c-name "gtk_false") - (return-type "gint") -) - -(define-method grab_add - (of-object "GtkWidget") - (c-name "gtk_grab_add") - (return-type "none") -) - -(define-function grab_get_current - (c-name "gtk_grab_get_current") - (return-type "GtkWidget*") -) - -(define-method grab_remove - (of-object "GtkWidget") - (c-name "gtk_grab_remove") - (return-type "none") -) - -(define-function init_add - (c-name "gtk_init_add") - (return-type "none") - (parameters - '("GtkFunction" "function") - '("gpointer" "data") - ) -) - -(define-function quit_add_destroy - (c-name "gtk_quit_add_destroy") - (return-type "none") - (parameters - '("guint" "main_level") - '("GtkObject*" "object") - ) -) - -(define-function quit_add - (c-name "gtk_quit_add") - (return-type "guint") - (parameters - '("guint" "main_level") - '("GtkFunction" "function") - '("gpointer" "data") - ) -) - -(define-function quit_add_full - (c-name "gtk_quit_add_full") - (return-type "guint") - (parameters - '("guint" "main_level") - '("GtkFunction" "function") - '("GtkCallbackMarshal" "marshal") - '("gpointer" "data") - '("GtkDestroyNotify" "destroy") - ) -) - -(define-function quit_remove - (c-name "gtk_quit_remove") - (return-type "none") - (parameters - '("guint" "quit_handler_id") - ) -) - -(define-function quit_remove_by_data - (c-name "gtk_quit_remove_by_data") - (return-type "none") - (parameters - '("gpointer" "data") - ) -) - -(define-function timeout_add - (c-name "gtk_timeout_add") - (return-type "guint") - (parameters - '("guint32" "interval") - '("GtkFunction" "function") - '("gpointer" "data") - ) -) - -(define-function timeout_add_full - (c-name "gtk_timeout_add_full") - (return-type "guint") - (parameters - '("guint32" "interval") - '("GtkFunction" "function") - '("GtkCallbackMarshal" "marshal") - '("gpointer" "data") - '("GtkDestroyNotify" "destroy") - ) -) - -(define-function timeout_remove - (c-name "gtk_timeout_remove") - (return-type "none") - (parameters - '("guint" "timeout_handler_id") - ) -) - -(define-function idle_add - (c-name "gtk_idle_add") - (return-type "guint") - (parameters - '("GtkFunction" "function") - '("gpointer" "data") - ) -) - -(define-function idle_add_priority - (c-name "gtk_idle_add_priority") - (return-type "guint") - (parameters - '("gint" "priority") - '("GtkFunction" "function") - '("gpointer" "data") - ) -) - -(define-function idle_add_full - (c-name "gtk_idle_add_full") - (return-type "guint") - (parameters - '("gint" "priority") - '("GtkFunction" "function") - '("GtkCallbackMarshal" "marshal") - '("gpointer" "data") - '("GtkDestroyNotify" "destroy") - ) -) - -(define-function idle_remove - (c-name "gtk_idle_remove") - (return-type "none") - (parameters - '("guint" "idle_handler_id") - ) -) - -(define-function idle_remove_by_data - (c-name "gtk_idle_remove_by_data") - (return-type "none") - (parameters - '("gpointer" "data") - ) -) - -(define-function input_add_full - (c-name "gtk_input_add_full") - (return-type "guint") - (parameters - '("gint" "source") - '("GdkInputCondition" "condition") - '("GdkInputFunction" "function") - '("GtkCallbackMarshal" "marshal") - '("gpointer" "data") - '("GtkDestroyNotify" "destroy") - ) -) - -(define-function input_remove - (c-name "gtk_input_remove") - (return-type "none") - (parameters - '("guint" "input_handler_id") - ) -) - -(define-function key_snooper_install - (c-name "gtk_key_snooper_install") - (return-type "guint") - (parameters - '("GtkKeySnoopFunc" "snooper") - '("gpointer" "func_data") - ) -) - -(define-function key_snooper_remove - (c-name "gtk_key_snooper_remove") - (return-type "none") - (parameters - '("guint" "snooper_handler_id") - ) -) - -(define-function get_current_event - (c-name "gtk_get_current_event") - (return-type "GdkEvent*") -) - -(define-function get_current_event_time - (c-name "gtk_get_current_event_time") - (return-type "guint32") -) - -(define-function get_current_event_state - (c-name "gtk_get_current_event_state") - (return-type "gboolean") - (parameters - '("GdkModifierType*", "state") - ) -) - -(define-function get_event_widget - (c-name "gtk_get_event_widget") - (return-type "GtkWidget*") - (parameters - '("GdkEvent*" "event") - ) -) - -(define-method propagate_event - (of-object "GtkWidget") - (c-name "gtk_propagate_event") - (return-type "none") - (parameters - '("GdkEvent*" "event") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkmenu.h - -(define-function gtk_menu_get_type - (c-name "gtk_menu_get_type") - (return-type "GtkType") -) - -(define-function gtk_menu_new - (c-name "gtk_menu_new") - (is-constructor-of GtkMenu) - (return-type "GtkWidget*") -) - -(define-method popup - (of-object "GtkMenu") - (c-name "gtk_menu_popup") - (return-type "none") - (parameters - '("GtkWidget*" "parent_menu_shell") - '("GtkWidget*" "parent_menu_item") - '("GtkMenuPositionFunc" "func") - '("gpointer" "data") - '("guint" "button") - '("guint32" "activate_time") - ) -) - -(define-method reposition - (of-object "GtkMenu") - (c-name "gtk_menu_reposition") - (return-type "none") -) - -(define-method popdown - (of-object "GtkMenu") - (c-name "gtk_menu_popdown") - (return-type "none") -) - -(define-method get_active - (of-object "GtkMenu") - (c-name "gtk_menu_get_active") - (return-type "GtkWidget*") -) - -(define-method set_active - (of-object "GtkMenu") - (c-name "gtk_menu_set_active") - (return-type "none") - (parameters - '("guint" "index") - ) -) - -(define-method set_accel_group - (of-object "GtkMenu") - (c-name "gtk_menu_set_accel_group") - (return-type "none") - (parameters - '("GtkAccelGroup*" "accel_group") - ) -) - -(define-method get_accel_group - (of-object "GtkMenu") - (c-name "gtk_menu_get_accel_group") - (return-type "GtkAccelGroup*") -) - -(define-method attach_to_widget - (of-object "GtkMenu") - (c-name "gtk_menu_attach_to_widget") - (return-type "none") - (parameters - '("GtkWidget*" "attach_widget") - '("GtkMenuDetachFunc" "detacher") - ) -) - -(define-method detach - (of-object "GtkMenu") - (c-name "gtk_menu_detach") - (return-type "none") -) - -(define-method get_attach_widget - (of-object "GtkMenu") - (c-name "gtk_menu_get_attach_widget") - (return-type "GtkWidget*") -) - -(define-method set_tearoff_state - (of-object "GtkMenu") - (c-name "gtk_menu_set_tearoff_state") - (return-type "none") - (parameters - '("gboolean" "torn_off") - ) -) - -(define-method get_tearoff_state - (of-object "GtkMenu") - (c-name "gtk_menu_get_tearoff_state") - (return-type "gboolean") -) - -(define-method set_title - (of-object "GtkMenu") - (c-name "gtk_menu_set_title") - (return-type "none") - (parameters - '("const-gchar*" "title") - ) -) - -(define-method get_title - (of-object "GtkMenu") - (c-name "gtk_menu_get_title") - (return-type "const-gchar*") -) - -(define-method reorder_child - (of-object "GtkMenu") - (c-name "gtk_menu_reorder_child") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gint" "position") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkmenubar.h - -(define-function gtk_menu_bar_get_type - (c-name "gtk_menu_bar_get_type") - (return-type "GtkType") -) - -(define-function gtk_menu_bar_new - (c-name "gtk_menu_bar_new") - (is-constructor-of GtkMenuBar) - (return-type "GtkWidget*") -) - -(define-method append - (of-object "GtkMenuBar") - (c-name "gtk_menu_bar_append") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method prepend - (of-object "GtkMenuBar") - (c-name "gtk_menu_bar_prepend") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method insert - (of-object "GtkMenuBar") - (c-name "gtk_menu_bar_insert") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gint" "position") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkmenuitem.h - -(define-function gtk_menu_item_get_type - (c-name "gtk_menu_item_get_type") - (return-type "GtkType") -) - -(define-function gtk_menu_item_new - (c-name "gtk_menu_item_new") - (is-constructor-of GtkMenuItem) - (return-type "GtkWidget*") -) - -(define-function gtk_menu_item_new_with_label - (c-name "gtk_menu_item_new_with_label") - (is-constructor-of GtkMenuItem) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-function gtk_menu_item_new_with_mnemonic - (c-name "gtk_menu_item_new_with_mnemonic") - (is-constructor-of GtkMenuItem) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-method set_submenu - (of-object "GtkMenuItem") - (c-name "gtk_menu_item_set_submenu") - (return-type "none") - (parameters - '("GtkWidget*" "submenu") - ) -) - -(define-method remove_submenu - (of-object "GtkMenuItem") - (c-name "gtk_menu_item_remove_submenu") - (return-type "none") -) - -(define-method select - (of-object "GtkMenuItem") - (c-name "gtk_menu_item_select") - (return-type "none") -) - -(define-method deselect - (of-object "GtkMenuItem") - (c-name "gtk_menu_item_deselect") - (return-type "none") -) - -(define-method activate - (of-object "GtkMenuItem") - (c-name "gtk_menu_item_activate") - (return-type "none") -) - -(define-method toggle_size_request - (of-object "GtkMenuItem") - (c-name "gtk_menu_item_toggle_size_request") - (return-type "none") - (parameters - '("gint*" "requisition") - ) -) - -(define-method toggle_size_allocate - (of-object "GtkMenuItem") - (c-name "gtk_menu_item_toggle_size_allocate") - (return-type "none") - (parameters - '("gint" "allocation") - ) -) - -(define-method right_justify - (of-object "GtkMenuItem") - (c-name "gtk_menu_item_right_justify") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkmenushell.h - -(define-function gtk_menu_shell_get_type - (c-name "gtk_menu_shell_get_type") - (return-type "GtkType") -) - -(define-method append - (of-object "GtkMenuShell") - (c-name "gtk_menu_shell_append") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method prepend - (of-object "GtkMenuShell") - (c-name "gtk_menu_shell_prepend") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method insert - (of-object "GtkMenuShell") - (c-name "gtk_menu_shell_insert") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gint" "position") - ) -) - -(define-method deactivate - (of-object "GtkMenuShell") - (c-name "gtk_menu_shell_deactivate") - (return-type "none") -) - -(define-method select_item - (of-object "GtkMenuShell") - (c-name "gtk_menu_shell_select_item") - (return-type "none") - (parameters - '("GtkWidget*" "menu_item") - ) -) - -(define-method deselect - (of-object "GtkMenuShell") - (c-name "gtk_menu_shell_deselect") - (return-type "none") -) - -(define-method activate_item - (of-object "GtkMenuShell") - (c-name "gtk_menu_shell_activate_item") - (return-type "none") - (parameters - '("GtkWidget*" "menu_item") - '("gboolean" "force_deactivate") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkmessagedialog.h - -(define-function gtk_message_dialog_get_type - (c-name "gtk_message_dialog_get_type") - (return-type "GtkType") -) - -(define-function gtk_message_dialog_new - (c-name "gtk_message_dialog_new") - (is-constructor-of GtkMessageDialog) - (return-type "GtkWidget*") - (parameters - '("GtkWindow*" "parent" (null-ok) (default "NULL")) - '("GtkDialogFlags" "flags" (default "0")) - '("GtkMessageType" "type" (default "GTK_MESSAGE_INFO")) - '("GtkButtonsType" "buttons" (default "GTK_BUTTONS_NONE")) - '("const-gchar*" "message_format" (null-ok) (default "NULL")) - ) - (varargs #t) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkmisc.h - -(define-function gtk_misc_get_type - (c-name "gtk_misc_get_type") - (return-type "GtkType") -) - -(define-method set_alignment - (of-object "GtkMisc") - (c-name "gtk_misc_set_alignment") - (return-type "none") - (parameters - '("gfloat" "xalign") - '("gfloat" "yalign") - ) -) - -(define-method set_padding - (of-object "GtkMisc") - (c-name "gtk_misc_set_padding") - (return-type "none") - (parameters - '("gint" "xpad") - '("gint" "ypad") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtknotebook.h - -(define-function gtk_notebook_get_type - (c-name "gtk_notebook_get_type") - (return-type "GtkType") -) - -(define-function gtk_notebook_new - (c-name "gtk_notebook_new") - (is-constructor-of GtkNotebook) - (return-type "GtkWidget*") -) - -(define-method append_page - (of-object "GtkNotebook") - (c-name "gtk_notebook_append_page") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkWidget*" "tab_label") - ) -) - -(define-method append_page_menu - (of-object "GtkNotebook") - (c-name "gtk_notebook_append_page_menu") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkWidget*" "tab_label") - '("GtkWidget*" "menu_label") - ) -) - -(define-method prepend_page - (of-object "GtkNotebook") - (c-name "gtk_notebook_prepend_page") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkWidget*" "tab_label") - ) -) - -(define-method prepend_page_menu - (of-object "GtkNotebook") - (c-name "gtk_notebook_prepend_page_menu") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkWidget*" "tab_label") - '("GtkWidget*" "menu_label") - ) -) - -(define-method insert_page - (of-object "GtkNotebook") - (c-name "gtk_notebook_insert_page") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkWidget*" "tab_label") - '("gint" "position") - ) -) - -(define-method insert_page_menu - (of-object "GtkNotebook") - (c-name "gtk_notebook_insert_page_menu") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkWidget*" "tab_label") - '("GtkWidget*" "menu_label") - '("gint" "position") - ) -) - -(define-method remove_page - (of-object "GtkNotebook") - (c-name "gtk_notebook_remove_page") - (return-type "none") - (parameters - '("gint" "page_num") - ) -) - -(define-method get_current_page - (of-object "GtkNotebook") - (c-name "gtk_notebook_get_current_page") - (return-type "gint") -) - -(define-method get_nth_page - (of-object "GtkNotebook") - (c-name "gtk_notebook_get_nth_page") - (return-type "GtkWidget*") - (parameters - '("gint" "page_num") - ) -) - -(define-method page_num - (of-object "GtkNotebook") - (c-name "gtk_notebook_page_num") - (return-type "gint") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method set_current_page - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_current_page") - (return-type "none") - (parameters - '("gint" "page_num") - ) -) - -(define-method next_page - (of-object "GtkNotebook") - (c-name "gtk_notebook_next_page") - (return-type "none") -) - -(define-method prev_page - (of-object "GtkNotebook") - (c-name "gtk_notebook_prev_page") - (return-type "none") -) - -(define-method set_show_border - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_show_border") - (return-type "none") - (parameters - '("gboolean" "show_border") - ) -) - -(define-method set_show_tabs - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_show_tabs") - (return-type "none") - (parameters - '("gboolean" "show_tabs") - ) -) - -(define-method set_tab_pos - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_tab_pos") - (return-type "none") - (parameters - '("GtkPositionType" "pos") - ) -) - -(define-method set_homogeneous_tabs - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_homogeneous_tabs") - (return-type "none") - (parameters - '("gboolean" "homogeneous") - ) -) - -(define-method set_tab_border - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_tab_border") - (return-type "none") - (parameters - '("guint" "border_width") - ) -) - -(define-method set_tab_hborder - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_tab_hborder") - (return-type "none") - (parameters - '("guint" "tab_hborder") - ) -) - -(define-method set_tab_vborder - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_tab_vborder") - (return-type "none") - (parameters - '("guint" "tab_vborder") - ) -) - -(define-method set_scrollable - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_scrollable") - (return-type "none") - (parameters - '("gboolean" "scrollable") - ) -) - -(define-method popup_enable - (of-object "GtkNotebook") - (c-name "gtk_notebook_popup_enable") - (return-type "none") -) - -(define-method popup_disable - (of-object "GtkNotebook") - (c-name "gtk_notebook_popup_disable") - (return-type "none") -) - -(define-method get_tab_label - (of-object "GtkNotebook") - (c-name "gtk_notebook_get_tab_label") - (return-type "GtkWidget*") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method set_tab_label - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_tab_label") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkWidget*" "tab_label") - ) -) - -(define-method set_tab_label_text - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_tab_label_text") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("const-gchar*" "tab_text") - ) -) - -(define-method get_menu_label - (of-object "GtkNotebook") - (c-name "gtk_notebook_get_menu_label") - (return-type "GtkWidget*") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method set_menu_label - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_menu_label") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkWidget*" "menu_label") - ) -) - -(define-method set_menu_label_text - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_menu_label_text") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("const-gchar*" "menu_text") - ) -) - -(define-method query_tab_label_packing - (of-object "GtkNotebook") - (c-name "gtk_notebook_query_tab_label_packing") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gboolean*" "expand") - '("gboolean*" "fill") - '("GtkPackType*" "pack_type") - ) -) - -(define-method set_tab_label_packing - (of-object "GtkNotebook") - (c-name "gtk_notebook_set_tab_label_packing") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gboolean" "expand") - '("gboolean" "fill") - '("GtkPackType" "pack_type") - ) -) - -(define-method reorder_child - (of-object "GtkNotebook") - (c-name "gtk_notebook_reorder_child") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gint" "position") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkobject.h - -(define-function gtk_object_get_type - (c-name "gtk_object_get_type") - (return-type "GtkType") -) - -(define-function object_new - (c-name "gtk_object_new") - (return-type "GtkObject*") - (parameters - '("GtkType" "type") - '("const-gchar*" "first_arg_name") - ) - (varargs #t) -) - -(define-function object_newv - (c-name "gtk_object_newv") - (return-type "GtkObject*") - (parameters - '("GtkType" "object_type") - '("guint" "n_args") - '("GtkArg*" "args") - ) -) - -(define-method ref - (of-object "GtkObject") - (c-name "gtk_object_ref") - (return-type "GtkObject*") -) - -(define-method unref - (of-object "GtkObject") - (c-name "gtk_object_unref") - (return-type "none") -) - -(define-method sink - (of-object "GtkObject") - (c-name "gtk_object_sink") - (return-type "none") -) - -(define-method weakref - (of-object "GtkObject") - (c-name "gtk_object_weakref") - (return-type "none") - (parameters - '("GtkDestroyNotify" "notify") - '("gpointer" "data") - ) -) - -(define-method weakunref - (of-object "GtkObject") - (c-name "gtk_object_weakunref") - (return-type "none") - (parameters - '("GtkDestroyNotify" "notify") - '("gpointer" "data") - ) -) - -(define-method destroy - (of-object "GtkObject") - (c-name "gtk_object_destroy") - (return-type "none") -) - -(define-method set_data - (of-object "GtkObject") - (c-name "gtk_object_set_data") - (return-type "none") - (parameters - '("const-gchar*" "key") - '("gpointer" "data") - ) -) - -(define-method set_data_full - (of-object "GtkObject") - (c-name "gtk_object_set_data_full") - (return-type "none") - (parameters - '("const-gchar*" "key") - '("gpointer" "data") - '("GtkDestroyNotify" "destroy") - ) -) - -(define-method remove_data - (of-object "GtkObject") - (c-name "gtk_object_remove_data") - (return-type "none") - (parameters - '("const-gchar*" "key") - ) -) - -(define-method get_data - (of-object "GtkObject") - (c-name "gtk_object_get_data") - (return-type "gpointer") - (parameters - '("const-gchar*" "key") - ) -) - -(define-method remove_no_notify - (of-object "GtkObject") - (c-name "gtk_object_remove_no_notify") - (return-type "none") - (parameters - '("const-gchar*" "key") - ) -) - -(define-method set_user_data - (of-object "GtkObject") - (c-name "gtk_object_set_user_data") - (return-type "none") - (parameters - '("gpointer" "data") - ) -) - -(define-method get_user_data - (of-object "GtkObject") - (c-name "gtk_object_get_user_data") - (return-type "gpointer") -) - -(define-method set_data_by_id - (of-object "GtkObject") - (c-name "gtk_object_set_data_by_id") - (return-type "none") - (parameters - '("GQuark" "data_id") - '("gpointer" "data") - ) -) - -(define-method set_data_by_id_full - (of-object "GtkObject") - (c-name "gtk_object_set_data_by_id_full") - (return-type "none") - (parameters - '("GQuark" "data_id") - '("gpointer" "data") - '("GtkDestroyNotify" "destroy") - ) -) - -(define-method get_data_by_id - (of-object "GtkObject") - (c-name "gtk_object_get_data_by_id") - (return-type "gpointer") - (parameters - '("GQuark" "data_id") - ) -) - -(define-method remove_data_by_id - (of-object "GtkObject") - (c-name "gtk_object_remove_data_by_id") - (return-type "none") - (parameters - '("GQuark" "data_id") - ) -) - -(define-method remove_no_notify_by_id - (of-object "GtkObject") - (c-name "gtk_object_remove_no_notify_by_id") - (return-type "none") - (parameters - '("GQuark" "key_id") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkoptionmenu.h - -(define-function gtk_option_menu_get_type - (c-name "gtk_option_menu_get_type") - (return-type "GtkType") -) - -(define-function gtk_option_menu_new - (c-name "gtk_option_menu_new") - (is-constructor-of GtkOptionMenu) - (return-type "GtkWidget*") -) - -(define-method get_menu - (of-object "GtkOptionMenu") - (c-name "gtk_option_menu_get_menu") - (return-type "GtkWidget*") -) - -(define-method set_menu - (of-object "GtkOptionMenu") - (c-name "gtk_option_menu_set_menu") - (return-type "none") - (parameters - '("GtkWidget*" "menu") - ) -) - -(define-method remove_menu - (of-object "GtkOptionMenu") - (c-name "gtk_option_menu_remove_menu") - (return-type "none") -) - -(define-method get_history - (of-object "GtkOptionMenu") - (c-name "gtk_option_menu_get_history") - (return-type "gint") -) - -(define-method set_history - (of-object "GtkOptionMenu") - (c-name "gtk_option_menu_set_history") - (return-type "none") - (parameters - '("guint" "index") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkpaned.h - -(define-function gtk_paned_get_type - (c-name "gtk_paned_get_type") - (return-type "GtkType") -) - -(define-method add1 - (of-object "GtkPaned") - (c-name "gtk_paned_add1") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method add2 - (of-object "GtkPaned") - (c-name "gtk_paned_add2") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - -(define-method pack1 - (of-object "GtkPaned") - (c-name "gtk_paned_pack1") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gboolean" "resize" (default "FALSE")) - '("gboolean" "shrink" (default "TRUE")) - ) -) - -(define-method pack2 - (of-object "GtkPaned") - (c-name "gtk_paned_pack2") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gboolean" "resize" (default "TRUE")) - '("gboolean" "shrink" (default "TRUE")) - ) -) - -(define-method get_position - (of-object "GtkPaned") - (c-name "gtk_paned_get_position") - (return-type "gint") -) - -(define-method set_position - (of-object "GtkPaned") - (c-name "gtk_paned_set_position") - (return-type "none") - (parameters - '("gint" "position") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkpixmap.h - -(define-function gtk_pixmap_get_type - (c-name "gtk_pixmap_get_type") - (return-type "GtkType") -) - -(define-function gtk_pixmap_new - (c-name "gtk_pixmap_new") - (is-constructor-of GtkPixmap) - (return-type "GtkWidget*") - (parameters - '("GdkPixmap*" "pixmap") - '("GdkBitmap*" "mask" (null-ok)) - ) -) - -(define-method set - (of-object "GtkPixmap") - (c-name "gtk_pixmap_set") - (return-type "none") - (parameters - '("GdkPixmap*" "val") - '("GdkBitmap*" "mask" (null-ok)) - ) -) - -(define-method get - (of-object "GtkPixmap") - (c-name "gtk_pixmap_get") - (return-type "none") - (parameters - '("GdkPixmap**" "val") - '("GdkBitmap**" "mask") - ) -) - -(define-method set_build_insensitive - (of-object "GtkPixmap") - (c-name "gtk_pixmap_set_build_insensitive") - (return-type "none") - (parameters - '("guint" "build") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkplug.h - -(define-function gtk_plug_get_type - (c-name "gtk_plug_get_type") - (return-type "GtkType") -) - -(define-method construct - (of-object "GtkPlug") - (c-name "gtk_plug_construct") - (return-type "none") - (parameters - '("GdkNativeWindow" "socket_id") - ) -) - -(define-function gtk_plug_new - (c-name "gtk_plug_new") - (is-constructor-of GtkPlug) - (return-type "GtkWidget*") - (parameters - '("GdkNativeWindow" "socket_id") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkpreview.h - -(define-function gtk_preview_get_type - (c-name "gtk_preview_get_type") - (return-type "GtkType") -) - -(define-function preview_uninit - (c-name "gtk_preview_uninit") - (return-type "none") -) - -(define-function gtk_preview_new - (c-name "gtk_preview_new") - (is-constructor-of GtkPreview) - (return-type "GtkWidget*") - (parameters - '("GtkPreviewType" "type") - ) -) - -(define-method size - (of-object "GtkPreview") - (c-name "gtk_preview_size") - (return-type "none") - (parameters - '("gint" "width") - '("gint" "height") - ) -) - -(define-method put - (of-object "GtkPreview") - (c-name "gtk_preview_put") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GdkGC*" "gc") - '("gint" "srcx") - '("gint" "srcy") - '("gint" "destx") - '("gint" "desty") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_row - (of-object "GtkPreview") - (c-name "gtk_preview_draw_row") - (return-type "none") - (parameters - '("guchar*" "data") - '("gint" "x") - '("gint" "y") - '("gint" "w") - ) -) - -(define-method set_expand - (of-object "GtkPreview") - (c-name "gtk_preview_set_expand") - (return-type "none") - (parameters - '("gboolean" "expand") - ) -) - -(define-function preview_set_gamma - (c-name "gtk_preview_set_gamma") - (return-type "none") - (parameters - '("double" "gamma") - ) -) - -(define-function preview_set_color_cube - (c-name "gtk_preview_set_color_cube") - (return-type "none") - (parameters - '("guint" "nred_shades") - '("guint" "ngreen_shades") - '("guint" "nblue_shades") - '("guint" "ngray_shades") - ) -) - -(define-function preview_set_install_cmap - (c-name "gtk_preview_set_install_cmap") - (return-type "none") - (parameters - '("gint" "install_cmap") - ) -) - -(define-function preview_set_reserved - (c-name "gtk_preview_set_reserved") - (return-type "none") - (parameters - '("gint" "nreserved") - ) -) - -(define-method set_dither - (of-object "GtkPreview") - (c-name "gtk_preview_set_dither") - (return-type "none") - (parameters - '("GdkRgbDither" "dither") - ) -) - -(define-function preview_get_visual - (c-name "gtk_preview_get_visual") - (return-type "GdkVisual*") -) - -(define-function preview_get_cmap - (c-name "gtk_preview_get_cmap") - (return-type "GdkColormap*") -) - -(define-function gtk_preview_get_info - (c-name "gtk_preview_get_info") - (return-type "GtkPreviewInfo*") -) - -(define-function preview_reset - (c-name "gtk_preview_reset") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkprivate.h - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkprogress.h - -(define-function gtk_progress_get_type - (c-name "gtk_progress_get_type") - (return-type "GtkType") -) - -(define-method set_show_text - (of-object "GtkProgress") - (c-name "gtk_progress_set_show_text") - (return-type "none") - (parameters - '("gint" "show_text") - ) -) - -(define-method set_text_alignment - (of-object "GtkProgress") - (c-name "gtk_progress_set_text_alignment") - (return-type "none") - (parameters - '("gfloat" "x_align") - '("gfloat" "y_align") - ) -) - -(define-method set_format_string - (of-object "GtkProgress") - (c-name "gtk_progress_set_format_string") - (return-type "none") - (parameters - '("const-gchar*" "format") - ) -) - -(define-method set_adjustment - (of-object "GtkProgress") - (c-name "gtk_progress_set_adjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment") - ) -) - -(define-method configure - (of-object "GtkProgress") - (c-name "gtk_progress_configure") - (return-type "none") - (parameters - '("gfloat" "value") - '("gfloat" "min") - '("gfloat" "max") - ) -) - -(define-method set_percentage - (of-object "GtkProgress") - (c-name "gtk_progress_set_percentage") - (return-type "none") - (parameters - '("gfloat" "percentage") - ) -) - -(define-method set_value - (of-object "GtkProgress") - (c-name "gtk_progress_set_value") - (return-type "none") - (parameters - '("gfloat" "value") - ) -) - -(define-method get_value - (of-object "GtkProgress") - (c-name "gtk_progress_get_value") - (return-type "gfloat") -) - -(define-method set_activity_mode - (of-object "GtkProgress") - (c-name "gtk_progress_set_activity_mode") - (return-type "none") - (parameters - '("guint" "activity_mode") - ) -) - -(define-method get_current_text - (of-object "GtkProgress") - (c-name "gtk_progress_get_current_text") - (return-type "gchar*") -) - -(define-method get_text_from_value - (of-object "GtkProgress") - (c-name "gtk_progress_get_text_from_value") - (return-type "gchar*") - (parameters - '("gfloat" "value") - ) -) - -(define-method get_current_percentage - (of-object "GtkProgress") - (c-name "gtk_progress_get_current_percentage") - (return-type "gfloat") -) - -(define-method get_percentage_from_value - (of-object "GtkProgress") - (c-name "gtk_progress_get_percentage_from_value") - (return-type "gfloat") - (parameters - '("gfloat" "value") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkprogressbar.h - -(define-function gtk_progress_bar_get_type - (c-name "gtk_progress_bar_get_type") - (return-type "GtkType") -) - -(define-function gtk_progress_bar_new - (c-name "gtk_progress_bar_new") - (is-constructor-of GtkProgressBar) - (return-type "GtkWidget*") -) - -(define-method pulse - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_pulse") - (return-type "none") -) - -(define-method set_text - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_set_text") - (return-type "none") - (parameters - '("const-gchar*" "text") - ) -) - -(define-method set_fraction - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_set_fraction") - (return-type "none") - (parameters - '("gfloat" "fraction") - ) -) - -(define-method set_pulse_step - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_set_pulse_step") - (return-type "none") - (parameters - '("gfloat" "fraction") - ) -) - -(define-method set_orientation - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_set_orientation") - (return-type "none") - (parameters - '("GtkProgressBarOrientation" "orientation") - ) -) - -(define-method get_text - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_get_text") - (return-type "const-gchar*") -) - -(define-method get_fraction - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_get_fraction") - (return-type "gdouble") -) - -(define-method get_pulse_step - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_get_pulse_step") - (return-type "gdouble") -) - -(define-method get_orientation - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_get_orientation") - (return-type "GtkProgressBarOrientation") -) - -(define-function gtk_progress_bar_new_with_adjustment - (c-name "gtk_progress_bar_new_with_adjustment") - (is-constructor-of GtkProgressBar) - (return-type "GtkWidget*") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok) (default "NULL")) - ) -) - -(define-method set_bar_style - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_set_bar_style") - (return-type "none") - (parameters - '("GtkProgressBarStyle" "style") - ) -) - -(define-method set_discrete_blocks - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_set_discrete_blocks") - (return-type "none") - (parameters - '("guint" "blocks") - ) -) - -(define-method set_activity_step - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_set_activity_step") - (return-type "none") - (parameters - '("guint" "step") - ) -) - -(define-method set_activity_blocks - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_set_activity_blocks") - (return-type "none") - (parameters - '("guint" "blocks") - ) -) - -(define-method update - (of-object "GtkProgressBar") - (c-name "gtk_progress_bar_update") - (return-type "none") - (parameters - '("gfloat" "percentage") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkradiobutton.h - -(define-function gtk_radio_button_get_type - (c-name "gtk_radio_button_get_type") - (return-type "GtkType") -) - -(define-function gtk_radio_button_new - (c-name "gtk_radio_button_new") - (is-constructor-of GtkRadioButton) - (return-type "GtkWidget*") - (parameters - '("GSList*" "group") - ) -) - -(define-function radio_button_new_from_widget - (is-constructor-of GtkRadioButton) - (c-name "gtk_radio_button_new_from_widget") - (return-type "GtkWidget*") - (parameters - '("GtkRadioButton*" "group") - ) -) - -(define-function radio_button_new_with_label - (c-name "gtk_radio_button_new_with_label") - (is-constructor-of GtkRadioButton) - (return-type "GtkWidget*") - (parameters - '("GSList*" "group") - '("const-gchar*" "label") - ) -) - -(define-function radio_button_new_with_label_from_widget - (of-object "GtkRadioButton") - (is-constructor-of GtkRadioButton) - (c-name "gtk_radio_button_new_with_label_from_widget") - (return-type "GtkWidget*") - (parameters - '("GtkRadioButton" "*group") - '("const-gchar*" "label") - ) -) - -(define-function radio_button_new_with_mnemonic - (c-name "gtk_radio_button_new_with_mnemonic") - (is-constructor-of GtkRadioButton) - (return-type "GtkWidget*") - (parameters - '("GSList*" "group") - '("const-gchar*" "label") - ) -) - -(define-function radio_button_new_with_mnemonic_from_widget - (of-object "GtkRadioButton") - (is-constructor-of GtkRadioButton) - (c-name "gtk_radio_button_new_with_mnemonic_from_widget") - (return-type "GtkWidget*") - (parameters - '("GtkRadioButton" "*group") - '("const-gchar*" "label") - ) -) - -(define-method get_group - (of-object "GtkRadioButton") - (c-name "gtk_radio_button_get_group") - (return-type "GSList*") -) - -(define-method set_group - (of-object "GtkRadioButton") - (c-name "gtk_radio_button_set_group") - (return-type "none") - (parameters - '("GSList*" "group") - ) -) - -; DEPRECATED -(define-method group - (of-object "GtkRadioButton") - (c-name "gtk_radio_button_group") - (return-type "GSList*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkradiomenuitem.h - -(define-function gtk_radio_menu_item_get_type - (c-name "gtk_radio_menu_item_get_type") - (return-type "GtkType") -) - -(define-function gtk_radio_menu_item_new - (c-name "gtk_radio_menu_item_new") - (is-constructor-of GtkRadioMenuItem) - (return-type "GtkWidget*") - (parameters - '("GSList*" "group") - ) -) - -(define-function gtk_radio_menu_item_new_with_label - (c-name "gtk_radio_menu_item_new_with_label") - (is-constructor-of GtkRadioMenuItem) - (return-type "GtkWidget*") - (parameters - '("GSList*" "group") - '("const-gchar*" "label") - ) -) - -(define-function gtk_radio_menu_item_new_with_mnemonic - (c-name "gtk_radio_menu_item_new_with_mnemonic") - (is-constructor-of GtkRadioMenuItem) - (return-type "GtkWidget*") - (parameters - '("GSList*" "group") - '("const-gchar*" "label") - ) -) - -(define-method group - (of-object "GtkRadioMenuItem") - (c-name "gtk_radio_menu_item_group") - (return-type "GSList*") -) - -(define-method set_group - (of-object "GtkRadioMenuItem") - (c-name "gtk_radio_menu_item_set_group") - (return-type "none") - (parameters - '("GSList*" "group") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkrange.h - -(define-function gtk_range_get_type - (c-name "gtk_range_get_type") - (return-type "GtkType") -) - -(define-method set_update_policy - (of-object "GtkRange") - (c-name "gtk_range_set_update_policy") - (return-type "none") - (parameters - '("GtkUpdateType" "policy") - ) -) - -(define-method set_adjustment - (of-object "GtkRange") - (c-name "gtk_range_set_adjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment") - ) -) - -(define-method get_adjustment - (of-object "GtkRange") - (c-name "gtk_range_get_adjustment") - (return-type "GtkAdjustment*") -) - -(define-method set_inverted - (of-object "GtkRange") - (c-name "gtk_range_set_inverted") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_inverted - (of-object "GtkRange") - (c-name "gtk_range_get_inverted") - (return-type "gboolean") -) - -(define-method set_increments - (of-object "GtkRange") - (c-name "gtk_range_set_increments") - (return-type "none") - (parameters - '("gdouble" "step") - '("gdouble" "page") - ) -) - -(define-method set_range - (of-object "GtkRange") - (c-name "gtk_range_set_range") - (return-type "none") - (parameters - '("gdouble" "min") - '("gdouble" "max") - ) -) - -(define-method set_value - (of-object "GtkRange") - (c-name "gtk_range_set_value") - (return-type "none") - (parameters - '("gdouble" "value") - ) -) - -(define-method get_value - (of-object "GtkRange") - (c-name "gtk_range_get_value") - (return-type "gdouble") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkrc.h - -(define-function rc_add_default_file - (c-name "gtk_rc_add_default_file") - (return-type "none") - (parameters - '("const-gchar*" "filename") - ) -) - -(define-function rc_set_default_files - (c-name "gtk_rc_set_default_files") - (return-type "none") - (parameters - '("gchar**" "filenames") - ) -) - -(define-function rc_get_default_files - (c-name "gtk_rc_get_default_files") - (return-type "gchar**") -) - -(define-function rc_parse - (c-name "gtk_rc_parse") - (return-type "none") - (parameters - '("const-gchar*" "filename") - ) -) - -(define-function rc_parse_string - (c-name "gtk_rc_parse_string") - (return-type "none") - (parameters - '("const-gchar*" "rc_string") - ) -) - -(define-function rc_reparse_all - (c-name "gtk_rc_reparse_all") - (return-type "gboolean") -) - -(define-method rc_get_style - (of-object "GtkWidget") - (c-name "gtk_rc_get_style") - (return-type "GtkStyle*") -) - -(define-function rc_add_widget_name_style - (c-name "gtk_rc_add_widget_name_style") - (return-type "none") - (parameters - '("GtkRcStyle*" "rc_style") - '("const-gchar*" "pattern") - ) -) - -(define-function rc_add_widget_class_style - (c-name "gtk_rc_add_widget_class_style") - (return-type "none") - (parameters - '("GtkRcStyle*" "rc_style") - '("const-gchar*" "pattern") - ) -) - -(define-function rc_add_class_style - (c-name "gtk_rc_add_class_style") - (return-type "none") - (parameters - '("GtkRcStyle*" "rc_style") - '("const-gchar*" "pattern") - ) -) - -(define-function rc_style_get_type - (c-name "gtk_rc_style_get_type") - (return-type "GType") -) - -(define-function gtk_rc_style_new - (c-name "gtk_rc_style_new") - (is-constructor-of GtkRCStyle) - (return-type "GtkRcStyle*") -) - -(define-method copy - (of-object "GtkRcStyle") - (c-name "gtk_rc_style_copy") - (return-type "GtkRcStyle*") -) - -(define-method ref - (of-object "GtkRcStyle") - (c-name "gtk_rc_style_ref") - (return-type "none") -) - -(define-method unref - (of-object "GtkRcStyle") - (c-name "gtk_rc_style_unref") - (return-type "none") -) - -(define-function rc_set_image_loader - (c-name "gtk_rc_set_image_loader") - (return-type "none") - (parameters - '("GtkImageLoader" "loader") - ) -) - -(define-function rc_find_pixmap_in_path - (c-name "gtk_rc_find_pixmap_in_path") - (return-type "gchar*") - (parameters - '("GScanner*" "scanner") - '("const-gchar*" "pixmap_file") - ) -) - -(define-function rc_find_module_in_path - (c-name "gtk_rc_find_module_in_path") - (return-type "gchar*") - (parameters - '("const-gchar*" "module_file") - ) -) - -(define-function rc_get_theme_dir - (c-name "gtk_rc_get_theme_dir") - (return-type "gchar*") -) - -(define-function rc_get_module_dir - (c-name "gtk_rc_get_module_dir") - (return-type "gchar*") -) - -(define-function rc_parse_color - (c-name "gtk_rc_parse_color") - (return-type "guint") - (parameters - '("GScanner*" "scanner") - '("GdkColor*" "color") - ) -) - -(define-function rc_parse_state - (c-name "gtk_rc_parse_state") - (return-type "guint") - (parameters - '("GScanner*" "scanner") - '("GtkStateType*" "state") - ) -) - -(define-function rc_parse_priority - (c-name "gtk_rc_parse_priority") - (return-type "guint") - (parameters - '("GScanner*" "scanner") - '("GtkPathPriorityType*" "priority") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkruler.h - -(define-function gtk_ruler_get_type - (c-name "gtk_ruler_get_type") - (return-type "GtkType") -) - -(define-method set_metric - (of-object "GtkRuler") - (c-name "gtk_ruler_set_metric") - (return-type "none") - (parameters - '("GtkMetricType" "metric") - ) -) - -(define-method set_range - (of-object "GtkRuler") - (c-name "gtk_ruler_set_range") - (return-type "none") - (parameters - '("gfloat" "lower") - '("gfloat" "upper") - '("gfloat" "position") - '("gfloat" "max_size") - ) -) - -(define-method draw_ticks - (of-object "GtkRuler") - (c-name "gtk_ruler_draw_ticks") - (return-type "none") -) - -(define-method draw_pos - (of-object "GtkRuler") - (c-name "gtk_ruler_draw_pos") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkscale.h - -(define-function gtk_scale_get_type - (c-name "gtk_scale_get_type") - (return-type "GtkType") -) - -(define-method set_digits - (of-object "GtkScale") - (c-name "gtk_scale_set_digits") - (return-type "none") - (parameters - '("gint" "digits") - ) -) - -(define-method get_digits - (of-object "GtkScale") - (c-name "gtk_scale_get_digits") - (return-type "gint") -) - -(define-method set_draw_value - (of-object "GtkScale") - (c-name "gtk_scale_set_draw_value") - (return-type "none") - (parameters - '("gboolean" "draw_value") - ) -) - -(define-method get_draw_value - (of-object "GtkScale") - (c-name "gtk_scale_get_draw_value") - (return-type "gboolean") -) - -(define-method set_value_pos - (of-object "GtkScale") - (c-name "gtk_scale_set_value_pos") - (return-type "none") - (parameters - '("GtkPositionType" "pos") - ) -) - -(define-method get_value_pos - (of-object "GtkScale") - (c-name "gtk_scale_get_value_pos") - (return-type "GtkPositionType") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkscrollbar.h - -(define-function gtk_scrollbar_get_type - (c-name "gtk_scrollbar_get_type") - (return-type "GtkType") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkscrolledwindow.h - -(define-function gtk_scrolled_window_get_type - (c-name "gtk_scrolled_window_get_type") - (return-type "GtkType") -) - -(define-function gtk_scrolled_window_new - (c-name "gtk_scrolled_window_new") - (is-constructor-of GtkScrolledWindow) - (return-type "GtkWidget*") - (parameters - '("GtkAdjustment*" "hadjustment" (null-ok) (default "NULL")) - '("GtkAdjustment*" "vadjustment" (null-ok) (default "NULL")) - ) -) - -(define-method set_hadjustment - (of-object "GtkScrolledWindow") - (c-name "gtk_scrolled_window_set_hadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "hadjustment") - ) -) - -(define-method set_vadjustment - (of-object "GtkScrolledWindow") - (c-name "gtk_scrolled_window_set_vadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "hadjustment") - ) -) - -(define-method get_hadjustment - (of-object "GtkScrolledWindow") - (c-name "gtk_scrolled_window_get_hadjustment") - (return-type "GtkAdjustment*") -) - -(define-method get_vadjustment - (of-object "GtkScrolledWindow") - (c-name "gtk_scrolled_window_get_vadjustment") - (return-type "GtkAdjustment*") -) - -(define-method set_policy - (of-object "GtkScrolledWindow") - (c-name "gtk_scrolled_window_set_policy") - (return-type "none") - (parameters - '("GtkPolicyType" "hscrollbar_policy") - '("GtkPolicyType" "vscrollbar_policy") - ) -) - -(define-method set_placement - (of-object "GtkScrolledWindow") - (c-name "gtk_scrolled_window_set_placement") - (return-type "none") - (parameters - '("GtkCornerType" "window_placement") - ) -) - -(define-method set_shadow_type - (of-object "GtkScrolledWindow") - (c-name "gtk_scrolled_window_set_shadow_type") - (return-type "none") - (parameters - '("GtkShadowType" "type") - ) -) - -(define-method add_with_viewport - (of-object "GtkScrolledWindow") - (c-name "gtk_scrolled_window_add_with_viewport") - (return-type "none") - (parameters - '("GtkWidget*" "child") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkselection.h - -(define-function gtk_target_list_new - (c-name "gtk_target_list_new") - (return-type "GtkTargetList*") - (parameters - '("const-GtkTargetEntry*" "targets") - '("guint" "ntargets") - ) -) - -(define-method ref - (of-object "GtkTargetList") - (c-name "gtk_target_list_ref") - (return-type "none") -) - -(define-method unref - (of-object "GtkTargetList") - (c-name "gtk_target_list_unref") - (return-type "none") -) - -(define-method add - (of-object "GtkTargetList") - (c-name "gtk_target_list_add") - (return-type "none") - (parameters - '("GdkAtom" "target") - '("guint" "flags") - '("guint" "info") - ) -) - -(define-method add_table - (of-object "GtkTargetList") - (c-name "gtk_target_list_add_table") - (return-type "none") - (parameters - '("const-GtkTargetEntry*" "targets") - '("guint" "ntargets") - ) -) - -(define-method remove - (of-object "GtkTargetList") - (c-name "gtk_target_list_remove") - (return-type "none") - (parameters - '("GdkAtom" "target") - ) -) - -(define-method find - (of-object "GtkTargetList") - (c-name "gtk_target_list_find") - (return-type "gboolean") - (parameters - '("GdkAtom" "target") - '("guint*" "info") - ) -) - -(define-method selection_owner_set - (of-object "GtkWidget") - (c-name "gtk_selection_owner_set") - (return-type "gboolean") - (parameters - '("GdkAtom" "selection") - '("guint32" "time" (default "GDK_CURRENT_TIME")) - ) -) - -(define-method selection_add_target - (of-object "GtkWidget") - (c-name "gtk_selection_add_target") - (return-type "none") - (parameters - '("GdkAtom" "selection") - '("GdkAtom" "target") - '("guint" "info") - ) -) - -(define-method selection_add_targets - (of-object "GtkWidget") - (c-name "gtk_selection_add_targets") - (return-type "none") - (parameters - '("GdkAtom" "selection") - '("const-GtkTargetEntry*" "targets") - '("guint" "ntargets") - ) -) - -(define-method selection_clear_targets - (of-object "GtkWidget") - (c-name "gtk_selection_clear_targets") - (return-type "none") - (parameters - '("GdkAtom" "selection") - ) -) - -(define-method selection_convert - (of-object "GtkWidget") - (c-name "gtk_selection_convert") - (return-type "gint") - (parameters - '("GdkAtom" "selection") - '("GdkAtom" "target") - '("guint32" "time" (default "GDK_CURRENT_TIME")) - ) -) - -(define-method set - (of-object "GtkSelectionData") - (c-name "gtk_selection_data_set") - (return-type "none") - (parameters - '("GdkAtom" "type") - '("gint" "format") - '("const-guchar*" "data") - '("gint" "length") - ) -) - -(define-method set_text - (of-object "GtkSelectionData") - (c-name "gtk_selection_data_set_text") - (return-type "gboolean") - (parameters - '("const-guchar*" "str") - ) -) - -(define-method get_text - (of-object "GtkSelectionData") - (c-name "gtk_selection_data_get_text") - (return-type "guchar*") -) - -(define-method selection_remove_all - (of-object "GtkWidget") - (c-name "gtk_selection_remove_all") - (return-type "none") -) - -(define-method selection_clear - (of-object "GtkWidget") - (c-name "gtk_selection_clear") - (return-type "gint") - (parameters - '("GdkEventSelection*" "event") - ) -) - -(define-method selection_request - (of-object "GtkWidget") - (c-name "gtk_selection_request") - (return-type "gint") - (parameters - '("GdkEventSelection*" "event") - ) -) - -(define-function gtk_selection_incr_event - (c-name "gtk_selection_incr_event") - (return-type "gint") - (parameters - '("GdkWindow*" "window") - '("GdkEventProperty*" "event") - ) -) - -(define-method selection_notify - (of-object "GtkWidget") - (c-name "gtk_selection_notify") - (return-type "gint") - (parameters - '("GdkEventSelection*" "event") - ) -) - -(define-method selection_property_notify - (of-object "GtkWidget") - (c-name "gtk_selection_property_notify") - (return-type "gint") - (parameters - '("GdkEventProperty*" "event") - ) -) - -(define-method copy - (of-object "GtkSelectionData") - (c-name "gtk_selection_data_copy") - (return-type "GtkSelectionData*") -) - -(define-method free - (of-object "GtkSelectionData") - (c-name "gtk_selection_data_free") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkseparator.h - -(define-function gtk_separator_get_type - (c-name "gtk_separator_get_type") - (return-type "GtkType") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkseparatormenuitem.h - -(define-function gtk_separator_menu_item_get_type - (c-name "gtk_separator_menu_item_get_type") - (return-type "GtkType") -) - -(define-function gtk_separator_menu_item_new - (c-name "gtk_separator_menu_item_new") - (is-constructor-of GtkSeparatorMenuItem) - (return-type "GtkWidget*") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtksettings.h - -(define-function gtk_settings_get_type - (c-name "gtk_settings_get_type") - (return-type "GType") -) - -(define-function settings_get_default - (c-name "gtk_settings_get_default") - (return-type "GtkSettings*") -) - -(define-method install_property - (of-object "GtkSettings") - (c-name "gtk_settings_install_property") - (return-type "none") - (parameters - '("GParamSpec*" "pspec") - ) -) - -(define-method install_property_parser - (of-object "GtkSettings") - (c-name "gtk_settings_install_property_parser") - (return-type "none") - (parameters - '("GParamSpec*" "pspec") - '("GtkRcPropertyParser" "parser") - ) -) - -(define-function rc_property_parse_color - (c-name "gtk_rc_property_parse_color") - (return-type "gboolean") - (parameters - '("const-GParamSpec*" "pspec") - '("const-GString*" "gstring") - '("GValue*" "property_value") - ) -) - -(define-function rc_property_parse_enum - (c-name "gtk_rc_property_parse_enum") - (return-type "gboolean") - (parameters - '("const-GParamSpec*" "pspec") - '("const-GString*" "gstring") - '("GValue*" "property_value") - ) -) - -(define-function rc_property_parse_flags - (c-name "gtk_rc_property_parse_flags") - (return-type "gboolean") - (parameters - '("const-GParamSpec*" "pspec") - '("const-GString*" "gstring") - '("GValue*" "property_value") - ) -) - -(define-function rc_property_parse_requisition - (c-name "gtk_rc_property_parse_requisition") - (return-type "gboolean") - (parameters - '("const-GParamSpec*" "pspec") - '("const-GString*" "gstring") - '("GValue*" "property_value") - ) -) - -(define-function rc_property_parse_border - (c-name "gtk_rc_property_parse_border") - (return-type "gboolean") - (parameters - '("const-GParamSpec*" "pspec") - '("const-GString*" "gstring") - '("GValue*" "property_value") - ) -) - -(define-method set_property_value - (of-object "GtkSettings") - (c-name "gtk_settings_set_property_value") - (return-type "none") - (parameters - '("const-gchar*" "name") - '("const-GtkSettingsValue*" "svalue") - ) -) - -(define-method set_string_property - (of-object "GtkSettings") - (c-name "gtk_settings_set_string_property") - (return-type "none") - (parameters - '("const-gchar*" "name") - '("const-gchar*" "v_string") - '("const-gchar*" "origin") - ) -) - -(define-method set_long_property - (of-object "GtkSettings") - (c-name "gtk_settings_set_long_property") - (return-type "none") - (parameters - '("const-gchar*" "name") - '("glong" "v_long") - '("const-gchar*" "origin") - ) -) - -(define-method set_double_property - (of-object "GtkSettings") - (c-name "gtk_settings_set_double_property") - (return-type "none") - (parameters - '("const-gchar*" "name") - '("gdouble" "v_double") - '("const-gchar*" "origin") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtksizegroup.h - -(define-function gtk_size_group_get_type - (c-name "gtk_size_group_get_type") - (return-type "GType") -) - -(define-function size_group_new - (c-name "gtk_size_group_new") - (is-constructor-of GtkSizeGroup) - (return-type "GtkSizeGroup*") - (parameters - '("GtkSizeGroupMode" "mode") - ) -) - -(define-method set_mode - (of-object "GtkSizeGroup") - (c-name "gtk_size_group_set_mode") - (return-type "none") - (parameters - '("GtkSizeGroupMode" "mode") - ) -) - -(define-method get_mode - (of-object "GtkSizeGroup") - (c-name "gtk_size_group_get_mode") - (return-type "GtkSizeGroupMode") -) - -(define-method add_widget - (of-object "GtkSizeGroup") - (c-name "gtk_size_group_add_widget") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method remove_widget - (of-object "GtkSizeGroup") - (c-name "gtk_size_group_remove_widget") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtksocket.h - -(define-function gtk_socket_new - (c-name "gtk_socket_new") - (is-constructor-of GtkSocket) - (return-type "GtkWidget*") -) - -(define-function gtk_socket_get_type - (c-name "gtk_socket_get_type") - (return-type "GtkType") -) - -(define-method steal - (of-object "GtkSocket") - (c-name "gtk_socket_steal") - (return-type "none") - (parameters - '("GdkNativeWindow" "wid") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkspinbutton.h - -(define-function gtk_spin_button_get_type - (c-name "gtk_spin_button_get_type") - (return-type "GtkType") -) - -(define-method configure - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_configure") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok)) - '("gfloat" "climb_rate") - '("guint" "digits") - ) -) - -(define-function gtk_spin_button_new - (c-name "gtk_spin_button_new") - (is-constructor-of GtkSpinButton) - (return-type "GtkWidget*") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok) (default "NULL")) - '("gfloat" "climb_rate" (default "0.0")) - '("guint" "digits" (default "0")) - ) -) - -(define-function gtk_spin_button_new_with_range - (c-name "gtk_spin_button_new_with_range") - (is-constructor-of GtkSpinButton) - (return-type "GtkWidget*") - (parameters - '("gdouble" "min") - '("gdouble" "max") - '("gdouble" "step") - ) -) - -(define-method set_adjustment - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_set_adjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment") - ) -) - -(define-method get_adjustment - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_adjustment") - (return-type "GtkAdjustment*") -) - -(define-method set_digits - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_set_digits") - (return-type "none") - (parameters - '("guint" "digits") - ) -) - -(define-method get_digits - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_digits") - (return-type "guint") -) - -(define-method set_increments - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_set_increments") - (return-type "none") - (parameters - '("gdouble" "step") - '("gdouble" "page") - ) -) - -(define-method get_increments - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_increments") - (return-type "none") - (parameters - '("gdouble*" "step") - '("gdouble*" "page") - ) -) - -(define-method set_range - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_set_range") - (return-type "none") - (parameters - '("gdouble" "min") - '("gdouble" "max") - ) -) - -(define-method get_range - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_range") - (return-type "none") - (parameters - '("gdouble*" "min") - '("gdouble*" "max") - ) -) - -(define-method get_value - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_value") - (return-type "gdouble") -) - -(define-method get_value_as_int - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_value_as_int") - (return-type "gint") -) - -(define-method set_value - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_set_value") - (return-type "none") - (parameters - '("gfloat" "value") - ) -) - -(define-method set_update_policy - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_set_update_policy") - (return-type "none") - (parameters - '("GtkSpinButtonUpdatePolicy" "policy") - ) -) - -(define-method get_update_policy - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_update_policy") - (return-type "guint") -) - -(define-method set_numeric - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_set_numeric") - (return-type "none") - (parameters - '("gboolean" "numeric") - ) -) - -(define-method get_numeric - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_numeric") - (return-type "gboolean") -) - -(define-method spin - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_spin") - (return-type "none") - (parameters - '("GtkSpinType" "direction") - '("gfloat" "increment") - ) -) - -(define-method set_wrap - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_set_wrap") - (return-type "none") - (parameters - '("gboolean" "wrap") - ) -) - -(define-method get_wrap - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_wrap") - (return-type "gboolean") -) - -(define-method set_snap_to_ticks - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_set_snap_to_ticks") - (return-type "none") - (parameters - '("gboolean" "snap_to_ticks") - ) -) - -(define-method get_snap_to_ticks - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_get_snap_to_ticks") - (return-type "gboolean") -) - -(define-method update - (of-object "GtkSpinButton") - (c-name "gtk_spin_button_update") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkstatusbar.h - -(define-function gtk_statusbar_get_type - (c-name "gtk_statusbar_get_type") - (return-type "GtkType") -) - -(define-function gtk_statusbar_new - (c-name "gtk_statusbar_new") - (is-constructor-of GtkStatusbar) - (return-type "GtkWidget*") -) - -(define-method get_context_id - (of-object "GtkStatusbar") - (c-name "gtk_statusbar_get_context_id") - (return-type "guint") - (parameters - '("const-gchar*" "context_description") - ) -) - -(define-method push - (of-object "GtkStatusbar") - (c-name "gtk_statusbar_push") - (return-type "guint") - (parameters - '("guint" "context_id") - '("const-gchar*" "text") - ) -) - -(define-method pop - (of-object "GtkStatusbar") - (c-name "gtk_statusbar_pop") - (return-type "none") - (parameters - '("guint" "context_id") - ) -) - -(define-method remove - (of-object "GtkStatusbar") - (c-name "gtk_statusbar_remove") - (return-type "none") - (parameters - '("guint" "context_id") - '("guint" "message_id") - ) -) - -(define-method get_has_resize_grip - (of-object "GtkStatusbar") - (c-name "gtk_statusbar_get_has_resize_grip") - (return-type "gboolean") -) - -(define-method set_has_resize_grip - (of-object "GtkStatusbar") - (c-name "gtk_statusbar_set_has_resize_grip") - (parameters - '("gboolean" "setting") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkstock.h - -(define-function stock_add - (c-name "gtk_stock_add") - (return-type "none") - (parameters - '("const-GtkStockItem*" "item") - '("guint" "n_items") - ) -) - -(define-function stock_add_static - (c-name "gtk_stock_add_static") - (return-type "none") - (parameters - '("const-GtkStockItem*" "item") - '("guint" "n_items") - ) -) - -(define-function stock_lookup - (c-name "gtk_stock_lookup") - (return-type "gboolean") - (parameters - '("const-gchar*" "stock_id") - '("GtkStockItem*" "item") - ) -) - -(define-function stock_list_ids - (c-name "gtk_stock_list_ids") - (return-type "GSList*") -) - -(define-method copy - (of-object "GtkStockItem") - (c-name "gtk_stock_item_copy") - (return-type "GtkStockItem*") -) - -(define-method free - (of-object "GtkStockItem") - (c-name "gtk_stock_item_free") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkstyle.h - -(define-function gtk_style_get_type - (c-name "gtk_style_get_type") - (return-type "GType") -) - -(define-function gtk_style_new - (c-name "gtk_style_new") - (is-constructor-of GtkStyle) - (return-type "GtkStyle*") -) - -(define-method copy - (of-object "GtkStyle") - (c-name "gtk_style_copy") - (return-type "GtkStyle*") -) - -(define-method attach - (of-object "GtkStyle") - (c-name "gtk_style_attach") - (return-type "GtkStyle*") - (parameters - '("GdkWindow*" "window") - ) -) - -(define-method detach - (of-object "GtkStyle") - (c-name "gtk_style_detach") - (return-type "none") -) - -(define-method ref - (of-object "GtkStyle") - (c-name "gtk_style_ref") - (return-type "GtkStyle*") -) - -(define-method unref - (of-object "GtkStyle") - (c-name "gtk_style_unref") - (return-type "none") -) - -(define-method set_background - (of-object "GtkStyle") - (c-name "gtk_style_set_background") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - ) -) - -(define-method apply_default_background - (of-object "GtkStyle") - (c-name "gtk_style_apply_default_background") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("gboolean" "set_bg") - '("GtkStateType" "state_type") - '("GdkRectangle*" "area") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method lookup_icon_set - (of-object "GtkStyle") - (c-name "gtk_style_lookup_icon_set") - (return-type "GtkIconSet*") - (parameters - '("const-gchar*" "stock_id") - ) -) - -(define-method render_icon - (of-object "GtkStyle") - (c-name "gtk_style_render_icon") - (return-type "GdkPixbuf*") - (parameters - '("const-GtkIconSource*" "source") - '("GtkTextDirection" "direction") - '("GtkStateType" "state") - '("const-gchar*" "size") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - ) -) - -(define-method draw_hline - (of-object "GtkStyle") - (c-name "gtk_draw_hline") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("gint" "x1") - '("gint" "x2") - '("gint" "y") - ) -) - -(define-method draw_vline - (of-object "GtkStyle") - (c-name "gtk_draw_vline") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("gint" "y1") - '("gint" "y2") - '("gint" "x") - ) -) - -(define-method draw_shadow - (of-object "GtkStyle") - (c-name "gtk_draw_shadow") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_polygon - (of-object "GtkStyle") - (c-name "gtk_draw_polygon") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkPoint*" "points") - '("gint" "npoints") - '("gboolean" "fill") - ) -) - -(define-method draw_arrow - (of-object "GtkStyle") - (c-name "gtk_draw_arrow") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GtkArrowType" "arrow_type") - '("gboolean" "fill") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_diamond - (of-object "GtkStyle") - (c-name "gtk_draw_diamond") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_oval - (of-object "GtkStyle") - (c-name "gtk_draw_oval") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_string - (of-object "GtkStyle") - (c-name "gtk_draw_string") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("gint" "x") - '("gint" "y") - '("const-gchar*" "string") - ) -) - -(define-method draw_box - (of-object "GtkStyle") - (c-name "gtk_draw_box") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_flat_box - (of-object "GtkStyle") - (c-name "gtk_draw_flat_box") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_check - (of-object "GtkStyle") - (c-name "gtk_draw_check") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_option - (of-object "GtkStyle") - (c-name "gtk_draw_option") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_cross - (of-object "GtkStyle") - (c-name "gtk_draw_cross") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_ramp - (of-object "GtkStyle") - (c-name "gtk_draw_ramp") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GtkArrowType" "arrow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_tab - (of-object "GtkStyle") - (c-name "gtk_draw_tab") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_shadow_gap - (of-object "GtkStyle") - (c-name "gtk_draw_shadow_gap") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkPositionType" "gap_side") - '("gint" "gap_x") - '("gint" "gap_width") - ) -) - -(define-method draw_box_gap - (of-object "GtkStyle") - (c-name "gtk_draw_box_gap") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkPositionType" "gap_side") - '("gint" "gap_x") - '("gint" "gap_width") - ) -) - -(define-method draw_extension - (of-object "GtkStyle") - (c-name "gtk_draw_extension") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkPositionType" "gap_side") - ) -) - -(define-method draw_focus - (of-object "GtkStyle") - (c-name "gtk_draw_focus") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method draw_slider - (of-object "GtkStyle") - (c-name "gtk_draw_slider") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkOrientation" "orientation") - ) -) - -(define-method draw_handle - (of-object "GtkStyle") - (c-name "gtk_draw_handle") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkOrientation" "orientation") - ) -) - -(define-method draw_expander - (of-object "GtkStyle") - (c-name "gtk_draw_expander") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("gint" "x") - '("gint" "y") - '("gboolean" "is_open") - ) -) - -(define-method draw_layout - (of-object "GtkStyle") - (c-name "gtk_draw_layout") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("gboolean" "use_text") - '("gint" "x") - '("gint" "y") - '("PangoLayout*" "layout") - ) -) - -(define-method draw_resize_grip - (of-object "GtkStyle") - (c-name "gtk_draw_resize_grip") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkWindowEdge" "edge") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_hline - (of-object "GtkStyle") - (c-name "gtk_paint_hline") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x1") - '("gint" "x2") - '("gint" "y") - ) -) - -(define-method paint_vline - (of-object "GtkStyle") - (c-name "gtk_paint_vline") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "y1") - '("gint" "y2") - '("gint" "x") - ) -) - -(define-method paint_shadow - (of-object "GtkStyle") - (c-name "gtk_paint_shadow") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_polygon - (of-object "GtkStyle") - (c-name "gtk_paint_polygon") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("GdkPoint*" "points") - '("gint" "npoints") - '("gboolean" "fill") - ) -) - -(define-method paint_arrow - (of-object "GtkStyle") - (c-name "gtk_paint_arrow") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("GtkArrowType" "arrow_type") - '("gboolean" "fill") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_diamond - (of-object "GtkStyle") - (c-name "gtk_paint_diamond") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_string - (of-object "GtkStyle") - (c-name "gtk_paint_string") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("const-gchar*" "string") - ) -) - -(define-method paint_box - (of-object "GtkStyle") - (c-name "gtk_paint_box") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_flat_box - (of-object "GtkStyle") - (c-name "gtk_paint_flat_box") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_check - (of-object "GtkStyle") - (c-name "gtk_paint_check") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_option - (of-object "GtkStyle") - (c-name "gtk_paint_option") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_tab - (of-object "GtkStyle") - (c-name "gtk_paint_tab") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_shadow_gap - (of-object "GtkStyle") - (c-name "gtk_paint_shadow_gap") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkPositionType" "gap_side") - '("gint" "gap_x") - '("gint" "gap_width") - ) -) - -(define-method paint_box_gap - (of-object "GtkStyle") - (c-name "gtk_paint_box_gap") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkPositionType" "gap_side") - '("gint" "gap_x") - '("gint" "gap_width") - ) -) - -(define-method paint_extension - (of-object "GtkStyle") - (c-name "gtk_paint_extension") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkPositionType" "gap_side") - ) -) - -(define-method paint_focus - (of-object "GtkStyle") - (c-name "gtk_paint_focus") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method paint_slider - (of-object "GtkStyle") - (c-name "gtk_paint_slider") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkOrientation" "orientation") - ) -) - -(define-method paint_handle - (of-object "GtkStyle") - (c-name "gtk_paint_handle") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GtkShadowType" "shadow_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - '("GtkOrientation" "orientation") - ) -) - -(define-method paint_expander - (of-object "GtkStyle") - (c-name "gtk_paint_expander") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("gboolean" "is_open") - ) -) - -(define-method paint_layout - (of-object "GtkStyle") - (c-name "gtk_paint_layout") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("gboolean" "use_text") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("gint" "x") - '("gint" "y") - '("PangoLayout*" "layout") - ) -) - -(define-method paint_resize_grip - (of-object "GtkStyle") - (c-name "gtk_paint_resize_grip") - (return-type "none") - (parameters - '("GdkWindow*" "window") - '("GtkStateType" "state_type") - '("GdkRectangle*" "area") - '("GtkWidget*" "widget") - '("const-gchar*" "detail") - '("GtkWindowEdge" "edge") - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktable.h - -(define-function gtk_table_get_type - (c-name "gtk_table_get_type") - (return-type "GtkType") -) - -(define-function gtk_table_new - (c-name "gtk_table_new") - (is-constructor-of GtkTable) - (return-type "GtkWidget*") - (parameters - '("guint" "rows" (default "1")) - '("guint" "columns" (default "1")) - '("gboolean" "homogeneous" (default "FALSE")) - ) -) - -(define-method resize - (of-object "GtkTable") - (c-name "gtk_table_resize") - (return-type "none") - (parameters - '("guint" "rows") - '("guint" "columns") - ) -) - -(define-method attach - (of-object "GtkTable") - (c-name "gtk_table_attach") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("guint" "left_attach") - '("guint" "right_attach") - '("guint" "top_attach") - '("guint" "bottom_attach") - '("GtkAttachOptions" "xoptions" (default "GTK_EXPAND|GTK_FILL")) - '("GtkAttachOptions" "yoptions" (default "GTK_EXPAND|GTK_FILL")) - '("guint" "xpadding" (default "0")) - '("guint" "ypadding" (default "0")) - ) -) - -(define-method attach_defaults - (of-object "GtkTable") - (c-name "gtk_table_attach_defaults") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("guint" "left_attach") - '("guint" "right_attach") - '("guint" "top_attach") - '("guint" "bottom_attach") - ) -) - -(define-method set_row_spacing - (of-object "GtkTable") - (c-name "gtk_table_set_row_spacing") - (return-type "none") - (parameters - '("guint" "row") - '("guint" "spacing") - ) -) - -(define-method set_col_spacing - (of-object "GtkTable") - (c-name "gtk_table_set_col_spacing") - (return-type "none") - (parameters - '("guint" "column") - '("guint" "spacing") - ) -) - -(define-method set_row_spacings - (of-object "GtkTable") - (c-name "gtk_table_set_row_spacings") - (return-type "none") - (parameters - '("guint" "spacing") - ) -) - -(define-method set_col_spacings - (of-object "GtkTable") - (c-name "gtk_table_set_col_spacings") - (return-type "none") - (parameters - '("guint" "spacing") - ) -) - -(define-method set_homogeneous - (of-object "GtkTable") - (c-name "gtk_table_set_homogeneous") - (return-type "none") - (parameters - '("gboolean" "homogeneous") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktearoffmenuitem.h - -(define-function gtk_tearoff_menu_item_get_type - (c-name "gtk_tearoff_menu_item_get_type") - (return-type "GtkType") -) - -(define-function gtk_tearoff_menu_item_new - (c-name "gtk_tearoff_menu_item_new") - (is-constructor-of GtkTearoffMenuItem) - (return-type "GtkWidget*") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktextbuffer.h - -(define-function gtk_text_buffer_get_type - (c-name "gtk_text_buffer_get_type") - (return-type "GtkType") -) - -(define-function gtk_text_buffer_new - (c-name "gtk_text_buffer_new") - (is-constructor-of GtkTextBuffer) - (return-type "GtkTextBuffer*") - (parameters - '("GtkTextTagTable*" "table" (null-ok)) - ) -) - -(define-method get_line_count - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_line_count") - (return-type "gint") -) - -(define-method get_char_count - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_char_count") - (return-type "gint") -) - -(define-method get_tag_table - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_tag_table") - (return-type "GtkTextTagTable*") -) - -(define-method set_text - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_set_text") - (return-type "none") - (parameters - '("const-gchar*" "text") - '("gint" "len") - ) -) - -(define-method insert - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("const-gchar*" "text") - '("gint" "len" (default "-1")) - ) -) - -(define-method insert_at_cursor - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert_at_cursor") - (return-type "none") - (parameters - '("const-gchar*" "text") - '("gint" "len") - ) -) - -(define-method insert_interactive - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert_interactive") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "iter") - '("const-gchar*" "text") - '("gint" "len") - '("gboolean" "default_editable") - ) -) - -(define-method insert_interactive_at_cursor - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert_interactive_at_cursor") - (return-type "gboolean") - (parameters - '("const-gchar*" "text") - '("gint" "len") - '("gboolean" "default_editable") - ) -) - -(define-method insert_range - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert_range") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - ) -) - -(define-method insert_range_interactive - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert_range_interactive") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "iter") - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - '("gboolean" "default_editable") - ) -) - -(define-method insert_with_tags - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert_with_tags") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("const-gchar*" "text") - '("gint" "len") - '("GtkTextTag*" "first_tag") - ) - (varargs #t) -) - -(define-method insert_with_tags_by_name - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert_with_tags_by_name") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("const-gchar*" "text") - '("gint" "len") - '("const-gchar*" "first_tag_name") - ) - (varargs #t) -) - -(define-method delete - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_delete") - (return-type "none") - (parameters - '("GtkTextIter*" "start") - '("GtkTextIter*" "end") - ) -) - -(define-method delete_interactive - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_delete_interactive") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "start_iter") - '("GtkTextIter*" "end_iter") - '("gboolean" "default_editable") - ) -) - -(define-method get_text - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_text") - (return-type "gchar*") - (parameters - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - '("gboolean" "include_hidden_chars") - ) -) - -(define-method get_slice - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_slice") - (return-type "gchar*") - (parameters - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - '("gboolean" "include_hidden_chars") - ) -) - -(define-method insert_pixbuf - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert_pixbuf") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("GdkPixbuf*" "pixbuf") - ) -) - -(define-method insert_child_anchor - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_insert_child_anchor") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("GtkTextChildAnchor*" "anchor") - ) -) - -(define-method create_child_anchor - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_create_child_anchor") - (return-type "GtkTextChildAnchor*") - (parameters - '("GtkTextIter*" "iter") - ) -) - -(define-method create_mark - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_create_mark") - (return-type "GtkTextMark*") - (parameters - '("const-gchar*" "mark_name") - '("const-GtkTextIter*" "where") - '("gboolean" "left_gravity") - ) -) - -(define-method move_mark - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_move_mark") - (return-type "none") - (parameters - '("GtkTextMark*" "mark") - '("const-GtkTextIter*" "where") - ) -) - -(define-method delete_mark - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_delete_mark") - (return-type "none") - (parameters - '("GtkTextMark*" "mark") - ) -) - -(define-method get_mark - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_mark") - (return-type "GtkTextMark*") - (parameters - '("const-gchar*" "name") - ) -) - -(define-method move_mark_by_name - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_move_mark_by_name") - (return-type "none") - (parameters - '("const-gchar*" "name") - '("const-GtkTextIter*" "where") - ) -) - -(define-method delete_mark_by_name - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_delete_mark_by_name") - (return-type "none") - (parameters - '("const-gchar*" "name") - ) -) - -(define-method get_insert - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_insert") - (return-type "GtkTextMark*") -) - -(define-method get_selection_bound - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_selection_bound") - (return-type "GtkTextMark*") -) - -(define-method place_cursor - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_place_cursor") - (return-type "none") - (parameters - '("const-GtkTextIter*" "where") - ) -) - -(define-method apply_tag - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_apply_tag") - (return-type "none") - (parameters - '("GtkTextTag*" "tag") - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - ) -) - -(define-method remove_tag - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_remove_tag") - (return-type "none") - (parameters - '("GtkTextTag*" "tag") - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - ) -) - -(define-method apply_tag_by_name - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_apply_tag_by_name") - (return-type "none") - (parameters - '("const-gchar*" "name") - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - ) -) - -(define-method remove_tag_by_name - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_remove_tag_by_name") - (return-type "none") - (parameters - '("const-gchar*" "name") - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - ) -) - -(define-method remove_all_tags - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_remove_all_tags") - (return-type "none") - (parameters - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - ) -) - -(define-method create_tag - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_create_tag") - (return-type "GtkTextTag*") - (parameters - '("const-gchar*" "tag_name") - '("const-gchar*" "first_property_name") - ) - (varargs #t) -) - -(define-method get_iter_at_line_offset - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_iter_at_line_offset") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("gint" "line_number") - '("gint" "char_offset") - ) -) - -(define-method get_iter_at_line_index - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_iter_at_line_index") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("gint" "line_number") - '("gint" "byte_offset") - ) -) - -(define-method get_iter_at_offset - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_iter_at_offset") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("gint" "char_offset") - ) -) - -(define-method get_iter_at_line - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_iter_at_line") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("gint" "line_number") - ) -) - -(define-method get_start_iter - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_start_iter") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - ) -) - -(define-method get_end_iter - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_end_iter") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - ) -) - -(define-method get_bounds - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_bounds") - (return-type "none") - (parameters - '("GtkTextIter*" "start") - '("GtkTextIter*" "end") - ) -) - -(define-method get_iter_at_mark - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_iter_at_mark") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("GtkTextMark*" "mark") - ) -) - -(define-method get_iter_at_child_anchor - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_iter_at_child_anchor") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("GtkTextChildAnchor*" "anchor") - ) -) - -(define-method get_modified - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_modified") - (return-type "gboolean") -) - -(define-method set_modified - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_set_modified") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method cut_clipboard - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_cut_clipboard") - (return-type "none") - (parameters - '("GtkClipboard*" "clipboard") - '("gboolean" "default_editable") - ) -) - -(define-method copy_clipboard - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_copy_clipboard") - (return-type "none") - (parameters - '("GtkClipboard*" "clipboard") - ) -) - -(define-method paste_clipboard - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_paste_clipboard") - (return-type "none") - (parameters - '("GtkClipboard*" "clipboard") - '("GtkTextIter*" "override_location") - '("gboolean" "default_editable") - ) -) - -(define-method get_selection_bounds - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_get_selection_bounds") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "start") - '("GtkTextIter*" "end") - ) -) - -(define-method delete_selection - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_delete_selection") - (return-type "gboolean") - (parameters - '("gboolean" "interactive") - '("gboolean" "default_editable") - ) -) - -(define-method begin_user_action - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_begin_user_action") - (return-type "none") -) - -(define-method end_user_action - (of-object "GtkTextBuffer") - (c-name "gtk_text_buffer_end_user_action") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktextchild.h - -(define-function gtk_text_child_anchor_get_type - (c-name "gtk_text_child_anchor_get_type") - (return-type "GType") -) - -(define-function gtk_text_child_anchor_new - (c-name "gtk_text_child_anchor_new") - (is-constructor-of GtkTextChildAnchor) - (return-type "GtkTextChildAnchor*") -) - -(define-method get_widgets - (of-object "GtkTextChildAnchor") - (c-name "gtk_text_child_anchor_get_widgets") - (return-type "GList*") -) - -(define-method get_deleted - (of-object "GtkTextChildAnchor") - (c-name "gtk_text_child_anchor_get_deleted") - (return-type "gboolean") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktextdisplay.h - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktextiter.h - -(define-method get_buffer - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_buffer") - (return-type "GtkTextBuffer*") -) - -(define-method copy - (of-object "GtkTextIter") - (c-name "gtk_text_iter_copy") - (return-type "GtkTextIter*") -) - -(define-method free - (of-object "GtkTextIter") - (c-name "gtk_text_iter_free") - (return-type "none") -) - -(define-method get_offset - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_offset") - (return-type "gint") -) - -(define-method get_line - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_line") - (return-type "gint") -) - -(define-method get_line_offset - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_line_offset") - (return-type "gint") -) - -(define-method get_line_index - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_line_index") - (return-type "gint") -) - -(define-method get_visible_line_offset - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_visible_line_offset") - (return-type "gint") -) - -(define-method get_visible_line_index - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_visible_line_index") - (return-type "gint") -) - -(define-method get_char - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_char") - (return-type "gunichar") -) - -(define-method get_slice - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_slice") - (return-type "gchar*") - (parameters - '("const-GtkTextIter*" "end") - ) -) - -(define-method get_text - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_text") - (return-type "gchar*") - (parameters - '("const-GtkTextIter*" "end") - ) -) - -(define-method get_visible_slice - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_visible_slice") - (return-type "gchar*") - (parameters - '("const-GtkTextIter*" "end") - ) -) - -(define-method get_visible_text - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_visible_text") - (return-type "gchar*") - (parameters - '("const-GtkTextIter*" "end") - ) -) - -(define-method get_pixbuf - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_pixbuf") - (return-type "GdkPixbuf*") -) - -(define-method get_marks - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_marks") - (return-type "GSList*") -) - -(define-method get_child_anchor - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_child_anchor") - (return-type "GtkTextChildAnchor*") -) - -(define-method get_toggled_tags - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_toggled_tags") - (return-type "GSList*") - (parameters - '("gboolean" "toggled_on") - ) -) - -(define-method begins_tag - (of-object "GtkTextIter") - (c-name "gtk_text_iter_begins_tag") - (return-type "gboolean") - (parameters - '("GtkTextTag*" "tag") - ) -) - -(define-method ends_tag - (of-object "GtkTextIter") - (c-name "gtk_text_iter_ends_tag") - (return-type "gboolean") - (parameters - '("GtkTextTag*" "tag") - ) -) - -(define-method toggles_tag - (of-object "GtkTextIter") - (c-name "gtk_text_iter_toggles_tag") - (return-type "gboolean") - (parameters - '("GtkTextTag*" "tag") - ) -) - -(define-method has_tag - (of-object "GtkTextIter") - (c-name "gtk_text_iter_has_tag") - (return-type "gboolean") - (parameters - '("GtkTextTag*" "tag") - ) -) - -(define-method get_tags - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_tags") - (return-type "GSList*") -) - -(define-method editable - (of-object "GtkTextIter") - (c-name "gtk_text_iter_editable") - (return-type "gboolean") - (parameters - '("gboolean" "default_setting") - ) -) - -(define-method starts_word - (of-object "GtkTextIter") - (c-name "gtk_text_iter_starts_word") - (return-type "gboolean") -) - -(define-method ends_word - (of-object "GtkTextIter") - (c-name "gtk_text_iter_ends_word") - (return-type "gboolean") -) - -(define-method inside_word - (of-object "GtkTextIter") - (c-name "gtk_text_iter_inside_word") - (return-type "gboolean") -) - -(define-method starts_sentence - (of-object "GtkTextIter") - (c-name "gtk_text_iter_starts_sentence") - (return-type "gboolean") -) - -(define-method ends_sentence - (of-object "GtkTextIter") - (c-name "gtk_text_iter_ends_sentence") - (return-type "gboolean") -) - -(define-method inside_sentence - (of-object "GtkTextIter") - (c-name "gtk_text_iter_inside_sentence") - (return-type "gboolean") -) - -(define-method starts_line - (of-object "GtkTextIter") - (c-name "gtk_text_iter_starts_line") - (return-type "gboolean") -) - -(define-method ends_line - (of-object "GtkTextIter") - (c-name "gtk_text_iter_ends_line") - (return-type "gboolean") -) - -(define-method is_cursor_position - (of-object "GtkTextIter") - (c-name "gtk_text_iter_is_cursor_position") - (return-type "gboolean") -) - -(define-method get_chars_in_line - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_chars_in_line") - (return-type "gint") -) - -(define-method get_bytes_in_line - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_bytes_in_line") - (return-type "gint") -) - -(define-method get_attributes - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_attributes") - (return-type "gboolean") - (parameters - '("GtkTextAttributes*" "values") - ) -) - -(define-method get_language - (of-object "GtkTextIter") - (c-name "gtk_text_iter_get_language") - (return-type "PangoLanguage*") -) - -(define-method is_end - (of-object "GtkTextIter") - (c-name "gtk_text_iter_is_end") - (return-type "gboolean") -) - -(define-method is_start - (of-object "GtkTextIter") - (c-name "gtk_text_iter_is_start") - (return-type "gboolean") -) - -(define-method forward_char - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_char") - (return-type "gboolean") -) - -(define-method backward_char - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_char") - (return-type "gboolean") -) - -(define-method forward_chars - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_chars") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method backward_chars - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_chars") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method forward_line - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_line") - (return-type "gboolean") -) - -(define-method backward_line - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_line") - (return-type "gboolean") -) - -(define-method forward_lines - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_lines") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method backward_lines - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_lines") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method forward_word_end - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_word_end") - (return-type "gboolean") -) - -(define-method backward_word_start - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_word_start") - (return-type "gboolean") -) - -(define-method forward_word_ends - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_word_ends") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method backward_word_starts - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_word_starts") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method forward_sentence_end - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_sentence_end") - (return-type "gboolean") -) - -(define-method backward_sentence_start - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_sentence_start") - (return-type "gboolean") -) - -(define-method forward_sentence_ends - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_sentence_ends") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method backward_sentence_starts - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_sentence_starts") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method forward_cursor_position - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_cursor_position") - (return-type "gboolean") -) - -(define-method backward_cursor_position - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_cursor_position") - (return-type "gboolean") -) - -(define-method forward_cursor_positions - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_cursor_positions") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method backward_cursor_positions - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_cursor_positions") - (return-type "gboolean") - (parameters - '("gint" "count") - ) -) - -(define-method set_offset - (of-object "GtkTextIter") - (c-name "gtk_text_iter_set_offset") - (return-type "none") - (parameters - '("gint" "char_offset") - ) -) - -(define-method set_line - (of-object "GtkTextIter") - (c-name "gtk_text_iter_set_line") - (return-type "none") - (parameters - '("gint" "line_number") - ) -) - -(define-method set_line_offset - (of-object "GtkTextIter") - (c-name "gtk_text_iter_set_line_offset") - (return-type "none") - (parameters - '("gint" "char_on_line") - ) -) - -(define-method set_line_index - (of-object "GtkTextIter") - (c-name "gtk_text_iter_set_line_index") - (return-type "none") - (parameters - '("gint" "byte_on_line") - ) -) - -(define-method forward_to_end - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_to_end") - (return-type "none") -) - -(define-method forward_to_line_end - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_to_line_end") - (return-type "gboolean") -) - -(define-method set_visible_line_offset - (of-object "GtkTextIter") - (c-name "gtk_text_iter_set_visible_line_offset") - (return-type "none") - (parameters - '("gint" "char_on_line") - ) -) - -(define-method set_visible_line_index - (of-object "GtkTextIter") - (c-name "gtk_text_iter_set_visible_line_index") - (return-type "none") - (parameters - '("gint" "byte_on_line") - ) -) - -(define-method forward_to_tag_toggle - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_to_tag_toggle") - (return-type "gboolean") - (parameters - '("GtkTextTag*" "tag" (null-ok)) - ) -) - -(define-method backward_to_tag_toggle - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_to_tag_toggle") - (return-type "gboolean") - (parameters - '("GtkTextTag*" "tag" (null-ok)) - ) -) - -(define-method forward_find_char - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_find_char") - (return-type "gboolean") - (parameters - '("GtkTextCharPredicate" "pred") - '("gpointer" "user_data") - '("const-GtkTextIter*" "limit") - ) -) - -(define-method backward_find_char - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_find_char") - (return-type "gboolean") - (parameters - '("GtkTextCharPredicate" "pred") - '("gpointer" "user_data") - '("const-GtkTextIter*" "limit") - ) -) - -(define-method forward_search - (of-object "GtkTextIter") - (c-name "gtk_text_iter_forward_search") - (return-type "gboolean") - (parameters - '("const-gchar*" "str") - '("gboolean" "visible_only") - '("gboolean" "slice") - '("GtkTextIter*" "match_start") - '("GtkTextIter*" "match_end") - '("const-GtkTextIter*" "limit" (null-ok)) - ) -) - -(define-method backward_search - (of-object "GtkTextIter") - (c-name "gtk_text_iter_backward_search") - (return-type "gboolean") - (parameters - '("const-gchar*" "str") - '("gboolean" "visible_only") - '("gboolean" "slice") - '("GtkTextIter*" "match_start") - '("GtkTextIter*" "match_end") - '("const-GtkTextIter*" "limit" (null-ok)) - ) -) - -(define-method equal - (of-object "GtkTextIter") - (c-name "gtk_text_iter_equal") - (return-type "gboolean") - (parameters - '("const-GtkTextIter*" "rhs") - ) -) - -(define-method compare - (of-object "GtkTextIter") - (c-name "gtk_text_iter_compare") - (return-type "gint") - (parameters - '("const-GtkTextIter*" "rhs") - ) -) - -(define-method in_range - (of-object "GtkTextIter") - (c-name "gtk_text_iter_in_range") - (return-type "gboolean") - (parameters - '("const-GtkTextIter*" "start") - '("const-GtkTextIter*" "end") - ) -) - -(define-method order - (of-object "GtkTextIter") - (c-name "gtk_text_iter_order") - (return-type "none") - (parameters - '("GtkTextIter*" "second") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktextmark.h - -(define-function gtk_text_mark_get_type - (c-name "gtk_text_mark_get_type") - (return-type "GType") -) - -(define-method set_visible - (of-object "GtkTextMark") - (c-name "gtk_text_mark_set_visible") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_visible - (of-object "GtkTextMark") - (c-name "gtk_text_mark_get_visible") - (return-type "gboolean") -) - -(define-method get_name - (of-object "GtkTextMark") - (c-name "gtk_text_mark_get_name") - (return-type "const-gchar*") -) - -(define-method get_deleted - (of-object "GtkTextMark") - (c-name "gtk_text_mark_get_deleted") - (return-type "gboolean") -) - -(define-method get_buffer - (of-object "GtkTextMark") - (c-name "gtk_text_mark_get_buffer") - (return-type "GtkTextBuffer*") -) - -(define-method get_left_gravity - (of-object "GtkTextMark") - (c-name "gtk_text_mark_get_left_gravity") - (return-type "gboolean") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktexttag.h - -(define-function gtk_text_tag_get_type - (c-name "gtk_text_tag_get_type") - (return-type "GtkType") -) - -(define-function gtk_text_tag_new - (c-name "gtk_text_tag_new") - (is-constructor-of GtkTextTag) - (return-type "GtkTextTag*") - (parameters - '("const-gchar*" "name") - ) -) - -(define-method get_priority - (of-object "GtkTextTag") - (c-name "gtk_text_tag_get_priority") - (return-type "gint") -) - -(define-method set_priority - (of-object "GtkTextTag") - (c-name "gtk_text_tag_set_priority") - (return-type "none") - (parameters - '("gint" "priority") - ) -) - -(define-method event - (of-object "GtkTextTag") - (c-name "gtk_text_tag_event") - (return-type "gint") - (parameters - '("GObject*" "event_object") - '("GdkEvent*" "event") - '("const-GtkTextIter*" "iter") - ) -) - -(define-function gtk_text_attributes_new - (c-name "gtk_text_attributes_new") - (is-constructor-of GtkTextAttributes) - (return-type "GtkTextAttributes*") -) - -(define-method copy - (of-object "GtkTextAttributes") - (c-name "gtk_text_attributes_copy") - (return-type "none") - (parameters - '("GtkTextAttributes*" "dest") - ) -) - -(define-method copy_values - (of-object "GtkTextAttributes") - (c-name "gtk_text_attributes_copy_values") - (return-type "none") - (parameters - '("GtkTextAttributes*" "dest") - ) -) - -(define-method unref - (of-object "GtkTextAttributes") - (c-name "gtk_text_attributes_unref") - (return-type "none") -) - -(define-method ref - (of-object "GtkTextAttributes") - (c-name "gtk_text_attributes_ref") - (return-type "none") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktexttagtable.h - -(define-function gtk_text_tag_table_get_type - (c-name "gtk_text_tag_table_get_type") - (return-type "GtkType") -) - -(define-function gtk_text_tag_table_new - (c-name "gtk_text_tag_table_new") - (is-constructor-of GtkTextTagTable) - (return-type "GtkTextTagTable*") -) - -(define-method add - (of-object "GtkTextTagTable") - (c-name "gtk_text_tag_table_add") - (return-type "none") - (parameters - '("GtkTextTag*" "tag") - ) -) - -(define-method remove - (of-object "GtkTextTagTable") - (c-name "gtk_text_tag_table_remove") - (return-type "none") - (parameters - '("GtkTextTag*" "tag") - ) -) - -(define-method lookup - (of-object "GtkTextTagTable") - (c-name "gtk_text_tag_table_lookup") - (return-type "GtkTextTag*") - (parameters - '("const-gchar*" "name") - ) -) - -(define-method foreach - (of-object "GtkTextTagTable") - (c-name "gtk_text_tag_table_foreach") - (return-type "none") - (parameters - '("GtkTextTagTableForeach" "func") - '("gpointer" "data") - ) -) - -(define-method get_size - (of-object "GtkTextTagTable") - (c-name "gtk_text_tag_table_get_size") - (return-type "guint") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktextview.h - -(define-function gtk_text_view_get_type - (c-name "gtk_text_view_get_type") - (return-type "GtkType") -) - -(define-function gtk_text_view_new - (c-name "gtk_text_view_new") - (is-constructor-of GtkTextView) - (return-type "GtkWidget*") -) - -(define-function gtk_text_view_new_with_buffer - (c-name "gtk_text_view_new_with_buffer") - (is-constructor-of GtkTextView) - (return-type "GtkWidget*") - (parameters - '("GtkTextBuffer*" "buffer") - ) -) - -(define-method set_buffer - (of-object "GtkTextView") - (c-name "gtk_text_view_set_buffer") - (return-type "none") - (parameters - '("GtkTextBuffer*" "buffer") - ) -) - -(define-method get_buffer - (of-object "GtkTextView") - (c-name "gtk_text_view_get_buffer") - (return-type "GtkTextBuffer*") -) - -(define-method scroll_to_iter - (of-object "GtkTextView") - (c-name "gtk_text_view_scroll_to_iter") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "iter") - '("gdouble" "within_margin") - '("gboolean" "use_align" (default "FALSE")) - '("gdouble" "xalign" (default "0.5")) - '("gdouble" "yalign" (default "0.5")) - ) -) - -(define-method scroll_to_mark - (of-object "GtkTextView") - (c-name "gtk_text_view_scroll_to_mark") - (return-type "none") - (parameters - '("GtkTextMark*" "mark") - '("gdouble" "within_margin") - '("gboolean" "use_align" (default "FALSE")) - '("gdouble" "xalign" (default "0.5")) - '("gdouble" "yalign" (default "0.5")) - ) -) - -(define-method scroll_mark_onscreen - (of-object "GtkTextView") - (c-name "gtk_text_view_scroll_mark_onscreen") - (return-type "none") - (parameters - '("GtkTextMark*" "mark") - ) -) - -(define-method move_mark_onscreen - (of-object "GtkTextView") - (c-name "gtk_text_view_move_mark_onscreen") - (return-type "gboolean") - (parameters - '("GtkTextMark*" "mark") - ) -) - -(define-method place_cursor_onscreen - (of-object "GtkTextView") - (c-name "gtk_text_view_place_cursor_onscreen") - (return-type "gboolean") -) - -(define-method get_visible_rect - (of-object "GtkTextView") - (c-name "gtk_text_view_get_visible_rect") - (return-type "none") - (parameters - '("GdkRectangle*" "visible_rect") - ) -) - -(define-method set_cursor_visible - (of-object "GtkTextView") - (c-name "gtk_text_view_set_cursor_visible") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_cursor_visible - (of-object "GtkTextView") - (c-name "gtk_text_view_get_cursor_visible") - (return-type "gboolean") -) - -(define-method get_iter_location - (of-object "GtkTextView") - (c-name "gtk_text_view_get_iter_location") - (return-type "none") - (parameters - '("const-GtkTextIter*" "iter") - '("GdkRectangle*" "location") - ) -) - -(define-method get_iter_at_location - (of-object "GtkTextView") - (c-name "gtk_text_view_get_iter_at_location") - (return-type "none") - (parameters - '("GtkTextIter*" "iter") - '("gint" "x") - '("gint" "y") - ) -) - -(define-method get_line_yrange - (of-object "GtkTextView") - (c-name "gtk_text_view_get_line_yrange") - (return-type "none") - (parameters - '("const-GtkTextIter*" "iter") - '("gint*" "y") - '("gint*" "height") - ) -) - -(define-method get_line_at_y - (of-object "GtkTextView") - (c-name "gtk_text_view_get_line_at_y") - (return-type "none") - (parameters - '("GtkTextIter*" "target_iter") - '("gint" "y") - '("gint*" "line_top") - ) -) - -(define-method buffer_to_window_coords - (of-object "GtkTextView") - (c-name "gtk_text_view_buffer_to_window_coords") - (return-type "none") - (parameters - '("GtkTextWindowType" "win") - '("gint" "buffer_x") - '("gint" "buffer_y") - '("gint*" "window_x") - '("gint*" "window_y") - ) -) - -(define-method window_to_buffer_coords - (of-object "GtkTextView") - (c-name "gtk_text_view_window_to_buffer_coords") - (return-type "none") - (parameters - '("GtkTextWindowType" "win") - '("gint" "window_x") - '("gint" "window_y") - '("gint*" "buffer_x") - '("gint*" "buffer_y") - ) -) - -(define-method get_window - (of-object "GtkTextView") - (c-name "gtk_text_view_get_window") - (return-type "GdkWindow*") - (parameters - '("GtkTextWindowType" "win") - ) -) - -(define-method get_window_type - (of-object "GtkTextView") - (c-name "gtk_text_view_get_window_type") - (return-type "GtkTextWindowType") - (parameters - '("GdkWindow*" "window") - ) -) - -(define-method set_border_window_size - (of-object "GtkTextView") - (c-name "gtk_text_view_set_border_window_size") - (return-type "none") - (parameters - '("GtkTextWindowType" "type") - '("gint" "size") - ) -) - -(define-method forward_display_line - (of-object "GtkTextView") - (c-name "gtk_text_view_forward_display_line") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "iter") - ) -) - -(define-method backward_display_line - (of-object "GtkTextView") - (c-name "gtk_text_view_backward_display_line") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "iter") - ) -) - -(define-method forward_display_line_end - (of-object "GtkTextView") - (c-name "gtk_text_view_forward_display_line_end") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "iter") - ) -) - -(define-method backward_display_line_start - (of-object "GtkTextView") - (c-name "gtk_text_view_backward_display_line_start") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "iter") - ) -) - -(define-method starts_display_line - (of-object "GtkTextView") - (c-name "gtk_text_view_starts_display_line") - (return-type "gboolean") - (parameters - '("const-GtkTextIter*" "iter") - ) -) - -(define-method move_visually - (of-object "GtkTextView") - (c-name "gtk_text_view_move_visually") - (return-type "gboolean") - (parameters - '("GtkTextIter*" "iter") - '("gint" "count") - ) -) - -(define-method add_child_at_anchor - (of-object "GtkTextView") - (c-name "gtk_text_view_add_child_at_anchor") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkTextChildAnchor*" "anchor") - ) -) - -(define-method add_child_in_window - (of-object "GtkTextView") - (c-name "gtk_text_view_add_child_in_window") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("GtkTextWindowType" "which_window") - '("gint" "xpos") - '("gint" "ypos") - ) -) - -(define-method move_child - (of-object "GtkTextView") - (c-name "gtk_text_view_move_child") - (return-type "none") - (parameters - '("GtkWidget*" "child") - '("gint" "xpos") - '("gint" "ypos") - ) -) - -(define-method set_wrap_mode - (of-object "GtkTextView") - (c-name "gtk_text_view_set_wrap_mode") - (return-type "none") - (parameters - '("GtkWrapMode" "wrap_mode") - ) -) - -(define-method get_wrap_mode - (of-object "GtkTextView") - (c-name "gtk_text_view_get_wrap_mode") - (return-type "GtkWrapMode") -) - -(define-method set_editable - (of-object "GtkTextView") - (c-name "gtk_text_view_set_editable") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_editable - (of-object "GtkTextView") - (c-name "gtk_text_view_get_editable") - (return-type "gboolean") -) - -(define-method set_pixels_above_lines - (of-object "GtkTextView") - (c-name "gtk_text_view_set_pixels_above_lines") - (return-type "none") - (parameters - '("gint" "pixels_above_lines") - ) -) - -(define-method get_pixels_above_lines - (of-object "GtkTextView") - (c-name "gtk_text_view_get_pixels_above_lines") - (return-type "gint") -) - -(define-method set_pixels_below_lines - (of-object "GtkTextView") - (c-name "gtk_text_view_set_pixels_below_lines") - (return-type "none") - (parameters - '("gint" "pixels_below_lines") - ) -) - -(define-method get_pixels_below_lines - (of-object "GtkTextView") - (c-name "gtk_text_view_get_pixels_below_lines") - (return-type "gint") -) - -(define-method set_pixels_inside_wrap - (of-object "GtkTextView") - (c-name "gtk_text_view_set_pixels_inside_wrap") - (return-type "none") - (parameters - '("gint" "pixels_inside_wrap") - ) -) - -(define-method get_pixels_inside_wrap - (of-object "GtkTextView") - (c-name "gtk_text_view_get_pixels_inside_wrap") - (return-type "gint") -) - -(define-method set_justification - (of-object "GtkTextView") - (c-name "gtk_text_view_set_justification") - (return-type "none") - (parameters - '("GtkJustification" "justification") - ) -) - -(define-method get_justification - (of-object "GtkTextView") - (c-name "gtk_text_view_get_justification") - (return-type "GtkJustification") -) - -(define-method set_left_margin - (of-object "GtkTextView") - (c-name "gtk_text_view_set_left_margin") - (return-type "none") - (parameters - '("gint" "left_margin") - ) -) - -(define-method get_left_margin - (of-object "GtkTextView") - (c-name "gtk_text_view_get_left_margin") - (return-type "gint") -) - -(define-method set_right_margin - (of-object "GtkTextView") - (c-name "gtk_text_view_set_right_margin") - (return-type "none") - (parameters - '("gint" "right_margin") - ) -) - -(define-method get_right_margin - (of-object "GtkTextView") - (c-name "gtk_text_view_get_right_margin") - (return-type "gint") -) - -(define-method set_indent - (of-object "GtkTextView") - (c-name "gtk_text_view_set_indent") - (return-type "none") - (parameters - '("gint" "indent") - ) -) - -(define-method get_indent - (of-object "GtkTextView") - (c-name "gtk_text_view_get_indent") - (return-type "gint") -) - -(define-method set_tabs - (of-object "GtkTextView") - (c-name "gtk_text_view_set_tabs") - (return-type "none") - (parameters - '("PangoTabArray*" "tabs") - ) -) - -(define-method get_tabs - (of-object "GtkTextView") - (c-name "gtk_text_view_get_tabs") - (return-type "PangoTabArray*") -) - -(define-method get_default_attributes - (of-object "GtkTextView") - (c-name "gtk_text_view_get_default_attributes") - (return-type "GtkTextAttributes*") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktipsquery.h - -(define-function gtk_tips_query_get_type - (c-name "gtk_tips_query_get_type") - (return-type "GtkType") -) - -(define-function gtk_tips_query_new - (c-name "gtk_tips_query_new") - (is-constructor-of GtkTipsQuery) - (return-type "GtkWidget*") -) - -(define-method start_query - (of-object "GtkTipsQuery") - (c-name "gtk_tips_query_start_query") - (return-type "none") -) - -(define-method stop_query - (of-object "GtkTipsQuery") - (c-name "gtk_tips_query_stop_query") - (return-type "none") -) - -(define-method set_caller - (of-object "GtkTipsQuery") - (c-name "gtk_tips_query_set_caller") - (return-type "none") - (parameters - '("GtkWidget*" "caller") - ) -) - -(define-method set_labels - (of-object "GtkTipsQuery") - (c-name "gtk_tips_query_set_labels") - (return-type "none") - (parameters - '("const-gchar*" "label_inactive") - '("const-gchar*" "label_no_tip") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktogglebutton.h - -(define-function gtk_toggle_button_get_type - (c-name "gtk_toggle_button_get_type") - (return-type "GtkType") -) - -(define-function gtk_toggle_button_new - (c-name "gtk_toggle_button_new") - (is-constructor-of GtkToggleButton) - (return-type "GtkWidget*") -) - -(define-function gtk_toggle_button_new_with_label - (c-name "gtk_toggle_button_new_with_label") - (is-constructor-of GtkToggleButton) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-function gtk_toggle_button_new_with_mnemonic - (c-name "gtk_toggle_button_new_with_mnemonic") - (is-constructor-of GtkToggleButton) - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "label") - ) -) - -(define-method get_mode - (of-object "GtkToggleButton") - (c-name "gtk_toggle_button_get_mode") - (return-type "gboolean") -) - -(define-method set_mode - (of-object "GtkToggleButton") - (c-name "gtk_toggle_button_set_mode") - (return-type "none") - (parameters - '("gboolean" "draw_indicator") - ) -) - -(define-method set_active - (of-object "GtkToggleButton") - (c-name "gtk_toggle_button_set_active") - (return-type "none") - (parameters - '("gboolean" "is_active") - ) -) - -(define-method get_active - (of-object "GtkToggleButton") - (c-name "gtk_toggle_button_get_active") - (return-type "gboolean") -) - -(define-method toggled - (of-object "GtkToggleButton") - (c-name "gtk_toggle_button_toggled") - (return-type "none") -) - -(define-method set_inconsistent - (of-object "GtkToggleButton") - (c-name "gtk_toggle_button_set_inconsistent") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_inconsistent - (of-object "GtkToggleButton") - (c-name "gtk_toggle_button_get_inconsistent") - (return-type "gboolean") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktoolbar.h - -(define-function gtk_toolbar_get_type - (c-name "gtk_toolbar_get_type") - (return-type "GtkType") -) - -(define-function gtk_toolbar_new - (c-name "gtk_toolbar_new") - (is-constructor-of GtkToolbar) - (return-type "GtkWidget*") -) - -(define-method append_item - (of-object "GtkToolbar") - (c-name "gtk_toolbar_append_item") - (return-type "GtkWidget*") - (parameters - '("const-char*" "text") - '("const-char*" "tooltip_text") - '("const-char*" "tooltip_private_text") - '("GtkWidget*" "icon") - '("GtkSignalFunc" "callback") - '("gpointer" "user_data" (null-ok) (default "NULL")) - ) -) - -(define-method prepend_item - (of-object "GtkToolbar") - (c-name "gtk_toolbar_prepend_item") - (return-type "GtkWidget*") - (parameters - '("const-char*" "text") - '("const-char*" "tooltip_text") - '("const-char*" "tooltip_private_text") - '("GtkWidget*" "icon") - '("GtkSignalFunc" "callback") - '("gpointer" "user_data") - ) -) - -(define-method insert_item - (of-object "GtkToolbar") - (c-name "gtk_toolbar_insert_item") - (return-type "GtkWidget*") - (parameters - '("const-char*" "text") - '("const-char*" "tooltip_text") - '("const-char*" "tooltip_private_text") - '("GtkWidget*" "icon") - '("GtkSignalFunc" "callback") - '("gpointer" "user_data") - '("gint" "position") - ) -) - -(define-method insert_stock - (of-object "GtkToolbar") - (c-name "gtk_toolbar_insert_stock") - (return-type "GtkWidget*") - (parameters - '("const-gchar*" "stock_id") - '("const-char*" "tooltip_text") - '("const-char*" "tooltip_private_text") - '("GtkSignalFunc" "callback") - '("gpointer" "user_data") - '("gint" "position") - ) -) - -(define-method append_space - (of-object "GtkToolbar") - (c-name "gtk_toolbar_append_space") - (return-type "none") -) - -(define-method prepend_space - (of-object "GtkToolbar") - (c-name "gtk_toolbar_prepend_space") - (return-type "none") -) - -(define-method insert_space - (of-object "GtkToolbar") - (c-name "gtk_toolbar_insert_space") - (return-type "none") - (parameters - '("gint" "position") - ) -) - -(define-method remove_space - (of-object "GtkToolbar") - (c-name "gtk_toolbar_remove_space") - (return-type "none") - (parameters - '("gint" "position") - ) -) - -(define-method append_element - (of-object "GtkToolbar") - (c-name "gtk_toolbar_append_element") - (return-type "GtkWidget*") - (parameters - '("GtkToolbarChildType" "type") - '("GtkWidget*" "widget") - '("const-char*" "text") - '("const-char*" "tooltip_text") - '("const-char*" "tooltip_private_text") - '("GtkWidget*" "icon") - '("GtkSignalFunc" "callback") - '("gpointer" "user_data") - ) -) - -(define-method prepend_element - (of-object "GtkToolbar") - (c-name "gtk_toolbar_prepend_element") - (return-type "GtkWidget*") - (parameters - '("GtkToolbarChildType" "type") - '("GtkWidget*" "widget") - '("const-char*" "text") - '("const-char*" "tooltip_text") - '("const-char*" "tooltip_private_text") - '("GtkWidget*" "icon") - '("GtkSignalFunc" "callback") - '("gpointer" "user_data") - ) -) - -(define-method insert_element - (of-object "GtkToolbar") - (c-name "gtk_toolbar_insert_element") - (return-type "GtkWidget*") - (parameters - '("GtkToolbarChildType" "type") - '("GtkWidget*" "widget") - '("const-char*" "text") - '("const-char*" "tooltip_text") - '("const-char*" "tooltip_private_text") - '("GtkWidget*" "icon") - '("GtkSignalFunc" "callback") - '("gpointer" "user_data") - '("gint" "position") - ) -) - -(define-method append_widget - (of-object "GtkToolbar") - (c-name "gtk_toolbar_append_widget") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("const-char*" "tooltip_text" (null-ok)) - '("const-char*" "tooltip_private_text" (null-ok)) - ) -) - -(define-method prepend_widget - (of-object "GtkToolbar") - (c-name "gtk_toolbar_prepend_widget") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("const-char*" "tooltip_text" (null-ok)) - '("const-char*" "tooltip_private_text" (null-ok)) - ) -) - -(define-method insert_widget - (of-object "GtkToolbar") - (c-name "gtk_toolbar_insert_widget") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("const-char*" "tooltip_text" (null-ok)) - '("const-char*" "tooltip_private_text" (null-ok)) - '("gint" "position") - ) -) - -(define-method set_orientation - (of-object "GtkToolbar") - (c-name "gtk_toolbar_set_orientation") - (return-type "none") - (parameters - '("GtkOrientation" "orientation") - ) -) - -(define-method set_style - (of-object "GtkToolbar") - (c-name "gtk_toolbar_set_style") - (return-type "none") - (parameters - '("GtkToolbarStyle" "style") - ) -) - -(define-method set_icon_size - (of-object "GtkToolbar") - (c-name "gtk_toolbar_set_icon_size") - (return-type "none") - (parameters - '("GtkIconSize" "icon_size") - ) -) - -(define-method set_tooltips - (of-object "GtkToolbar") - (c-name "gtk_toolbar_set_tooltips") - (return-type "none") - (parameters - '("gint" "enable") - ) -) - -(define-method unset_style - (of-object "GtkToolbar") - (c-name "gtk_toolbar_unset_style") - (return-type "none") -) - -(define-method unset_icon_size - (of-object "GtkToolbar") - (c-name "gtk_toolbar_unset_icon_size") - (return-type "none") -) - -(define-method get_orientantion - (of-object "GtkToolbar") - (c-name "gtk_toolbar_get_orientation") - (return-type "GtkOrientation") -) - -(define-method get_style - (of-object "GtkToolbar") - (c-name "gtk_toolbar_get_style") - (return-type "GtkToolbarStyle") -) - -(define-method get_icon_size - (of-object "GtkToolbar") - (c-name "gtk_toolbar_get_icon_size") - (return-type "GtkIconSize") -) - -(define-method get_tooltips - (of-object "GtkToolbar") - (c-name "gtk_toolbar_get_tooltips") - (return-type "gboolean") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktooltips.h - -(define-function gtk_tooltips_get_type - (c-name "gtk_tooltips_get_type") - (return-type "GtkType") -) - -(define-function gtk_tooltips_new - (c-name "gtk_tooltips_new") - (is-constructor-of GtkTooltips) - (return-type "GtkTooltips*") -) - -(define-method enable - (of-object "GtkTooltips") - (c-name "gtk_tooltips_enable") - (return-type "none") -) - -(define-method disable - (of-object "GtkTooltips") - (c-name "gtk_tooltips_disable") - (return-type "none") -) - -(define-method set_delay - (of-object "GtkTooltips") - (c-name "gtk_tooltips_set_delay") - (return-type "none") - (parameters - '("guint" "delay") - ) -) - -(define-method set_tip - (of-object "GtkTooltips") - (c-name "gtk_tooltips_set_tip") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - '("const-gchar*" "tip_text") - '("const-gchar*" "tip_private") - ) -) - -(define-function gtk_tooltips_data_get - (c-name "gtk_tooltips_data_get") - (return-type "GtkTooltipsData*") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method force_window - (of-object "GtkTooltips") - (c-name "gtk_tooltips_force_window") - (return-type "none") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktreednd.h - -(define-function gtk_tree_drag_source_get_type - (c-name "gtk_tree_drag_source_get_type") - (return-type "GType") -) - -(define-method drag_data_delete - (of-object "GtkTreeDragSource") - (c-name "gtk_tree_drag_source_drag_data_delete") - (return-type "gboolean") - (parameters - '("GtkTreePath*" "path") - ) -) - -(define-method drag_data_get - (of-object "GtkTreeDragSource") - (c-name "gtk_tree_drag_source_drag_data_get") - (return-type "gboolean") - (parameters - '("GtkTreePath*" "path") - '("GtkSelectionData*" "selection_data") - ) -) - -(define-function gtk_tree_drag_dest_get_type - (c-name "gtk_tree_drag_dest_get_type") - (return-type "GType") -) - -(define-method drag_data_received - (of-object "GtkTreeDragDest") - (c-name "gtk_tree_drag_dest_drag_data_received") - (return-type "gboolean") - (parameters - '("GtkTreePath*" "dest") - '("GtkSelectionData*" "selection_data") - ) -) - -(define-method row_drop_possible - (of-object "GtkTreeDragDest") - (c-name "gtk_tree_drag_dest_row_drop_possible") - (return-type "gboolean") - (parameters - '("GtkTreeModel*" "src_model") - '("GtkTreePath*" "src_path") - '("GtkTreePath*" "dest_path") - ) -) - -(define-method set_tree_row - (of-object "GtkSelectionData") - (c-name "gtk_selection_data_set_tree_row") - (return-type "gboolean") - (parameters - '("GtkTreeModel*" "tree_model") - '("GtkTreePath*" "path") - ) -) - -(define-method get_tree_row - (of-object "GtkSelectionData") - (c-name "gtk_selection_data_get_tree_row") - (return-type "gboolean") - (parameters - '("GtkTreeModel**" "tree_model") - '("GtkTreePath**" "path") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktreemodel.h - -(define-function gtk_tree_model_get_type - (c-name "gtk_tree_model_get_type") - (return-type "GtkType") -) - -(define-function gtk_tree_path_new - (c-name "gtk_tree_path_new") - (return-type "GtkTreePath*") -) - -(define-function gtk_tree_path_new_from_string - (c-name "gtk_tree_path_new_from_string") - (return-type "GtkTreePath*") - (parameters - '("gchar*" "path") - ) -) - -(define-method to_string - (of-object "GtkTreePath") - (c-name "gtk_tree_path_to_string") - (return-type "gchar*") -) - -(define-function gtk_tree_path_new_root - (c-name "gtk_tree_path_new_root") - (return-type "GtkTreePath*") -) - -(define-method append_index - (of-object "GtkTreePath") - (c-name "gtk_tree_path_append_index") - (return-type "none") - (parameters - '("gint" "index") - ) -) - -(define-method prepend_index - (of-object "GtkTreePath") - (c-name "gtk_tree_path_prepend_index") - (return-type "none") - (parameters - '("gint" "index") - ) -) - -(define-method get_depth - (of-object "GtkTreePath") - (c-name "gtk_tree_path_get_depth") - (return-type "gint") -) - -(define-method get_indices - (of-object "GtkTreePath") - (c-name "gtk_tree_path_get_indices") - (return-type "gint*") -) - -(define-method free - (of-object "GtkTreePath") - (c-name "gtk_tree_path_free") - (return-type "none") -) - -(define-method copy - (of-object "GtkTreePath") - (c-name "gtk_tree_path_copy") - (return-type "GtkTreePath*") -) - -(define-method compare - (of-object "GtkTreePath") - (c-name "gtk_tree_path_compare") - (return-type "gint") - (parameters - '("const-GtkTreePath*" "b") - ) -) - -(define-method next - (of-object "GtkTreePath") - (c-name "gtk_tree_path_next") - (return-type "none") -) - -(define-method prev - (of-object "GtkTreePath") - (c-name "gtk_tree_path_prev") - (return-type "gint") -) - -(define-method up - (of-object "GtkTreePath") - (c-name "gtk_tree_path_up") - (return-type "gint") -) - -(define-method down - (of-object "GtkTreePath") - (c-name "gtk_tree_path_down") - (return-type "none") -) - -(define-method is_ancestor - (of-object "GtkTreePath") - (c-name "gtk_tree_path_is_ancestor") - (return-type "gboolean") - (parameters - '("GtkTreePath*" "descendant") - ) -) - -(define-method is_descendant - (of-object "GtkTreePath") - (c-name "gtk_tree_path_is_descendant") - (return-type "gboolean") - (parameters - '("GtkTreePath*" "ancestor") - ) -) - -(define-function gtk_tree_row_reference_new - (c-name "gtk_tree_row_reference_new") - (is-constructor-of GtkTreeRowReference) - (return-type "GtkTreeRowReference*") - (parameters - '("GtkTreeModel*" "model") - '("GtkTreePath*" "path") - ) -) - -(define-function gtk_tree_row_reference_new_proxy - (c-name "gtk_tree_row_reference_new_proxy") - (is-constructor-of GtkTreeRowReference) - (return-type "GtkTreeRowReference*") - (parameters - '("GObject*" "proxy") - '("GtkTreeModel*" "model") - '("GtkTreePath*" "path") - ) -) - -(define-method get_path - (of-object "GtkTreeRowReference") - (c-name "gtk_tree_row_reference_get_path") - (return-type "GtkTreePath*") -) - -(define-method free - (of-object "GtkTreeRowReference") - (c-name "gtk_tree_row_reference_free") - (return-type "none") -) - -(define-function tree_row_reference_inserted - (c-name "gtk_tree_row_reference_inserted") - (return-type "none") - (parameters - '("GObject*" "proxy") - '("GtkTreePath*" "path") - ) -) - -(define-function tree_row_reference_deleted - (c-name "gtk_tree_row_reference_deleted") - (return-type "none") - (parameters - '("GObject*" "proxy") - '("GtkTreePath*" "path") - ) -) - -(define-function gtk_tree_row_reference_reordered - (c-name "gtk_tree_row_reference_reordered") - (return-type "none") - (parameters - '("GObject*" "proxy") - '("GtkTreePath*" "path") - '("GtkTreeIter*" "iter") - '("gint*" "new_order") - ) -) - -(define-function gtk_tree_model_get_type - (c-name "gtk_tree_model_get_type") - (return-type "GtkType") -) - -(define-method get_flags - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_get_flags") - (return-type "GtkTreeModelFlags") -) - -(define-method get_n_columns - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_get_n_columns") - (return-type "gint") -) - -(define-method get_column_type - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_get_column_type") - (return-type "GType") - (parameters - '("gint" "index") - ) -) - -(define-method get_iter - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_get_iter") - (return-type "gboolean") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreePath*" "path") - ) -) - -(define-method get_iter_root - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_get_iter_root") - (return-type "gboolean") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method get_path - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_get_path") - (return-type "GtkTreePath*") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method get_value - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_get_value") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("gint" "column") - '("GValue*" "value") - ) -) - -(define-method iter_next - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_iter_next") - (return-type "gboolean") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method iter_children - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_iter_children") - (return-type "gboolean") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "parent") - ) -) - -(define-method iter_has_child - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_iter_has_child") - (return-type "gboolean") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method iter_n_children - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_iter_n_children") - (return-type "gint") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method iter_nth_child - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_iter_nth_child") - (return-type "gboolean") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "parent") - '("gint" "n") - ) -) - -(define-method iter_parent - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_iter_parent") - (return-type "gboolean") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "child") - ) -) - -(define-method ref_node - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_ref_node") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method unref_node - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_unref_node") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method get - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_get") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) - (varargs #t) -) - -(define-method get_valist - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_get_valist") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("va_list" "var_args") - ) -) - -(define-method row_changed - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_row_changed") - (return-type "none") - (parameters - '("GtkTreePath*" "start_path") - '("GtkTreeIter*" "start_iter") - ) -) - -(define-method row_inserted - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_row_inserted") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("GtkTreeIter*" "iter") - ) -) - -(define-method row_has_child_toggled - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_row_has_child_toggled") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("GtkTreeIter*" "iter") - ) -) - -(define-method row_deleted - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_row_deleted") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - ) -) - -(define-method rows_reordered - (of-object "GtkTreeModel") - (c-name "gtk_tree_model_rows_reordered") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("GtkTreeIter*" "iter") - '("gint*" "new_order") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktreemodelsort.h - -(define-function gtk_tree_model_sort_get_type - (c-name "gtk_tree_model_sort_get_type") - (return-type "GtkType") -) - -(define-function gtk_tree_model_sort_new - (c-name "gtk_tree_model_sort_new") - (is-constructor-of GtkTreeModel) - (return-type "GtkTreeModel*") -) - -(define-function gtk_tree_model_sort_new_with_model - (c-name "gtk_tree_model_sort_new_with_model") - (is-constructor-of GtkTreeModel) - (return-type "GtkTreeModel*") - (parameters - '("GValueCompareFunc" "func") - '("gint" "sort_col") - ) -) - -(define-method set_model - (of-object "GtkTreeModelSort") - (c-name "gtk_tree_model_sort_set_model") - (return-type "none") - (parameters - '("GtkTreeModel*" "child_model") - ) -) - -(define-method get_model - (of-object "GtkTreeModelSort") - (c-name "gtk_tree_model_sort_get_model") - (return-type "GtkTreeModel*") -) - -(define-method convert_path - (of-object "GtkTreeModelSort") - (c-name "gtk_tree_model_sort_convert_path") - (return-type "GtkTreePath*") - (parameters - '("GtkTreePath*" "child_path") - ) -) - -; (method convert_iter -; (of-object TreeModelSort (Gtk)) -; (c-name gtk_tree_model_sort_convert_iter) -; (return-type none) -; (parameter (type-and-name GtkTreeIter* sort_iter)) -; (parameter (type-and-name GtkTreeIter* child_iter)) -; ) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktreeselection.h - -(define-function gtk_tree_selection_get_type - (c-name "gtk_tree_selection_get_type") - (return-type "GtkType") -) - -(define-method set_mode - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_set_mode") - (return-type "none") - (parameters - '("GtkSelectionMode" "type") - ) -) - -#(define-method set_select_function -# (of-object "GtkTreeSelection") -# (c-name "gtk_tree_selection_set_select_function") -# (return-type "none") -# (parameters -# '("GtkSelectionFunc" "func") -# '("gpointer" "data") -# ) -#) - -(define-method get_user_data - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_get_user_data") - (return-type "gpointer") -) - -(define-method get_selected - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_get_selected") - (return-type "gboolean") - (parameters - '("GtkTreeModel**" "model") - '("GtkTreeIter*" "iter") - ) -) - -#(define-method selected_foreach -# (of-object "GtkTreeSelection") -# (c-name "gtk_tree_selection_selected_foreach") -# (return-type "none") -# (parameters -# '("GtkTreeSelectionForeachFunc" "func") -# '("gpointer" "data") -# ) -#) - -(define-method select_path - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_select_path") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - ) -) - -(define-method unselect_path - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_unselect_path") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - ) -) - -(define-method select_iter - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_select_iter") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method unselect_iter - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_unselect_iter") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method select_all - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_select_all") - (return-type "none") -) - -(define-method unselect_all - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_unselect_all") - (return-type "none") -) - -(define-method select_range - (of-object "GtkTreeSelection") - (c-name "gtk_tree_selection_select_range") - (return-type "none") - (parameters - '("GtkTreePath*" "start_path") - '("GtkTreePath*" "end_path") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktreesortable.h - -(define-function gtk_tree_sortable_get_type - (c-name "gtk_tree_sortable_get_type") - (return-type "GType") -) - -(define-method sort_column_changed - (of-object "GtkTreeSortable") - (c-name "gtk_tree_sortable_sort_column_changed") - (return-type "none") -) - -(define-method get_sort_column_id - (of-object "GtkTreeSortable") - (c-name "gtk_tree_sortable_get_sort_column_id") - (return-type "gboolean") - (parameters - '("gint*" "sort_column_id") - '("GtkSortType*" "order") - ) -) - -(define-method set_sort_column_id - (of-object "GtkTreeSortable") - (c-name "gtk_tree_sortable_set_sort_column_id") - (return-type "none") - (parameters - '("gint" "sort_column_id") - '("GtkSortType" "order") - ) -) - -(define-method sort_column_id_set_func - (of-object "GtkTreeSortable") - (c-name "gtk_tree_sortable_sort_column_id_set_func") - (return-type "none") - (parameters - '("gint" "sort_column_id") - '("GtkTreeIterCompareFunc" "func") - '("gpointer" "data") - '("GtkDestroyNotify" "destroy") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktreestore.h - -(define-function gtk_tree_store_get_type - (c-name "gtk_tree_store_get_type") - (return-type "GtkType") -) - -(define-function gtk_tree_store_new - (c-name "gtk_tree_store_new") - (is-constructor-of GtkTreeStore) - (return-type "GtkTreeStore*") -) - -(define-method set_value - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_set_value") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("gint" "column") - '("GValue*" "value") - ) -) - -(define-method set - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_set") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) - (varargs #t) -) - -(define-method set_valist - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_setv") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("va_list" "var_args") - ) -) - -(define-method remove - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_remove") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - ) -) - -(define-method insert - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_insert") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "parent") - '("gint" "position") - ) -) - -(define-method insert_before - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_insert_before") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "parent") - '("GtkTreeIter*" "sibling") - ) -) - -(define-method insert_after - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_insert_after") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "parent") - '("GtkTreeIter*" "sibling") - ) -) - -(define-method prepend - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_prepend") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "parent") - ) -) - -(define-method append - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_append") - (return-type "none") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "parent") - ) -) - -(define-method is_ancestor - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_is_ancestor") - (return-type "gboolean") - (parameters - '("GtkTreeIter*" "iter") - '("GtkTreeIter*" "descendant") - ) -) - -(define-method iter_depth - (of-object "GtkTreeStore") - (c-name "gtk_tree_store_iter_depth") - (return-type "gint") - (parameters - '("GtkTreeIter*" "iter") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktreeview.h - -(define-function gtk_tree_view_get_type - (c-name "gtk_tree_view_get_type") - (return-type "GtkType") -) - -(define-function gtk_tree_view_new - (c-name "gtk_tree_view_new") - (is-constructor-of GtkTreeView) - (return-type "GtkWidget*") -) - -(define-function gtk_tree_view_new_with_model - (c-name "gtk_tree_view_new_with_model") - (is-constructor-of GtkTreeView) - (return-type "GtkWidget*") - (parameters - '("GtkTreeModel*" "model" (null-ok) (default "NULL")) - ) -) - -(define-method get_model - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_model") - (return-type "GtkTreeModel*") -) - -(define-method set_model - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_model") - (return-type "none") - (parameters - '("GtkTreeModel*" "model" (null-ok) (default "NULL")) - ) -) - -(define-method get_selection - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_selection") - (return-type "GtkTreeSelection*") -) - -(define-method get_hadjustment - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_hadjustment") - (return-type "GtkAdjustment*") -) - -(define-method set_hadjustment - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_hadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment") - ) -) - -(define-method get_vadjustment - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_vadjustment") - (return-type "GtkAdjustment*") -) - -(define-method set_vadjustment - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_vadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment") - ) -) - -(define-method get_headers_visible - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_headers_visible") - (return-type "gboolean") -) - -(define-method set_headers_visible - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_headers_visible") - (return-type "none") - (parameters - '("gboolean" "headers_visible") - ) -) - -(define-method columns_autosize - (of-object "GtkTreeView") - (c-name "gtk_tree_view_columns_autosize") - (return-type "none") -) - -(define-method set_headers_clickable - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_headers_clickable") - (return-type "none") - (parameters - '("gboolean" "active") - ) -) - -(define-method set_rules_hint - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_rules_hint") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_rules_hint - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_rules_hint") - (return-type "gboolean") -) - -(define-method append_column - (of-object "GtkTreeView") - (c-name "gtk_tree_view_append_column") - (return-type "gint") - (parameters - '("GtkTreeViewColumn*" "column") - ) -) - -(define-method remove_column - (of-object "GtkTreeView") - (c-name "gtk_tree_view_remove_column") - (return-type "gint") - (parameters - '("GtkTreeViewColumn*" "column") - ) -) - -(define-method insert_column - (of-object "GtkTreeView") - (c-name "gtk_tree_view_insert_column") - (return-type "gint") - (parameters - '("GtkTreeViewColumn*" "column") - '("gint" "position") - ) -) - -(define-method insert_column_with_attributes - (of-object "GtkTreeView") - (c-name "gtk_tree_view_insert_column_with_attributes") - (return-type "gint") - (parameters - '("gint" "position") - '("gchar*" "title") - '("GtkCellRenderer*" "cell") - ) - (varargs #t) -) - -#(define-method insert_column_with_data_func -# (of-object "GtkTreeView") -# (c-name "gtk_tree_view_insert_column_with_data_func") -# (return-type "gint") -# (parameters -# '("gint" "position") -# '("gchar*" "title") -# '("GtkCellRenderer*" "cell") -# '("GtkTreeCellDataFunc" "func") -# '("gpointer" "data") -# '("GDestroyNotify" "dnotify") -# ) -#) - -(define-method get_column - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_column") - (return-type "GtkTreeViewColumn*") - (parameters - '("gint" "n") - ) -) - -(define-method set_expander_column - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_expander_column") - (return-type "none") - (parameters - '("GtkTreeViewColumn*" "column") - ) -) - -(define-method get_expander_column - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_expander_column") - (return-type "GtkTreeViewColumn*") -) - -#(define-method set_column_drag_function -# (of-object "GtkTreeView") -# (c-name "gtk_tree_view_set_column_drag_function") -# (return-type "void") -# (parameters -# '("GtkTreeViewColumnDropFunc" "func") -# '("gpointer" "user_data") -# '("GDestroyNotify" "dnotify") -# ) -#) - -(define-method scroll_to_point - (of-object "GtkTreeView") - (c-name "gtk_tree_view_scroll_to_point") - (return-type "none") - (parameters - '("gint" "tree_x") - '("gint" "tree_y") - ) -) - -(define-method scroll_to_cell - (of-object "GtkTreeView") - (c-name "gtk_tree_view_scroll_to_cell") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("GtkTreeViewColumn*" "column") - '("gboolean" "use_align") - '("gfloat" "row_align") - '("gfloat" "col_align") - ) -) - -(define-method row_activated - (of-object "GtkTreeView") - (c-name "gtk_tree_view_row_activated") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("GtkTreeViewColumn*" "column") - ) -) - -(define-method expand_all - (of-object "GtkTreeView") - (c-name "gtk_tree_view_expand_all") - (return-type "none") -) - -(define-method collapse_all - (of-object "GtkTreeView") - (c-name "gtk_tree_view_collapse_all") - (return-type "none") -) - -(define-method expand_row - (of-object "GtkTreeView") - (c-name "gtk_tree_view_expand_row") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("gboolean" "open_all") - ) -) - -(define-method collapse_row - (of-object "GtkTreeView") - (c-name "gtk_tree_view_collapse_row") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - ) -) - -#(define-method expand_rows -# (of-object "GtkTreeView") -# (c-name "gtk_tree_view_expand_rows") -# (return-type "none") -# (parameters -# '("GtkTreeViewMappingFunc" "func") -# '("gpointer" "data") -# ) -#) - -(define-method set_reorderable - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_reorderable") - (return-type "none") - (parameters - '("gboolean" "reorderable") - ) -) - -(define-method set_cursor - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_cursor") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("GtkTreeViewColumn*" "focus_column") - '("gboolean" "start_editing") - ) -) - -(define-method get_path_at_pos - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_path_at_pos") - (return-type "gboolean") - (parameters - '("GdkWindow*" "window") - '("gint" "x") - '("gint" "y") - '("GtkTreePath**" "path") - '("GtkTreeViewColumn**" "column") - '("gint*" "cell_x") - '("gint*" "cell_y") - ) -) - -(define-method get_cell_area - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_cell_area") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("GtkTreeViewColumn*" "column") - '("GdkRectangle*" "rect") - ) -) - -(define-method get_background_area - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_background_area") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("GtkTreeViewColumn*" "column") - '("GdkRectangle*" "rect") - ) -) - -(define-method get_visible_rect - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_visible_rect") - (return-type "none") - (parameters - '("GdkRectangle*" "visible_rect") - ) -) - -(define-method widget_to_tree_coords - (of-object "GtkTreeView") - (c-name "gtk_tree_view_widget_to_tree_coords") - (return-type "none") - (parameters - '("gint" "wx") - '("gint" "wy") - '("gint*" "tx") - '("gint*" "ty") - ) -) - -(define-method tree_to_widget_coords - (of-object "GtkTreeView") - (c-name "gtk_tree_view_tree_to_widget_coords") - (return-type "none") - (parameters - '("gint" "tx") - '("gint" "ty") - '("gint*" "wx") - '("gint*" "wy") - ) -) - -#(define-method set_rows_drag_source -# (of-object "GtkTreeView") -# (c-name "gtk_tree_view_set_rows_drag_source") -# (return-type "none") -# (parameters -# '("GdkModifierType" "start_button_mask") -# '("const-GtkTargetEntry*" "targets") -# '("gint" "n_targets") -# '("GdkDragAction" "actions") -# '("GtkTreeViewDraggableFunc" "row_draggable_func") -# '("gpointer" "user_data") -# ) -#) - -#(define-method set_rows_drag_dest -# (of-object "GtkTreeView") -# (c-name "gtk_tree_view_set_rows_drag_dest") -# (return-type "none") -# (parameters -# '("const-GtkTargetEntry*" "targets") -# '("gint" "n_targets") -# '("GdkDragAction" "actions") -# '("GtkTreeViewDroppableFunc" "location_droppable_func") -# '("gpointer" "user_data") -# ) -#) - -(define-method unset_rows_drag_source - (of-object "GtkTreeView") - (c-name "gtk_tree_view_unset_rows_drag_source") - (return-type "none") -) - -(define-method unset_rows_drag_dest - (of-object "GtkTreeView") - (c-name "gtk_tree_view_unset_rows_drag_dest") - (return-type "none") -) - -(define-method set_drag_dest_row - (of-object "GtkTreeView") - (c-name "gtk_tree_view_set_drag_dest_row") - (return-type "none") - (parameters - '("GtkTreePath*" "path") - '("GtkTreeViewDropPosition" "pos") - ) -) - -(define-method get_drag_dest_row - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_drag_dest_row") - (return-type "none") - (parameters - '("GtkTreePath**" "path") - '("GtkTreeViewDropPosition*" "pos") - ) -) - -(define-method get_dest_row_at_pos - (of-object "GtkTreeView") - (c-name "gtk_tree_view_get_dest_row_at_pos") - (return-type "gboolean") - (parameters - '("gint" "drag_x") - '("gint" "drag_y") - '("GtkTreePath**" "path") - '("GtkTreeViewDropPosition*" "pos") - ) -) - -(define-method create_row_drag_icon - (of-object "GtkTreeView") - (c-name "gtk_tree_view_create_row_drag_icon") - (return-type "GdkPixmap*") - (parameters - '("GtkTreePath*" "path") - ) -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktreeviewcolumn.h - -(define-function gtk_tree_view_column_get_type - (c-name "gtk_tree_view_column_get_type") - (return-type "GtkType") -) - -(define-function gtk_tree_view_column_new - (c-name "gtk_tree_view_column_new") - (is-constructor-of GtkTreeViewColumn) - (return-type "GtkObject*") -) - -(define-function gtk_tree_view_column_new_with_attributes - (c-name "gtk_tree_view_column_new_with_attributes") - (is-constructor-of GtkTreeViewColumn) - (return-type "GtkObject*") - (parameters - '("gchar*" "title") - '("GtkCellRenderer*" "cell") - ) - (varargs #t) -) - -(define-method pack_start - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_pack_start") - (return-type "none") - (parameters - '("GtkCellRenderer*" "cell") - '("gboolean" "expand") - ) -) - -(define-method pack_end - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_pack_end") - (return-type "none") - (parameters - '("GtkCellRenderer*" "cell") - '("gboolean" "expand") - ) -) - -(define-method clear - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_clear") - (return-type "none") -) - -(define-method get_cell_renderers - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_cell_renderers") - (return-type "GList*") -) - -(define-method add_attribute - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_add_attribute") - (return-type "none") - (parameters - '("GtkCellRenderer*" "cell_renderer") - '("gchar*" "attribute") - '("gint" "column") - ) -) - -(define-method set_attributes - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_attributes") - (return-type "none") - (parameters - '("GtkCellRenderer*" "cell_renderer") - ) - (varargs #t) -) - -#(define-method set_cell_data_func -# (of-object "GtkTreeViewColumn") -# (c-name "gtk_tree_view_column_set_cell_data_func") -# (return-type "none") -# (parameters -# '("GtkCellRenderer*" "cell_renderer") -# '("GtkCellDataFunc" "func") -# '("gpointer" "func_data") -# '("GtkDestroyNotify" "destroy") -# ) -#) - -(define-method clear_attributes - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_clear_attributes") - (return-type "none") - (parameters - '("GtkCellRenderer*" "cell_renderer") - ) -) - -(define-method set_visible - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_visible") - (return-type "none") - (parameters - '("gboolean" "visible") - ) -) - -(define-method get_visible - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_visible") - (return-type "gboolean") -) - -(define-method set_sizing - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_sizing") - (return-type "none") - (parameters - '("GtkTreeViewColumnSizing" "type") - ) -) - -(define-method get_sizing - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_sizing") - (return-type "gint") -) - -(define-method get_width - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_width") - (return-type "gint") -) - -(define-method get_fixed_width - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_fixed_width") - (return-type "gint") -) - -(define-method set_fixed_width - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_fixed_width") - (return-type "none") - (parameters - '("gint" "fixed_width") - ) -) - -(define-method set_min_width - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_min_width") - (return-type "none") - (parameters - '("gint" "min_width") - ) -) - -(define-method get_min_width - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_min_width") - (return-type "gint") -) - -(define-method set_max_width - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_max_width") - (return-type "none") - (parameters - '("gint" "max_width") - ) -) - -(define-method get_max_width - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_max_width") - (return-type "gint") -) - -(define-method clicked - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_clicked") - (return-type "none") -) - -(define-method set_title - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_title") - (return-type "none") - (parameters - '("gchar*" "title") - ) -) - -(define-method get_title - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_title") - (return-type "const-gchar*") -) - -(define-method set_clickable - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_clickable") - (return-type "none") - (parameters - '("gboolean" "active") - ) -) - -(define-method set_widget - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_widget") - (return-type "none") - (parameters - '("GtkWidget*" "widget") - ) -) - -(define-method get_widget - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_widget") - (return-type "GtkWidget*") -) - -(define-method set_alignment - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_alignment") - (return-type "none") - (parameters - '("gfloat" "xalign") - ) -) - -(define-method get_alignment - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_alignment") - (return-type "gfloat") -) - -(define-method set_reorderable - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_reorderable") - (return-type "none") - (parameters - '("gboolean" "reorderable") - ) -) - -(define-method get_reorderable - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_reorderable") - (return-type "gboolean") -) - -(define-method set_sort_column_id - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_sort_column_id") - (return-type "none") - (parameters - '("gint" "sort_column_id") - ) -) - -(define-method set_sort_indicator - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_sort_indicator") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_sort_indicator - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_sort_indicator") - (return-type "gboolean") -) - -(define-method set_sort_order - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_set_sort_order") - (return-type "none") - (parameters - '("GtkSortType" "order") - ) -) - -(define-method get_sort_order - (of-object "GtkTreeViewColumn") - (c-name "gtk_tree_view_column_get_sort_order") - (return-type "GtkSortType") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtktypeutils.h - - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkvbbox.h - -(define-function gtk_vbutton_box_get_type - (c-name "gtk_vbutton_box_get_type") - (return-type "GtkType") -) - -(define-function gtk_vbutton_box_new - (c-name "gtk_vbutton_box_new") - (is-constructor-of GtkVButtonBox) - (return-type "GtkWidget*") -) - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkvbox.h - -(define-function gtk_vbox_get_type - (c-name "gtk_vbox_get_type") - (return-type "GtkType") -) - -(define-function gtk_vbox_new - (c-name "gtk_vbox_new") - (is-constructor-of GtkVBox) - (return-type "GtkWidget*") - (parameters - '("gboolean" "homogeneous" (default "FALSE")) - '("gint" "spacing" (default "0")) - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkviewport.h - -(define-function gtk_viewport_get_type - (c-name "gtk_viewport_get_type") - (return-type "GtkType") -) - -(define-function gtk_viewport_new - (c-name "gtk_viewport_new") - (is-constructor-of GtkViewport) - (return-type "GtkWidget*") - (parameters - '("GtkAdjustment*" "hadjustment" (null-ok) (default "NULL")) - '("GtkAdjustment*" "vadjustment" (null-ok) (default "NULL")) - ) -) - -(define-method get_hadjustment - (of-object "GtkViewport") - (c-name "gtk_viewport_get_hadjustment") - (return-type "GtkAdjustment*") -) - -(define-method get_vadjustment - (of-object "GtkViewport") - (c-name "gtk_viewport_get_vadjustment") - (return-type "GtkAdjustment*") -) - -(define-method set_hadjustment - (of-object "GtkViewport") - (c-name "gtk_viewport_set_hadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok)) - ) -) - -(define-method set_vadjustment - (of-object "GtkViewport") - (c-name "gtk_viewport_set_vadjustment") - (return-type "none") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok)) - ) -) - -(define-method set_shadow_type - (of-object "GtkViewport") - (c-name "gtk_viewport_set_shadow_type") - (return-type "none") - (parameters - '("GtkShadowType" "type") - ) -) - -(define-method get_shadow_type - (of-object "GtkViewport") - (c-name "gtk_viewport_get_shadow_type") - (return-type "GtkShadowType") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkvpaned.h - -(define-function gtk_vpaned_get_type - (c-name "gtk_vpaned_get_type") - (return-type "GtkType") -) - -(define-function gtk_vpaned_new - (c-name "gtk_vpaned_new") - (is-constructor-of GtkVPaned) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkvruler.h - -(define-function gtk_vruler_get_type - (c-name "gtk_vruler_get_type") - (return-type "GtkType") -) - -(define-function gtk_vruler_new - (c-name "gtk_vruler_new") - (is-constructor-of GtkVRuler) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkvscale.h - -(define-function gtk_vscale_get_type - (c-name "gtk_vscale_get_type") - (return-type "GtkType") -) - -(define-function gtk_vscale_new - (c-name "gtk_vscale_new") - (is-constructor-of GtkVScale) - (return-type "GtkWidget*") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok) (default "NULL")) - ) -) - -(define-function gtk_vscale_new_with_range - (c-name "gtk_vscale_new_with_range") - (is-constructor-of GtkVScale) - (return-type "GtkWidget*") - (parameters - '("gdouble" "min") - '("gdouble" "max") - '("gdouble" "step") - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkvscrollbar.h - -(define-function gtk_vscrollbar_get_type - (c-name "gtk_vscrollbar_get_type") - (return-type "GtkType") -) - -(define-function gtk_vscrollbar_new - (c-name "gtk_vscrollbar_new") - (is-constructor-of GtkVScrollbar) - (return-type "GtkWidget*") - (parameters - '("GtkAdjustment*" "adjustment" (null-ok) (default "NULL")) - ) -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkvseparator.h - -(define-function gtk_vseparator_get_type - (c-name "gtk_vseparator_get_type") - (return-type "GtkType") -) - -(define-function gtk_vseparator_new - (c-name "gtk_vseparator_new") - (is-constructor-of GtkVSeparator) - (return-type "GtkWidget*") -) - - - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkwidget.h - -(define-function gtk_widget_get_type - (c-name "gtk_widget_get_type") - (return-type "GtkType") -) - -(define-function gtk_widget_new - (c-name "gtk_widget_new") - (is-constructor-of GtkWidget) - (return-type "GtkWidget*") - (parameters - '("GtkType" "type") - '("const-gchar*" "first_arg_name") - ) - (varargs #t) -) - -(define-method ref - (of-object "GtkWidget") - (c-name "gtk_widget_ref") - (return-type "GtkWidget*") -) - -(define-method unref - (of-object "GtkWidget") - (c-name "gtk_widget_unref") - (return-type "none") -) - -(define-method destroy - (of-object "GtkWidget") - (c-name "gtk_widget_destroy") - (return-type "none") -) - -(define-method destroyed - (of-object "GtkWidget") - (c-name "gtk_widget_destroyed") - (return-type "none") - (parameters - '("GtkWidget**" "widget_pointer") - ) -) - -(define-method set - (of-object "GtkWidget") - (c-name "gtk_widget_set") - (return-type "none") - (parameters - '("const-gchar*" "first_arg_name") - ) - (varargs #t) -) - -(define-method unparent - (of-object "GtkWidget") - (c-name "gtk_widget_unparent") - (return-type "none") -) - -(define-method show - (of-object "GtkWidget") - (c-name "gtk_widget_show") - (return-type "none") -) - -(define-method show_now - (of-object "GtkWidget") - (c-name "gtk_widget_show_now") - (return-type "none") -) - -(define-method hide - (of-object "GtkWidget") - (c-name "gtk_widget_hide") - (return-type "none") -) - -(define-method show_all - (of-object "GtkWidget") - (c-name "gtk_widget_show_all") - (return-type "none") -) - -(define-method hide_all - (of-object "GtkWidget") - (c-name "gtk_widget_hide_all") - (return-type "none") -) - -(define-method map - (of-object "GtkWidget") - (c-name "gtk_widget_map") - (return-type "none") -) - -(define-method unmap - (of-object "GtkWidget") - (c-name "gtk_widget_unmap") - (return-type "none") -) - -(define-method realize - (of-object "GtkWidget") - (c-name "gtk_widget_realize") - (return-type "none") -) - -(define-method unrealize - (of-object "GtkWidget") - (c-name "gtk_widget_unrealize") - (return-type "none") -) - -(define-method queue_draw - (of-object "GtkWidget") - (c-name "gtk_widget_queue_draw") - (return-type "none") -) - -(define-method queue_draw_area - (of-object "GtkWidget") - (c-name "gtk_widget_queue_draw_area") - (return-type "none") - (parameters - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method queue_clear - (of-object "GtkWidget") - (c-name "gtk_widget_queue_clear") - (return-type "none") -) - -(define-method queue_clear_area - (of-object "GtkWidget") - (c-name "gtk_widget_queue_clear_area") - (return-type "none") - (parameters - '("gint" "x") - '("gint" "y") - '("gint" "width") - '("gint" "height") - ) -) - -(define-method queue_resize - (of-object "GtkWidget") - (c-name "gtk_widget_queue_resize") - (return-type "none") -) - -(define-method draw - (of-object "GtkWidget") - (c-name "gtk_widget_draw") - (return-type "none") - (parameters - '("GdkRectangle*" "area") - ) -) - -(define-method size_request - (of-object "GtkWidget") - (c-name "gtk_widget_size_request") - (return-type "none") - (parameters - '("GtkRequisition*" "requisition") - ) -) - -(define-method size_allocate - (of-object "GtkWidget") - (c-name "gtk_widget_size_allocate") - (return-type "none") - (parameters - '("GtkAllocation*" "allocation") - ) -) - -(define-method get_child_requisition - (of-object "GtkWidget") - (c-name "gtk_widget_get_child_requisition") - (return-type "none") - (parameters - '("GtkRequisition*" "requisition") - ) -) - -(define-method add_accelerator - (of-object "GtkWidget") - (c-name "gtk_widget_add_accelerator") - (return-type "none") - (parameters - '("const-gchar*" "accel_signal") - '("GtkAccelGroup*" "accel_group") - '("guint" "accel_key") - '("guint" "accel_mods") - '("GtkAccelFlags" "accel_flags") - ) -) - -(define-method remove_accelerator - (of-object "GtkWidget") - (c-name "gtk_widget_remove_accelerator") - (return-type "none") - (parameters - '("GtkAccelGroup*" "accel_group") - '("guint" "accel_key") - '("guint" "accel_mods") - ) -) - -(define-method remove_accelerators - (of-object "GtkWidget") - (c-name "gtk_widget_remove_accelerators") - (return-type "none") - (parameters - '("const-gchar*" "accel_signal") - '("gboolean" "visible_only") - ) -) - -(define-method accelerator_signal - (of-object "GtkWidget") - (c-name "gtk_widget_accelerator_signal") - (return-type "guint") - (parameters - '("GtkAccelGroup*" "accel_group") - '("guint" "accel_key") - '("guint" "accel_mods") - ) -) - -(define-method lock_accelerators - (of-object "GtkWidget") - (c-name "gtk_widget_lock_accelerators") - (return-type "none") -) - -(define-method unlock_accelerators - (of-object "GtkWidget") - (c-name "gtk_widget_unlock_accelerators") - (return-type "none") -) - -(define-method accelerators_locked - (of-object "GtkWidget") - (c-name "gtk_widget_accelerators_locked") - (return-type "gboolean") -) - -(define-method mnemonic_activate - (of-object "GtkWidget") - (c-name "gtk_widget_mnemonic_activate") - (return-type "gboolean") - (parameters - '("gboolean" "group_cycling") - ) -) - -(define-method event - (of-object "GtkWidget") - (c-name "gtk_widget_event") - (return-type "gint") - (parameters - '("GdkEvent*" "event") - ) -) - -(define-method send_expose - (of-object "GtkWidget") - (c-name "gtk_widget_send_expose") - (return-type "gint") - (parameters - '("GdkEvent*" "event") - ) -) - -(define-method activate - (of-object "GtkWidget") - (c-name "gtk_widget_activate") - (return-type "gboolean") -) - -(define-method set_scroll_adjustments - (of-object "GtkWidget") - (c-name "gtk_widget_set_scroll_adjustments") - (return-type "gboolean") - (parameters - '("GtkAdjustment*" "hadjustment" (null-ok)) - '("GtkAdjustment*" "vadjustment" (null-ok)) - ) -) - -(define-method reparent - (of-object "GtkWidget") - (c-name "gtk_widget_reparent") - (return-type "none") - (parameters - '("GtkWidget*" "new_parent") - ) -) - -(define-method intersect - (of-object "GtkWidget") - (c-name "gtk_widget_intersect") - (return-type "gint") - (parameters - '("GdkRectangle*" "area") - '("GdkRectangle*" "intersection") - ) -) - -(define-method region_intersect - (of-object "GtkWidget") - (c-name "gtk_widget_region_intersect") - (return-type "GdkRegion*") - (parameters - '("GdkRegion*" "region") - ) -) - -(define-method is_focus - (of-object "GtkWidget") - (c-name "gtk_widget_is_focus") - (return-type "gboolean") -) - -(define-method grab_focus - (of-object "GtkWidget") - (c-name "gtk_widget_grab_focus") - (return-type "none") -) - -(define-method grab_default - (of-object "GtkWidget") - (c-name "gtk_widget_grab_default") - (return-type "none") -) - -(define-method set_name - (of-object "GtkWidget") - (c-name "gtk_widget_set_name") - (return-type "none") - (parameters - '("const-gchar*" "name") - ) -) - -(define-method get_name - (of-object "GtkWidget") - (c-name "gtk_widget_get_name") - (return-type "const-gchar*") -) - -(define-method set_state - (of-object "GtkWidget") - (c-name "gtk_widget_set_state") - (return-type "none") - (parameters - '("GtkStateType" "state") - ) -) - -(define-method set_sensitive - (of-object "GtkWidget") - (c-name "gtk_widget_set_sensitive") - (return-type "none") - (parameters - '("gboolean" "sensitive") - ) -) - -(define-method set_app_paintable - (of-object "GtkWidget") - (c-name "gtk_widget_set_app_paintable") - (return-type "none") - (parameters - '("gboolean" "app_paintable") - ) -) - -(define-method set_double_buffered - (of-object "GtkWidget") - (c-name "gtk_widget_set_double_buffered") - (return-type "none") - (parameters - '("gboolean" "double_buffered") - ) -) - -(define-method set_parent - (of-object "GtkWidget") - (c-name "gtk_widget_set_parent") - (return-type "none") - (parameters - '("GtkWidget*" "parent") - ) -) - -(define-method set_parent_window - (of-object "GtkWidget") - (c-name "gtk_widget_set_parent_window") - (return-type "none") - (parameters - '("GdkWindow*" "parent_window") - ) -) - -(define-method get_parent_window - (of-object "GtkWidget") - (c-name "gtk_widget_get_parent_window") - (return-type "GdkWindow*") -) - -(define-method child_focus - (of-object "GtkWidget") - (c-name "gtk_widget_child_focus") - (return-type "gboolean") - (parameters - '("GtkDirectionType" "direction") - ) -) - -(define-method set_uposition - (of-object "GtkWidget") - (c-name "gtk_widget_set_uposition") - (return-type "none") - (parameters - '("gint" "x") - '("gint" "y") - ) -) - -(define-method set_usize - (of-object "GtkWidget") - (c-name "gtk_widget_set_usize") - (return-type "none") - (parameters - '("gint" "width") - '("gint" "height") - ) -) - -(define-method set_events - (of-object "GtkWidget") - (c-name "gtk_widget_set_events") - (return-type "none") - (parameters - '("gint" "events") - ) -) - -(define-method add_events - (of-object "GtkWidget") - (c-name "gtk_widget_add_events") - (return-type "none") - (parameters - '("gint" "events") - ) -) - -(define-method set_extension_events - (of-object "GtkWidget") - (c-name "gtk_widget_set_extension_events") - (return-type "none") - (parameters - '("GdkExtensionMode" "mode") - ) -) - -(define-method get_extension_events - (of-object "GtkWidget") - (c-name "gtk_widget_get_extension_events") - (return-type "GdkExtensionMode") -) - -(define-method get_toplevel - (of-object "GtkWidget") - (c-name "gtk_widget_get_toplevel") - (return-type "GtkWidget*") -) - -(define-method get_ancestor - (of-object "GtkWidget") - (c-name "gtk_widget_get_ancestor") - (return-type "GtkWidget*") - (parameters - '("GtkType" "widget_type") - ) -) - -(define-method get_colormap - (of-object "GtkWidget") - (c-name "gtk_widget_get_colormap") - (return-type "GdkColormap*") -) - -(define-method get_visual - (of-object "GtkWidget") - (c-name "gtk_widget_get_visual") - (return-type "GdkVisual*") -) - -(define-method get_accessible - (of-object "GtkWidget") - (c-name "gtk_widget_get_accessible") - (return-type "AtkObject*") -) - -(define-method set_colormap - (of-object "GtkWidget") - (c-name "gtk_widget_set_colormap") - (return-type "none") - (parameters - '("GdkColormap*" "colormap") - ) -) - -(define-method get_events - (of-object "GtkWidget") - (c-name "gtk_widget_get_events") - (return-type "gint") -) - -(define-method get_pointer - (of-object "GtkWidget") - (c-name "gtk_widget_get_pointer") - (return-type "none") - (parameters - '("gint*" "x") - '("gint*" "y") - ) -) - -(define-method is_ancestor - (of-object "GtkWidget") - (c-name "gtk_widget_is_ancestor") - (return-type "gint") - (parameters - '("GtkWidget*" "ancestor") - ) -) - -(define-method hide_on_delete - (of-object "GtkWidget") - (c-name "gtk_widget_hide_on_delete") - (return-type "gint") -) - -(define-method set_style - (of-object "GtkWidget") - (c-name "gtk_widget_set_style") - (return-type "none") - (parameters - '("GtkStyle*" "style") - ) -) - -(define-method ensure_style - (of-object "GtkWidget") - (c-name "gtk_widget_ensure_style") - (return-type "none") -) - -(define-method get_style - (of-object "GtkWidget") - (c-name "gtk_widget_get_style") - (return-type "GtkStyle*") -) - -(define-method modify_style - (of-object "GtkWidget") - (c-name "gtk_widget_modify_style") - (return-type "none") - (parameters - '("GtkRcStyle*" "style") - ) -) - -(define-method get_modifier_style - (of-object "GtkWidget") - (c-name "gtk_widget_get_modifier_style") - (return-type "GtkRcStyle*") -) - -(define-method modify_fg - (of-object "GtkWidget") - (c-name "gtk_widget_modify_fg") - (return-type "none") - (parameters - '("GtkStateType" "state") - '("GdkColor*" "color") - ) -) - -(define-method modify_bg - (of-object "GtkWidget") - (c-name "gtk_widget_modify_bg") - (return-type "none") - (parameters - '("GtkStateType" "state") - '("GdkColor*" "color") - ) -) - -(define-method modify_text - (of-object "GtkWidget") - (c-name "gtk_widget_modify_text") - (return-type "none") - (parameters - '("GtkStateType" "state") - '("GdkColor*" "color") - ) -) - -(define-method modify_base - (of-object "GtkWidget") - (c-name "gtk_widget_modify_base") - (return-type "none") - (parameters - '("GtkStateType" "state") - '("GdkColor*" "color") - ) -) - -(define-method modify_font - (of-object "GtkWidget") - (c-name "gtk_widget_modify_font") - (return-type "none") - (parameters - '("PangoFontDescription*" "font_desc") - ) -) - -(define-method create_pango_context - (of-object "GtkWidget") - (c-name "gtk_widget_create_pango_context") - (return-type "PangoContext*") -) - -(define-method get_pango_context - (of-object "GtkWidget") - (c-name "gtk_widget_get_pango_context") - (return-type "PangoContext*") -) - -(define-method create_pango_layout - (of-object "GtkWidget") - (c-name "gtk_widget_create_pango_layout") - (return-type "PangoLayout*") - (parameters - '("const-gchar*" "text") - ) -) - -(define-method render_icon - (of-object "GtkWidget") - (c-name "gtk_widget_render_icon") - (return-type "GdkPixbuf*") - (parameters - '("const-gchar*" "stock_id") - '("GtkIconSize" "size") - '("const-gchar*" "detail") - ) -) - -(define-method set_composite_name - (of-object "GtkWidget") - (c-name "gtk_widget_set_composite_name") - (return-type "none") - (parameters - '("const-gchar*" "name") - ) -) - -(define-method get_composite_name - (of-object "GtkWidget") - (c-name "gtk_widget_get_composite_name") - (return-type "gchar*") -) - -(define-method reset_rc_styles - (of-object "GtkWidget") - (c-name "gtk_widget_reset_rc_styles") - (return-type "none") -) - -(define-function widget_push_colormap - (c-name "gtk_widget_push_colormap") - (return-type "none") - (parameters - '("GdkColormap*" "cmap") - ) -) - -(define-function widget_push_composite_child - (c-name "gtk_widget_push_composite_child") - (return-type "none") -) - -(define-function widget_pop_composite_child - (c-name "gtk_widget_pop_composite_child") - (return-type "none") -) - -(define-function widget_pop_colormap - (c-name "gtk_widget_pop_colormap") - (return-type "none") -) - -(define-method install_style_property - (of-object "GtkWidgetClass") - (c-name "gtk_widget_class_install_style_property") - (return-type "none") - (parameters - '("GParamSpec*" "pspec") - ) -) - -(define-method install_style_property_parser - (of-object "GtkWidgetClass") - (c-name "gtk_widget_class_install_style_property_parser") - (return-type "none") - (parameters - '("GParamSpec*" "pspec") - '("GtkRcPropertyParser" "parser") - ) -) - -(define-method style_get_property - (of-object "GtkWidget") - (c-name "gtk_widget_style_get_property") - (return-type "none") - (parameters - '("const-gchar*" "property_name") - '("GValue*" "value") - ) -) - -(define-method style_get_valist - (of-object "GtkWidget") - (c-name "gtk_widget_style_get_valist") - (return-type "none") - (parameters - '("const-gchar*" "first_property_name") - '("va_list" "var_args") - ) -) - -(define-method style_get - (of-object "GtkWidget") - (c-name "gtk_widget_style_get") - (return-type "none") - (parameters - '("const-gchar*" "first_property_name") - ) - (varargs #t) -) - -(define-function widget_set_default_colormap - (c-name "gtk_widget_set_default_colormap") - (return-type "none") - (parameters - '("GdkColormap*" "colormap") - ) -) - -(define-function widget_get_default_colormap - (c-name "gtk_widget_get_default_colormap") - (return-type "GdkColormap*") -) - -(define-function widget_get_default_visual - (c-name "gtk_widget_get_default_visual") - (return-type "GdkVisual*") -) - -(define-method set_direction - (of-object "GtkWidget") - (c-name "gtk_widget_set_direction") - (return-type "none") - (parameters - '("GtkTextDirection" "dir") - ) -) - -(define-method get_direction - (of-object "GtkWidget") - (c-name "gtk_widget_get_direction") - (return-type "GtkTextDirection") -) - -(define-function widget_set_default_direction - (c-name "gtk_widget_set_default_direction") - (return-type "none") - (parameters - '("GtkTextDirection" "dir") - ) -) - -(define-function widget_get_default_direction - (c-name "gtk_widget_get_default_direction") - (return-type "GtkTextDirection") -) - -(define-method shape_combine_mask - (of-object "GtkWidget") - (c-name "gtk_widget_shape_combine_mask") - (return-type "none") - (parameters - '("GdkBitmap*" "shape_mask") - '("gint" "offset_x") - '("gint" "offset_y") - ) -) - -(define-method reset_shapes - (of-object "GtkWidget") - (c-name "gtk_widget_reset_shapes") - (return-type "none") -) - -(define-method path - (of-object "GtkWidget") - (c-name "gtk_widget_path") - (return-type "none") - (parameters - '("guint*" "path_length") - '("gchar**" "path") - '("gchar**" "path_reversed") - ) -) - -(define-method class_path - (of-object "GtkWidget") - (c-name "gtk_widget_class_path") - (return-type "none") - (parameters - '("guint*" "path_length") - '("gchar**" "path") - '("gchar**" "path_reversed") - ) -) - -;; From /opt/gtk2/include/gtk-2.0/gtk/gtkwindow.h - -(define-function gtk_window_get_type - (c-name "gtk_window_get_type") - (return-type "GtkType") -) - -(define-function gtk_window_new - (c-name "gtk_window_new") - (is-constructor-of GtkWindow) - (return-type "GtkWidget*") - (parameters - '("GtkWindowType" "type" (default "GTK_WINDOW_TOPLEVEL")) - ) -) - -(define-method set_title - (of-object "GtkWindow") - (c-name "gtk_window_set_title") - (return-type "none") - (parameters - '("const-gchar*" "title") - ) -) - -(define-method set_wmclass - (of-object "GtkWindow") - (c-name "gtk_window_set_wmclass") - (return-type "none") - (parameters - '("const-gchar*" "wmclass_name") - '("const-gchar*" "wmclass_class") - ) -) - -(define-method set_role - (of-object "GtkWindow") - (c-name "gtk_window_set_role") - (return-type "none") - (parameters - '("const-gchar*" "role") - ) -) - -(define-method add_accel_group - (of-object "GtkWindow") - (c-name "gtk_window_add_accel_group") - (return-type "none") - (parameters - '("GtkAccelGroup*" "accel_group") - ) -) - -(define-method remove_accel_group - (of-object "GtkWindow") - (c-name "gtk_window_remove_accel_group") - (return-type "none") - (parameters - '("GtkAccelGroup*" "accel_group") - ) -) - -(define-method set_position - (of-object "GtkWindow") - (c-name "gtk_window_set_position") - (return-type "none") - (parameters - '("GtkWindowPosition" "position") - ) -) - -(define-method activate_focus - (of-object "GtkWindow") - (c-name "gtk_window_activate_focus") - (return-type "gint") -) - -(define-method activate_default - (of-object "GtkWindow") - (c-name "gtk_window_activate_default") - (return-type "gint") -) - -(define-method set_transient_for - (of-object "GtkWindow") - (c-name "gtk_window_set_transient_for") - (return-type "none") - (parameters - '("GtkWindow*" "parent") - ) -) - -(define-method set_type_hint - (of-object "GtkWindow") - (c-name "gtk_window_set_type_hint") - (return-type "none") - (parameters - '("GdkWindowTypeHint" "hint") - ) -) - -(define-method set_destroy_with_parent - (of-object "GtkWindow") - (c-name "gtk_window_set_destroy_with_parent") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method set_resizable - (of-object "GtkWindow") - (c-name "gtk_window_set_resizable") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_resizable - (of-object "GtkWindow") - (c-name "gtk_window_get_resizable") - (return-type "gboolean") -) - -(define-method set_gravity - (of-object "GtkWindow") - (c-name "gtk_window_set_gravity") - (return-type "none") - (parameters - '("GdkGravity" "gravity") - ) -) - -(define-method get_gravity - (of-object "GtkWindow") - (c-name "gtk_window_get_gravity") - (return-type "GdkGravity") -) - -(define-method set_geometry_hints - (of-object "GtkWindow") - (c-name "gtk_window_set_geometry_hints") - (return-type "none") - (parameters - '("GtkWidget*" "geometry_widget") - '("GdkGeometry*" "geometry") - '("GdkWindowHints" "geom_mask") - ) -) - -(define-method set_has_frame - (of-object "GtkWindow") - (c-name "gtk_window_set_has_frame") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method set_frame_dimensions - (of-object "GtkWindow") - (c-name "gtk_window_set_frame_dimensions") - (return-type "none") - (parameters - '("gint" "left") - '("gint" "top") - '("gint" "right") - '("gint" "bottom") - ) -) - -(define-method set_decorated - (of-object "GtkWindow") - (c-name "gtk_window_set_decorated") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method set_modal - (of-object "GtkWindow") - (c-name "gtk_window_set_modal") - (return-type "none") - (parameters - '("gboolean" "modal") - ) -) - -(define-function window_list_toplevels - (c-name "gtk_window_list_toplevels") - (return-type "GList*") -) - -(define-method add_mnemonic - (of-object "GtkWindow") - (c-name "gtk_window_add_mnemonic") - (return-type "none") - (parameters - '("guint" "keyval") - '("GtkWidget*" "target") - ) -) - -(define-method remove_mnemonic - (of-object "GtkWindow") - (c-name "gtk_window_remove_mnemonic") - (return-type "none") - (parameters - '("guint" "keyval") - '("GtkWidget*" "target") - ) -) - -(define-method mnemonic_activate - (of-object "GtkWindow") - (c-name "gtk_window_mnemonic_activate") - (return-type "gboolean") - (parameters - '("guint" "keyval") - '("GdkModifierType" "modifier") - ) -) - -(define-method set_mnemonic_modifier - (of-object "GtkWindow") - (c-name "gtk_window_set_mnemonic_modifier") - (return-type "none") - (parameters - '("GdkModifierType" "modifier") - ) -) - -(define-method present - (of-object "GtkWindow") - (c-name "gtk_window_present") - (return-type "none") -) - -(define-method iconify - (of-object "GtkWindow") - (c-name "gtk_window_iconify") - (return-type "none") -) - -(define-method deiconify - (of-object "GtkWindow") - (c-name "gtk_window_deiconify") - (return-type "none") -) - -(define-method stick - (of-object "GtkWindow") - (c-name "gtk_window_stick") - (return-type "none") -) - -(define-method unstick - (of-object "GtkWindow") - (c-name "gtk_window_unstick") - (return-type "none") -) - -(define-method maximize - (of-object "GtkWindow") - (c-name "gtk_window_maximize") - (return-type "none") -) - -(define-method unmaximize - (of-object "GtkWindow") - (c-name "gtk_window_unmaximize") - (return-type "none") -) - -(define-method begin_resize_drag - (of-object "GtkWindow") - (c-name "gtk_window_begin_resize_drag") - (return-type "none") - (parameters - '("GdkWindowEdge" "edge") - '("gint" "button") - '("gint" "root_x") - '("gint" "root_y") - '("guint32" "timestamp") - ) -) - -(define-method begin_move_drag - (of-object "GtkWindow") - (c-name "gtk_window_begin_move_drag") - (return-type "none") - (parameters - '("gint" "button") - '("gint" "root_x") - '("gint" "root_y") - '("guint32" "timestamp") - ) -) - -(define-method set_policy - (of-object "GtkWindow") - (c-name "gtk_window_set_policy") - (return-type "none") - (parameters - '("gint" "allow_shrink") - '("gint" "allow_grow") - '("gint" "auto_shrink") - ) -) - -(define-method set_default_size - (of-object "GtkWindow") - (c-name "gtk_window_set_default_size") - (return-type "none") - (parameters - '("gint" "width") - '("gint" "height") - ) -) - -(define-method set_focus - (of-object "GtkWindow") - (c-name "gtk_window_set_focus") - (return-type "none") - (parameters - '("GtkWidget*" "focus") - ) -) - -(define-method set_default - (of-object "GtkWindow") - (c-name "gtk_window_set_default") - (return-type "none") - (parameters - '("GtkWidget*" "defaultw") - ) -) - -(define-method remove_embedded_xid - (of-object "GtkWindow") - (c-name "gtk_window_remove_embedded_xid") - (return-type "none") - (parameters - '("guint" "xid") - ) -) - -(define-method add_embedded_xid - (of-object "GtkWindow") - (c-name "gtk_window_add_embedded_xid") - (return-type "none") - (parameters - '("guint" "xid") - ) -) diff --git a/codegen/hardcoded.defs b/codegen/hardcoded.defs deleted file mode 100644 index ef0fa6ebb..000000000 --- a/codegen/hardcoded.defs +++ /dev/null @@ -1,30 +0,0 @@ -(define-struct Event - (in-module "Gdk") - (c-name "GdkEvent") - (fields - '("GdkEventType" "type") - ) -) - -(define-struct AccelEntry - (in-module "Gtk") - (c-name "GtkAccelEntry") - (fields - '("GtkAccelGroup*" "accel_group") - '("guint" "accelerator_key") - '("GdkModifierType" "accelerator_mods") - '("GtkAccelFlags" "accel_flags") - '("GObject*" "object") - '("guint" "signal_id") - ) -) - -(define-struct TargetList - (in-module "Gtk") - (c-name "GtkTargetList") - (fields - '("GList*" "target_list") - '("guint" "ref_count") - ) -) - diff --git a/codegen/makefile b/codegen/makefile deleted file mode 100755 index 635d7fc41..000000000 --- a/codegen/makefile +++ /dev/null @@ -1,10 +0,0 @@ -all: - @echo "You must use 'make windows' or 'make unix'." - @echo "'make unix' is broken for now." - -windows: - cat pango-types.defs pango-structs.defs pango.defs gdk-types.defs gdk-structs.defs hardcoded.defs gtk-types.defs gtk-structs.defs gtk-signals.defs gtk-props.defs gtk.defs | ./defs-parse.pl - -unix: - @echo "'make unix' is broken for now." - diff --git a/codegen/pango-structs.defs b/codegen/pango-structs.defs deleted file mode 100644 index cbce277c2..000000000 --- a/codegen/pango-structs.defs +++ /dev/null @@ -1,412 +0,0 @@ -(define-struct Analysis - (in-module "Pango") - (c-name "PangoAnalysis") - (fields - '("PangoEngineShape*" "shape_engine") - '("PangoEngineLang*" "lang_engine") - '("PangoFont*" "font") - '("guint8" "level") - '("PangoLanguage*" "language") - '("GSList*" "extra_attrs") - ) -) - -(define-struct AttrColor - (in-module "Pango") - (c-name "PangoAttrColor") - (fields - '("PangoAttribute" "attr") - '("PangoColor" "color") - ) -) - -(define-struct AttrFloat - (in-module "Pango") - (c-name "PangoAttrFloat") - (fields - '("PangoAttribute" "attr") - '("double" "value") - ) -) - -(define-struct AttrFontDesc - (in-module "Pango") - (c-name "PangoAttrFontDesc") - (fields - '("PangoAttribute" "attr") - '("PangoFontDescription*" "desc") - ) -) - -(define-struct AttrInt - (in-module "Pango") - (c-name "PangoAttrInt") - (fields - '("PangoAttribute" "attr") - '("int" "value") - ) -) - -(define-struct AttrIterator - (in-module "Pango") - (c-name "PangoAttrIterator") - (fields - ) -) - -(define-struct AttrLanguage - (in-module "Pango") - (c-name "PangoAttrLanguage") - (fields - '("PangoAttribute" "attr") - '("PangoLanguage*" "value") - ) -) - -(define-struct AttrList - (in-module "Pango") - (c-name "PangoAttrList") - (fields - ) -) - -(define-struct AttrShape - (in-module "Pango") - (c-name "PangoAttrShape") - (fields - '("PangoAttribute" "attr") - '("PangoRectangle" "ink_rect") - '("PangoRectangle" "logical_rect") - ) -) - -(define-struct AttrString - (in-module "Pango") - (c-name "PangoAttrString") - (fields - '("PangoAttribute" "attr") - '("char*" "value") - ) -) - -(define-struct Attribute - (in-module "Pango") - (c-name "PangoAttribute") - (fields - '("gpointer" "klass") - '("guint" "start_index") - '("guint" "end_index") - ) -) - -(define-struct Color - (in-module "Pango") - (c-name "PangoColor") - (fields - '("guint16" "red") - '("guint16" "green") - '("guint16" "blue") - ) -) - -(define-struct Coverage - (in-module "Pango") - (c-name "PangoCoverage") - (fields - ) -) - -(define-struct Engine - (in-module "Pango") - (c-name "PangoEngine") - (fields - '("gchar*" "id") - '("gchar*" "type") - '("gint" "length") - ) -) - -(define-struct EngineInfo - (in-module "Pango") - (c-name "PangoEngineInfo") - (fields - '("gchar*" "id") - '("gchar*" "engine_type") - '("gchar*" "render_type") - '("PangoEngineRange*" "ranges") - '("gint" "n_ranges") - ) -) - -(define-struct EngineLang - (in-module "Pango") - (c-name "PangoEngineLang") - (fields - '("PangoEngine" "engine") - '("void*" "script_break (const-char* text, int len, PangoAnalysis* analysis, PangoLogAttr* attrs, int attrs_len)") - ) -) - -(define-struct EngineRange - (in-module "Pango") - (c-name "PangoEngineRange") - (fields - '("guint32" "start") - '("guint32" "end") - '("gchar*" "langs") - ) -) - -(define-struct EngineShape - (in-module "Pango") - (c-name "PangoEngineShape") - (fields - '("PangoEngine" "engine") - '("void*" "script_shape (PangoFont* font, const-char* text, int length, PangoAnalysis* analysis, PangoGlyphString* glyphs)") - '("PangoCoverage**" "get_coverage (PangoFont* font, PangoLanguage* language)") - ) -) - -(define-struct FontDescription - (in-module "Pango") - (c-name "PangoFontDescription") - (fields - ) -) - -(define-struct FontMetrics - (in-module "Pango") - (c-name "PangoFontMetrics") - (fields - '("guint" "ref_count") - '("int" "ascent") - '("int" "descent") - '("int" "approximate_char_width") - '("int" "approximate_digit_width") - ) -) - -(define-struct Glyph - (in-module "Pango") - (c-name "PangoGlyph") - (fields - ) -) - -(define-struct GlyphGeometry - (in-module "Pango") - (c-name "PangoGlyphGeometry") - (fields - '("PangoGlyphUnit" "width") - '("PangoGlyphUnit" "x_offset") - '("PangoGlyphUnit" "y_offset") - ) -) - -(define-struct GlyphInfo - (in-module "Pango") - (c-name "PangoGlyphInfo") - (fields - '("PangoGlyph" "glyph") - '("PangoGlyphGeometry" "geometry") - '("PangoGlyphVisAttr" "attr") - ) -) - -(define-struct GlyphString - (in-module "Pango") - (c-name "PangoGlyphString") - (fields - '("gint" "num_glyphs") - '("PangoGlyphInfo*" "glyphs") - '("gint*" "log_clusters") - '("gint" "space") - ) -) - -(define-struct GlyphUnit - (in-module "Pango") - (c-name "PangoGlyphUnit") - (fields - ) -) - -(define-struct GlyphVisAttr - (in-module "Pango") - (c-name "PangoGlyphVisAttr") - (fields - '("guint" "is_cluster_start : 1") - ) -) - -(define-struct IncludedModule - (in-module "Pango") - (c-name "PangoIncludedModule") - (fields - '("void*" "list (PangoEngineInfo** engines, int* n_engines)") - '("PangoEngine**" "load (const-char* id)") - '("void*" "unload (PangoEngine* engine)") - ) -) - -(define-struct IndicScript - (in-module "Pango") - (c-name "PangoIndicScript") - (fields - '("gchar*" "name") - '("gboolean*" "is_prefixing_vowel (gunichar what)") - '("gboolean*" "is_vowel_sign (gunichar what)") - '("gunichar*" "vowel_sign_to_matra (gunichar what)") - '("gboolean*" "is_vowel_half (gunichar what)") - '("gboolean*" "vowel_split (gunichar what, gunichar* prefix, gunichar* suffix)") - ) -) - -(define-struct IntSet - (in-module "Pango") - (c-name "PangoIntSet") - (fields - '("int" "start") - '("int" "size") - '("guint*" "bits") - ) -) - -(define-struct Item - (in-module "Pango") - (c-name "PangoItem") - (fields - '("gint" "offset") - '("gint" "length") - '("gint" "num_chars") - '("PangoAnalysis" "analysis") - ) -) - -(define-struct Language - (in-module "Pango") - (c-name "PangoLanguage") - (fields - ) -) - -(define-struct LayoutIter - (in-module "Pango") - (c-name "PangoLayoutIter") - (fields - ) -) - -(define-struct LayoutLine - (in-module "Pango") - (c-name "PangoLayoutLine") - (fields - '("PangoLayout*" "layout") - '("gint" "start_index") - '("gint" "length") - '("GSList*" "runs") - ) -) - -(define-struct LayoutRun - (in-module "Pango") - (c-name "PangoLayoutRun") - (fields - '("PangoItem*" "item") - '("PangoGlyphString*" "glyphs") - ) -) - -(define-struct LogAttr - (in-module "Pango") - (c-name "PangoLogAttr") - (fields - '("guint" "is_line_break : 1") - '("guint" "is_mandatory_break : 1") - '("guint" "is_char_break : 1") - '("guint" "is_white : 1") - '("guint" "is_cursor_position : 1") - '("guint" "is_word_start : 1") - '("guint" "is_word_end : 1") - '("guint" "is_sentence_boundary : 1") - '("guint" "is_sentence_start : 1") - '("guint" "is_sentence_end : 1") - ) -) - -(define-struct Map - (in-module "Pango") - (c-name "PangoMap") - (fields - ) -) - -(define-struct MapEntry - (in-module "Pango") - (c-name "PangoMapEntry") - (fields - '("PangoEngineInfo*" "info") - '("gboolean" "is_exact") - ) -) - -(define-struct OTInfo - (in-module "Pango") - (c-name "PangoOTInfo") - (fields - ) -) - -(define-struct OTRuleset - (in-module "Pango") - (c-name "PangoOTRuleset") - (fields - ) -) - -(define-struct OTTag - (in-module "Pango") - (c-name "PangoOTTag") - (fields - ) -) - -(define-struct Rectangle - (in-module "Pango") - (c-name "PangoRectangle") - (fields - '("int" "x") - '("int" "y") - '("int" "width") - '("int" "height") - ) -) - -(define-struct TabArray - (in-module "Pango") - (c-name "PangoTabArray") - (fields - ) -) - -(define-struct Win32FontCache - (in-module "Pango") - (c-name "PangoWin32FontCache") - (fields - ) -) - -(define-struct XFontCache - (in-module "Pango") - (c-name "PangoXFontCache") - (fields - ) -) - -(define-struct XSubfont - (in-module "Pango") - (c-name "PangoXSubfont") - (fields - ) -) - diff --git a/codegen/pango-types.defs b/codegen/pango-types.defs deleted file mode 100644 index 6d0b4b017..000000000 --- a/codegen/pango-types.defs +++ /dev/null @@ -1,271 +0,0 @@ -;; -*- scheme -*- -; object definitions ... - -(define-object Context - (in-module "Pango") - (parent "GObject") - (c-name "PangoContext") - (gtype-id "PANGO_TYPE_CONTEXT") -) - -(define-object Font - (in-module "Pango") - (parent "GObject") - (c-name "PangoFont") - (gtype-id "PANGO_TYPE_FONT") -) - -(define-object FontFace - (in-module "Pango") - (parent "GObject") - (c-name "PangoFontFace") - (gtype-id "PANGO_TYPE_FONT_FACE") -) - -(define-object FontFamily - (in-module "Pango") - (parent "GObject") - (c-name "PangoFontFamily") - (gtype-id "PANGO_TYPE_FONT_FAMILY") -) - -(define-object FontMap - (in-module "Pango") - (parent "GObject") - (c-name "PangoFontMap") - (gtype-id "PANGO_TYPE_FONT_MAP") -) - -(define-object Layout - (in-module "Pango") - (parent "GObject") - (c-name "PangoLayout") - (gtype-id "PANGO_TYPE_LAYOUT") -) - - -;; boxed definitions ... - -(define-boxed AttrList - (in-module "Pango") - (c-name "PangoAttrList") - (gtype-id "PANGO_TYPE_ATTR_LIST") - (copy-func "pango_attr_list_ref") - (release-func "pango_attr_list_unref") -) - -(define-boxed Color - (in-module "Pango") - (c-name "PangoColor") - (gtype-id "PANGO_TYPE_COLOR") - (copy-func "pango_color_copy") - (release-func "pango_color_free") - (fields - '("guint16" "red") - '("guint16" "green") - '("guint16" "blue") - ) -) - -(define-boxed FontDescription - (in-module "Pango") - (c-name "PangoFontDescription") - (gtype-id "PANGO_TYPE_FONT_DESCRIPTION") - (copy-func "pango_font_description_copy") - (release-func "pango_font_description_free") -) - -(define-boxed FontMetrics - (in-module "Pango") - (c-name "PangoFontMetrics") - (gtype-id "PANGO_TYPE_FONT_METRICS") - (copy-func "pango_font_metrics_ref") - (release-func "pango_font_metrics_unref") -) - -(define-boxed GlyphString - (in-module "Pango") - (c-name "PangoGlyphString") - (gtype-id "PANGO_TYPE_GLYPH_STRING") - (copy-func "pango_glyph_string_copy") - (release-func "pango_glyph_string_free") - (fields - '("gint" "num_glyphs") - '("PangoGlyphInfo*" "glyphs") - '("gint*" "log_clusters") - ) -) - -(define-boxed Language - (in-module "Pango") - (c-name "PangoLanguage") - (gtype-id "PANGO_TYPE_LANGUAGE") -) - -(define-boxed TabArray - (in-module "Pango") - (c-name "PangoTabArray") - (gtype-id "PANGO_TYPE_TAB_ARRAY") - (copy-func "pango_tab_array_copy") - (release-func "pango_tab_array_free") -) - - -;; Enumerations and flags ... - -(define-enum AttrType - (in-module "Pango") - (c-name "PangoAttrType") - (gtype-id "PANGO_TYPE_ATTR_TYPE") - (values - '("invalid" "PANGO_ATTR_INVALID") - '("language" "PANGO_ATTR_LANGUAGE") - '("family" "PANGO_ATTR_FAMILY") - '("style" "PANGO_ATTR_STYLE") - '("weight" "PANGO_ATTR_WEIGHT") - '("variant" "PANGO_ATTR_VARIANT") - '("stretch" "PANGO_ATTR_STRETCH") - '("size" "PANGO_ATTR_SIZE") - '("font-desc" "PANGO_ATTR_FONT_DESC") - '("foreground" "PANGO_ATTR_FOREGROUND") - '("background" "PANGO_ATTR_BACKGROUND") - '("underline" "PANGO_ATTR_UNDERLINE") - '("strikethrough" "PANGO_ATTR_STRIKETHROUGH") - '("rise" "PANGO_ATTR_RISE") - '("shape" "PANGO_ATTR_SHAPE") - '("scale" "PANGO_ATTR_SCALE") - ) -) - -(define-enum Underline - (in-module "Pango") - (c-name "PangoUnderline") - (gtype-id "PANGO_TYPE_UNDERLINE") - (values - '("none" "PANGO_UNDERLINE_NONE") - '("single" "PANGO_UNDERLINE_SINGLE") - '("double" "PANGO_UNDERLINE_DOUBLE") - '("low" "PANGO_UNDERLINE_LOW") - ) -) - -(define-enum CoverageLevel - (in-module "Pango") - (c-name "PangoCoverageLevel") - (gtype-id "PANGO_TYPE_COVERAGE_LEVEL") - (values - '("none" "PANGO_COVERAGE_NONE") - '("fallback" "PANGO_COVERAGE_FALLBACK") - '("approximate" "PANGO_COVERAGE_APPROXIMATE") - '("exact" "PANGO_COVERAGE_EXACT") - ) -) - -(define-enum Style - (in-module "Pango") - (c-name "PangoStyle") - (gtype-id "PANGO_TYPE_STYLE") - (values - '("normal" "PANGO_STYLE_NORMAL") - '("oblique" "PANGO_STYLE_OBLIQUE") - '("italic" "PANGO_STYLE_ITALIC") - ) -) - -(define-enum Variant - (in-module "Pango") - (c-name "PangoVariant") - (gtype-id "PANGO_TYPE_VARIANT") - (values - '("normal" "PANGO_VARIANT_NORMAL") - '("small-caps" "PANGO_VARIANT_SMALL_CAPS") - ) -) - -(define-enum Weight - (in-module "Pango") - (c-name "PangoWeight") - (gtype-id "PANGO_TYPE_WEIGHT") - (values - '("ultralight" "PANGO_WEIGHT_ULTRALIGHT") - '("light" "PANGO_WEIGHT_LIGHT") - '("normal" "PANGO_WEIGHT_NORMAL") - '("bold" "PANGO_WEIGHT_BOLD") - '("ultrabold" "PANGO_WEIGHT_ULTRABOLD") - '("heavy" "PANGO_WEIGHT_HEAVY") - ) -) - -(define-enum Stretch - (in-module "Pango") - (c-name "PangoStretch") - (gtype-id "PANGO_TYPE_STRETCH") - (values - '("ultra-condensed" "PANGO_STRETCH_ULTRA_CONDENSED") - '("extra-condensed" "PANGO_STRETCH_EXTRA_CONDENSED") - '("condensed" "PANGO_STRETCH_CONDENSED") - '("semi-condensed" "PANGO_STRETCH_SEMI_CONDENSED") - '("normal" "PANGO_STRETCH_NORMAL") - '("semi-expanded" "PANGO_STRETCH_SEMI_EXPANDED") - '("expanded" "PANGO_STRETCH_EXPANDED") - '("extra-expanded" "PANGO_STRETCH_EXTRA_EXPANDED") - '("ultra-expanded" "PANGO_STRETCH_ULTRA_EXPANDED") - ) -) - -(define-flags FontMask - (in-module "Pango") - (c-name "PangoFontMask") - (gtype-id "PANGO_TYPE_FONT_MASK") - (values - '("family" "PANGO_FONT_MASK_FAMILY") - '("style" "PANGO_FONT_MASK_STYLE") - '("variant" "PANGO_FONT_MASK_VARIANT") - '("weight" "PANGO_FONT_MASK_WEIGHT") - '("stretch" "PANGO_FONT_MASK_STRETCH") - '("size" "PANGO_FONT_MASK_SIZE") - ) -) - -(define-enum Alignment - (in-module "Pango") - (c-name "PangoAlignment") - (gtype-id "PANGO_TYPE_ALIGNMENT") - (values - '("left" "PANGO_ALIGN_LEFT") - '("center" "PANGO_ALIGN_CENTER") - '("right" "PANGO_ALIGN_RIGHT") - ) -) - -(define-enum WrapMode - (in-module "Pango") - (c-name "PangoWrapMode") - (gtype-id "PANGO_TYPE_WRAP_MODE") - (values - '("word" "PANGO_WRAP_WORD") - '("char" "PANGO_WRAP_CHAR") - ) -) - -(define-enum TabAlign - (in-module "Pango") - (c-name "PangoTabAlign") - (gtype-id "PANGO_TYPE_TAB_ALIGN") - (values - '("t" "PANGO_TAB_LEFT") - ) -) - -(define-enum Direction - (in-module "Pango") - (c-name "PangoDirection") - (gtype-id "PANGO_TYPE_DIRECTION") - (values - '("ltr" "PANGO_DIRECTION_LTR") - '("rtl" "PANGO_DIRECTION_RTL") - '("ttb-ltr" "PANGO_DIRECTION_TTB_LTR") - '("ttb-rtl" "PANGO_DIRECTION_TTB_RTL") - ) -) - diff --git a/codegen/pango.defs b/codegen/pango.defs deleted file mode 100644 index 9bc89705c..000000000 --- a/codegen/pango.defs +++ /dev/null @@ -1,1738 +0,0 @@ -;; -*- scheme -*- - -(include "pango-types.defs") - -;; From /opt/gtk2/include/pango-1.0/pango/pango-attributes.h - -(define-function pango_color_get_type - (c-name "pango_color_get_type") - (return-type "GType") -) - -(define-method copy - (of-object "PangoColor") - (c-name "pango_color_copy") - (return-type "PangoColor*") -) - -(define-method free - (of-object "PangoColor") - (c-name "pango_color_free") - (return-type "none") -) - -(define-method parse - (of-object "PangoColor") - (c-name "pango_color_parse") - (return-type "gboolean") - (parameters - '("const-char*" "spec") - ) -) - -(define-function pango_attr_type_register - (c-name "pango_attr_type_register") - (return-type "PangoAttrType") - (parameters - '("const-gchar*" "name") - ) -) - -(define-method copy - (of-object "PangoAttribute") - (c-name "pango_attribute_copy") - (return-type "PangoAttribute*") -) - -(define-method destroy - (of-object "PangoAttribute") - (c-name "pango_attribute_destroy") - (return-type "none") -) - -(define-method equal - (of-object "PangoAttribute") - (c-name "pango_attribute_equal") - (return-type "gboolean") - (parameters - '("const-PangoAttribute*" "attr2") - ) -) - -(define-function pango_attr_language_new - (c-name "pango_attr_language_new") - (return-type "PangoAttribute*") - (parameters - '("PangoLanguage*" "language") - ) -) - -(define-function pango_attr_family_new - (c-name "pango_attr_family_new") - (return-type "PangoAttribute*") - (parameters - '("const-char*" "family") - ) -) - -(define-function pango_attr_foreground_new - (c-name "pango_attr_foreground_new") - (return-type "PangoAttribute*") - (parameters - '("guint16" "red") - '("guint16" "green") - '("guint16" "blue") - ) -) - -(define-function pango_attr_background_new - (c-name "pango_attr_background_new") - (return-type "PangoAttribute*") - (parameters - '("guint16" "red") - '("guint16" "green") - '("guint16" "blue") - ) -) - -(define-function pango_attr_size_new - (c-name "pango_attr_size_new") - (return-type "PangoAttribute*") - (parameters - '("int" "size") - ) -) - -(define-function pango_attr_style_new - (c-name "pango_attr_style_new") - (return-type "PangoAttribute*") - (parameters - '("PangoStyle" "style") - ) -) - -(define-function pango_attr_weight_new - (c-name "pango_attr_weight_new") - (return-type "PangoAttribute*") - (parameters - '("PangoWeight" "weight") - ) -) - -(define-function pango_attr_variant_new - (c-name "pango_attr_variant_new") - (return-type "PangoAttribute*") - (parameters - '("PangoVariant" "variant") - ) -) - -(define-function pango_attr_stretch_new - (c-name "pango_attr_stretch_new") - (return-type "PangoAttribute*") - (parameters - '("PangoStretch" "stretch") - ) -) - -(define-function pango_attr_font_desc_new - (c-name "pango_attr_font_desc_new") - (return-type "PangoAttribute*") - (parameters - '("const-PangoFontDescription*" "desc") - ) -) - -(define-function pango_attr_underline_new - (c-name "pango_attr_underline_new") - (return-type "PangoAttribute*") - (parameters - '("PangoUnderline" "underline") - ) -) - -(define-function pango_attr_strikethrough_new - (c-name "pango_attr_strikethrough_new") - (return-type "PangoAttribute*") - (parameters - '("gboolean" "strikethrough") - ) -) - -(define-function pango_attr_rise_new - (c-name "pango_attr_rise_new") - (return-type "PangoAttribute*") - (parameters - '("int" "rise") - ) -) - -(define-function pango_attr_shape_new - (c-name "pango_attr_shape_new") - (return-type "PangoAttribute*") - (parameters - '("const-PangoRectangle*" "ink_rect") - '("const-PangoRectangle*" "logical_rect") - ) -) - -(define-function pango_attr_scale_new - (c-name "pango_attr_scale_new") - (return-type "PangoAttribute*") - (parameters - '("double" "scale_factor") - ) -) - -(define-function pango_attr_list_get_type - (c-name "pango_attr_list_get_type") - (return-type "GType") -) - -(define-function pango_attr_list_new - (c-name "pango_attr_list_new") - (return-type "PangoAttrList*") - (is-constructor-of "PangoAttrList") -) - -(define-method ref - (of-object "PangoAttrList") - (c-name "pango_attr_list_ref") - (return-type "none") -) - -(define-method unref - (of-object "PangoAttrList") - (c-name "pango_attr_list_unref") - (return-type "none") -) - -(define-method copy - (of-object "PangoAttrList") - (c-name "pango_attr_list_copy") - (return-type "PangoAttrList*") -) - -(define-method insert - (of-object "PangoAttrList") - (c-name "pango_attr_list_insert") - (return-type "none") - (parameters - '("PangoAttribute*" "attr") - ) -) - -(define-method insert_before - (of-object "PangoAttrList") - (c-name "pango_attr_list_insert_before") - (return-type "none") - (parameters - '("PangoAttribute*" "attr") - ) -) - -(define-method change - (of-object "PangoAttrList") - (c-name "pango_attr_list_change") - (return-type "none") - (parameters - '("PangoAttribute*" "attr") - ) -) - -(define-method splice - (of-object "PangoAttrList") - (c-name "pango_attr_list_splice") - (return-type "none") - (parameters - '("PangoAttrList*" "other") - '("gint" "pos") - '("gint" "len") - ) -) - -(define-method get_iterator - (of-object "PangoAttrList") - (c-name "pango_attr_list_get_iterator") - (return-type "PangoAttrIterator*") -) - -(define-method range - (of-object "PangoAttrIterator") - (c-name "pango_attr_iterator_range") - (return-type "none") - (parameters - '("gint*" "start") - '("gint*" "end") - ) -) - -(define-method next - (of-object "PangoAttrIterator") - (c-name "pango_attr_iterator_next") - (return-type "gboolean") -) - -(define-method copy - (of-object "PangoAttrIterator") - (c-name "pango_attr_iterator_copy") - (return-type "PangoAttrIterator*") -) - -(define-method destroy - (of-object "PangoAttrIterator") - (c-name "pango_attr_iterator_destroy") - (return-type "none") -) - -(define-method get - (of-object "PangoAttrIterator") - (c-name "pango_attr_iterator_get") - (return-type "PangoAttribute*") - (parameters - '("PangoAttrType" "type") - ) -) - -(define-method get_font - (of-object "PangoAttrIterator") - (c-name "pango_attr_iterator_get_font") - (return-type "none") - (parameters - '("PangoFontDescription*" "desc") - '("PangoLanguage**" "language") - '("GSList**" "extra_attrs") - ) -) - -(define-function parse_markup - (c-name "pango_parse_markup") - (return-type "gboolean") - (parameters - '("const-char*" "markup_text") - '("int" "length") - '("gunichar" "accel_marker") - '("PangoAttrList**" "attr_list") - '("char**" "text") - '("gunichar*" "accel_char") - '("GError**" "error") - ) -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-break.h - -(define-function break - (c-name "pango_break") - (return-type "none") - (parameters - '("const-gchar*" "text") - '("gint" "length") - '("PangoAnalysis*" "analysis") - '("PangoLogAttr*" "attrs") - ) -) - -(define-function find_paragraph_boundary - (c-name "pango_find_paragraph_boundary") - (return-type "none") - (parameters - '("const-gchar*" "text") - '("gint" "length") - '("gint*" "paragraph_delimiter_index") - '("gint*" "next_paragraph_start") - ) -) - -(define-function get_log_attrs - (c-name "pango_get_log_attrs") - (return-type "none") - (parameters - '("const-char*" "text") - '("int" "length") - '("int" "level") - '("PangoLanguage*" "language") - '("PangoLogAttr*" "log_attrs") - ) -) - -(define-function default_break - (c-name "pango_default_break") - (return-type "none") - (parameters - '("const-gchar*" "text") - '("gint" "length") - '("PangoAnalysis*" "analysis") - '("PangoLogAttr*" "attrs") - ) -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-context.h - -(define-function pango_context_new - (c-name "pango_context_new") - (return-type "PangoContext*") - (is-constructor-of "PangoContext") -) - -(define-method add_font_map - (of-object "PangoContext") - (c-name "pango_context_set_font_map") - (return-type "none") - (parameters - '("PangoFontMap*" "font_map") - ) -) - -(define-method list_families - (of-object "PangoContext") - (c-name "pango_context_list_families") - (return-type "none") - (parameters - '("PangoFontFamily***" "families") - '("int*" "n_families") - ) -) - -(define-method load_font - (of-object "PangoContext") - (c-name "pango_context_load_font") - (return-type "PangoFont*") - (parameters - '("const-PangoFontDescription*" "desc") - ) -) - -(define-method get_metrics - (of-object "PangoContext") - (c-name "pango_context_get_metrics") - (return-type "PangoFontMetrics*") - (parameters - '("const-PangoFontDescription*" "desc") - '("PangoLanguage*" "language") - ) -) - -(define-method set_font_description - (of-object "PangoContext") - (c-name "pango_context_set_font_description") - (return-type "none") - (parameters - '("const-PangoFontDescription*" "desc") - ) -) - -(define-method get_font_description - (of-object "PangoContext") - (c-name "pango_context_get_font_description") - (return-type "PangoFontDescription*") -) - -(define-method get_language - (of-object "PangoContext") - (c-name "pango_context_get_language") - (return-type "PangoLanguage*") -) - -(define-method set_language - (of-object "PangoContext") - (c-name "pango_context_set_language") - (return-type "none") - (parameters - '("PangoLanguage*" "language") - ) -) - -(define-method set_base_dir - (of-object "PangoContext") - (c-name "pango_context_set_base_dir") - (return-type "none") - (parameters - '("PangoDirection" "direction") - ) -) - -(define-method get_base_dir - (of-object "PangoContext") - (c-name "pango_context_get_base_dir") - (return-type "PangoDirection") -) - -(define-function itemize - (c-name "pango_itemize") - (return-type "GList*") - (parameters - '("PangoContext*" "context") - '("const-char*" "text") - '("int" "start_index") - '("int" "length") - '("PangoAttrList*" "attrs") - '("PangoAttrIterator*" "cached_iter") - ) -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-coverage.h - -(define-method ref - (of-object "PangoCoverage") - (c-name "pango_coverage_ref") - (return-type "PangoCoverage*") -) - -(define-method unref - (of-object "PangoCoverage") - (c-name "pango_coverage_unref") - (return-type "none") -) - -(define-method copy - (of-object "PangoCoverage") - (c-name "pango_coverage_copy") - (return-type "PangoCoverage*") -) - -(define-method get - (of-object "PangoCoverage") - (c-name "pango_coverage_get") - (return-type "PangoCoverageLevel") - (parameters - '("int" "index") - ) -) - -(define-method set - (of-object "PangoCoverage") - (c-name "pango_coverage_set") - (return-type "none") - (parameters - '("int" "index") - '("PangoCoverageLevel" "level") - ) -) - -(define-method max - (of-object "PangoCoverage") - (c-name "pango_coverage_max") - (return-type "none") - (parameters - '("PangoCoverage*" "other") - ) -) - -(define-method to_bytes - (of-object "PangoCoverage") - (c-name "pango_coverage_to_bytes") - (return-type "none") - (parameters - '("guchar**" "bytes") - '("int*" "n_bytes") - ) -) - -(define-function coverage_from_bytes - (c-name "pango_coverage_from_bytes") - (is-constructor-of "PangoCoverage") - (return-type "PangoCoverage*") - (parameters - '("guchar*" "bytes") - '("int" "n_bytes") - ) -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-font.h - -(define-function pango_font_description_new - (c-name "pango_font_description_new") - (is-constructor-of "PangoFontDescription") - (return-type "PangoFontDescription*") -) - -(define-method copy - (of-object "PangoFontDescription") - (c-name "pango_font_description_copy") - (return-type "PangoFontDescription*") -) - -(define-method copy_static - (of-object "PangoFontDescription") - (c-name "pango_font_description_copy_static") - (return-type "PangoFontDescription*") -) - -(define-method hash - (of-object "PangoFontDescription") - (c-name "pango_font_description_hash") - (return-type "guint") -) - -(define-method equal - (of-object "PangoFontDescription") - (c-name "pango_font_description_equal") - (return-type "gboolean") - (parameters - '("const-PangoFontDescription*" "desc2") - ) -) - -(define-method free - (of-object "PangoFontDescription") - (c-name "pango_font_description_free") - (return-type "none") -) - -(define-function pango_font_descriptions_free - (c-name "pango_font_descriptions_free") - (return-type "none") - (parameters - '("PangoFontDescription**" "descs") - '("int" "n_descs") - ) -) - -(define-method set_family - (of-object "PangoFontDescription") - (c-name "pango_font_description_set_family") - (return-type "none") - (parameters - '("const-char*" "family") - ) -) - -(define-method set_family_static - (of-object "PangoFontDescription") - (c-name "pango_font_description_set_family_static") - (return-type "none") - (parameters - '("const-char*" "family") - ) -) - -(define-method set_style - (of-object "PangoFontDescription") - (c-name "pango_font_description_set_style") - (return-type "none") - (parameters - '("PangoStyle" "style") - ) -) - -(define-method get_style - (of-object "PangoFontDescription") - (c-name "pango_font_description_get_style") - (return-type "PangoStyle") -) - -(define-method set_variant - (of-object "PangoFontDescription") - (c-name "pango_font_description_set_variant") - (return-type "none") - (parameters - '("PangoVariant" "variant") - ) -) - -(define-method get_variant - (of-object "PangoFontDescription") - (c-name "pango_font_description_get_variant") - (return-type "PangoVariant") -) - -(define-method set_weight - (of-object "PangoFontDescription") - (c-name "pango_font_description_set_weight") - (return-type "none") - (parameters - '("PangoWeight" "weight") - ) -) - -(define-method get_weight - (of-object "PangoFontDescription") - (c-name "pango_font_description_get_weight") - (return-type "PangoWeight") -) - -(define-method set_stretch - (of-object "PangoFontDescription") - (c-name "pango_font_description_set_stretch") - (return-type "none") - (parameters - '("PangoStretch" "stretch") - ) -) - -(define-method get_stretch - (of-object "PangoFontDescription") - (c-name "pango_font_description_get_stretch") - (return-type "PangoStretch") -) - -(define-method set_size - (of-object "PangoFontDescription") - (c-name "pango_font_description_set_size") - (return-type "none") - (parameters - '("gint" "size") - ) -) - -(define-method get_size - (of-object "PangoFontDescription") - (c-name "pango_font_description_get_size") - (return-type "gint") -) - -(define-method get_set_fields - (of-object "PangoFontDescription") - (c-name "pango_font_description_get_set_fields") - (return-type "PangoFontMask") -) - -(define-method unset_fields - (of-object "PangoFontDescription") - (c-name "pango_font_description_unset_fields") - (return-type "none") - (parameters - '("PangoFontMask" "to_unset") - ) -) - -(define-method merge - (of-object "PangoFontDescription") - (c-name "pango_font_description_merge") - (return-type "none") - (parameters - '("const-PangoFontDescription*" "desc_to_merge") - '("gboolean" "replace_existing") - ) -) - -(define-method merge_static - (of-object "PangoFontDescription") - (c-name "pango_font_description_merge_static") - (return-type "none") - (parameters - '("const-PangoFontDescription*" "desc_to_merge") - '("gboolean" "replace_existing") - ) -) - -(define-method better_match - (of-object "PangoFontDescription") - (c-name "pango_font_description_better_match") - (return-type "gboolean") - (parameters - '("const-PangoFontDescription*" "old_match") - '("const-PangoFontDescription*" "new_match") - ) -) - -(define-function pango_font_description_from_string - (c-name "pango_font_description_from_string") - (is-constructor-of "PangoFontDescription") - (return-type "PangoFontDescription*") - (parameters - '("const-char*" "str") - ) -) - -(define-method to_string - (of-object "PangoFontDescription") - (c-name "pango_font_description_to_string") - (return-type "char*") -) - -(define-method to_filename - (of-object "PangoFontDescription") - (c-name "pango_font_description_to_filename") - (return-type "char*") -) - -(define-method ref - (of-object "PangoFontMetrics") - (c-name "pango_font_metrics_ref") - (return-type "PangoFontMetrics*") -) - -(define-method unref - (of-object "PangoFontMetrics") - (c-name "pango_font_metrics_unref") - (return-type "none") -) - -(define-method get_ascent - (of-object "PangoFontMetrics") - (c-name "pango_font_metrics_get_ascent") - (return-type "int") -) - -(define-method get_descent - (of-object "PangoFontMetrics") - (c-name "pango_font_metrics_get_descent") - (return-type "int") -) - -(define-method get_approximate_char_width - (of-object "PangoFontMetrics") - (c-name "pango_font_metrics_get_approximate_char_width") - (return-type "int") -) - -(define-method get_approximate_digit_width - (of-object "PangoFontMetrics") - (c-name "pango_font_metrics_get_approximate_digit_width") - (return-type "int") -) - -; (define-function pango_font_metrics_new -; (c-name "pango_font_metrics_new") -; (is-constructor-of "PangoFontMetrics") -; (return-type "PangoFontMetrics*") -; ) - -(define-function pango_font_family_get_type - (c-name "pango_font_family_get_type") - (return-type "GType") -) - -(define-method list_faces - (of-object "PangoFontFamily") - (c-name "pango_font_family_list_faces") - (return-type "none") - (parameters - '("PangoFontFace***" "faces") - '("int*" "n_faces") - ) -) - -(define-function pango_font_face_get_type - (c-name "pango_font_face_get_type") - (return-type "GType") -) - -(define-method describe - (of-object "PangoFontFace") - (c-name "pango_font_face_describe") - (return-type "PangoFontDescription*") -) - -(define-function pango_font_get_type - (c-name "pango_font_get_type") - (return-type "GType") -) - -(define-method describe - (of-object "PangoFont") - (c-name "pango_font_describe") - (return-type "PangoFontDescription*") -) - -(define-method get_coverage - (of-object "PangoFont") - (c-name "pango_font_get_coverage") - (return-type "PangoCoverage*") - (parameters - '("PangoLanguage*" "language") - ) -) - -(define-method find_shaper - (of-object "PangoFont") - (c-name "pango_font_find_shaper") - (return-type "PangoEngineShape*") - (parameters - '("PangoLanguage*" "language") - '("guint32" "ch") - ) -) - -(define-method get_metrics - (of-object "PangoFont") - (c-name "pango_font_get_metrics") - (return-type "PangoFontMetrics*") - (parameters - '("PangoLanguage*" "language") - ) -) - -(define-method get_glyph_extents - (of-object "PangoFont") - (c-name "pango_font_get_glyph_extents") - (return-type "none") - (parameters - '("PangoGlyph" "glyph") - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-fontmap.h - -(define-method load_font - (of-object "PangoFontMap") - (c-name "pango_font_map_load_font") - (return-type "PangoFont*") - (parameters - '("PangoContext*" "context") - '("const-PangoFontDescription*" "desc") - ) -) - -(define-method list_families - (of-object "PangoFontMap") - (c-name "pango_font_map_list_families") - (return-type "none") - (parameters - '("PangoFontFamily***" "families") - '("int*" "n_families") - ) -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-glyph.h - -(define-function pango_glyph_string_new - (c-name "pango_glyph_string_new") - (is-constructor-of "PangoGlyphString") - (return-type "PangoGlyphString*") -) - -(define-method set_size - (of-object "PangoGlyphString") - (c-name "pango_glyph_string_set_size") - (return-type "none") - (parameters - '("gint" "new_len") - ) -) - -(define-function pango_glyph_string_get_type - (c-name "pango_glyph_string_get_type") - (return-type "GType") -) - -(define-method copy - (of-object "PangoGlyphString") - (c-name "pango_glyph_string_copy") - (return-type "PangoGlyphString*") -) - -(define-method free - (of-object "PangoGlyphString") - (c-name "pango_glyph_string_free") - (return-type "none") -) - -(define-method extents - (of-object "PangoGlyphString") - (c-name "pango_glyph_string_extents") - (return-type "none") - (parameters - '("PangoFont*" "font") - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method extents_range - (of-object "PangoGlyphString") - (c-name "pango_glyph_string_extents_range") - (return-type "none") - (parameters - '("int" "start") - '("int" "end") - '("PangoFont*" "font") - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_logical_widths - (of-object "PangoGlyphString") - (c-name "pango_glyph_string_get_logical_widths") - (return-type "none") - (parameters - '("const-char*" "text") - '("int" "length") - '("int" "embedding_level") - '("int*" "logical_widths") - ) -) - -(define-method index_to_x - (of-object "PangoGlyphString") - (c-name "pango_glyph_string_index_to_x") - (return-type "none") - (parameters - '("char*" "text") - '("int" "length") - '("PangoAnalysis*" "analysis") - '("int" "index") - '("gboolean" "trailing") - '("int*" "x_pos") - ) -) - -(define-method x_to_index - (of-object "PangoGlyphString") - (c-name "pango_glyph_string_x_to_index") - (return-type "none") - (parameters - '("char*" "text") - '("int" "length") - '("PangoAnalysis*" "analysis") - '("int" "x_pos") - '("int*" "index") - '("int*" "trailing") - ) -) - -(define-function shape - (c-name "pango_shape") - (return-type "none") - (parameters - '("const-gchar*" "text") - '("gint" "length") - '("PangoAnalysis*" "analysis") - '("PangoGlyphString*" "glyphs") - ) -) - -(define-function reorder_items - (c-name "pango_reorder_items") - (return-type "GList*") - (parameters - '("GList*" "logical_items") - ) -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-indic.h - -(define-function indic_shift_vowels - (c-name "pango_indic_shift_vowels") - (return-type "none") - (parameters - '("PangoIndicScript*" "script") - '("gunichar*" "chars") - '("gunichar*" "end") - ) -) - -(define-function indic_compact - (c-name "pango_indic_compact") - (return-type "none") - (parameters - '("PangoIndicScript*" "script") - '("int*" "num") - '("gunichar*" "chars") - '("int*" "cluster") - ) -) - -(define-function indic_convert_vowels - (c-name "pango_indic_convert_vowels") - (return-type "none") - (parameters - '("PangoIndicScript*" "script") - '("gboolean" "in_middle") - '("int*" "num") - '("gunichar*" "chars") - '("gboolean" "has_standalone_vowels") - ) -) - -(define-function indic_split_out_characters - (c-name "pango_indic_split_out_characters") - (return-type "none") - (parameters - '("PangoIndicScript*" "script") - '("const-gchar*" "text") - '("int" "n_chars") - '("gunichar**" "wc") - '("int*" "n_glyph") - '("PangoGlyphString*" "glyphs") - ) -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-layout.h - -(define-function pango_layout_get_type - (c-name "pango_layout_get_type") - (return-type "GType") -) - -(define-function pango_layout_new - (c-name "pango_layout_new") - (is-constructor-of "PangoLayout") - (return-type "PangoLayout*") - (parameters - '("PangoContext*" "context") - ) -) - -(define-method copy - (of-object "PangoLayout") - (c-name "pango_layout_copy") - (return-type "PangoLayout*") -) - -(define-method get_context - (of-object "PangoLayout") - (c-name "pango_layout_get_context") - (return-type "PangoContext*") -) - -(define-method set_attributes - (of-object "PangoLayout") - (c-name "pango_layout_set_attributes") - (return-type "none") - (parameters - '("PangoAttrList*" "attrs") - ) -) - -(define-method get_attributes - (of-object "PangoLayout") - (c-name "pango_layout_get_attributes") - (return-type "PangoAttrList*") -) - -(define-method set_text - (of-object "PangoLayout") - (c-name "pango_layout_set_text") - (return-type "none") - (parameters - '("const-char*" "text") - '("int" "length") - ) -) - -(define-method set_markup - (of-object "PangoLayout") - (c-name "pango_layout_set_markup") - (return-type "none") - (parameters - '("const-char*" "markup") - '("int" "length") - ) -) - -(define-method set_markup_with_accel - (of-object "PangoLayout") - (c-name "pango_layout_set_markup_with_accel") - (return-type "none") - (parameters - '("const-char*" "markup") - '("int" "length") - '("gunichar" "accel_marker") - '("gunichar*" "accel_char") - ) -) - -(define-method set_font_description - (of-object "PangoLayout") - (c-name "pango_layout_set_font_description") - (return-type "none") - (parameters - '("const-PangoFontDescription*" "desc") - ) -) - -(define-method set_width - (of-object "PangoLayout") - (c-name "pango_layout_set_width") - (return-type "none") - (parameters - '("int" "width") - ) -) - -(define-method get_width - (of-object "PangoLayout") - (c-name "pango_layout_get_width") - (return-type "int") -) - -(define-method set_wrap - (of-object "PangoLayout") - (c-name "pango_layout_set_wrap") - (return-type "none") - (parameters - '("PangoWrapMode" "wrap") - ) -) - -(define-method get_wrap - (of-object "PangoLayout") - (c-name "pango_layout_get_wrap") - (return-type "PangoWrapMode") -) - -(define-method set_indent - (of-object "PangoLayout") - (c-name "pango_layout_set_indent") - (return-type "none") - (parameters - '("int" "indent") - ) -) - -(define-method get_indent - (of-object "PangoLayout") - (c-name "pango_layout_get_indent") - (return-type "int") -) - -(define-method set_spacing - (of-object "PangoLayout") - (c-name "pango_layout_set_spacing") - (return-type "none") - (parameters - '("int" "spacing") - ) -) - -(define-method get_spacing - (of-object "PangoLayout") - (c-name "pango_layout_get_spacing") - (return-type "int") -) - -(define-method set_justify - (of-object "PangoLayout") - (c-name "pango_layout_set_justify") - (return-type "none") - (parameters - '("gboolean" "justify") - ) -) - -(define-method get_justify - (of-object "PangoLayout") - (c-name "pango_layout_get_justify") - (return-type "gboolean") -) - -(define-method set_alignment - (of-object "PangoLayout") - (c-name "pango_layout_set_alignment") - (return-type "none") - (parameters - '("PangoAlignment" "alignment") - ) -) - -(define-method get_alignment - (of-object "PangoLayout") - (c-name "pango_layout_get_alignment") - (return-type "PangoAlignment") -) - -(define-method set_tabs - (of-object "PangoLayout") - (c-name "pango_layout_set_tabs") - (return-type "none") - (parameters - '("PangoTabArray*" "tabs") - ) -) - -(define-method get_tabs - (of-object "PangoLayout") - (c-name "pango_layout_get_tabs") - (return-type "PangoTabArray*") -) - -(define-method set_single_paragraph_mode - (of-object "PangoLayout") - (c-name "pango_layout_set_single_paragraph_mode") - (return-type "none") - (parameters - '("gboolean" "setting") - ) -) - -(define-method get_single_paragraph_mode - (of-object "PangoLayout") - (c-name "pango_layout_get_single_paragraph_mode") - (return-type "gboolean") -) - -(define-method context_changed - (of-object "PangoLayout") - (c-name "pango_layout_context_changed") - (return-type "none") -) - -(define-method get_log_attrs - (of-object "PangoLayout") - (c-name "pango_layout_get_log_attrs") - (return-type "none") - (parameters - '("PangoLogAttr**" "attrs") - '("gint*" "n_attrs") - ) -) - -(define-method index_to_pos - (of-object "PangoLayout") - (c-name "pango_layout_index_to_pos") - (return-type "none") - (parameters - '("int" "index") - '("PangoRectangle*" "pos") - ) -) - -(define-method get_cursor_pos - (of-object "PangoLayout") - (c-name "pango_layout_get_cursor_pos") - (return-type "none") - (parameters - '("int" "index") - '("PangoRectangle*" "strong_pos") - '("PangoRectangle*" "weak_pos") - ) -) - -(define-method move_cursor_visually - (of-object "PangoLayout") - (c-name "pango_layout_move_cursor_visually") - (return-type "none") - (parameters - '("gboolean" "strong") - '("int" "old_index") - '("int" "old_trailing") - '("int" "direction") - '("int*" "new_index") - '("int*" "new_trailing") - ) -) - -(define-method xy_to_index - (of-object "PangoLayout") - (c-name "pango_layout_xy_to_index") - (return-type "gboolean") - (parameters - '("int" "x") - '("int" "y") - '("int*" "index") - '("int*" "trailing") - ) -) - -(define-method get_extents - (of-object "PangoLayout") - (c-name "pango_layout_get_extents") - (return-type "none") - (parameters - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_pixel_extents - (of-object "PangoLayout") - (c-name "pango_layout_get_pixel_extents") - (return-type "none") - (parameters - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_size - (of-object "PangoLayout") - (c-name "pango_layout_get_size") - (return-type "none") - (parameters - '("int*" "width") - '("int*" "height") - ) -) - -(define-method get_pixel_size - (of-object "PangoLayout") - (c-name "pango_layout_get_pixel_size") - (return-type "none") - (parameters - '("int*" "width") - '("int*" "height") - ) -) - -(define-method get_line_count - (of-object "PangoLayout") - (c-name "pango_layout_get_line_count") - (return-type "int") -) - -(define-method get_line - (of-object "PangoLayout") - (c-name "pango_layout_get_line") - (return-type "PangoLayoutLine*") - (parameters - '("int" "line") - ) -) - -(define-method get_lines - (of-object "PangoLayout") - (c-name "pango_layout_get_lines") - (return-type "GSList*") -) - -(define-method ref - (of-object "PangoLayoutLine") - (c-name "pango_layout_line_ref") - (return-type "none") -) - -(define-method unref - (of-object "PangoLayoutLine") - (c-name "pango_layout_line_unref") - (return-type "none") -) - -(define-method x_to_index - (of-object "PangoLayoutLine") - (c-name "pango_layout_line_x_to_index") - (return-type "gboolean") - (parameters - '("int" "x_pos") - '("int*" "index") - '("int*" "trailing") - ) -) - -(define-method index_to_x - (of-object "PangoLayoutLine") - (c-name "pango_layout_line_index_to_x") - (return-type "none") - (parameters - '("int" "index") - '("gboolean" "trailing") - '("int*" "x_pos") - ) -) - -(define-method get_x_ranges - (of-object "PangoLayoutLine") - (c-name "pango_layout_line_get_x_ranges") - (return-type "none") - (parameters - '("int" "start_index") - '("int" "end_index") - '("int**" "ranges") - '("int*" "n_ranges") - ) -) - -(define-method get_extents - (of-object "PangoLayoutLine") - (c-name "pango_layout_line_get_extents") - (return-type "none") - (parameters - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_pixel_extents - (of-object "PangoLayoutLine") - (c-name "pango_layout_line_get_pixel_extents") - (return-type "none") - (parameters - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_iter - (of-object "PangoLayout") - (c-name "pango_layout_get_iter") - (return-type "PangoLayoutIter*") -) - -(define-method free - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_free") - (return-type "none") -) - -(define-method get_index - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_index") - (return-type "int") -) - -(define-method get_run - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_run") - (return-type "PangoLayoutRun*") -) - -(define-method get_line - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_line") - (return-type "PangoLayoutLine*") -) - -(define-method at_last_line - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_at_last_line") - (return-type "gboolean") -) - -(define-method next_char - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_next_char") - (return-type "gboolean") -) - -(define-method next_cluster - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_next_cluster") - (return-type "gboolean") -) - -(define-method next_run - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_next_run") - (return-type "gboolean") -) - -(define-method next_line - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_next_line") - (return-type "gboolean") -) - -(define-method get_char_extents - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_char_extents") - (return-type "none") - (parameters - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_cluster_extents - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_cluster_extents") - (return-type "none") - (parameters - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_run_extents - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_run_extents") - (return-type "none") - (parameters - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_line_extents - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_line_extents") - (return-type "none") - (parameters - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_line_yrange - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_line_yrange") - (return-type "none") - (parameters - '("int*" "y0") - '("int*" "y1") - ) -) - -(define-method get_layout_extents - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_layout_extents") - (return-type "none") - (parameters - '("PangoRectangle*" "ink_rect") - '("PangoRectangle*" "logical_rect") - ) -) - -(define-method get_baseline - (of-object "PangoLayoutIter") - (c-name "pango_layout_iter_get_baseline") - (return-type "int") -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-modules.h - -(define-function pango_find_map - (c-name "pango_find_map") - (return-type "PangoMap*") - (parameters - '("PangoLanguage*" "language") - '("guint" "engine_type_id") - '("guint" "render_type_id") - ) -) - -(define-method get_entry - (of-object "PangoMap") - (c-name "pango_map_get_entry") - (return-type "PangoMapEntry*") - (parameters - '("guint32" "wc") - ) -) - -(define-method get_engine - (of-object "PangoMap") - (c-name "pango_map_get_engine") - (return-type "PangoEngine*") - (parameters - '("guint32" "wc") - ) -) - -(define-function pango_module_register - (c-name "pango_module_register") - (return-type "none") - (parameters - '("PangoIncludedModule*" "module") - ) -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-tabs.h - -(define-function pango_tab_array_new_with_positions - (c-name "pango_tab_array_new_with_positions") - (is-constructor-of "PangoTabArray") - (return-type "PangoTabArray*") - (parameters - '("gint" "size") - '("gboolean" "positions_in_pixels") - '("PangoTabAlign" "first_alignment") - '("gint" "first_position") - ) - (varargs #t) -) - -(define-function pango_tab_array_get_type - (c-name "pango_tab_array_get_type") - (return-type "GType") -) - -(define-method copy - (of-object "PangoTabArray") - (c-name "pango_tab_array_copy") - (return-type "PangoTabArray*") -) - -(define-method free - (of-object "PangoTabArray") - (c-name "pango_tab_array_free") - (return-type "none") -) - -(define-method get_size - (of-object "PangoTabArray") - (c-name "pango_tab_array_get_size") - (return-type "gint") -) - -(define-method resize - (of-object "PangoTabArray") - (c-name "pango_tab_array_resize") - (return-type "none") - (parameters - '("gint" "new_size") - ) -) - -(define-method set_tab - (of-object "PangoTabArray") - (c-name "pango_tab_array_set_tab") - (return-type "none") - (parameters - '("gint" "tab_index") - '("PangoTabAlign" "alignment") - '("gint" "location") - ) -) - -(define-method get_tab - (of-object "PangoTabArray") - (c-name "pango_tab_array_get_tab") - (return-type "none") - (parameters - '("gint" "tab_index") - '("PangoTabAlign*" "alignment") - '("gint*" "location") - ) -) - -(define-method get_tabs - (of-object "PangoTabArray") - (c-name "pango_tab_array_get_tabs") - (return-type "none") - (parameters - '("PangoTabAlign**" "alignments") - '("gint**" "locations") - ) -) - -(define-method get_positions_in_pixels - (of-object "PangoTabArray") - (c-name "pango_tab_array_get_positions_in_pixels") - (return-type "gboolean") -) - - - -;; From /opt/gtk2/include/pango-1.0/pango/pango-types.h - -(define-function pango_language_from_string - (c-name "pango_language_from_string") - (return-type "PangoLanguage*") - (parameters - '("const-char*" "language") - ) -) - -(define-method matches - (of-object "PangoLanguage") - (c-name "pango_language_matches") - (return-type "gboolean") - (parameters - '("const-char*" "range_list") - ) -) - - diff --git a/parser/README b/parser/README deleted file mode 100644 index 7d9d0d2ee..000000000 --- a/parser/README +++ /dev/null @@ -1,16 +0,0 @@ -Put source modules here to parse for the gtkapi.xml file. - -Currently supported: - -glib-2.0.3 -pango-1.0.3 -atk-1.0.2 -gtk+-2.0.5 - * you need gdkpixbuf*.[ch] from gdk/ symlinked into gdk-pixbuf/ -libgnome-2.0.1 -libgnomecanvas-2.0.1 -libgnomeui-2.0.1 -gtkhtml: cvs branch gnome-2-port files gtkhtml.[ch], gtkhtml-types.h, - gtkhtml-enums.h, gtkhtml-stream.[ch] -libglade-2.0.0 -libart_lgpl-2.3.10 diff --git a/parser/TODO b/parser/TODO deleted file mode 100644 index af3c1582c..000000000 --- a/parser/TODO +++ /dev/null @@ -1,3 +0,0 @@ -Fix enum bug where symbolic values are used (eg Gdk.ModifierType.ModifierMask). -Fix property names where a variable is used instead of a string literal. -Fix the bool property macro definitions in GtkTextTag and CellRendererText. diff --git a/todo/Makefile b/todo/Makefile deleted file mode 100644 index 7670e940b..000000000 --- a/todo/Makefile +++ /dev/null @@ -1,5 +0,0 @@ -all: todo.html - -todo.html: todo.xml todo.xsl - xsltproc todo.xsl todo.xml > todo.html - diff --git a/todo/todo.xml b/todo/todo.xml deleted file mode 100644 index fe05f1a6c..000000000 --- a/todo/todo.xml +++ /dev/null @@ -1,21 +0,0 @@ - - - - Some methods need to accept null arguments. - gtk.defs has "is-null" metadata tags, this needs to be -translated/added to the XML metadata and implemented in generator. - Bug #26405. - 0 - - - Gtk+ docs must be merged in. - The docs generated for Gtk+, et al need to be merged into the doc-string attributes, and then output by generator. - rachel - 50 - - - Gdk drawing primitives not fully supported. - Many Gdk drawing functions are named oddly and are not being generated as methods of Drawable. gapi2xml.pl needs to take this into account. - 0 - - diff --git a/todo/todo.xsl b/todo/todo.xsl deleted file mode 100644 index d4109ddb1..000000000 --- a/todo/todo.xsl +++ /dev/null @@ -1,34 +0,0 @@ - - - - - - -Gtk# TODO - - - - - - - - - - - - - -
Description
Status%
Notes
Wrangler
-
- - - - - - - - - - - -