/* This file was automatically generated by make-gtk-proto */
/* Fri Apr 28 19:04:56 CEST 2000 */
/* enums=GtkTroughType,GtkFontMetricType,GdkByteOrder,GtkUpdateType,GtkCTreePos,GdkFontType,GtkSortType,GtkSelectionMode,GtkCTreeLineStyle,GtkPathType,GtkToolbarSpaceStyle,GdkInputSource,GdkJoinStyle,GtkScrollType,GtkPathPriorityType,GdkCapStyle,GdkPropertyState,GtkRcTokenType,GdkVisibilityState,GtkToolbarChildType,GtkProgressBarStyle,GtkSpinType,GtkJustification,GdkWindowClass,GtkFontFilterType,GtkSubmenuDirection,GtkCellType,GdkInputMode,GtkSideType,GtkCurveType,GtkVisibility,GdkWindowType,GtkCTreeExpansionType,GdkOverlapType,GtkOrientation,GtkArrowType,GtkMatchType,GdkStatus,GdkEventType,GdkSelectionType,GtkWindowType,GtkAnchorType,GtkDirectionType,GtkStateType,GtkPreviewType,GtkReliefStyle,GtkShadowType,GdkRgbDither,GtkMenuFactoryType,GtkFundamentalType,GdkExtensionMode,GdkAxisUse,GtkPolicyType,GdkImageType,GdkSelection,GtkProgressBarOrientation,GdkFilterReturn,GdkTarget,GdkSubwindowMode,GtkPositionType,GtkResizeMode,GdkFill,GtkMenuDirectionType,GdkColorContextMode,GtkCTreeExpanderStyle,GdkCrossingMode,GdkDragProtocol,GtkPackType,GtkToolbarStyle,GtkMetricType,GdkVisualType,GtkSpinButtonUpdatePolicy,GdkLineStyle,GdkNotifyType,GtkCornerType,GtkWindowPosition,GtkCListDragPos,GdkFillRule,GtkTreeViewMode,GdkCursorType,GdkPropMode,GtkButtonBoxStyle,GdkFunction,GtkSubmenuPlacement*/
/* flags=GdkWMFunction,GtkButtonAction,GdkWMDecoration,GtkCalendarDisplayOptions,GdkEventMask,GdkModifierType,GtkAttachOptions,GtkDebugFlag,GtkRcFlags,GtkPackerOptions,GtkObjectFlags,GdkICAttributesType,GtkAccelFlags,GdkInputCondition,GtkArgFlags,GtkPrivateFlags,GtkDestDefaults,GdkDragAction,GdkWindowHints,GtkWidgetFlags,GdkWindowAttributesType,GtkTargetFlags,GtkSignalRunType,GdkGCValuesMask,GdkIMStyle,GtkFontType*/
#include "s.h"
#include "sgtk.h"
SOBJ sgtk_accel_group_new ()
{
  GtkAccelGroup* __retval__;

  __retval__ = gtk_accel_group_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_accel_group_get_default ()
{
  GtkAccelGroup* __retval__;

  __retval__ = gtk_accel_group_get_default();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_accel_group_ref (SOBJ o_accel_group)
{
  GtkAccelGroup* accel_group;
  GtkAccelGroup* __retval__;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  __retval__ = gtk_accel_group_ref(accel_group);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_accel_group_unref (SOBJ o_accel_group)
{
  GtkAccelGroup* accel_group;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  gtk_accel_group_unref(accel_group);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_attach (SOBJ o_accel_group, SOBJ o_object)
{
  GtkAccelGroup* accel_group;
  GtkObject* object;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  object = sgtk_get_Object(o_object);
  gtk_accel_group_attach(accel_group, object);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_detach (SOBJ o_accel_group, SOBJ o_object)
{
  GtkAccelGroup* accel_group;
  GtkObject* object;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  object = sgtk_get_Object(o_object);
  gtk_accel_group_detach(accel_group, object);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_lock (SOBJ o_accel_group)
{
  GtkAccelGroup* accel_group;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  gtk_accel_group_lock(accel_group);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_unlock (SOBJ o_accel_group)
{
  GtkAccelGroup* accel_group;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  gtk_accel_group_unlock(accel_group);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_activate (SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods)
{
  GtkAccelGroup* accel_group;
  guint accel_key;
  GdkModifierType accel_mods;
  gboolean __retval__;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = sgtk_flagsget("GdkModifierType", o_accel_mods);
  __retval__ = gtk_accel_group_activate(accel_group, accel_key, accel_mods);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_accel_groups_activate (SOBJ o_object, SOBJ o_accel_key, SOBJ o_accel_mods)
{
  GtkObject* object;
  guint accel_key;
  GdkModifierType accel_mods;
  gboolean __retval__;

  object = sgtk_get_Object(o_object);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = sgtk_flagsget("GdkModifierType", o_accel_mods);
  __retval__ = gtk_accel_groups_activate(object, accel_key, accel_mods);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_accel_group_lock_entry (SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods)
{
  GtkAccelGroup* accel_group;
  guint accel_key;
  GdkModifierType accel_mods;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = sgtk_flagsget("GdkModifierType", o_accel_mods);
  gtk_accel_group_lock_entry(accel_group, accel_key, accel_mods);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_unlock_entry (SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods)
{
  GtkAccelGroup* accel_group;
  guint accel_key;
  GdkModifierType accel_mods;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = sgtk_flagsget("GdkModifierType", o_accel_mods);
  gtk_accel_group_unlock_entry(accel_group, accel_key, accel_mods);
  return(scm_undefined);
}

#ifdef INCOMPLETE
  /* +++ return type GtkAccelEntry* not defined */
SOBJ sgtk_accel_group_get_entry (SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods)
{
  GtkAccelGroup* accel_group;
  guint accel_key;
  GdkModifierType accel_mods;
  GtkAccelEntry* __retval__;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = sgtk_flagsget("GdkModifierType", o_accel_mods);
  __retval__ = gtk_accel_group_get_entry(accel_group, accel_key, accel_mods);
  /* +++ don't know how to generate GtkAccelEntry* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_accel_group_add (SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods, SOBJ o_accel_flags, SOBJ o_object, SOBJ o_accel_signal)
{
  GtkAccelGroup* accel_group;
  guint accel_key;
  GdkModifierType accel_mods;
  GtkAccelFlags accel_flags;
  GtkObject* object;
  gchar* accel_signal;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = sgtk_flagsget("GdkModifierType", o_accel_mods);
  accel_flags = sgtk_flagsget("GtkAccelFlags", o_accel_flags);
  object = sgtk_get_Object(o_object);
  accel_signal = scm_getstr(o_accel_signal);
  gtk_accel_group_add(accel_group, accel_key, accel_mods, accel_flags, object, accel_signal);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_handle_add (SOBJ o_object, SOBJ o_accel_signal_id, SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods, SOBJ o_accel_flags)
{
  GtkObject* object;
  guint accel_signal_id;
  GtkAccelGroup* accel_group;
  guint accel_key;
  GdkModifierType accel_mods;
  GtkAccelFlags accel_flags;

  object = sgtk_get_Object(o_object);
  accel_signal_id = scm_number2long(o_accel_signal_id);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = sgtk_flagsget("GdkModifierType", o_accel_mods);
  accel_flags = sgtk_flagsget("GtkAccelFlags", o_accel_flags);
  gtk_accel_group_handle_add(object, accel_signal_id, accel_group, accel_key, accel_mods, accel_flags);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_remove (SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods, SOBJ o_object)
{
  GtkAccelGroup* accel_group;
  guint accel_key;
  GdkModifierType accel_mods;
  GtkObject* object;

  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = sgtk_flagsget("GdkModifierType", o_accel_mods);
  object = sgtk_get_Object(o_object);
  gtk_accel_group_remove(accel_group, accel_key, accel_mods, object);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_handle_remove (SOBJ o_object, SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods)
{
  GtkObject* object;
  GtkAccelGroup* accel_group;
  guint accel_key;
  GdkModifierType accel_mods;

  object = sgtk_get_Object(o_object);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = sgtk_flagsget("GdkModifierType", o_accel_mods);
  gtk_accel_group_handle_remove(object, accel_group, accel_key, accel_mods);
  return(scm_undefined);
}

SOBJ sgtk_accel_group_create_add (SOBJ o_class_type, SOBJ o_signal_flags, SOBJ o_handler_offset)
{
  GtkType class_type;
  GtkSignalRunType signal_flags;
  guint handler_offset;
  guint __retval__;

  class_type = scm_number2long(o_class_type);
  signal_flags = sgtk_flagsget("GtkSignalRunType", o_signal_flags);
  handler_offset = scm_number2long(o_handler_offset);
  __retval__ = gtk_accel_group_create_add(class_type, signal_flags, handler_offset);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_accel_group_create_remove (SOBJ o_class_type, SOBJ o_signal_flags, SOBJ o_handler_offset)
{
  GtkType class_type;
  GtkSignalRunType signal_flags;
  guint handler_offset;
  guint __retval__;

  class_type = scm_number2long(o_class_type);
  signal_flags = sgtk_flagsget("GtkSignalRunType", o_signal_flags);
  handler_offset = scm_number2long(o_handler_offset);
  __retval__ = gtk_accel_group_create_remove(class_type, signal_flags, handler_offset);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
  /* +++ return type GSList* not defined */
SOBJ sgtk_accel_groups_from_object (SOBJ o_object)
{
  GtkObject* object;
  GSList* __retval__;

  object = sgtk_get_Object(o_object);
  __retval__ = gtk_accel_groups_from_object(object);
  /* +++ don't know how to generate GSList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GSList* not defined */
SOBJ sgtk_accel_group_entries_from_object (SOBJ o_object)
{
  GtkObject* object;
  GSList* __retval__;

  object = sgtk_get_Object(o_object);
  __retval__ = gtk_accel_group_entries_from_object(object);
  /* +++ don't know how to generate GSList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_accelerator_valid (SOBJ o_keyval, SOBJ o_modifiers)
{
  guint keyval;
  GdkModifierType modifiers;
  gboolean __retval__;

  keyval = scm_number2long(o_keyval);
  modifiers = sgtk_flagsget("GdkModifierType", o_modifiers);
  __retval__ = gtk_accelerator_valid(keyval, modifiers);
  return(SCM_MKBOOL(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_accelerator_parse (SOBJ o_accelerator, SOBJ o_accelerator_key, SOBJ o_accelerator_mods)
{
  gchar* accelerator;
  guint* accelerator_key;
  GdkModifierType* accelerator_mods;

  accelerator = scm_getstr(o_accelerator);
  /* +++ undefined guint* */
  /* +++ undefined GdkModifierType* */
  gtk_accelerator_parse(accelerator, accelerator_key, accelerator_mods);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_accelerator_name (SOBJ o_accelerator_key, SOBJ o_accelerator_mods)
{
  guint accelerator_key;
  GdkModifierType accelerator_mods;
  gchar* __retval__;

  accelerator_key = scm_number2long(o_accelerator_key);
  accelerator_mods = sgtk_flagsget("GdkModifierType", o_accelerator_mods);
  __retval__ = gtk_accelerator_name(accelerator_key, accelerator_mods);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_accelerator_set_default_mod_mask (SOBJ o_default_mod_mask)
{
  GdkModifierType default_mod_mask;

  default_mod_mask = sgtk_flagsget("GdkModifierType", o_default_mod_mask);
  gtk_accelerator_set_default_mod_mask(default_mod_mask);
  return(scm_undefined);
}

SOBJ sgtk_accelerator_get_default_mod_mask ()
{
  guint __retval__;

  __retval__ = gtk_accelerator_get_default_mod_mask();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_accel_label_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_accel_label_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_accel_label_new (SOBJ o_string)
{
  gchar* string;
  GtkWidget* __retval__;

  string = scm_getstr(o_string);
  __retval__ = gtk_accel_label_new(string);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_accel_label_get_accel_width (SOBJ o_accel_label)
{
  GtkAccelLabel* accel_label;
  guint __retval__;

  accel_label = sgtk_get_Object(o_accel_label);
  __retval__ = gtk_accel_label_get_accel_width(accel_label);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_accel_label_set_accel_widget (SOBJ o_accel_label, SOBJ o_accel_widget)
{
  GtkAccelLabel* accel_label;
  GtkWidget* accel_widget;

  accel_label = sgtk_get_Object(o_accel_label);
  accel_widget = sgtk_get_Object(o_accel_widget);
  gtk_accel_label_set_accel_widget(accel_label, accel_widget);
  return(scm_undefined);
}

SOBJ sgtk_accel_label_refetch (SOBJ o_accel_label)
{
  GtkAccelLabel* accel_label;
  gboolean __retval__;

  accel_label = sgtk_get_Object(o_accel_label);
  __retval__ = gtk_accel_label_refetch(accel_label);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_adjustment_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_adjustment_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_adjustment_new (SOBJ o_value, SOBJ o_lower, SOBJ o_upper, SOBJ o_step_increment, SOBJ o_page_increment, SOBJ o_page_size)
{
  gfloat value;
  gfloat lower;
  gfloat upper;
  gfloat step_increment;
  gfloat page_increment;
  gfloat page_size;
  GtkObject* __retval__;

  value = scm_number2double(o_value);
  lower = scm_number2double(o_lower);
  upper = scm_number2double(o_upper);
  step_increment = scm_number2double(o_step_increment);
  page_increment = scm_number2double(o_page_increment);
  page_size = scm_number2double(o_page_size);
  __retval__ = gtk_adjustment_new(value, lower, upper, step_increment, page_increment, page_size);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_adjustment_set_value (SOBJ o_adjustment, SOBJ o_value)
{
  GtkAdjustment* adjustment;
  gfloat value;

  adjustment = sgtk_get_Object(o_adjustment);
  value = scm_number2double(o_value);
  gtk_adjustment_set_value(adjustment, value);
  return(scm_undefined);
}

SOBJ sgtk_adjustment_changed (SOBJ o_adjustment)
{
  GtkAdjustment* adjustment;

  adjustment = sgtk_get_Object(o_adjustment);
  gtk_adjustment_changed(adjustment);
  return(scm_undefined);
}

SOBJ sgtk_adjustment_value_changed (SOBJ o_adjustment)
{
  GtkAdjustment* adjustment;

  adjustment = sgtk_get_Object(o_adjustment);
  gtk_adjustment_value_changed(adjustment);
  return(scm_undefined);
}

SOBJ sgtk_adjustment_clamp_page (SOBJ o_adjustment, SOBJ o_lower, SOBJ o_upper)
{
  GtkAdjustment* adjustment;
  gfloat lower;
  gfloat upper;

  adjustment = sgtk_get_Object(o_adjustment);
  lower = scm_number2double(o_lower);
  upper = scm_number2double(o_upper);
  gtk_adjustment_clamp_page(adjustment, lower, upper);
  return(scm_undefined);
}

SOBJ sgtk_alignment_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_alignment_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_alignment_new (SOBJ o_xalign, SOBJ o_yalign, SOBJ o_xscale, SOBJ o_yscale)
{
  gfloat xalign;
  gfloat yalign;
  gfloat xscale;
  gfloat yscale;
  GtkWidget* __retval__;

  xalign = scm_number2double(o_xalign);
  yalign = scm_number2double(o_yalign);
  xscale = scm_number2double(o_xscale);
  yscale = scm_number2double(o_yscale);
  __retval__ = gtk_alignment_new(xalign, yalign, xscale, yscale);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_alignment_set (SOBJ o_alignment, SOBJ o_xalign, SOBJ o_yalign, SOBJ o_xscale, SOBJ o_yscale)
{
  GtkAlignment* alignment;
  gfloat xalign;
  gfloat yalign;
  gfloat xscale;
  gfloat yscale;

  alignment = sgtk_get_Object(o_alignment);
  xalign = scm_number2double(o_xalign);
  yalign = scm_number2double(o_yalign);
  xscale = scm_number2double(o_xscale);
  yscale = scm_number2double(o_yscale);
  gtk_alignment_set(alignment, xalign, yalign, xscale, yscale);
  return(scm_undefined);
}

#ifdef INCOMPLETE
  /* +++ return type GtkArgInfo* not defined */
SOBJ sgtk_arg_type_new_static (SOBJ o_base_class_type, SOBJ o_arg_name, SOBJ o_class_n_args_offset, SOBJ o_arg_info_hash_table, SOBJ o_arg_type, SOBJ o_arg_flags, SOBJ o_arg_id)
{
  GtkType base_class_type;
  gchar* arg_name;
  guint class_n_args_offset;
  GHashTable* arg_info_hash_table;
  GtkType arg_type;
  guint arg_flags;
  guint arg_id;
  GtkArgInfo* __retval__;

  base_class_type = scm_number2long(o_base_class_type);
  arg_name = scm_getstr(o_arg_name);
  class_n_args_offset = scm_number2long(o_class_n_args_offset);
  /* +++ undefined GHashTable* */
  arg_type = scm_number2long(o_arg_type);
  arg_flags = scm_number2long(o_arg_flags);
  arg_id = scm_number2long(o_arg_id);
  __retval__ = gtk_arg_type_new_static(base_class_type, arg_name, class_n_args_offset, arg_info_hash_table, arg_type, arg_flags, arg_id);
  /* +++ don't know how to generate GtkArgInfo* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_arg_name_strip_type (SOBJ o_arg_name)
{
  gchar* arg_name;
  gchar* __retval__;

  arg_name = scm_getstr(o_arg_name);
  __retval__ = gtk_arg_name_strip_type(arg_name);
  return(scm_mkstring(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_arg_get_info (SOBJ o_object_type, SOBJ o_arg_info_hash_table, SOBJ o_arg_name, SOBJ o_info_p)
{
  GtkType object_type;
  GHashTable* arg_info_hash_table;
  gchar* arg_name;
  GtkArgInfo** info_p;
  gchar* __retval__;

  object_type = scm_number2long(o_object_type);
  /* +++ undefined GHashTable* */
  arg_name = scm_getstr(o_arg_name);
  /* +++ undefined GtkArgInfo** */
  __retval__ = gtk_arg_get_info(object_type, arg_info_hash_table, arg_name, info_p);
  return(scm_mkstring(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_args_collect (SOBJ o_object_type, SOBJ o_arg_info_hash_table, SOBJ o_arg_list_p, SOBJ o_info_list_p, SOBJ o_first_arg_name, SOBJ o_var_args)
{
  GtkType object_type;
  GHashTable* arg_info_hash_table;
  GSList** arg_list_p;
  GSList** info_list_p;
  gchar* first_arg_name;
  va_list var_args;
  gchar* __retval__;

  object_type = scm_number2long(o_object_type);
  /* +++ undefined GHashTable* */
  /* +++ undefined GSList** */
  /* +++ undefined GSList** */
  first_arg_name = scm_getstr(o_first_arg_name);
  /* +++ undefined va_list */
  __retval__ = gtk_args_collect(object_type, arg_info_hash_table, arg_list_p, info_list_p, first_arg_name, var_args);
  return(scm_mkstring(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_args_collect_cleanup (SOBJ o_arg_list, SOBJ o_info_list)
{
  GSList* arg_list;
  GSList* info_list;

  /* +++ undefined GSList* */
  /* +++ undefined GSList* */
  gtk_args_collect_cleanup(arg_list, info_list);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkArg* not defined */
SOBJ sgtk_args_query (SOBJ o_class_type, SOBJ o_arg_info_hash_table, SOBJ o_arg_flags, SOBJ o_n_args_p)
{
  GtkType class_type;
  GHashTable* arg_info_hash_table;
  guint32** arg_flags;
  guint* n_args_p;
  GtkArg* __retval__;

  class_type = scm_number2long(o_class_type);
  /* +++ undefined GHashTable* */
  /* +++ undefined guint32** */
  /* +++ undefined guint* */
  __retval__ = gtk_args_query(class_type, arg_info_hash_table, arg_flags, n_args_p);
  /* +++ don't know how to generate GtkArg* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkArg* not defined */
SOBJ sgtk_arg_new (SOBJ o_arg_type)
{
  GtkType arg_type;
  GtkArg* __retval__;

  arg_type = scm_number2long(o_arg_type);
  __retval__ = gtk_arg_new(arg_type);
  /* +++ don't know how to generate GtkArg* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkArg* not defined */
SOBJ sgtk_arg_copy (SOBJ o_src_arg, SOBJ o_dest_arg)
{
  GtkArg* src_arg;
  GtkArg* dest_arg;
  GtkArg* __retval__;

  /* +++ undefined GtkArg* */
  /* +++ undefined GtkArg* */
  __retval__ = gtk_arg_copy(src_arg, dest_arg);
  /* +++ don't know how to generate GtkArg* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_arg_free (SOBJ o_arg, SOBJ o_free_contents)
{
  GtkArg* arg;
  gboolean free_contents;

  /* +++ undefined GtkArg* */
  free_contents = (o_free_contents != scm_false);
  gtk_arg_free(arg, free_contents);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_arg_reset (SOBJ o_arg)
{
  GtkArg* arg;

  /* +++ undefined GtkArg* */
  gtk_arg_reset(arg);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_arg_info_equal (SOBJ o_arg_info_1, SOBJ o_arg_info_2)
{
  gconstpointer arg_info_1;
  gconstpointer arg_info_2;
  gint __retval__;

  /* +++ get gconstpointer -> pointer failed */
  /* +++ get gconstpointer -> pointer failed */
  __retval__ = gtk_arg_info_equal(arg_info_1, arg_info_2);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_arg_info_hash (SOBJ o_arg_info)
{
  gconstpointer arg_info;
  guint __retval__;

  /* +++ get gconstpointer -> pointer failed */
  __retval__ = gtk_arg_info_hash(arg_info);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_arg_values_equal (SOBJ o_arg1, SOBJ o_arg2)
{
  GtkArg* arg1;
  GtkArg* arg2;
  gboolean __retval__;

  /* +++ undefined GtkArg* */
  /* +++ undefined GtkArg* */
  __retval__ = gtk_arg_values_equal(arg1, arg2);
  return(SCM_MKBOOL(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_arg_to_valueloc (SOBJ o_arg, SOBJ o_value_pointer)
{
  GtkArg* arg;
  gpointer value_pointer;

  /* +++ undefined GtkArg* */
  /* +++ get gpointer -> pointer failed */
  gtk_arg_to_valueloc(arg, value_pointer);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_arrow_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_arrow_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_arrow_new (SOBJ o_arrow_type, SOBJ o_shadow_type)
{
  GtkArrowType arrow_type;
  GtkShadowType shadow_type;
  GtkWidget* __retval__;

  arrow_type = sgtk_enumget("GtkArrowType", o_arrow_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  __retval__ = gtk_arrow_new(arrow_type, shadow_type);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_arrow_set (SOBJ o_arrow, SOBJ o_arrow_type, SOBJ o_shadow_type)
{
  GtkArrow* arrow;
  GtkArrowType arrow_type;
  GtkShadowType shadow_type;

  arrow = sgtk_get_Object(o_arrow);
  arrow_type = sgtk_enumget("GtkArrowType", o_arrow_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  gtk_arrow_set(arrow, arrow_type, shadow_type);
  return(scm_undefined);
}

SOBJ sgtk_aspect_frame_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_aspect_frame_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_aspect_frame_new (SOBJ o_label, SOBJ o_xalign, SOBJ o_yalign, SOBJ o_ratio, SOBJ o_obey_child)
{
  gchar* label;
  gfloat xalign;
  gfloat yalign;
  gfloat ratio;
  gboolean obey_child;
  GtkWidget* __retval__;

  label = scm_getstr(o_label);
  xalign = scm_number2double(o_xalign);
  yalign = scm_number2double(o_yalign);
  ratio = scm_number2double(o_ratio);
  obey_child = (o_obey_child != scm_false);
  __retval__ = gtk_aspect_frame_new(label, xalign, yalign, ratio, obey_child);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_aspect_frame_set (SOBJ o_aspect_frame, SOBJ o_xalign, SOBJ o_yalign, SOBJ o_ratio, SOBJ o_obey_child)
{
  GtkAspectFrame* aspect_frame;
  gfloat xalign;
  gfloat yalign;
  gfloat ratio;
  gboolean obey_child;

  aspect_frame = sgtk_get_Object(o_aspect_frame);
  xalign = scm_number2double(o_xalign);
  yalign = scm_number2double(o_yalign);
  ratio = scm_number2double(o_ratio);
  obey_child = (o_obey_child != scm_false);
  gtk_aspect_frame_set(aspect_frame, xalign, yalign, ratio, obey_child);
  return(scm_undefined);
}

SOBJ sgtk_button_box_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_button_box_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_button_box_set_child_size_default (SOBJ o_width, SOBJ o_height)
{
  gint width;
  gint height;

  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_button_box_set_child_size_default(width, height);
  return(scm_undefined);
}

SOBJ sgtk_button_box_set_child_ipadding_default (SOBJ o_ipad_x, SOBJ o_ipad_y)
{
  gint ipad_x;
  gint ipad_y;

  ipad_x = scm_number2long(o_ipad_x);
  ipad_y = scm_number2long(o_ipad_y);
  gtk_button_box_set_child_ipadding_default(ipad_x, ipad_y);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_button_box_get_child_size_default (SOBJ o_width, SOBJ o_height)
{
  gint* width;
  gint* height;

  /* +++ undefined gint* */
  /* +++ undefined gint* */
  gtk_button_box_get_child_size_default(width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_button_box_get_child_ipadding_default (SOBJ o_ipad_x, SOBJ o_ipad_y)
{
  gint* ipad_x;
  gint* ipad_y;

  /* +++ undefined gint* */
  /* +++ undefined gint* */
  gtk_button_box_get_child_ipadding_default(ipad_x, ipad_y);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_button_box_set_spacing (SOBJ o_widget, SOBJ o_spacing)
{
  GtkButtonBox* widget;
  gint spacing;

  widget = sgtk_get_Object(o_widget);
  spacing = scm_number2long(o_spacing);
  gtk_button_box_set_spacing(widget, spacing);
  return(scm_undefined);
}

SOBJ sgtk_button_box_set_child_size (SOBJ o_widget, SOBJ o_width, SOBJ o_height)
{
  GtkButtonBox* widget;
  gint width;
  gint height;

  widget = sgtk_get_Object(o_widget);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_button_box_set_child_size(widget, width, height);
  return(scm_undefined);
}

SOBJ sgtk_button_box_set_child_ipadding (SOBJ o_widget, SOBJ o_ipad_x, SOBJ o_ipad_y)
{
  GtkButtonBox* widget;
  gint ipad_x;
  gint ipad_y;

  widget = sgtk_get_Object(o_widget);
  ipad_x = scm_number2long(o_ipad_x);
  ipad_y = scm_number2long(o_ipad_y);
  gtk_button_box_set_child_ipadding(widget, ipad_x, ipad_y);
  return(scm_undefined);
}

SOBJ sgtk_button_box_set_layout (SOBJ o_widget, SOBJ o_layout_style)
{
  GtkButtonBox* widget;
  GtkButtonBoxStyle layout_style;

  widget = sgtk_get_Object(o_widget);
  layout_style = sgtk_enumget("GtkButtonBoxStyle", o_layout_style);
  gtk_button_box_set_layout(widget, layout_style);
  return(scm_undefined);
}

SOBJ sgtk_button_box_get_spacing (SOBJ o_widget)
{
  GtkButtonBox* widget;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_button_box_get_spacing(widget);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_button_box_get_child_size (SOBJ o_widget, SOBJ o_width, SOBJ o_height)
{
  GtkButtonBox* widget;
  gint* width;
  gint* height;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined gint* */
  /* +++ undefined gint* */
  gtk_button_box_get_child_size(widget, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_button_box_get_child_ipadding (SOBJ o_widget, SOBJ o_ipad_x, SOBJ o_ipad_y)
{
  GtkButtonBox* widget;
  gint* ipad_x;
  gint* ipad_y;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined gint* */
  /* +++ undefined gint* */
  gtk_button_box_get_child_ipadding(widget, ipad_x, ipad_y);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_button_box_get_layout (SOBJ o_widget)
{
  GtkButtonBox* widget;
  GtkButtonBoxStyle __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_button_box_get_layout(widget);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_button_box_child_requisition (SOBJ o_widget, SOBJ o_nvis_children, SOBJ o_width, SOBJ o_height)
{
  GtkWidget* widget;
  int* nvis_children;
  int* width;
  int* height;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined int* */
  /* +++ undefined int* */
  /* +++ undefined int* */
  gtk_button_box_child_requisition(widget, nvis_children, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_bin_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_bin_get_type();
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
  /* +++ return type GtkBindingSet* not defined */
SOBJ sgtk_binding_set_new (SOBJ o_set_name)
{
  gchar* set_name;
  GtkBindingSet* __retval__;

  set_name = scm_getstr(o_set_name);
  __retval__ = gtk_binding_set_new(set_name);
  /* +++ don't know how to generate GtkBindingSet* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkBindingSet* not defined */
SOBJ sgtk_binding_set_by_class (SOBJ o_object_class)
{
  gpointer object_class;
  GtkBindingSet* __retval__;

  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_binding_set_by_class(object_class);
  /* +++ don't know how to generate GtkBindingSet* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkBindingSet* not defined */
SOBJ sgtk_binding_set_find (SOBJ o_set_name)
{
  gchar* set_name;
  GtkBindingSet* __retval__;

  set_name = scm_getstr(o_set_name);
  __retval__ = gtk_binding_set_find(set_name);
  /* +++ don't know how to generate GtkBindingSet* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_binding_set_activate (SOBJ o_binding_set, SOBJ o_keyval, SOBJ o_modifiers, SOBJ o_object)
{
  GtkBindingSet* binding_set;
  guint keyval;
  guint modifiers;
  GtkObject* object;
  gboolean __retval__;

  /* +++ undefined GtkBindingSet* */
  keyval = scm_number2long(o_keyval);
  modifiers = scm_number2long(o_modifiers);
  object = sgtk_get_Object(o_object);
  __retval__ = gtk_binding_set_activate(binding_set, keyval, modifiers, object);
  return(SCM_MKBOOL(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_binding_entry_clear (SOBJ o_binding_set, SOBJ o_keyval, SOBJ o_modifiers)
{
  GtkBindingSet* binding_set;
  guint keyval;
  guint modifiers;

  /* +++ undefined GtkBindingSet* */
  keyval = scm_number2long(o_keyval);
  modifiers = scm_number2long(o_modifiers);
  gtk_binding_entry_clear(binding_set, keyval, modifiers);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_binding_entry_remove (SOBJ o_binding_set, SOBJ o_keyval, SOBJ o_modifiers)
{
  GtkBindingSet* binding_set;
  guint keyval;
  guint modifiers;

  /* +++ undefined GtkBindingSet* */
  keyval = scm_number2long(o_keyval);
  modifiers = scm_number2long(o_modifiers);
  gtk_binding_entry_remove(binding_set, keyval, modifiers);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_binding_entry_add_signall (SOBJ o_binding_set, SOBJ o_keyval, SOBJ o_modifiers, SOBJ o_signal_name, SOBJ o_binding_args)
{
  GtkBindingSet* binding_set;
  guint keyval;
  guint modifiers;
  gchar* signal_name;
  GSList* binding_args;

  /* +++ undefined GtkBindingSet* */
  keyval = scm_number2long(o_keyval);
  modifiers = scm_number2long(o_modifiers);
  signal_name = scm_getstr(o_signal_name);
  /* +++ undefined GSList* */
  gtk_binding_entry_add_signall(binding_set, keyval, modifiers, signal_name, binding_args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_binding_set_add_path (SOBJ o_binding_set, SOBJ o_path_type, SOBJ o_path_pattern, SOBJ o_priority)
{
  GtkBindingSet* binding_set;
  GtkPathType path_type;
  gchar* path_pattern;
  GtkPathPriorityType priority;

  /* +++ undefined GtkBindingSet* */
  path_type = sgtk_enumget("GtkPathType", o_path_type);
  path_pattern = scm_getstr(o_path_pattern);
  priority = sgtk_enumget("GtkPathPriorityType", o_priority);
  gtk_binding_set_add_path(binding_set, path_type, path_pattern, priority);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_bindings_activate (SOBJ o_object, SOBJ o_keyval, SOBJ o_modifiers)
{
  GtkObject* object;
  guint keyval;
  guint modifiers;
  gboolean __retval__;

  object = sgtk_get_Object(o_object);
  keyval = scm_number2long(o_keyval);
  modifiers = scm_number2long(o_modifiers);
  __retval__ = gtk_bindings_activate(object, keyval, modifiers);
  return(SCM_MKBOOL(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_pattern_match (SOBJ o_pspec, SOBJ o_string_length, SOBJ o_string, SOBJ o_string_reversed)
{
  GtkPatternSpec* pspec;
  guint string_length;
  gchar* string;
  gchar* string_reversed;
  gboolean __retval__;

  /* +++ undefined GtkPatternSpec* */
  string_length = scm_number2long(o_string_length);
  string = scm_getstr(o_string);
  string_reversed = scm_getstr(o_string_reversed);
  __retval__ = gtk_pattern_match(pspec, string_length, string, string_reversed);
  return(SCM_MKBOOL(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_pattern_spec_init (SOBJ o_pspec, SOBJ o_pattern)
{
  GtkPatternSpec* pspec;
  gchar* pattern;

  /* +++ undefined GtkPatternSpec* */
  pattern = scm_getstr(o_pattern);
  gtk_pattern_spec_init(pspec, pattern);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_pattern_match_string (SOBJ o_pspec, SOBJ o_string)
{
  GtkPatternSpec* pspec;
  gchar* string;
  gboolean __retval__;

  /* +++ undefined GtkPatternSpec* */
  string = scm_getstr(o_string);
  __retval__ = gtk_pattern_match_string(pspec, string);
  return(SCM_MKBOOL(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_pattern_match_simple (SOBJ o_pattern, SOBJ o_string)
{
  gchar* pattern;
  gchar* string;
  gboolean __retval__;

  pattern = scm_getstr(o_pattern);
  string = scm_getstr(o_string);
  __retval__ = gtk_pattern_match_simple(pattern, string);
  return(SCM_MKBOOL(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_pattern_spec_free_segs (SOBJ o_pspec)
{
  GtkPatternSpec* pspec;

  /* +++ undefined GtkPatternSpec* */
  gtk_pattern_spec_free_segs(pspec);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_binding_parse_binding (SOBJ o_scanner)
{
  GScanner* scanner;
  guint __retval__;

  /* +++ undefined GScanner* */
  __retval__ = gtk_binding_parse_binding(scanner);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_box_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_box_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_box_pack_start (SOBJ o_box, SOBJ o_child, SOBJ o_expand, SOBJ o_fill, SOBJ o_padding)
{
  GtkBox* box;
  GtkWidget* child;
  gboolean expand;
  gboolean fill;
  guint padding;

  box = sgtk_get_Object(o_box);
  child = sgtk_get_Object(o_child);
  expand = (o_expand != scm_false);
  fill = (o_fill != scm_false);
  padding = scm_number2long(o_padding);
  gtk_box_pack_start(box, child, expand, fill, padding);
  return(scm_undefined);
}

SOBJ sgtk_box_pack_end (SOBJ o_box, SOBJ o_child, SOBJ o_expand, SOBJ o_fill, SOBJ o_padding)
{
  GtkBox* box;
  GtkWidget* child;
  gboolean expand;
  gboolean fill;
  guint padding;

  box = sgtk_get_Object(o_box);
  child = sgtk_get_Object(o_child);
  expand = (o_expand != scm_false);
  fill = (o_fill != scm_false);
  padding = scm_number2long(o_padding);
  gtk_box_pack_end(box, child, expand, fill, padding);
  return(scm_undefined);
}

SOBJ sgtk_box_pack_start_defaults (SOBJ o_box, SOBJ o_child)
{
  GtkBox* box;
  GtkWidget* child;

  box = sgtk_get_Object(o_box);
  child = sgtk_get_Object(o_child);
  gtk_box_pack_start_defaults(box, child);
  return(scm_undefined);
}

SOBJ sgtk_box_pack_end_defaults (SOBJ o_box, SOBJ o_child)
{
  GtkBox* box;
  GtkWidget* child;

  box = sgtk_get_Object(o_box);
  child = sgtk_get_Object(o_child);
  gtk_box_pack_end_defaults(box, child);
  return(scm_undefined);
}

SOBJ sgtk_box_set_homogeneous (SOBJ o_box, SOBJ o_homogeneous)
{
  GtkBox* box;
  gboolean homogeneous;

  box = sgtk_get_Object(o_box);
  homogeneous = (o_homogeneous != scm_false);
  gtk_box_set_homogeneous(box, homogeneous);
  return(scm_undefined);
}

SOBJ sgtk_box_set_spacing (SOBJ o_box, SOBJ o_spacing)
{
  GtkBox* box;
  gint spacing;

  box = sgtk_get_Object(o_box);
  spacing = scm_number2long(o_spacing);
  gtk_box_set_spacing(box, spacing);
  return(scm_undefined);
}

SOBJ sgtk_box_reorder_child (SOBJ o_box, SOBJ o_child, SOBJ o_position)
{
  GtkBox* box;
  GtkWidget* child;
  gint position;

  box = sgtk_get_Object(o_box);
  child = sgtk_get_Object(o_child);
  position = scm_number2long(o_position);
  gtk_box_reorder_child(box, child, position);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_box_query_child_packing (SOBJ o_box, SOBJ o_child, SOBJ o_expand, SOBJ o_fill, SOBJ o_padding, SOBJ o_pack_type)
{
  GtkBox* box;
  GtkWidget* child;
  gboolean* expand;
  gboolean* fill;
  guint* padding;
  GtkPackType* pack_type;

  box = sgtk_get_Object(o_box);
  child = sgtk_get_Object(o_child);
  /* +++ undefined gboolean* */
  /* +++ undefined gboolean* */
  /* +++ undefined guint* */
  /* +++ undefined GtkPackType* */
  gtk_box_query_child_packing(box, child, expand, fill, padding, pack_type);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_box_set_child_packing (SOBJ o_box, SOBJ o_child, SOBJ o_expand, SOBJ o_fill, SOBJ o_padding, SOBJ o_pack_type)
{
  GtkBox* box;
  GtkWidget* child;
  gboolean expand;
  gboolean fill;
  guint padding;
  GtkPackType pack_type;

  box = sgtk_get_Object(o_box);
  child = sgtk_get_Object(o_child);
  expand = (o_expand != scm_false);
  fill = (o_fill != scm_false);
  padding = scm_number2long(o_padding);
  pack_type = sgtk_enumget("GtkPackType", o_pack_type);
  gtk_box_set_child_packing(box, child, expand, fill, padding, pack_type);
  return(scm_undefined);
}

SOBJ sgtk_button_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_button_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_button_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_button_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_button_new_with_label (SOBJ o_label)
{
  gchar* label;
  GtkWidget* __retval__;

  label = scm_getstr(o_label);
  __retval__ = gtk_button_new_with_label(label);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_button_pressed (SOBJ o_button)
{
  GtkButton* button;

  button = sgtk_get_Object(o_button);
  gtk_button_pressed(button);
  return(scm_undefined);
}

SOBJ sgtk_button_released (SOBJ o_button)
{
  GtkButton* button;

  button = sgtk_get_Object(o_button);
  gtk_button_released(button);
  return(scm_undefined);
}

SOBJ sgtk_button_clicked (SOBJ o_button)
{
  GtkButton* button;

  button = sgtk_get_Object(o_button);
  gtk_button_clicked(button);
  return(scm_undefined);
}

SOBJ sgtk_button_enter (SOBJ o_button)
{
  GtkButton* button;

  button = sgtk_get_Object(o_button);
  gtk_button_enter(button);
  return(scm_undefined);
}

SOBJ sgtk_button_leave (SOBJ o_button)
{
  GtkButton* button;

  button = sgtk_get_Object(o_button);
  gtk_button_leave(button);
  return(scm_undefined);
}

SOBJ sgtk_button_set_relief (SOBJ o_button, SOBJ o_newrelief)
{
  GtkButton* button;
  GtkReliefStyle newrelief;

  button = sgtk_get_Object(o_button);
  newrelief = sgtk_enumget("GtkReliefStyle", o_newrelief);
  gtk_button_set_relief(button, newrelief);
  return(scm_undefined);
}

SOBJ sgtk_button_get_relief (SOBJ o_button)
{
  GtkButton* button;
  GtkReliefStyle __retval__;

  button = sgtk_get_Object(o_button);
  __retval__ = gtk_button_get_relief(button);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_calendar_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_calendar_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_calendar_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_calendar_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_calendar_display_options (SOBJ o_calendar, SOBJ o_flags)
{
  GtkCalendar* calendar;
  GtkCalendarDisplayOptions flags;

  calendar = sgtk_get_Object(o_calendar);
  flags = sgtk_flagsget("GtkCalendarDisplayOptions", o_flags);
  gtk_calendar_display_options(calendar, flags);
  return(scm_undefined);
}

SOBJ sgtk_calendar_select_month (SOBJ o_calendar, SOBJ o_month, SOBJ o_year)
{
  GtkCalendar* calendar;
  guint month;
  guint year;
  gint __retval__;

  calendar = sgtk_get_Object(o_calendar);
  month = scm_number2long(o_month);
  year = scm_number2long(o_year);
  __retval__ = gtk_calendar_select_month(calendar, month, year);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_calendar_select_day (SOBJ o_calendar, SOBJ o_day)
{
  GtkCalendar* calendar;
  guint day;

  calendar = sgtk_get_Object(o_calendar);
  day = scm_number2long(o_day);
  gtk_calendar_select_day(calendar, day);
  return(scm_undefined);
}

SOBJ sgtk_calendar_clear_marks (SOBJ o_calendar)
{
  GtkCalendar* calendar;

  calendar = sgtk_get_Object(o_calendar);
  gtk_calendar_clear_marks(calendar);
  return(scm_undefined);
}

SOBJ sgtk_calendar_mark_day (SOBJ o_calendar, SOBJ o_day)
{
  GtkCalendar* calendar;
  guint day;
  gint __retval__;

  calendar = sgtk_get_Object(o_calendar);
  day = scm_number2long(o_day);
  __retval__ = gtk_calendar_mark_day(calendar, day);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_calendar_unmark_day (SOBJ o_calendar, SOBJ o_day)
{
  GtkCalendar* calendar;
  guint day;
  gint __retval__;

  calendar = sgtk_get_Object(o_calendar);
  day = scm_number2long(o_day);
  __retval__ = gtk_calendar_unmark_day(calendar, day);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_calendar_get_date (SOBJ o_calendar, SOBJ o_year, SOBJ o_month, SOBJ o_day)
{
  GtkCalendar* calendar;
  guint* year;
  guint* month;
  guint* day;

  calendar = sgtk_get_Object(o_calendar);
  /* +++ undefined guint* */
  /* +++ undefined guint* */
  /* +++ undefined guint* */
  gtk_calendar_get_date(calendar, year, month, day);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_calendar_freeze (SOBJ o_calendar)
{
  GtkCalendar* calendar;

  calendar = sgtk_get_Object(o_calendar);
  gtk_calendar_freeze(calendar);
  return(scm_undefined);
}

SOBJ sgtk_calendar_thaw (SOBJ o_calendar)
{
  GtkCalendar* calendar;

  calendar = sgtk_get_Object(o_calendar);
  gtk_calendar_thaw(calendar);
  return(scm_undefined);
}

SOBJ sgtk_check_button_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_check_button_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_check_button_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_check_button_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_check_button_new_with_label (SOBJ o_label)
{
  gchar* label;
  GtkWidget* __retval__;

  label = scm_getstr(o_label);
  __retval__ = gtk_check_button_new_with_label(label);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_check_menu_item_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_check_menu_item_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_check_menu_item_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_check_menu_item_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_check_menu_item_new_with_label (SOBJ o_label)
{
  gchar* label;
  GtkWidget* __retval__;

  label = scm_getstr(o_label);
  __retval__ = gtk_check_menu_item_new_with_label(label);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_check_menu_item_set_active (SOBJ o_check_menu_item, SOBJ o_is_active)
{
  GtkCheckMenuItem* check_menu_item;
  gboolean is_active;

  check_menu_item = sgtk_get_Object(o_check_menu_item);
  is_active = (o_is_active != scm_false);
  gtk_check_menu_item_set_active(check_menu_item, is_active);
  return(scm_undefined);
}

SOBJ sgtk_check_menu_item_set_show_toggle (SOBJ o_menu_item, SOBJ o_always)
{
  GtkCheckMenuItem* menu_item;
  gboolean always;

  menu_item = sgtk_get_Object(o_menu_item);
  always = (o_always != scm_false);
  gtk_check_menu_item_set_show_toggle(menu_item, always);
  return(scm_undefined);
}

SOBJ sgtk_check_menu_item_toggled (SOBJ o_check_menu_item)
{
  GtkCheckMenuItem* check_menu_item;

  check_menu_item = sgtk_get_Object(o_check_menu_item);
  gtk_check_menu_item_toggled(check_menu_item);
  return(scm_undefined);
}

SOBJ sgtk_clist_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_clist_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_clist_new (SOBJ o_columns)
{
  gint columns;
  GtkWidget* __retval__;

  columns = scm_number2long(o_columns);
  __retval__ = gtk_clist_new(columns);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_clist_set_hadjustment (SOBJ o_clist, SOBJ o_adjustment)
{
  GtkCList* clist;
  GtkAdjustment* adjustment;

  clist = sgtk_get_Object(o_clist);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_clist_set_hadjustment(clist, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_clist_get_hadjustment (SOBJ o_clist)
{
  GtkCList* clist;
  GtkAdjustment* __retval__;

  clist = sgtk_get_Object(o_clist);
  __retval__ = gtk_clist_get_hadjustment(clist);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_clist_set_vadjustment (SOBJ o_clist, SOBJ o_adjustment)
{
  GtkCList* clist;
  GtkAdjustment* adjustment;

  clist = sgtk_get_Object(o_clist);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_clist_set_vadjustment(clist, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_clist_get_vadjustment (SOBJ o_clist)
{
  GtkCList* clist;
  GtkAdjustment* __retval__;

  clist = sgtk_get_Object(o_clist);
  __retval__ = gtk_clist_get_vadjustment(clist);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_clist_set_shadow_type (SOBJ o_clist, SOBJ o_type)
{
  GtkCList* clist;
  GtkShadowType type;

  clist = sgtk_get_Object(o_clist);
  type = sgtk_enumget("GtkShadowType", o_type);
  gtk_clist_set_shadow_type(clist, type);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_selection_mode (SOBJ o_clist, SOBJ o_mode)
{
  GtkCList* clist;
  GtkSelectionMode mode;

  clist = sgtk_get_Object(o_clist);
  mode = sgtk_enumget("GtkSelectionMode", o_mode);
  gtk_clist_set_selection_mode(clist, mode);
  return(scm_undefined);
}

SOBJ sgtk_clist_freeze (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_freeze(clist);
  return(scm_undefined);
}

SOBJ sgtk_clist_thaw (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_thaw(clist);
  return(scm_undefined);
}

SOBJ sgtk_clist_column_titles_show (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_column_titles_show(clist);
  return(scm_undefined);
}

SOBJ sgtk_clist_column_titles_hide (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_column_titles_hide(clist);
  return(scm_undefined);
}

SOBJ sgtk_clist_column_title_active (SOBJ o_clist, SOBJ o_column)
{
  GtkCList* clist;
  gint column;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  gtk_clist_column_title_active(clist, column);
  return(scm_undefined);
}

SOBJ sgtk_clist_column_title_passive (SOBJ o_clist, SOBJ o_column)
{
  GtkCList* clist;
  gint column;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  gtk_clist_column_title_passive(clist, column);
  return(scm_undefined);
}

SOBJ sgtk_clist_column_titles_active (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_column_titles_active(clist);
  return(scm_undefined);
}

SOBJ sgtk_clist_column_titles_passive (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_column_titles_passive(clist);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_column_title (SOBJ o_clist, SOBJ o_column, SOBJ o_title)
{
  GtkCList* clist;
  gint column;
  gchar* title;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  title = scm_getstr(o_title);
  gtk_clist_set_column_title(clist, column, title);
  return(scm_undefined);
}

SOBJ sgtk_clist_get_column_title (SOBJ o_clist, SOBJ o_column)
{
  GtkCList* clist;
  gint column;
  gchar* __retval__;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  __retval__ = gtk_clist_get_column_title(clist, column);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_clist_set_column_widget (SOBJ o_clist, SOBJ o_column, SOBJ o_widget)
{
  GtkCList* clist;
  gint column;
  GtkWidget* widget;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  widget = sgtk_get_Object(o_widget);
  gtk_clist_set_column_widget(clist, column, widget);
  return(scm_undefined);
}

SOBJ sgtk_clist_get_column_widget (SOBJ o_clist, SOBJ o_column)
{
  GtkCList* clist;
  gint column;
  GtkWidget* __retval__;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  __retval__ = gtk_clist_get_column_widget(clist, column);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_clist_set_column_justification (SOBJ o_clist, SOBJ o_column, SOBJ o_justification)
{
  GtkCList* clist;
  gint column;
  GtkJustification justification;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  justification = sgtk_enumget("GtkJustification", o_justification);
  gtk_clist_set_column_justification(clist, column, justification);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_column_visibility (SOBJ o_clist, SOBJ o_column, SOBJ o_visible)
{
  GtkCList* clist;
  gint column;
  gboolean visible;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  visible = (o_visible != scm_false);
  gtk_clist_set_column_visibility(clist, column, visible);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_column_resizeable (SOBJ o_clist, SOBJ o_column, SOBJ o_resizeable)
{
  GtkCList* clist;
  gint column;
  gboolean resizeable;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  resizeable = (o_resizeable != scm_false);
  gtk_clist_set_column_resizeable(clist, column, resizeable);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_column_auto_resize (SOBJ o_clist, SOBJ o_column, SOBJ o_auto_resize)
{
  GtkCList* clist;
  gint column;
  gboolean auto_resize;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  auto_resize = (o_auto_resize != scm_false);
  gtk_clist_set_column_auto_resize(clist, column, auto_resize);
  return(scm_undefined);
}

SOBJ sgtk_clist_columns_autosize (SOBJ o_clist)
{
  GtkCList* clist;
  gint __retval__;

  clist = sgtk_get_Object(o_clist);
  __retval__ = gtk_clist_columns_autosize(clist);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_clist_optimal_column_width (SOBJ o_clist, SOBJ o_column)
{
  GtkCList* clist;
  gint column;
  gint __retval__;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  __retval__ = gtk_clist_optimal_column_width(clist, column);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_clist_set_column_width (SOBJ o_clist, SOBJ o_column, SOBJ o_width)
{
  GtkCList* clist;
  gint column;
  gint width;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  width = scm_number2long(o_width);
  gtk_clist_set_column_width(clist, column, width);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_column_min_width (SOBJ o_clist, SOBJ o_column, SOBJ o_min_width)
{
  GtkCList* clist;
  gint column;
  gint min_width;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  min_width = scm_number2long(o_min_width);
  gtk_clist_set_column_min_width(clist, column, min_width);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_column_max_width (SOBJ o_clist, SOBJ o_column, SOBJ o_max_width)
{
  GtkCList* clist;
  gint column;
  gint max_width;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  max_width = scm_number2long(o_max_width);
  gtk_clist_set_column_max_width(clist, column, max_width);
  return(scm_undefined);
}

SOBJ sgtk_clist_get_cell_type (SOBJ o_clist, SOBJ o_row, SOBJ o_column)
{
  GtkCList* clist;
  gint row;
  gint column;
  GtkCellType __retval__;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  __retval__ = gtk_clist_get_cell_type(clist, row, column);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_clist_set_text (SOBJ o_clist, SOBJ o_row, SOBJ o_column, SOBJ o_text)
{
  GtkCList* clist;
  gint row;
  gint column;
  gchar* text;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  text = scm_getstr(o_text);
  gtk_clist_set_text(clist, row, column, text);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_clist_get_text (SOBJ o_clist, SOBJ o_row, SOBJ o_column, SOBJ o_text)
{
  GtkCList* clist;
  gint row;
  gint column;
  gchar** text;
  gint __retval__;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  /* +++ undefined gchar** */
  __retval__ = gtk_clist_get_text(clist, row, column, text);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_clist_set_pixmap (SOBJ o_clist, SOBJ o_row, SOBJ o_column, SOBJ o_pixmap, SOBJ o_mask)
{
  GtkCList* clist;
  gint row;
  gint column;
  GdkPixmap* pixmap;
  GdkBitmap* mask;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  pixmap = sgdk_get_Window(o_pixmap);
  mask = sgdk_get_Window(o_mask);
  gtk_clist_set_pixmap(clist, row, column, pixmap, mask);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_clist_get_pixmap (SOBJ o_clist, SOBJ o_row, SOBJ o_column, SOBJ o_pixmap, SOBJ o_mask)
{
  GtkCList* clist;
  gint row;
  gint column;
  GdkPixmap** pixmap;
  GdkBitmap** mask;
  gint __retval__;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  /* +++ undefined GdkPixmap** */
  /* +++ undefined GdkBitmap** */
  __retval__ = gtk_clist_get_pixmap(clist, row, column, pixmap, mask);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_clist_set_pixtext (SOBJ o_clist, SOBJ o_row, SOBJ o_column, SOBJ o_text, SOBJ o_spacing, SOBJ o_pixmap, SOBJ o_mask)
{
  GtkCList* clist;
  gint row;
  gint column;
  gchar* text;
  guint8 spacing;
  GdkPixmap* pixmap;
  GdkBitmap* mask;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  text = scm_getstr(o_text);
  spacing = scm_number2long(o_spacing);
  pixmap = sgdk_get_Window(o_pixmap);
  mask = sgdk_get_Window(o_mask);
  gtk_clist_set_pixtext(clist, row, column, text, spacing, pixmap, mask);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_clist_get_pixtext (SOBJ o_clist, SOBJ o_row, SOBJ o_column, SOBJ o_text, SOBJ o_spacing, SOBJ o_pixmap, SOBJ o_mask)
{
  GtkCList* clist;
  gint row;
  gint column;
  gchar** text;
  guint8* spacing;
  GdkPixmap** pixmap;
  GdkBitmap** mask;
  gint __retval__;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  /* +++ undefined gchar** */
  /* +++ undefined guint8* */
  /* +++ undefined GdkPixmap** */
  /* +++ undefined GdkBitmap** */
  __retval__ = gtk_clist_get_pixtext(clist, row, column, text, spacing, pixmap, mask);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_clist_set_shift (SOBJ o_clist, SOBJ o_row, SOBJ o_column, SOBJ o_vertical, SOBJ o_horizontal)
{
  GtkCList* clist;
  gint row;
  gint column;
  gint vertical;
  gint horizontal;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  vertical = scm_number2long(o_vertical);
  horizontal = scm_number2long(o_horizontal);
  gtk_clist_set_shift(clist, row, column, vertical, horizontal);
  return(scm_undefined);
}

SOBJ sgtk_clist_remove (SOBJ o_clist, SOBJ o_row)
{
  GtkCList* clist;
  gint row;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  gtk_clist_remove(clist, row);
  return(scm_undefined);
}

SOBJ sgtk_clist_clear (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_clear(clist);
  return(scm_undefined);
}

SOBJ sgtk_clist_moveto (SOBJ o_clist, SOBJ o_row, SOBJ o_column, SOBJ o_row_align, SOBJ o_col_align)
{
  GtkCList* clist;
  gint row;
  gint column;
  gfloat row_align;
  gfloat col_align;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  row_align = scm_number2double(o_row_align);
  col_align = scm_number2double(o_col_align);
  gtk_clist_moveto(clist, row, column, row_align, col_align);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_row_height (SOBJ o_clist, SOBJ o_height)
{
  GtkCList* clist;
  guint height;

  clist = sgtk_get_Object(o_clist);
  height = scm_number2long(o_height);
  gtk_clist_set_row_height(clist, height);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_clist_set_row_data (SOBJ o_clist, SOBJ o_row, SOBJ o_data)
{
  GtkCList* clist;
  gint row;
  gpointer data;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  /* +++ get gpointer -> pointer failed */
  gtk_clist_set_row_data(clist, row, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_clist_set_row_data_full (SOBJ o_clist, SOBJ o_row, SOBJ o_data, SOBJ o_destroy)
{
  GtkCList* clist;
  gint row;
  gpointer data;
  GtkDestroyNotify destroy;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  gtk_clist_set_row_data_full(clist, row, data, destroy);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_clist_get_row_data (SOBJ o_clist, SOBJ o_row)
{
  GtkCList* clist;
  gint row;
  gpointer __retval__;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  __retval__ = gtk_clist_get_row_data(clist, row);
  return(scm_mkpointer(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_clist_find_row_from_data (SOBJ o_clist, SOBJ o_data)
{
  GtkCList* clist;
  gpointer data;
  gint __retval__;

  clist = sgtk_get_Object(o_clist);
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_clist_find_row_from_data(clist, data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_clist_swap_rows (SOBJ o_clist, SOBJ o_row1, SOBJ o_row2)
{
  GtkCList* clist;
  gint row1;
  gint row2;

  clist = sgtk_get_Object(o_clist);
  row1 = scm_number2long(o_row1);
  row2 = scm_number2long(o_row2);
  gtk_clist_swap_rows(clist, row1, row2);
  return(scm_undefined);
}

SOBJ sgtk_clist_row_move (SOBJ o_clist, SOBJ o_source_row, SOBJ o_dest_row)
{
  GtkCList* clist;
  gint source_row;
  gint dest_row;

  clist = sgtk_get_Object(o_clist);
  source_row = scm_number2long(o_source_row);
  dest_row = scm_number2long(o_dest_row);
  gtk_clist_row_move(clist, source_row, dest_row);
  return(scm_undefined);
}

SOBJ sgtk_clist_row_is_visible (SOBJ o_clist, SOBJ o_row)
{
  GtkCList* clist;
  gint row;
  GtkVisibility __retval__;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  __retval__ = gtk_clist_row_is_visible(clist, row);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_clist_set_foreground (SOBJ o_clist, SOBJ o_row, SOBJ o_color)
{
  GtkCList* clist;
  gint row;
  GdkColor* color;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  color = sgdk_get_Color(o_color);
  gtk_clist_set_foreground(clist, row, color);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_background (SOBJ o_clist, SOBJ o_row, SOBJ o_color)
{
  GtkCList* clist;
  gint row;
  GdkColor* color;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  color = sgdk_get_Color(o_color);
  gtk_clist_set_background(clist, row, color);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_cell_style (SOBJ o_clist, SOBJ o_row, SOBJ o_column, SOBJ o_style)
{
  GtkCList* clist;
  gint row;
  gint column;
  GtkStyle* style;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  style = sgtk_get_Style(o_style);
  gtk_clist_set_cell_style(clist, row, column, style);
  return(scm_undefined);
}

SOBJ sgtk_clist_get_cell_style (SOBJ o_clist, SOBJ o_row, SOBJ o_column)
{
  GtkCList* clist;
  gint row;
  gint column;
  GtkStyle* __retval__;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  __retval__ = gtk_clist_get_cell_style(clist, row, column);
  return(sgtk_Style_new(__retval__));
}

SOBJ sgtk_clist_set_row_style (SOBJ o_clist, SOBJ o_row, SOBJ o_style)
{
  GtkCList* clist;
  gint row;
  GtkStyle* style;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  style = sgtk_get_Style(o_style);
  gtk_clist_set_row_style(clist, row, style);
  return(scm_undefined);
}

SOBJ sgtk_clist_get_row_style (SOBJ o_clist, SOBJ o_row)
{
  GtkCList* clist;
  gint row;
  GtkStyle* __retval__;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  __retval__ = gtk_clist_get_row_style(clist, row);
  return(sgtk_Style_new(__retval__));
}

SOBJ sgtk_clist_set_selectable (SOBJ o_clist, SOBJ o_row, SOBJ o_selectable)
{
  GtkCList* clist;
  gint row;
  gboolean selectable;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  selectable = (o_selectable != scm_false);
  gtk_clist_set_selectable(clist, row, selectable);
  return(scm_undefined);
}

SOBJ sgtk_clist_get_selectable (SOBJ o_clist, SOBJ o_row)
{
  GtkCList* clist;
  gint row;
  gboolean __retval__;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  __retval__ = gtk_clist_get_selectable(clist, row);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_clist_select_row (SOBJ o_clist, SOBJ o_row, SOBJ o_column)
{
  GtkCList* clist;
  gint row;
  gint column;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  gtk_clist_select_row(clist, row, column);
  return(scm_undefined);
}

SOBJ sgtk_clist_unselect_row (SOBJ o_clist, SOBJ o_row, SOBJ o_column)
{
  GtkCList* clist;
  gint row;
  gint column;

  clist = sgtk_get_Object(o_clist);
  row = scm_number2long(o_row);
  column = scm_number2long(o_column);
  gtk_clist_unselect_row(clist, row, column);
  return(scm_undefined);
}

SOBJ sgtk_clist_select_all (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_select_all(clist);
  return(scm_undefined);
}

SOBJ sgtk_clist_unselect_all (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_unselect_all(clist);
  return(scm_undefined);
}

SOBJ sgtk_clist_undo_selection (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_undo_selection(clist);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_clist_get_selection_info (SOBJ o_clist, SOBJ o_x, SOBJ o_y, SOBJ o_row, SOBJ o_column)
{
  GtkCList* clist;
  gint x;
  gint y;
  gint* row;
  gint* column;
  gint __retval__;

  clist = sgtk_get_Object(o_clist);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  /* +++ undefined gint* */
  /* +++ undefined gint* */
  __retval__ = gtk_clist_get_selection_info(clist, x, y, row, column);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_clist_sort (SOBJ o_clist)
{
  GtkCList* clist;

  clist = sgtk_get_Object(o_clist);
  gtk_clist_sort(clist);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_clist_set_compare_func (SOBJ o_clist, SOBJ o_cmp_func)
{
  GtkCList* clist;
  GtkCListCompareFunc cmp_func;

  clist = sgtk_get_Object(o_clist);
  /* +++ undefined GtkCListCompareFunc */
  gtk_clist_set_compare_func(clist, cmp_func);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_clist_set_auto_sort (SOBJ o_clist, SOBJ o_auto_sort)
{
  GtkCList* clist;
  gboolean auto_sort;

  clist = sgtk_get_Object(o_clist);
  auto_sort = (o_auto_sort != scm_false);
  gtk_clist_set_auto_sort(clist, auto_sort);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_sort_type (SOBJ o_clist, SOBJ o_sort_type)
{
  GtkCList* clist;
  GtkSortType sort_type;

  clist = sgtk_get_Object(o_clist);
  sort_type = sgtk_enumget("GtkSortType", o_sort_type);
  gtk_clist_set_sort_type(clist, sort_type);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_sort_column (SOBJ o_clist, SOBJ o_column)
{
  GtkCList* clist;
  gint column;

  clist = sgtk_get_Object(o_clist);
  column = scm_number2long(o_column);
  gtk_clist_set_sort_column(clist, column);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_reorderable (SOBJ o_clist, SOBJ o_reorderable)
{
  GtkCList* clist;
  gboolean reorderable;

  clist = sgtk_get_Object(o_clist);
  reorderable = (o_reorderable != scm_false);
  gtk_clist_set_reorderable(clist, reorderable);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_use_drag_icons (SOBJ o_clist, SOBJ o_use_icons)
{
  GtkCList* clist;
  gboolean use_icons;

  clist = sgtk_get_Object(o_clist);
  use_icons = (o_use_icons != scm_false);
  gtk_clist_set_use_drag_icons(clist, use_icons);
  return(scm_undefined);
}

SOBJ sgtk_clist_set_button_actions (SOBJ o_clist, SOBJ o_button, SOBJ o_button_actions)
{
  GtkCList* clist;
  guint button;
  guint8 button_actions;

  clist = sgtk_get_Object(o_clist);
  button = scm_number2long(o_button);
  button_actions = scm_number2long(o_button_actions);
  gtk_clist_set_button_actions(clist, button, button_actions);
  return(scm_undefined);
}

SOBJ sgtk_color_selection_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_color_selection_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_color_selection_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_color_selection_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_color_selection_set_update_policy (SOBJ o_colorsel, SOBJ o_policy)
{
  GtkColorSelection* colorsel;
  GtkUpdateType policy;

  colorsel = sgtk_get_Object(o_colorsel);
  policy = sgtk_enumget("GtkUpdateType", o_policy);
  gtk_color_selection_set_update_policy(colorsel, policy);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_color_selection_set_color (SOBJ o_colorsel, SOBJ o_color)
{
  GtkColorSelection* colorsel;
  gdouble* color;

  colorsel = sgtk_get_Object(o_colorsel);
  /* +++ undefined gdouble* */
  gtk_color_selection_set_color(colorsel, color);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_color_selection_get_color (SOBJ o_colorsel, SOBJ o_color)
{
  GtkColorSelection* colorsel;
  gdouble* color;

  colorsel = sgtk_get_Object(o_colorsel);
  /* +++ undefined gdouble* */
  gtk_color_selection_get_color(colorsel, color);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_color_selection_set_opacity (SOBJ o_colorsel, SOBJ o_use_opacity)
{
  GtkColorSelection* colorsel;
  gint use_opacity;

  colorsel = sgtk_get_Object(o_colorsel);
  use_opacity = scm_number2long(o_use_opacity);
  gtk_color_selection_set_opacity(colorsel, use_opacity);
  return(scm_undefined);
}

SOBJ sgtk_color_selection_dialog_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_color_selection_dialog_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_color_selection_dialog_new (SOBJ o_title)
{
  gchar* title;
  GtkWidget* __retval__;

  title = scm_getstr(o_title);
  __retval__ = gtk_color_selection_dialog_new(title);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_combo_get_type ()
{
  guint __retval__;

  __retval__ = gtk_combo_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_combo_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_combo_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_combo_set_value_in_list (SOBJ o_combo, SOBJ o_val, SOBJ o_ok_if_empty)
{
  GtkCombo* combo;
  gint val;
  gint ok_if_empty;

  combo = sgtk_get_Object(o_combo);
  val = scm_number2long(o_val);
  ok_if_empty = scm_number2long(o_ok_if_empty);
  gtk_combo_set_value_in_list(combo, val, ok_if_empty);
  return(scm_undefined);
}

SOBJ sgtk_combo_set_case_sensitive (SOBJ o_combo, SOBJ o_val)
{
  GtkCombo* combo;
  gint val;

  combo = sgtk_get_Object(o_combo);
  val = scm_number2long(o_val);
  gtk_combo_set_case_sensitive(combo, val);
  return(scm_undefined);
}

SOBJ sgtk_combo_set_use_arrows (SOBJ o_combo, SOBJ o_val)
{
  GtkCombo* combo;
  gint val;

  combo = sgtk_get_Object(o_combo);
  val = scm_number2long(o_val);
  gtk_combo_set_use_arrows(combo, val);
  return(scm_undefined);
}

SOBJ sgtk_combo_set_use_arrows_always (SOBJ o_combo, SOBJ o_val)
{
  GtkCombo* combo;
  gint val;

  combo = sgtk_get_Object(o_combo);
  val = scm_number2long(o_val);
  gtk_combo_set_use_arrows_always(combo, val);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_combo_set_popdown_strings (SOBJ o_combo, SOBJ o_strings)
{
  GtkCombo* combo;
  GList* strings;

  combo = sgtk_get_Object(o_combo);
  /* +++ undefined GList* */
  gtk_combo_set_popdown_strings(combo, strings);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_combo_set_item_string (SOBJ o_combo, SOBJ o_item, SOBJ o_item_value)
{
  GtkCombo* combo;
  GtkItem* item;
  gchar* item_value;

  combo = sgtk_get_Object(o_combo);
  item = sgtk_get_Object(o_item);
  item_value = scm_getstr(o_item_value);
  gtk_combo_set_item_string(combo, item, item_value);
  return(scm_undefined);
}

SOBJ sgtk_combo_disable_activate (SOBJ o_combo)
{
  GtkCombo* combo;

  combo = sgtk_get_Object(o_combo);
  gtk_combo_disable_activate(combo);
  return(scm_undefined);
}

SOBJ sgtk_container_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_container_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_container_child_type (SOBJ o_container)
{
  GtkContainer* container;
  GtkType __retval__;

  container = sgtk_get_Object(o_container);
  __retval__ = gtk_container_child_type(container);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_container_addv (SOBJ o_container, SOBJ o_widget, SOBJ o_n_args, SOBJ o_args)
{
  GtkContainer* container;
  GtkWidget* widget;
  guint n_args;
  GtkArg* args;

  container = sgtk_get_Object(o_container);
  widget = sgtk_get_Object(o_widget);
  n_args = scm_number2long(o_n_args);
  /* +++ undefined GtkArg* */
  gtk_container_addv(container, widget, n_args, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_container_child_setv (SOBJ o_container, SOBJ o_child, SOBJ o_n_args, SOBJ o_args)
{
  GtkContainer* container;
  GtkWidget* child;
  guint n_args;
  GtkArg* args;

  container = sgtk_get_Object(o_container);
  child = sgtk_get_Object(o_child);
  n_args = scm_number2long(o_n_args);
  /* +++ undefined GtkArg* */
  gtk_container_child_setv(container, child, n_args, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_container_child_getv (SOBJ o_container, SOBJ o_child, SOBJ o_n_args, SOBJ o_args)
{
  GtkContainer* container;
  GtkWidget* child;
  guint n_args;
  GtkArg* args;

  container = sgtk_get_Object(o_container);
  child = sgtk_get_Object(o_child);
  n_args = scm_number2long(o_n_args);
  /* +++ undefined GtkArg* */
  gtk_container_child_getv(container, child, n_args, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_container_arg_set (SOBJ o_container, SOBJ o_child, SOBJ o_arg, SOBJ o_info)
{
  GtkContainer* container;
  GtkWidget* child;
  GtkArg* arg;
  GtkArgInfo* info;

  container = sgtk_get_Object(o_container);
  child = sgtk_get_Object(o_child);
  /* +++ undefined GtkArg* */
  /* +++ undefined GtkArgInfo* */
  gtk_container_arg_set(container, child, arg, info);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_container_arg_get (SOBJ o_container, SOBJ o_child, SOBJ o_arg, SOBJ o_info)
{
  GtkContainer* container;
  GtkWidget* child;
  GtkArg* arg;
  GtkArgInfo* info;

  container = sgtk_get_Object(o_container);
  child = sgtk_get_Object(o_child);
  /* +++ undefined GtkArg* */
  /* +++ undefined GtkArgInfo* */
  gtk_container_arg_get(container, child, arg, info);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_container_add_child_arg_type (SOBJ o_arg_name, SOBJ o_arg_type, SOBJ o_arg_flags, SOBJ o_arg_id)
{
  gchar* arg_name;
  GtkType arg_type;
  guint arg_flags;
  guint arg_id;

  arg_name = scm_getstr(o_arg_name);
  arg_type = scm_number2long(o_arg_type);
  arg_flags = scm_number2long(o_arg_flags);
  arg_id = scm_number2long(o_arg_id);
  gtk_container_add_child_arg_type(arg_name, arg_type, arg_flags, arg_id);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_container_child_args_collect (SOBJ o_object_type, SOBJ o_arg_list_p, SOBJ o_info_list_p, SOBJ o_first_arg_name, SOBJ o_var_args)
{
  GtkType object_type;
  GSList** arg_list_p;
  GSList** info_list_p;
  gchar* first_arg_name;
  va_list var_args;
  gchar* __retval__;

  object_type = scm_number2long(o_object_type);
  /* +++ undefined GSList** */
  /* +++ undefined GSList** */
  first_arg_name = scm_getstr(o_first_arg_name);
  /* +++ undefined va_list */
  __retval__ = gtk_container_child_args_collect(object_type, arg_list_p, info_list_p, first_arg_name, var_args);
  return(scm_mkstring(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_container_child_arg_get_info (SOBJ o_object_type, SOBJ o_arg_name, SOBJ o_info_p)
{
  GtkType object_type;
  gchar* arg_name;
  GtkArgInfo** info_p;
  gchar* __retval__;

  object_type = scm_number2long(o_object_type);
  arg_name = scm_getstr(o_arg_name);
  /* +++ undefined GtkArgInfo** */
  __retval__ = gtk_container_child_arg_get_info(object_type, arg_name, info_p);
  return(scm_mkstring(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkArg* not defined */
SOBJ sgtk_container_query_child_args (SOBJ o_class_type, SOBJ o_arg_flags, SOBJ o_n_args)
{
  GtkType class_type;
  guint32** arg_flags;
  guint* n_args;
  GtkArg* __retval__;

  class_type = scm_number2long(o_class_type);
  /* +++ undefined guint32** */
  /* +++ undefined guint* */
  __retval__ = gtk_container_query_child_args(class_type, arg_flags, n_args);
  /* +++ don't know how to generate GtkArg* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_container_set_border_width (SOBJ o_container, SOBJ o_border_width)
{
  GtkContainer* container;
  guint border_width;

  container = sgtk_get_Object(o_container);
  border_width = scm_number2long(o_border_width);
  gtk_container_set_border_width(container, border_width);
  return(scm_undefined);
}

SOBJ sgtk_container_add (SOBJ o_container, SOBJ o_widget)
{
  GtkContainer* container;
  GtkWidget* widget;

  container = sgtk_get_Object(o_container);
  widget = sgtk_get_Object(o_widget);
  gtk_container_add(container, widget);
  return(scm_undefined);
}

SOBJ sgtk_container_remove (SOBJ o_container, SOBJ o_widget)
{
  GtkContainer* container;
  GtkWidget* widget;

  container = sgtk_get_Object(o_container);
  widget = sgtk_get_Object(o_widget);
  gtk_container_remove(container, widget);
  return(scm_undefined);
}

SOBJ sgtk_container_dequeue_resize_handler (SOBJ o_container)
{
  GtkContainer* container;

  container = sgtk_get_Object(o_container);
  gtk_container_dequeue_resize_handler(container);
  return(scm_undefined);
}

SOBJ sgtk_container_clear_resize_widgets (SOBJ o_container)
{
  GtkContainer* container;

  container = sgtk_get_Object(o_container);
  gtk_container_clear_resize_widgets(container);
  return(scm_undefined);
}

SOBJ sgtk_container_set_resize_mode (SOBJ o_container, SOBJ o_resize_mode)
{
  GtkContainer* container;
  GtkResizeMode resize_mode;

  container = sgtk_get_Object(o_container);
  resize_mode = sgtk_enumget("GtkResizeMode", o_resize_mode);
  gtk_container_set_resize_mode(container, resize_mode);
  return(scm_undefined);
}

SOBJ sgtk_container_set_reallocate_redraws (SOBJ o_container, SOBJ o_needs_redraws)
{
  GtkContainer* container;
  gboolean needs_redraws;

  container = sgtk_get_Object(o_container);
  needs_redraws = (o_needs_redraws != scm_false);
  gtk_container_set_reallocate_redraws(container, needs_redraws);
  return(scm_undefined);
}

SOBJ sgtk_container_queue_resize (SOBJ o_container)
{
  GtkContainer* container;

  container = sgtk_get_Object(o_container);
  gtk_container_queue_resize(container);
  return(scm_undefined);
}

SOBJ sgtk_container_check_resize (SOBJ o_container)
{
  GtkContainer* container;

  container = sgtk_get_Object(o_container);
  gtk_container_check_resize(container);
  return(scm_undefined);
}

SOBJ sgtk_container_resize_children (SOBJ o_container)
{
  GtkContainer* container;

  container = sgtk_get_Object(o_container);
  gtk_container_resize_children(container);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_container_forall (SOBJ o_container, SOBJ o_callback, SOBJ o_callback_data)
{
  GtkContainer* container;
  GtkCallback callback;
  gpointer callback_data;

  container = sgtk_get_Object(o_container);
  /* +++ undefined GtkCallback */
  /* +++ get gpointer -> pointer failed */
  gtk_container_forall(container, callback, callback_data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_container_foreach (SOBJ o_container, SOBJ o_callback, SOBJ o_callback_data)
{
  GtkContainer* container;
  GtkCallback callback;
  gpointer callback_data;

  container = sgtk_get_Object(o_container);
  /* +++ undefined GtkCallback */
  /* +++ get gpointer -> pointer failed */
  gtk_container_foreach(container, callback, callback_data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_container_foreach_full (SOBJ o_container, SOBJ o_callback, SOBJ o_marshal, SOBJ o_callback_data, SOBJ o_notify)
{
  GtkContainer* container;
  GtkCallback callback;
  GtkCallbackMarshal marshal;
  gpointer callback_data;
  GtkDestroyNotify notify;

  container = sgtk_get_Object(o_container);
  /* +++ undefined GtkCallback */
  /* +++ undefined GtkCallbackMarshal */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  gtk_container_foreach_full(container, callback, marshal, callback_data, notify);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_container_focus (SOBJ o_container, SOBJ o_direction)
{
  GtkContainer* container;
  GtkDirectionType direction;
  gint __retval__;

  container = sgtk_get_Object(o_container);
  direction = sgtk_enumget("GtkDirectionType", o_direction);
  __retval__ = gtk_container_focus(container, direction);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_container_set_focus_child (SOBJ o_container, SOBJ o_widget)
{
  GtkContainer* container;
  GtkWidget* widget;

  container = sgtk_get_Object(o_container);
  widget = sgtk_get_Object(o_widget);
  gtk_container_set_focus_child(container, widget);
  return(scm_undefined);
}

#ifdef INCOMPLETE
  /* +++ return type GList* not defined */
SOBJ sgtk_container_children (SOBJ o_container)
{
  GtkContainer* container;
  GList* __retval__;

  container = sgtk_get_Object(o_container);
  __retval__ = gtk_container_children(container);
  /* +++ don't know how to generate GList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_container_register_toplevel (SOBJ o_container)
{
  GtkContainer* container;

  container = sgtk_get_Object(o_container);
  gtk_container_register_toplevel(container);
  return(scm_undefined);
}

SOBJ sgtk_container_unregister_toplevel (SOBJ o_container)
{
  GtkContainer* container;

  container = sgtk_get_Object(o_container);
  gtk_container_unregister_toplevel(container);
  return(scm_undefined);
}

#ifdef INCOMPLETE
  /* +++ return type GList* not defined */
SOBJ sgtk_container_get_toplevels ()
{
  GList* __retval__;

  __retval__ = gtk_container_get_toplevels();
  /* +++ don't know how to generate GList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_container_child_composite_name (SOBJ o_container, SOBJ o_child)
{
  GtkContainer* container;
  GtkWidget* child;
  gchar* __retval__;

  container = sgtk_get_Object(o_container);
  child = sgtk_get_Object(o_child);
  __retval__ = gtk_container_child_composite_name(container, child);
  return(scm_mkstring(__retval__));
}

/* +++ ignoring gtk_container_real_set_focus_child */

SOBJ sgtk_container_set_focus_vadjustment (SOBJ o_container, SOBJ o_adjustment)
{
  GtkContainer* container;
  GtkAdjustment* adjustment;

  container = sgtk_get_Object(o_container);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_container_set_focus_vadjustment(container, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_container_set_focus_hadjustment (SOBJ o_container, SOBJ o_adjustment)
{
  GtkContainer* container;
  GtkAdjustment* adjustment;

  container = sgtk_get_Object(o_container);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_container_set_focus_hadjustment(container, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_ctree_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_ctree_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_ctree_new (SOBJ o_columns, SOBJ o_tree_column)
{
  gint columns;
  gint tree_column;
  GtkWidget* __retval__;

  columns = scm_number2long(o_columns);
  tree_column = scm_number2long(o_tree_column);
  __retval__ = gtk_ctree_new(columns, tree_column);
  return(sgtk_object_new((void*)__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_ctree_insert_gnode (SOBJ o_ctree, SOBJ o_parent, SOBJ o_sibling, SOBJ o_gnode, SOBJ o_func, SOBJ o_data)
{
  GtkCTree* ctree;
  GtkCTreeNode* parent;
  GtkCTreeNode* sibling;
  GNode* gnode;
  GtkCTreeGNodeFunc func;
  gpointer data;
  GtkCTreeNode* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  parent = sgtk_get_CTreeNode(o_parent);
  sibling = sgtk_get_CTreeNode(o_sibling);
  /* +++ undefined GNode* */
  /* +++ undefined GtkCTreeGNodeFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_ctree_insert_gnode(ctree, parent, sibling, gnode, func, data);
  return(sgtk_CTreeNode_new(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GNode* not defined */
SOBJ sgtk_ctree_export_to_gnode (SOBJ o_ctree, SOBJ o_parent, SOBJ o_sibling, SOBJ o_node, SOBJ o_func, SOBJ o_data)
{
  GtkCTree* ctree;
  GNode* parent;
  GNode* sibling;
  GtkCTreeNode* node;
  GtkCTreeGNodeFunc func;
  gpointer data;
  GNode* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  /* +++ undefined GNode* */
  /* +++ undefined GNode* */
  node = sgtk_get_CTreeNode(o_node);
  /* +++ undefined GtkCTreeGNodeFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_ctree_export_to_gnode(ctree, parent, sibling, node, func, data);
  /* +++ don't know how to generate GNode* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_ctree_remove_node (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_remove_node(ctree, node);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_ctree_post_recursive (SOBJ o_ctree, SOBJ o_node, SOBJ o_func, SOBJ o_data)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GtkCTreeFunc func;
  gpointer data;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  /* +++ undefined GtkCTreeFunc */
  /* +++ get gpointer -> pointer failed */
  gtk_ctree_post_recursive(ctree, node, func, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_ctree_post_recursive_to_depth (SOBJ o_ctree, SOBJ o_node, SOBJ o_depth, SOBJ o_func, SOBJ o_data)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint depth;
  GtkCTreeFunc func;
  gpointer data;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  depth = scm_number2long(o_depth);
  /* +++ undefined GtkCTreeFunc */
  /* +++ get gpointer -> pointer failed */
  gtk_ctree_post_recursive_to_depth(ctree, node, depth, func, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_ctree_pre_recursive (SOBJ o_ctree, SOBJ o_node, SOBJ o_func, SOBJ o_data)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GtkCTreeFunc func;
  gpointer data;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  /* +++ undefined GtkCTreeFunc */
  /* +++ get gpointer -> pointer failed */
  gtk_ctree_pre_recursive(ctree, node, func, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_ctree_pre_recursive_to_depth (SOBJ o_ctree, SOBJ o_node, SOBJ o_depth, SOBJ o_func, SOBJ o_data)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint depth;
  GtkCTreeFunc func;
  gpointer data;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  depth = scm_number2long(o_depth);
  /* +++ undefined GtkCTreeFunc */
  /* +++ get gpointer -> pointer failed */
  gtk_ctree_pre_recursive_to_depth(ctree, node, depth, func, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_ctree_is_viewable (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gboolean __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  __retval__ = gtk_ctree_is_viewable(ctree, node);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_ctree_last (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GtkCTreeNode* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  __retval__ = gtk_ctree_last(ctree, node);
  return(sgtk_CTreeNode_new(__retval__));
}

SOBJ sgtk_ctree_find_node_ptr (SOBJ o_ctree, SOBJ o_ctree_row)
{
  GtkCTree* ctree;
  GtkCTreeRow* ctree_row;
  GtkCTreeNode* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  ctree_row = sgtk_get_Object(o_ctree_row);
  __retval__ = gtk_ctree_find_node_ptr(ctree, ctree_row);
  return(sgtk_CTreeNode_new(__retval__));
}

SOBJ sgtk_ctree_node_nth (SOBJ o_ctree, SOBJ o_row)
{
  GtkCTree* ctree;
  guint row;
  GtkCTreeNode* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  row = scm_number2long(o_row);
  __retval__ = gtk_ctree_node_nth(ctree, row);
  return(sgtk_CTreeNode_new(__retval__));
}

SOBJ sgtk_ctree_find (SOBJ o_ctree, SOBJ o_node, SOBJ o_child)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GtkCTreeNode* child;
  gboolean __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  child = sgtk_get_CTreeNode(o_child);
  __retval__ = gtk_ctree_find(ctree, node, child);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_ctree_is_ancestor (SOBJ o_ctree, SOBJ o_node, SOBJ o_child)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GtkCTreeNode* child;
  gboolean __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  child = sgtk_get_CTreeNode(o_child);
  __retval__ = gtk_ctree_is_ancestor(ctree, node, child);
  return(SCM_MKBOOL(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_ctree_find_by_row_data (SOBJ o_ctree, SOBJ o_node, SOBJ o_data)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gpointer data;
  GtkCTreeNode* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_ctree_find_by_row_data(ctree, node, data);
  return(sgtk_CTreeNode_new(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GList* not defined */
SOBJ sgtk_ctree_find_all_by_row_data (SOBJ o_ctree, SOBJ o_node, SOBJ o_data)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gpointer data;
  GList* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_ctree_find_all_by_row_data(ctree, node, data);
  /* +++ don't know how to generate GList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_ctree_find_by_row_data_custom (SOBJ o_ctree, SOBJ o_node, SOBJ o_data, SOBJ o_func)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gpointer data;
  GCompareFunc func;
  GtkCTreeNode* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GCompareFunc */
  __retval__ = gtk_ctree_find_by_row_data_custom(ctree, node, data, func);
  return(sgtk_CTreeNode_new(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GList* not defined */
SOBJ sgtk_ctree_find_all_by_row_data_custom (SOBJ o_ctree, SOBJ o_node, SOBJ o_data, SOBJ o_func)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gpointer data;
  GCompareFunc func;
  GList* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GCompareFunc */
  __retval__ = gtk_ctree_find_all_by_row_data_custom(ctree, node, data, func);
  /* +++ don't know how to generate GList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_ctree_is_hot_spot (SOBJ o_ctree, SOBJ o_x, SOBJ o_y)
{
  GtkCTree* ctree;
  gint x;
  gint y;
  gboolean __retval__;

  ctree = sgtk_get_Object(o_ctree);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  __retval__ = gtk_ctree_is_hot_spot(ctree, x, y);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_ctree_move (SOBJ o_ctree, SOBJ o_node, SOBJ o_new_parent, SOBJ o_new_sibling)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GtkCTreeNode* new_parent;
  GtkCTreeNode* new_sibling;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  new_parent = sgtk_get_CTreeNode(o_new_parent);
  new_sibling = sgtk_get_CTreeNode(o_new_sibling);
  gtk_ctree_move(ctree, node, new_parent, new_sibling);
  return(scm_undefined);
}

SOBJ sgtk_ctree_expand (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_expand(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_expand_recursive (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_expand_recursive(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_expand_to_depth (SOBJ o_ctree, SOBJ o_node, SOBJ o_depth)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint depth;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  depth = scm_number2long(o_depth);
  gtk_ctree_expand_to_depth(ctree, node, depth);
  return(scm_undefined);
}

SOBJ sgtk_ctree_collapse (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_collapse(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_collapse_recursive (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_collapse_recursive(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_collapse_to_depth (SOBJ o_ctree, SOBJ o_node, SOBJ o_depth)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint depth;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  depth = scm_number2long(o_depth);
  gtk_ctree_collapse_to_depth(ctree, node, depth);
  return(scm_undefined);
}

SOBJ sgtk_ctree_toggle_expansion (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_toggle_expansion(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_toggle_expansion_recursive (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_toggle_expansion_recursive(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_select (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_select(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_unselect (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_unselect(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_select_recursive (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_select_recursive(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_unselect_recursive (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_unselect_recursive(ctree, node);
  return(scm_undefined);
}

/* +++ ignoring gtk_ctree_real_select_recursive */

SOBJ sgtk_ctree_node_set_text (SOBJ o_ctree, SOBJ o_node, SOBJ o_column, SOBJ o_text)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  gchar* text;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  text = scm_getstr(o_text);
  gtk_ctree_node_set_text(ctree, node, column, text);
  return(scm_undefined);
}

SOBJ sgtk_ctree_node_set_pixmap (SOBJ o_ctree, SOBJ o_node, SOBJ o_column, SOBJ o_pixmap, SOBJ o_mask)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  GdkPixmap* pixmap;
  GdkBitmap* mask;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  pixmap = sgdk_get_Window(o_pixmap);
  mask = sgdk_get_Window(o_mask);
  gtk_ctree_node_set_pixmap(ctree, node, column, pixmap, mask);
  return(scm_undefined);
}

SOBJ sgtk_ctree_node_set_pixtext (SOBJ o_ctree, SOBJ o_node, SOBJ o_column, SOBJ o_text, SOBJ o_spacing, SOBJ o_pixmap, SOBJ o_mask)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  gchar* text;
  guint8 spacing;
  GdkPixmap* pixmap;
  GdkBitmap* mask;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  text = scm_getstr(o_text);
  spacing = scm_number2long(o_spacing);
  pixmap = sgdk_get_Window(o_pixmap);
  mask = sgdk_get_Window(o_mask);
  gtk_ctree_node_set_pixtext(ctree, node, column, text, spacing, pixmap, mask);
  return(scm_undefined);
}

SOBJ sgtk_ctree_set_node_info (SOBJ o_ctree, SOBJ o_node, SOBJ o_text, SOBJ o_spacing, SOBJ o_pixmap_closed, SOBJ o_mask_closed, SOBJ o_pixmap_opened, SOBJ o_mask_opened, SOBJ o_is_leaf, SOBJ o_expanded)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gchar* text;
  guint8 spacing;
  GdkPixmap* pixmap_closed;
  GdkBitmap* mask_closed;
  GdkPixmap* pixmap_opened;
  GdkBitmap* mask_opened;
  gboolean is_leaf;
  gboolean expanded;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  text = scm_getstr(o_text);
  spacing = scm_number2long(o_spacing);
  pixmap_closed = sgdk_get_Window(o_pixmap_closed);
  mask_closed = sgdk_get_Window(o_mask_closed);
  pixmap_opened = sgdk_get_Window(o_pixmap_opened);
  mask_opened = sgdk_get_Window(o_mask_opened);
  is_leaf = (o_is_leaf != scm_false);
  expanded = (o_expanded != scm_false);
  gtk_ctree_set_node_info(ctree, node, text, spacing, pixmap_closed, mask_closed, pixmap_opened, mask_opened, is_leaf, expanded);
  return(scm_undefined);
}

SOBJ sgtk_ctree_node_set_shift (SOBJ o_ctree, SOBJ o_node, SOBJ o_column, SOBJ o_vertical, SOBJ o_horizontal)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  gint vertical;
  gint horizontal;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  vertical = scm_number2long(o_vertical);
  horizontal = scm_number2long(o_horizontal);
  gtk_ctree_node_set_shift(ctree, node, column, vertical, horizontal);
  return(scm_undefined);
}

SOBJ sgtk_ctree_node_set_selectable (SOBJ o_ctree, SOBJ o_node, SOBJ o_selectable)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gboolean selectable;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  selectable = (o_selectable != scm_false);
  gtk_ctree_node_set_selectable(ctree, node, selectable);
  return(scm_undefined);
}

SOBJ sgtk_ctree_node_get_selectable (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gboolean __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  __retval__ = gtk_ctree_node_get_selectable(ctree, node);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_ctree_node_get_cell_type (SOBJ o_ctree, SOBJ o_node, SOBJ o_column)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  GtkCellType __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  __retval__ = gtk_ctree_node_get_cell_type(ctree, node, column);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_ctree_node_get_text (SOBJ o_ctree, SOBJ o_node, SOBJ o_column, SOBJ o_text)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  gchar** text;
  gint __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  /* +++ undefined gchar** */
  __retval__ = gtk_ctree_node_get_text(ctree, node, column, text);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_ctree_node_get_pixmap (SOBJ o_ctree, SOBJ o_node, SOBJ o_column, SOBJ o_pixmap, SOBJ o_mask)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  GdkPixmap** pixmap;
  GdkBitmap** mask;
  gint __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  /* +++ undefined GdkPixmap** */
  /* +++ undefined GdkBitmap** */
  __retval__ = gtk_ctree_node_get_pixmap(ctree, node, column, pixmap, mask);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_ctree_node_get_pixtext (SOBJ o_ctree, SOBJ o_node, SOBJ o_column, SOBJ o_text, SOBJ o_spacing, SOBJ o_pixmap, SOBJ o_mask)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  gchar** text;
  guint8* spacing;
  GdkPixmap** pixmap;
  GdkBitmap** mask;
  gint __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  /* +++ undefined gchar** */
  /* +++ undefined guint8* */
  /* +++ undefined GdkPixmap** */
  /* +++ undefined GdkBitmap** */
  __retval__ = gtk_ctree_node_get_pixtext(ctree, node, column, text, spacing, pixmap, mask);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_ctree_get_node_info (SOBJ o_ctree, SOBJ o_node, SOBJ o_text, SOBJ o_spacing, SOBJ o_pixmap_closed, SOBJ o_mask_closed, SOBJ o_pixmap_opened, SOBJ o_mask_opened, SOBJ o_is_leaf, SOBJ o_expanded)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gchar** text;
  guint8* spacing;
  GdkPixmap** pixmap_closed;
  GdkBitmap** mask_closed;
  GdkPixmap** pixmap_opened;
  GdkBitmap** mask_opened;
  gboolean* is_leaf;
  gboolean* expanded;
  gint __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  /* +++ undefined gchar** */
  /* +++ undefined guint8* */
  /* +++ undefined GdkPixmap** */
  /* +++ undefined GdkBitmap** */
  /* +++ undefined GdkPixmap** */
  /* +++ undefined GdkBitmap** */
  /* +++ undefined gboolean* */
  /* +++ undefined gboolean* */
  __retval__ = gtk_ctree_get_node_info(ctree, node, text, spacing, pixmap_closed, mask_closed, pixmap_opened, mask_opened, is_leaf, expanded);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_ctree_node_set_cell_style (SOBJ o_ctree, SOBJ o_node, SOBJ o_column, SOBJ o_style)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  GtkStyle* style;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  style = sgtk_get_Style(o_style);
  gtk_ctree_node_set_cell_style(ctree, node, column, style);
  return(scm_undefined);
}

SOBJ sgtk_ctree_node_get_cell_style (SOBJ o_ctree, SOBJ o_node, SOBJ o_column)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  GtkStyle* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  __retval__ = gtk_ctree_node_get_cell_style(ctree, node, column);
  return(sgtk_Style_new(__retval__));
}

SOBJ sgtk_ctree_node_set_row_style (SOBJ o_ctree, SOBJ o_node, SOBJ o_style)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GtkStyle* style;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  style = sgtk_get_Style(o_style);
  gtk_ctree_node_set_row_style(ctree, node, style);
  return(scm_undefined);
}

SOBJ sgtk_ctree_node_get_row_style (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GtkStyle* __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  __retval__ = gtk_ctree_node_get_row_style(ctree, node);
  return(sgtk_Style_new(__retval__));
}

SOBJ sgtk_ctree_node_set_foreground (SOBJ o_ctree, SOBJ o_node, SOBJ o_color)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GdkColor* color;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  color = sgdk_get_Color(o_color);
  gtk_ctree_node_set_foreground(ctree, node, color);
  return(scm_undefined);
}

SOBJ sgtk_ctree_node_set_background (SOBJ o_ctree, SOBJ o_node, SOBJ o_color)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GdkColor* color;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  color = sgdk_get_Color(o_color);
  gtk_ctree_node_set_background(ctree, node, color);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_ctree_node_set_row_data (SOBJ o_ctree, SOBJ o_node, SOBJ o_data)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gpointer data;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  /* +++ get gpointer -> pointer failed */
  gtk_ctree_node_set_row_data(ctree, node, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_ctree_node_set_row_data_full (SOBJ o_ctree, SOBJ o_node, SOBJ o_data, SOBJ o_destroy)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gpointer data;
  GtkDestroyNotify destroy;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  gtk_ctree_node_set_row_data_full(ctree, node, data, destroy);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_ctree_node_get_row_data (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gpointer __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  __retval__ = gtk_ctree_node_get_row_data(ctree, node);
  return(scm_mkpointer(__retval__));
}

SOBJ sgtk_ctree_node_moveto (SOBJ o_ctree, SOBJ o_node, SOBJ o_column, SOBJ o_row_align, SOBJ o_col_align)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  gint column;
  gfloat row_align;
  gfloat col_align;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  column = scm_number2long(o_column);
  row_align = scm_number2double(o_row_align);
  col_align = scm_number2double(o_col_align);
  gtk_ctree_node_moveto(ctree, node, column, row_align, col_align);
  return(scm_undefined);
}

SOBJ sgtk_ctree_node_is_visible (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;
  GtkVisibility __retval__;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  __retval__ = gtk_ctree_node_is_visible(ctree, node);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_ctree_set_indent (SOBJ o_ctree, SOBJ o_indent)
{
  GtkCTree* ctree;
  gint indent;

  ctree = sgtk_get_Object(o_ctree);
  indent = scm_number2long(o_indent);
  gtk_ctree_set_indent(ctree, indent);
  return(scm_undefined);
}

SOBJ sgtk_ctree_set_spacing (SOBJ o_ctree, SOBJ o_spacing)
{
  GtkCTree* ctree;
  gint spacing;

  ctree = sgtk_get_Object(o_ctree);
  spacing = scm_number2long(o_spacing);
  gtk_ctree_set_spacing(ctree, spacing);
  return(scm_undefined);
}

SOBJ sgtk_ctree_set_show_stub (SOBJ o_ctree, SOBJ o_show_stub)
{
  GtkCTree* ctree;
  gboolean show_stub;

  ctree = sgtk_get_Object(o_ctree);
  show_stub = (o_show_stub != scm_false);
  gtk_ctree_set_show_stub(ctree, show_stub);
  return(scm_undefined);
}

SOBJ sgtk_ctree_set_line_style (SOBJ o_ctree, SOBJ o_line_style)
{
  GtkCTree* ctree;
  GtkCTreeLineStyle line_style;

  ctree = sgtk_get_Object(o_ctree);
  line_style = sgtk_enumget("GtkCTreeLineStyle", o_line_style);
  gtk_ctree_set_line_style(ctree, line_style);
  return(scm_undefined);
}

SOBJ sgtk_ctree_set_expander_style (SOBJ o_ctree, SOBJ o_expander_style)
{
  GtkCTree* ctree;
  GtkCTreeExpanderStyle expander_style;

  ctree = sgtk_get_Object(o_ctree);
  expander_style = sgtk_enumget("GtkCTreeExpanderStyle", o_expander_style);
  gtk_ctree_set_expander_style(ctree, expander_style);
  return(scm_undefined);
}

SOBJ sgtk_ctree_sort_recursive (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_sort_recursive(ctree, node);
  return(scm_undefined);
}

SOBJ sgtk_ctree_sort_node (SOBJ o_ctree, SOBJ o_node)
{
  GtkCTree* ctree;
  GtkCTreeNode* node;

  ctree = sgtk_get_Object(o_ctree);
  node = sgtk_get_CTreeNode(o_node);
  gtk_ctree_sort_node(ctree, node);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_ctree_set_drag_compare_func (SOBJ o_ctree, SOBJ o_cmp_func)
{
  GtkCTree* ctree;
  GtkCTreeCompareDragFunc cmp_func;

  ctree = sgtk_get_Object(o_ctree);
  /* +++ undefined GtkCTreeCompareDragFunc */
  gtk_ctree_set_drag_compare_func(ctree, cmp_func);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_curve_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_curve_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_curve_set_curve_type (SOBJ o_c, SOBJ o_new_type)
{
  GtkCurve* c;
  GtkCurveType new_type;

  c = sgtk_get_Object(o_c);
  new_type = sgtk_enumget("GtkCurveType", o_new_type);
  gtk_curve_set_curve_type(c, new_type);
  return(scm_undefined);
}

SOBJ sgtk_curve_reset (SOBJ o_c)
{
  GtkCurve* c;

  c = sgtk_get_Object(o_c);
  gtk_curve_reset(c);
  return(scm_undefined);
}

SOBJ sgtk_curve_set_gamma (SOBJ o_c, SOBJ o_gamma)
{
  GtkCurve* c;
  gfloat gamma;

  c = sgtk_get_Object(o_c);
  gamma = scm_number2double(o_gamma);
  gtk_curve_set_gamma(c, gamma);
  return(scm_undefined);
}

SOBJ sgtk_curve_set_range (SOBJ o_curve, SOBJ o_min_x, SOBJ o_max_x, SOBJ o_min_y, SOBJ o_max_y)
{
  GtkCurve* curve;
  gfloat min_x;
  gfloat max_x;
  gfloat min_y;
  gfloat max_y;

  curve = sgtk_get_Object(o_curve);
  min_x = scm_number2double(o_min_x);
  max_x = scm_number2double(o_max_x);
  min_y = scm_number2double(o_min_y);
  max_y = scm_number2double(o_max_y);
  gtk_curve_set_range(curve, min_x, max_x, min_y, max_y);
  return(scm_undefined);
}

SOBJ sgtk_curve_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_curve_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_data_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_data_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_dialog_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_dialog_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_dialog_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_dialog_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_drag_get_data (SOBJ o_widget, SOBJ o_context, SOBJ o_target, SOBJ o_time)
{
  GtkWidget* widget;
  GdkDragContext* context;
  GdkAtom target;
  guint32 time;

  widget = sgtk_get_Object(o_widget);
  context = sgdk_get_DragContext(o_context);
  target = sgdk_get_Atom(o_target);
  time = scm_number2long(o_time);
  gtk_drag_get_data(widget, context, target, time);
  return(scm_undefined);
}

SOBJ sgtk_drag_get_source_widget (SOBJ o_context)
{
  GdkDragContext* context;
  GtkWidget* __retval__;

  context = sgdk_get_DragContext(o_context);
  __retval__ = gtk_drag_get_source_widget(context);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_drag_finish (SOBJ o_context, SOBJ o_success, SOBJ o_del, SOBJ o_time)
{
  GdkDragContext* context;
  gboolean success;
  gboolean del;
  guint32 time;

  context = sgdk_get_DragContext(o_context);
  success = (o_success != scm_false);
  del = (o_del != scm_false);
  time = scm_number2long(o_time);
  gtk_drag_finish(context, success, del, time);
  return(scm_undefined);
}

SOBJ sgtk_drag_highlight (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_drag_highlight(widget);
  return(scm_undefined);
}

SOBJ sgtk_drag_unhighlight (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_drag_unhighlight(widget);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_drag_dest_set (SOBJ o_widget, SOBJ o_flags, SOBJ o_targets, SOBJ o_n_targets, SOBJ o_actions)
{
  GtkWidget* widget;
  GtkDestDefaults flags;
  GtkTargetEntry* targets;
  gint n_targets;
  GdkDragAction actions;

  widget = sgtk_get_Object(o_widget);
  flags = sgtk_flagsget("GtkDestDefaults", o_flags);
  /* +++ undefined GtkTargetEntry* */
  n_targets = scm_number2long(o_n_targets);
  actions = sgtk_flagsget("GdkDragAction", o_actions);
  gtk_drag_dest_set(widget, flags, targets, n_targets, actions);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_drag_dest_set_proxy (SOBJ o_widget, SOBJ o_proxy_window, SOBJ o_protocol, SOBJ o_use_coordinates)
{
  GtkWidget* widget;
  GdkWindow* proxy_window;
  GdkDragProtocol protocol;
  gboolean use_coordinates;

  widget = sgtk_get_Object(o_widget);
  proxy_window = sgdk_get_Window(o_proxy_window);
  protocol = sgtk_enumget("GdkDragProtocol", o_protocol);
  use_coordinates = (o_use_coordinates != scm_false);
  gtk_drag_dest_set_proxy(widget, proxy_window, protocol, use_coordinates);
  return(scm_undefined);
}

SOBJ sgtk_drag_dest_unset (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_drag_dest_unset(widget);
  return(scm_undefined);
}

SOBJ sgtk_drag_dest_handle_event (SOBJ o_toplevel, SOBJ o_event)
{
  GtkWidget* toplevel;
  GdkEvent* event;

  toplevel = sgtk_get_Object(o_toplevel);
  event = sgdk_get_Event(o_event);
  gtk_drag_dest_handle_event(toplevel, event);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_drag_begin (SOBJ o_widget, SOBJ o_target_list, SOBJ o_actions, SOBJ o_button, SOBJ o_event)
{
  GtkWidget* widget;
  GtkTargetList* target_list;
  GdkDragAction actions;
  gint button;
  GdkEvent* event;
  GdkDragContext* __retval__;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GtkTargetList* */
  actions = sgtk_flagsget("GdkDragAction", o_actions);
  button = scm_number2long(o_button);
  event = sgdk_get_Event(o_event);
  __retval__ = gtk_drag_begin(widget, target_list, actions, button, event);
  return(sgdk_DragContext_new(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_drag_source_set (SOBJ o_widget, SOBJ o_start_button_mask, SOBJ o_targets, SOBJ o_n_targets, SOBJ o_actions)
{
  GtkWidget* widget;
  GdkModifierType start_button_mask;
  GtkTargetEntry* targets;
  gint n_targets;
  GdkDragAction actions;

  widget = sgtk_get_Object(o_widget);
  start_button_mask = sgtk_flagsget("GdkModifierType", o_start_button_mask);
  /* +++ undefined GtkTargetEntry* */
  n_targets = scm_number2long(o_n_targets);
  actions = sgtk_flagsget("GdkDragAction", o_actions);
  gtk_drag_source_set(widget, start_button_mask, targets, n_targets, actions);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_drag_source_unset (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_drag_source_unset(widget);
  return(scm_undefined);
}

SOBJ sgtk_drag_source_set_icon (SOBJ o_widget, SOBJ o_colormap, SOBJ o_pixmap, SOBJ o_mask)
{
  GtkWidget* widget;
  GdkColormap* colormap;
  GdkPixmap* pixmap;
  GdkBitmap* mask;

  widget = sgtk_get_Object(o_widget);
  colormap = sgdk_get_Colormap(o_colormap);
  pixmap = sgdk_get_Window(o_pixmap);
  mask = sgdk_get_Window(o_mask);
  gtk_drag_source_set_icon(widget, colormap, pixmap, mask);
  return(scm_undefined);
}

SOBJ sgtk_drag_set_icon_widget (SOBJ o_context, SOBJ o_widget, SOBJ o_hot_x, SOBJ o_hot_y)
{
  GdkDragContext* context;
  GtkWidget* widget;
  gint hot_x;
  gint hot_y;

  context = sgdk_get_DragContext(o_context);
  widget = sgtk_get_Object(o_widget);
  hot_x = scm_number2long(o_hot_x);
  hot_y = scm_number2long(o_hot_y);
  gtk_drag_set_icon_widget(context, widget, hot_x, hot_y);
  return(scm_undefined);
}

SOBJ sgtk_drag_set_icon_pixmap (SOBJ o_context, SOBJ o_colormap, SOBJ o_pixmap, SOBJ o_mask, SOBJ o_hot_x, SOBJ o_hot_y)
{
  GdkDragContext* context;
  GdkColormap* colormap;
  GdkPixmap* pixmap;
  GdkBitmap* mask;
  gint hot_x;
  gint hot_y;

  context = sgdk_get_DragContext(o_context);
  colormap = sgdk_get_Colormap(o_colormap);
  pixmap = sgdk_get_Window(o_pixmap);
  mask = sgdk_get_Window(o_mask);
  hot_x = scm_number2long(o_hot_x);
  hot_y = scm_number2long(o_hot_y);
  gtk_drag_set_icon_pixmap(context, colormap, pixmap, mask, hot_x, hot_y);
  return(scm_undefined);
}

SOBJ sgtk_drag_set_icon_default (SOBJ o_context)
{
  GdkDragContext* context;

  context = sgdk_get_DragContext(o_context);
  gtk_drag_set_icon_default(context);
  return(scm_undefined);
}

SOBJ sgtk_drag_set_default_icon (SOBJ o_colormap, SOBJ o_pixmap, SOBJ o_mask, SOBJ o_hot_x, SOBJ o_hot_y)
{
  GdkColormap* colormap;
  GdkPixmap* pixmap;
  GdkBitmap* mask;
  gint hot_x;
  gint hot_y;

  colormap = sgdk_get_Colormap(o_colormap);
  pixmap = sgdk_get_Window(o_pixmap);
  mask = sgdk_get_Window(o_mask);
  hot_x = scm_number2long(o_hot_x);
  hot_y = scm_number2long(o_hot_y);
  gtk_drag_set_default_icon(colormap, pixmap, mask, hot_x, hot_y);
  return(scm_undefined);
}

SOBJ sgtk_drag_source_handle_event (SOBJ o_widget, SOBJ o_event)
{
  GtkWidget* widget;
  GdkEvent* event;

  widget = sgtk_get_Object(o_widget);
  event = sgdk_get_Event(o_event);
  gtk_drag_source_handle_event(widget, event);
  return(scm_undefined);
}

SOBJ sgtk_drawing_area_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_drawing_area_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_drawing_area_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_drawing_area_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_drawing_area_size (SOBJ o_darea, SOBJ o_width, SOBJ o_height)
{
  GtkDrawingArea* darea;
  gint width;
  gint height;

  darea = sgtk_get_Object(o_darea);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_drawing_area_size(darea, width, height);
  return(scm_undefined);
}

SOBJ sgtk_editable_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_editable_get_type();
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_editable_insert_text (SOBJ o_editable, SOBJ o_new_text, SOBJ o_new_text_length, SOBJ o_position)
{
  GtkEditable* editable;
  gchar* new_text;
  gint new_text_length;
  gint* position;

  editable = sgtk_get_Object(o_editable);
  new_text = scm_getstr(o_new_text);
  new_text_length = scm_number2long(o_new_text_length);
  /* +++ undefined gint* */
  gtk_editable_insert_text(editable, new_text, new_text_length, position);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_editable_delete_text (SOBJ o_editable, SOBJ o_start_pos, SOBJ o_end_pos)
{
  GtkEditable* editable;
  gint start_pos;
  gint end_pos;

  editable = sgtk_get_Object(o_editable);
  start_pos = scm_number2long(o_start_pos);
  end_pos = scm_number2long(o_end_pos);
  gtk_editable_delete_text(editable, start_pos, end_pos);
  return(scm_undefined);
}

SOBJ sgtk_editable_get_chars (SOBJ o_editable, SOBJ o_start, SOBJ o_end)
{
  GtkEditable* editable;
  gint start;
  gint end;
  gchar* __retval__;

  editable = sgtk_get_Object(o_editable);
  start = scm_number2long(o_start);
  end = scm_number2long(o_end);
  __retval__ = gtk_editable_get_chars(editable, start, end);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_editable_set_position (SOBJ o_editable, SOBJ o_position)
{
  GtkEditable* editable;
  gint position;

  editable = sgtk_get_Object(o_editable);
  position = scm_number2long(o_position);
  gtk_editable_set_position(editable, position);
  return(scm_undefined);
}

SOBJ sgtk_editable_get_position (SOBJ o_editable)
{
  GtkEditable* editable;
  gint __retval__;

  editable = sgtk_get_Object(o_editable);
  __retval__ = gtk_editable_get_position(editable);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_editable_delete_selection (SOBJ o_editable)
{
  GtkEditable* editable;

  editable = sgtk_get_Object(o_editable);
  gtk_editable_delete_selection(editable);
  return(scm_undefined);
}

SOBJ sgtk_editable_claim_selection (SOBJ o_editable, SOBJ o_claim, SOBJ o_time)
{
  GtkEditable* editable;
  gboolean claim;
  guint32 time;

  editable = sgtk_get_Object(o_editable);
  claim = (o_claim != scm_false);
  time = scm_number2long(o_time);
  gtk_editable_claim_selection(editable, claim, time);
  return(scm_undefined);
}

SOBJ sgtk_editable_select_region (SOBJ o_editable, SOBJ o_start, SOBJ o_end)
{
  GtkEditable* editable;
  gint start;
  gint end;

  editable = sgtk_get_Object(o_editable);
  start = scm_number2long(o_start);
  end = scm_number2long(o_end);
  gtk_editable_select_region(editable, start, end);
  return(scm_undefined);
}

SOBJ sgtk_editable_cut_clipboard (SOBJ o_editable)
{
  GtkEditable* editable;

  editable = sgtk_get_Object(o_editable);
  gtk_editable_cut_clipboard(editable);
  return(scm_undefined);
}

SOBJ sgtk_editable_copy_clipboard (SOBJ o_editable)
{
  GtkEditable* editable;

  editable = sgtk_get_Object(o_editable);
  gtk_editable_copy_clipboard(editable);
  return(scm_undefined);
}

SOBJ sgtk_editable_paste_clipboard (SOBJ o_editable)
{
  GtkEditable* editable;

  editable = sgtk_get_Object(o_editable);
  gtk_editable_paste_clipboard(editable);
  return(scm_undefined);
}

SOBJ sgtk_editable_set_editable (SOBJ o_editable, SOBJ o_is_editable)
{
  GtkEditable* editable;
  gboolean is_editable;

  editable = sgtk_get_Object(o_editable);
  is_editable = (o_is_editable != scm_false);
  gtk_editable_set_editable(editable, is_editable);
  return(scm_undefined);
}

SOBJ sgtk_editable_changed (SOBJ o_editable)
{
  GtkEditable* editable;

  editable = sgtk_get_Object(o_editable);
  gtk_editable_changed(editable);
  return(scm_undefined);
}

SOBJ sgtk_entry_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_entry_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_entry_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_entry_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_entry_new_with_max_length (SOBJ o_max)
{
  guint16 max;
  GtkWidget* __retval__;

  max = scm_number2long(o_max);
  __retval__ = gtk_entry_new_with_max_length(max);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_entry_set_text (SOBJ o_entry, SOBJ o_text)
{
  GtkEntry* entry;
  gchar* text;

  entry = sgtk_get_Object(o_entry);
  text = scm_getstr(o_text);
  gtk_entry_set_text(entry, text);
  return(scm_undefined);
}

SOBJ sgtk_entry_append_text (SOBJ o_entry, SOBJ o_text)
{
  GtkEntry* entry;
  gchar* text;

  entry = sgtk_get_Object(o_entry);
  text = scm_getstr(o_text);
  gtk_entry_append_text(entry, text);
  return(scm_undefined);
}

SOBJ sgtk_entry_prepend_text (SOBJ o_entry, SOBJ o_text)
{
  GtkEntry* entry;
  gchar* text;

  entry = sgtk_get_Object(o_entry);
  text = scm_getstr(o_text);
  gtk_entry_prepend_text(entry, text);
  return(scm_undefined);
}

SOBJ sgtk_entry_set_position (SOBJ o_entry, SOBJ o_position)
{
  GtkEntry* entry;
  gint position;

  entry = sgtk_get_Object(o_entry);
  position = scm_number2long(o_position);
  gtk_entry_set_position(entry, position);
  return(scm_undefined);
}

SOBJ sgtk_entry_set_visibility (SOBJ o_entry, SOBJ o_visible)
{
  GtkEntry* entry;
  gboolean visible;

  entry = sgtk_get_Object(o_entry);
  visible = (o_visible != scm_false);
  gtk_entry_set_visibility(entry, visible);
  return(scm_undefined);
}

SOBJ sgtk_entry_set_editable (SOBJ o_entry, SOBJ o_editable)
{
  GtkEntry* entry;
  gboolean editable;

  entry = sgtk_get_Object(o_entry);
  editable = (o_editable != scm_false);
  gtk_entry_set_editable(entry, editable);
  return(scm_undefined);
}

SOBJ sgtk_entry_get_text (SOBJ o_entry)
{
  GtkEntry* entry;
  gchar* __retval__;

  entry = sgtk_get_Object(o_entry);
  __retval__ = gtk_entry_get_text(entry);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_entry_select_region (SOBJ o_entry, SOBJ o_start, SOBJ o_end)
{
  GtkEntry* entry;
  gint start;
  gint end;

  entry = sgtk_get_Object(o_entry);
  start = scm_number2long(o_start);
  end = scm_number2long(o_end);
  gtk_entry_select_region(entry, start, end);
  return(scm_undefined);
}

SOBJ sgtk_entry_set_max_length (SOBJ o_entry, SOBJ o_max)
{
  GtkEntry* entry;
  guint16 max;

  entry = sgtk_get_Object(o_entry);
  max = scm_number2long(o_max);
  gtk_entry_set_max_length(entry, max);
  return(scm_undefined);
}

SOBJ sgtk_event_box_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_event_box_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_event_box_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_event_box_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_file_selection_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_file_selection_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_file_selection_new (SOBJ o_title)
{
  gchar* title;
  GtkWidget* __retval__;

  title = scm_getstr(o_title);
  __retval__ = gtk_file_selection_new(title);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_file_selection_show_fileop_buttons (SOBJ o_filesel)
{
  GtkFileSelection* filesel;

  filesel = sgtk_get_Object(o_filesel);
  gtk_file_selection_show_fileop_buttons(filesel);
  return(scm_undefined);
}

SOBJ sgtk_file_selection_hide_fileop_buttons (SOBJ o_filesel)
{
  GtkFileSelection* filesel;

  filesel = sgtk_get_Object(o_filesel);
  gtk_file_selection_hide_fileop_buttons(filesel);
  return(scm_undefined);
}

SOBJ sgtk_file_selection_set_filename (SOBJ o_filesel, SOBJ o_filename)
{
  GtkFileSelection* filesel;
  gchar* filename;

  filesel = sgtk_get_Object(o_filesel);
  filename = scm_getstr(o_filename);
  gtk_file_selection_set_filename(filesel, filename);
  return(scm_undefined);
}

SOBJ sgtk_file_selection_get_filename (SOBJ o_filesel)
{
  GtkFileSelection* filesel;
  gchar* __retval__;

  filesel = sgtk_get_Object(o_filesel);
  __retval__ = gtk_file_selection_get_filename(filesel);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_file_selection_complete (SOBJ o_filesel, SOBJ o_pattern)
{
  GtkFileSelection* filesel;
  gchar* pattern;

  filesel = sgtk_get_Object(o_filesel);
  pattern = scm_getstr(o_pattern);
  gtk_file_selection_complete(filesel, pattern);
  return(scm_undefined);
}

SOBJ sgtk_fixed_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_fixed_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_fixed_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_fixed_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_fixed_put (SOBJ o_fixed, SOBJ o_widget, SOBJ o_x, SOBJ o_y)
{
  GtkFixed* fixed;
  GtkWidget* widget;
  gint16 x;
  gint16 y;

  fixed = sgtk_get_Object(o_fixed);
  widget = sgtk_get_Object(o_widget);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  gtk_fixed_put(fixed, widget, x, y);
  return(scm_undefined);
}

SOBJ sgtk_fixed_move (SOBJ o_fixed, SOBJ o_widget, SOBJ o_x, SOBJ o_y)
{
  GtkFixed* fixed;
  GtkWidget* widget;
  gint16 x;
  gint16 y;

  fixed = sgtk_get_Object(o_fixed);
  widget = sgtk_get_Object(o_widget);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  gtk_fixed_move(fixed, widget, x, y);
  return(scm_undefined);
}

SOBJ sgtk_font_selection_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_font_selection_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_font_selection_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_font_selection_new();
  return(sgtk_object_new((void*)__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_font_selection_set_filter (SOBJ o_fontsel, SOBJ o_filter_type, SOBJ o_font_type, SOBJ o_foundries, SOBJ o_weights, SOBJ o_slants, SOBJ o_setwidths, SOBJ o_spacings, SOBJ o_charsets)
{
  GtkFontSelection* fontsel;
  GtkFontFilterType filter_type;
  GtkFontType font_type;
  gchar** foundries;
  gchar** weights;
  gchar** slants;
  gchar** setwidths;
  gchar** spacings;
  gchar** charsets;

  fontsel = sgtk_get_Object(o_fontsel);
  filter_type = sgtk_enumget("GtkFontFilterType", o_filter_type);
  font_type = sgtk_flagsget("GtkFontType", o_font_type);
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  gtk_font_selection_set_filter(fontsel, filter_type, font_type, foundries, weights, slants, setwidths, spacings, charsets);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_font_selection_get_font (SOBJ o_fontsel)
{
  GtkFontSelection* fontsel;
  GdkFont* __retval__;

  fontsel = sgtk_get_Object(o_fontsel);
  __retval__ = gtk_font_selection_get_font(fontsel);
  return(sgdk_Font_new(__retval__));
}

SOBJ sgtk_font_selection_get_font_name (SOBJ o_fontsel)
{
  GtkFontSelection* fontsel;
  gchar* __retval__;

  fontsel = sgtk_get_Object(o_fontsel);
  __retval__ = gtk_font_selection_get_font_name(fontsel);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_font_selection_set_font_name (SOBJ o_fontsel, SOBJ o_fontname)
{
  GtkFontSelection* fontsel;
  gchar* fontname;
  gboolean __retval__;

  fontsel = sgtk_get_Object(o_fontsel);
  fontname = scm_getstr(o_fontname);
  __retval__ = gtk_font_selection_set_font_name(fontsel, fontname);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_font_selection_get_preview_text (SOBJ o_fontsel)
{
  GtkFontSelection* fontsel;
  gchar* __retval__;

  fontsel = sgtk_get_Object(o_fontsel);
  __retval__ = gtk_font_selection_get_preview_text(fontsel);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_font_selection_set_preview_text (SOBJ o_fontsel, SOBJ o_text)
{
  GtkFontSelection* fontsel;
  gchar* text;

  fontsel = sgtk_get_Object(o_fontsel);
  text = scm_getstr(o_text);
  gtk_font_selection_set_preview_text(fontsel, text);
  return(scm_undefined);
}

SOBJ sgtk_font_selection_dialog_get_type ()
{
  guint __retval__;

  __retval__ = gtk_font_selection_dialog_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_font_selection_dialog_new (SOBJ o_title)
{
  gchar* title;
  GtkWidget* __retval__;

  title = scm_getstr(o_title);
  __retval__ = gtk_font_selection_dialog_new(title);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_font_selection_dialog_get_font_name (SOBJ o_fsd)
{
  GtkFontSelectionDialog* fsd;
  gchar* __retval__;

  fsd = sgtk_get_Object(o_fsd);
  __retval__ = gtk_font_selection_dialog_get_font_name(fsd);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_font_selection_dialog_get_font (SOBJ o_fsd)
{
  GtkFontSelectionDialog* fsd;
  GdkFont* __retval__;

  fsd = sgtk_get_Object(o_fsd);
  __retval__ = gtk_font_selection_dialog_get_font(fsd);
  return(sgdk_Font_new(__retval__));
}

SOBJ sgtk_font_selection_dialog_set_font_name (SOBJ o_fsd, SOBJ o_fontname)
{
  GtkFontSelectionDialog* fsd;
  gchar* fontname;
  gboolean __retval__;

  fsd = sgtk_get_Object(o_fsd);
  fontname = scm_getstr(o_fontname);
  __retval__ = gtk_font_selection_dialog_set_font_name(fsd, fontname);
  return(SCM_MKBOOL(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_font_selection_dialog_set_filter (SOBJ o_fsd, SOBJ o_filter_type, SOBJ o_font_type, SOBJ o_foundries, SOBJ o_weights, SOBJ o_slants, SOBJ o_setwidths, SOBJ o_spacings, SOBJ o_charsets)
{
  GtkFontSelectionDialog* fsd;
  GtkFontFilterType filter_type;
  GtkFontType font_type;
  gchar** foundries;
  gchar** weights;
  gchar** slants;
  gchar** setwidths;
  gchar** spacings;
  gchar** charsets;

  fsd = sgtk_get_Object(o_fsd);
  filter_type = sgtk_enumget("GtkFontFilterType", o_filter_type);
  font_type = sgtk_flagsget("GtkFontType", o_font_type);
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  gtk_font_selection_dialog_set_filter(fsd, filter_type, font_type, foundries, weights, slants, setwidths, spacings, charsets);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_font_selection_dialog_get_preview_text (SOBJ o_fsd)
{
  GtkFontSelectionDialog* fsd;
  gchar* __retval__;

  fsd = sgtk_get_Object(o_fsd);
  __retval__ = gtk_font_selection_dialog_get_preview_text(fsd);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_font_selection_dialog_set_preview_text (SOBJ o_fsd, SOBJ o_text)
{
  GtkFontSelectionDialog* fsd;
  gchar* text;

  fsd = sgtk_get_Object(o_fsd);
  text = scm_getstr(o_text);
  gtk_font_selection_dialog_set_preview_text(fsd, text);
  return(scm_undefined);
}

SOBJ sgtk_frame_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_frame_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_frame_new (SOBJ o_label)
{
  gchar* label;
  GtkWidget* __retval__;

  label = scm_getstr(o_label);
  __retval__ = gtk_frame_new(label);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_frame_set_label (SOBJ o_frame, SOBJ o_label)
{
  GtkFrame* frame;
  gchar* label;

  frame = sgtk_get_Object(o_frame);
  label = scm_getstr(o_label);
  gtk_frame_set_label(frame, label);
  return(scm_undefined);
}

SOBJ sgtk_frame_set_label_align (SOBJ o_frame, SOBJ o_xalign, SOBJ o_yalign)
{
  GtkFrame* frame;
  gfloat xalign;
  gfloat yalign;

  frame = sgtk_get_Object(o_frame);
  xalign = scm_number2double(o_xalign);
  yalign = scm_number2double(o_yalign);
  gtk_frame_set_label_align(frame, xalign, yalign);
  return(scm_undefined);
}

SOBJ sgtk_frame_set_shadow_type (SOBJ o_frame, SOBJ o_type)
{
  GtkFrame* frame;
  GtkShadowType type;

  frame = sgtk_get_Object(o_frame);
  type = sgtk_enumget("GtkShadowType", o_type);
  gtk_frame_set_shadow_type(frame, type);
  return(scm_undefined);
}

SOBJ sgtk_gamma_curve_get_type ()
{
  guint __retval__;

  __retval__ = gtk_gamma_curve_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_gamma_curve_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_gamma_curve_new();
  return(sgtk_object_new((void*)__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_gc_get (SOBJ o_depth, SOBJ o_colormap, SOBJ o_values, SOBJ o_values_mask)
{
  gint depth;
  GdkColormap* colormap;
  GdkGCValues* values;
  GdkGCValuesMask values_mask;
  GdkGC* __retval__;

  depth = scm_number2long(o_depth);
  colormap = sgdk_get_Colormap(o_colormap);
  /* +++ undefined GdkGCValues* */
  values_mask = sgtk_flagsget("GdkGCValuesMask", o_values_mask);
  __retval__ = gtk_gc_get(depth, colormap, values, values_mask);
  return(sgdk_GC_new(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_gc_release (SOBJ o_gc)
{
  GdkGC* gc;

  gc = sgdk_get_GC(o_gc);
  gtk_gc_release(gc);
  return(scm_undefined);
}

SOBJ sgtk_handle_box_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_handle_box_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_handle_box_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_handle_box_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_handle_box_set_shadow_type (SOBJ o_handle_box, SOBJ o_type)
{
  GtkHandleBox* handle_box;
  GtkShadowType type;

  handle_box = sgtk_get_Object(o_handle_box);
  type = sgtk_enumget("GtkShadowType", o_type);
  gtk_handle_box_set_shadow_type(handle_box, type);
  return(scm_undefined);
}

SOBJ sgtk_handle_box_set_handle_position (SOBJ o_handle_box, SOBJ o_position)
{
  GtkHandleBox* handle_box;
  GtkPositionType position;

  handle_box = sgtk_get_Object(o_handle_box);
  position = sgtk_enumget("GtkPositionType", o_position);
  gtk_handle_box_set_handle_position(handle_box, position);
  return(scm_undefined);
}

SOBJ sgtk_handle_box_set_snap_edge (SOBJ o_handle_box, SOBJ o_edge)
{
  GtkHandleBox* handle_box;
  GtkPositionType edge;

  handle_box = sgtk_get_Object(o_handle_box);
  edge = sgtk_enumget("GtkPositionType", o_edge);
  gtk_handle_box_set_snap_edge(handle_box, edge);
  return(scm_undefined);
}

SOBJ sgtk_hbutton_box_get_type ()
{
  guint __retval__;

  __retval__ = gtk_hbutton_box_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_hbutton_box_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_hbutton_box_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_hbutton_box_set_spacing_default (SOBJ o_spacing)
{
  gint spacing;

  spacing = scm_number2long(o_spacing);
  gtk_hbutton_box_set_spacing_default(spacing);
  return(scm_undefined);
}

SOBJ sgtk_hbutton_box_set_layout_default (SOBJ o_layout)
{
  GtkButtonBoxStyle layout;

  layout = sgtk_enumget("GtkButtonBoxStyle", o_layout);
  gtk_hbutton_box_set_layout_default(layout);
  return(scm_undefined);
}

SOBJ sgtk_hbutton_box_get_spacing_default ()
{
  gint __retval__;

  __retval__ = gtk_hbutton_box_get_spacing_default();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_hbutton_box_get_layout_default ()
{
  GtkButtonBoxStyle __retval__;

  __retval__ = gtk_hbutton_box_get_layout_default();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_hbox_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_hbox_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_hbox_new (SOBJ o_homogeneous, SOBJ o_spacing)
{
  gboolean homogeneous;
  gint spacing;
  GtkWidget* __retval__;

  homogeneous = (o_homogeneous != scm_false);
  spacing = scm_number2long(o_spacing);
  __retval__ = gtk_hbox_new(homogeneous, spacing);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_hpaned_get_type ()
{
  guint __retval__;

  __retval__ = gtk_hpaned_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_hpaned_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_hpaned_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_hruler_get_type ()
{
  guint __retval__;

  __retval__ = gtk_hruler_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_hruler_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_hruler_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_hscale_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_hscale_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_hscale_new (SOBJ o_adjustment)
{
  GtkAdjustment* adjustment;
  GtkWidget* __retval__;

  adjustment = sgtk_get_Object(o_adjustment);
  __retval__ = gtk_hscale_new(adjustment);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_hscrollbar_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_hscrollbar_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_hscrollbar_new (SOBJ o_adjustment)
{
  GtkAdjustment* adjustment;
  GtkWidget* __retval__;

  adjustment = sgtk_get_Object(o_adjustment);
  __retval__ = gtk_hscrollbar_new(adjustment);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_hseparator_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_hseparator_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_hseparator_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_hseparator_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_image_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_image_get_type();
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_image_new (SOBJ o_val, SOBJ o_mask)
{
  GdkImage* val;
  GdkBitmap* mask;
  GtkWidget* __retval__;

  /* +++ undefined GdkImage* */
  mask = sgdk_get_Window(o_mask);
  __retval__ = gtk_image_new(val, mask);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_image_set (SOBJ o_image, SOBJ o_val, SOBJ o_mask)
{
  GtkImage* image;
  GdkImage* val;
  GdkBitmap* mask;

  image = sgtk_get_Object(o_image);
  /* +++ undefined GdkImage* */
  mask = sgdk_get_Window(o_mask);
  gtk_image_set(image, val, mask);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_image_get (SOBJ o_image, SOBJ o_val, SOBJ o_mask)
{
  GtkImage* image;
  GdkImage** val;
  GdkBitmap** mask;

  image = sgtk_get_Object(o_image);
  /* +++ undefined GdkImage** */
  /* +++ undefined GdkBitmap** */
  gtk_image_get(image, val, mask);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_input_dialog_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_input_dialog_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_input_dialog_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_input_dialog_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_invisible_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_invisible_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_invisible_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_invisible_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_item_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_item_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_item_select (SOBJ o_item)
{
  GtkItem* item;

  item = sgtk_get_Object(o_item);
  gtk_item_select(item);
  return(scm_undefined);
}

SOBJ sgtk_item_deselect (SOBJ o_item)
{
  GtkItem* item;

  item = sgtk_get_Object(o_item);
  gtk_item_deselect(item);
  return(scm_undefined);
}

SOBJ sgtk_item_toggle (SOBJ o_item)
{
  GtkItem* item;

  item = sgtk_get_Object(o_item);
  gtk_item_toggle(item);
  return(scm_undefined);
}

SOBJ sgtk_item_factory_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_item_factory_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_item_factory_new (SOBJ o_container_type, SOBJ o_path, SOBJ o_accel_group)
{
  GtkType container_type;
  gchar* path;
  GtkAccelGroup* accel_group;
  GtkItemFactory* __retval__;

  container_type = scm_number2long(o_container_type);
  path = scm_getstr(o_path);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  __retval__ = gtk_item_factory_new(container_type, path, accel_group);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_item_factory_add_foreign (SOBJ o_accel_widget, SOBJ o_full_path, SOBJ o_accel_group, SOBJ o_keyval, SOBJ o_modifiers)
{
  GtkWidget* accel_widget;
  gchar* full_path;
  GtkAccelGroup* accel_group;
  guint keyval;
  GdkModifierType modifiers;

  accel_widget = sgtk_get_Object(o_accel_widget);
  full_path = scm_getstr(o_full_path);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  keyval = scm_number2long(o_keyval);
  modifiers = sgtk_flagsget("GdkModifierType", o_modifiers);
  gtk_item_factory_add_foreign(accel_widget, full_path, accel_group, keyval, modifiers);
  return(scm_undefined);
}

SOBJ sgtk_item_factory_construct (SOBJ o_ifactory, SOBJ o_container_type, SOBJ o_path, SOBJ o_accel_group)
{
  GtkItemFactory* ifactory;
  GtkType container_type;
  gchar* path;
  GtkAccelGroup* accel_group;

  ifactory = sgtk_get_Object(o_ifactory);
  container_type = scm_number2long(o_container_type);
  path = scm_getstr(o_path);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  gtk_item_factory_construct(ifactory, container_type, path, accel_group);
  return(scm_undefined);
}

SOBJ sgtk_item_factory_from_path (SOBJ o_path)
{
  gchar* path;
  GtkItemFactory* __retval__;

  path = scm_getstr(o_path);
  __retval__ = gtk_item_factory_from_path(path);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_item_factory_from_widget (SOBJ o_widget)
{
  GtkWidget* widget;
  GtkItemFactory* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_item_factory_from_widget(widget);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_item_factory_path_from_widget (SOBJ o_widget)
{
  GtkWidget* widget;
  gchar* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_item_factory_path_from_widget(widget);
  return(scm_mkstring(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_dump_items (SOBJ o_path_pspec, SOBJ o_modified_only, SOBJ o_print_func, SOBJ o_func_data)
{
  GtkPatternSpec* path_pspec;
  gboolean modified_only;
  GtkPrintFunc print_func;
  gpointer func_data;

  /* +++ undefined GtkPatternSpec* */
  modified_only = (o_modified_only != scm_false);
  /* +++ undefined GtkPrintFunc */
  /* +++ get gpointer -> pointer failed */
  gtk_item_factory_dump_items(path_pspec, modified_only, print_func, func_data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_print_func (SOBJ o_FILE_pointer, SOBJ o_string)
{
  gpointer FILE_pointer;
  gchar* string;

  /* +++ get gpointer -> pointer failed */
  string = scm_getstr(o_string);
  gtk_item_factory_print_func(FILE_pointer, string);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_dump_rc (SOBJ o_file_name, SOBJ o_path_pspec, SOBJ o_modified_only)
{
  gchar* file_name;
  GtkPatternSpec* path_pspec;
  gboolean modified_only;

  file_name = scm_getstr(o_file_name);
  /* +++ undefined GtkPatternSpec* */
  modified_only = (o_modified_only != scm_false);
  gtk_item_factory_dump_rc(file_name, path_pspec, modified_only);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_create_items (SOBJ o_ifactory, SOBJ o_n_entries, SOBJ o_entries, SOBJ o_callback_data)
{
  GtkItemFactory* ifactory;
  guint n_entries;
  GtkItemFactoryEntry* entries;
  gpointer callback_data;

  ifactory = sgtk_get_Object(o_ifactory);
  n_entries = scm_number2long(o_n_entries);
  /* +++ undefined GtkItemFactoryEntry* */
  /* +++ get gpointer -> pointer failed */
  gtk_item_factory_create_items(ifactory, n_entries, entries, callback_data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_create_items_ac (SOBJ o_ifactory, SOBJ o_n_entries, SOBJ o_entries, SOBJ o_callback_data, SOBJ o_callback_type)
{
  GtkItemFactory* ifactory;
  guint n_entries;
  GtkItemFactoryEntry* entries;
  gpointer callback_data;
  guint callback_type;

  ifactory = sgtk_get_Object(o_ifactory);
  n_entries = scm_number2long(o_n_entries);
  /* +++ undefined GtkItemFactoryEntry* */
  /* +++ get gpointer -> pointer failed */
  callback_type = scm_number2long(o_callback_type);
  gtk_item_factory_create_items_ac(ifactory, n_entries, entries, callback_data, callback_type);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_item_factory_get_widget (SOBJ o_ifactory, SOBJ o_path)
{
  GtkItemFactory* ifactory;
  gchar* path;
  GtkWidget* __retval__;

  ifactory = sgtk_get_Object(o_ifactory);
  path = scm_getstr(o_path);
  __retval__ = gtk_item_factory_get_widget(ifactory, path);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_item_factory_get_widget_by_action (SOBJ o_ifactory, SOBJ o_action)
{
  GtkItemFactory* ifactory;
  guint action;
  GtkWidget* __retval__;

  ifactory = sgtk_get_Object(o_ifactory);
  action = scm_number2long(o_action);
  __retval__ = gtk_item_factory_get_widget_by_action(ifactory, action);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_item_factory_get_item (SOBJ o_ifactory, SOBJ o_path)
{
  GtkItemFactory* ifactory;
  gchar* path;
  GtkWidget* __retval__;

  ifactory = sgtk_get_Object(o_ifactory);
  path = scm_getstr(o_path);
  __retval__ = gtk_item_factory_get_item(ifactory, path);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_item_factory_get_item_by_action (SOBJ o_ifactory, SOBJ o_action)
{
  GtkItemFactory* ifactory;
  guint action;
  GtkWidget* __retval__;

  ifactory = sgtk_get_Object(o_ifactory);
  action = scm_number2long(o_action);
  __retval__ = gtk_item_factory_get_item_by_action(ifactory, action);
  return(sgtk_object_new((void*)__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_create_item (SOBJ o_ifactory, SOBJ o_entry, SOBJ o_callback_data, SOBJ o_callback_type)
{
  GtkItemFactory* ifactory;
  GtkItemFactoryEntry* entry;
  gpointer callback_data;
  guint callback_type;

  ifactory = sgtk_get_Object(o_ifactory);
  /* +++ undefined GtkItemFactoryEntry* */
  /* +++ get gpointer -> pointer failed */
  callback_type = scm_number2long(o_callback_type);
  gtk_item_factory_create_item(ifactory, entry, callback_data, callback_type);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_create_menu_entries (SOBJ o_n_entries, SOBJ o_entries)
{
  guint n_entries;
  GtkMenuEntry* entries;

  n_entries = scm_number2long(o_n_entries);
  /* +++ undefined GtkMenuEntry* */
  gtk_item_factory_create_menu_entries(n_entries, entries);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_item_factories_path_delete (SOBJ o_ifactory_path, SOBJ o_path)
{
  gchar* ifactory_path;
  gchar* path;

  ifactory_path = scm_getstr(o_ifactory_path);
  path = scm_getstr(o_path);
  gtk_item_factories_path_delete(ifactory_path, path);
  return(scm_undefined);
}

SOBJ sgtk_item_factory_delete_item (SOBJ o_ifactory, SOBJ o_path)
{
  GtkItemFactory* ifactory;
  gchar* path;

  ifactory = sgtk_get_Object(o_ifactory);
  path = scm_getstr(o_path);
  gtk_item_factory_delete_item(ifactory, path);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_delete_entry (SOBJ o_ifactory, SOBJ o_entry)
{
  GtkItemFactory* ifactory;
  GtkItemFactoryEntry* entry;

  ifactory = sgtk_get_Object(o_ifactory);
  /* +++ undefined GtkItemFactoryEntry* */
  gtk_item_factory_delete_entry(ifactory, entry);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_delete_entries (SOBJ o_ifactory, SOBJ o_n_entries, SOBJ o_entries)
{
  GtkItemFactory* ifactory;
  guint n_entries;
  GtkItemFactoryEntry* entries;

  ifactory = sgtk_get_Object(o_ifactory);
  n_entries = scm_number2long(o_n_entries);
  /* +++ undefined GtkItemFactoryEntry* */
  gtk_item_factory_delete_entries(ifactory, n_entries, entries);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_item_factory_popup_data_from_widget (SOBJ o_widget)
{
  GtkWidget* widget;
  gpointer __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_item_factory_popup_data_from_widget(widget);
  return(scm_mkpointer(__retval__));
}

SOBJ sgtk_item_factory_popup_data (SOBJ o_ifactory)
{
  GtkItemFactory* ifactory;
  gpointer __retval__;

  ifactory = sgtk_get_Object(o_ifactory);
  __retval__ = gtk_item_factory_popup_data(ifactory);
  return(scm_mkpointer(__retval__));
}

SOBJ sgtk_item_factory_popup (SOBJ o_ifactory, SOBJ o_x, SOBJ o_y, SOBJ o_mouse_button, SOBJ o_time)
{
  GtkItemFactory* ifactory;
  guint x;
  guint y;
  guint mouse_button;
  guint32 time;

  ifactory = sgtk_get_Object(o_ifactory);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  mouse_button = scm_number2long(o_mouse_button);
  time = scm_number2long(o_time);
  gtk_item_factory_popup(ifactory, x, y, mouse_button, time);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_popup_with_data (SOBJ o_ifactory, SOBJ o_popup_data, SOBJ o_destroy, SOBJ o_x, SOBJ o_y, SOBJ o_mouse_button, SOBJ o_time)
{
  GtkItemFactory* ifactory;
  gpointer popup_data;
  GtkDestroyNotify destroy;
  guint x;
  guint y;
  guint mouse_button;
  guint32 time;

  ifactory = sgtk_get_Object(o_ifactory);
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  mouse_button = scm_number2long(o_mouse_button);
  time = scm_number2long(o_time);
  gtk_item_factory_popup_with_data(ifactory, popup_data, destroy, x, y, mouse_button, time);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_item_factory_parse_rc_string (SOBJ o_rc_string)
{
  gchar* rc_string;

  rc_string = scm_getstr(o_rc_string);
  gtk_item_factory_parse_rc_string(rc_string);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_parse_rc_scanner (SOBJ o_scanner)
{
  GScanner* scanner;

  /* +++ undefined GScanner* */
  gtk_item_factory_parse_rc_scanner(scanner);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_item_factory_parse_rc (SOBJ o_file_name)
{
  gchar* file_name;

  file_name = scm_getstr(o_file_name);
  gtk_item_factory_parse_rc(file_name);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_item_factory_set_translate_func (SOBJ o_ifactory, SOBJ o_func, SOBJ o_data, SOBJ o_notify)
{
  GtkItemFactory* ifactory;
  GtkTranslateFunc func;
  gpointer data;
  GtkDestroyNotify notify;

  ifactory = sgtk_get_Object(o_ifactory);
  /* +++ undefined GtkTranslateFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  gtk_item_factory_set_translate_func(ifactory, func, data, notify);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_label_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_label_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_label_new (SOBJ o_str)
{
  gchar* str;
  GtkWidget* __retval__;

  str = scm_getstr(o_str);
  __retval__ = gtk_label_new(str);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_label_set_text (SOBJ o_label, SOBJ o_str)
{
  GtkLabel* label;
  gchar* str;

  label = sgtk_get_Object(o_label);
  str = scm_getstr(o_str);
  gtk_label_set_text(label, str);
  return(scm_undefined);
}

SOBJ sgtk_label_set_pattern (SOBJ o_label, SOBJ o_pattern)
{
  GtkLabel* label;
  gchar* pattern;

  label = sgtk_get_Object(o_label);
  pattern = scm_getstr(o_pattern);
  gtk_label_set_pattern(label, pattern);
  return(scm_undefined);
}

SOBJ sgtk_label_set_justify (SOBJ o_label, SOBJ o_jtype)
{
  GtkLabel* label;
  GtkJustification jtype;

  label = sgtk_get_Object(o_label);
  jtype = sgtk_enumget("GtkJustification", o_jtype);
  gtk_label_set_justify(label, jtype);
  return(scm_undefined);
}

SOBJ sgtk_label_set_line_wrap (SOBJ o_label, SOBJ o_wrap)
{
  GtkLabel* label;
  gboolean wrap;

  label = sgtk_get_Object(o_label);
  wrap = (o_wrap != scm_false);
  gtk_label_set_line_wrap(label, wrap);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_label_get (SOBJ o_label, SOBJ o_str)
{
  GtkLabel* label;
  gchar** str;

  label = sgtk_get_Object(o_label);
  /* +++ undefined gchar** */
  gtk_label_get(label, str);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_label_parse_uline (SOBJ o_label, SOBJ o_string)
{
  GtkLabel* label;
  gchar* string;
  guint __retval__;

  label = sgtk_get_Object(o_label);
  string = scm_getstr(o_string);
  __retval__ = gtk_label_parse_uline(label, string);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_layout_new (SOBJ o_hadjustment, SOBJ o_vadjustment)
{
  GtkAdjustment* hadjustment;
  GtkAdjustment* vadjustment;
  GtkWidget* __retval__;

  hadjustment = sgtk_get_Object(o_hadjustment);
  vadjustment = sgtk_get_Object(o_vadjustment);
  __retval__ = gtk_layout_new(hadjustment, vadjustment);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_layout_get_hadjustment (SOBJ o_layout)
{
  GtkLayout* layout;
  GtkAdjustment* __retval__;

  layout = sgtk_get_Object(o_layout);
  __retval__ = gtk_layout_get_hadjustment(layout);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_layout_get_vadjustment (SOBJ o_layout)
{
  GtkLayout* layout;
  GtkAdjustment* __retval__;

  layout = sgtk_get_Object(o_layout);
  __retval__ = gtk_layout_get_vadjustment(layout);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_layout_set_hadjustment (SOBJ o_layout, SOBJ o_adjustment)
{
  GtkLayout* layout;
  GtkAdjustment* adjustment;

  layout = sgtk_get_Object(o_layout);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_layout_set_hadjustment(layout, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_layout_set_vadjustment (SOBJ o_layout, SOBJ o_adjustment)
{
  GtkLayout* layout;
  GtkAdjustment* adjustment;

  layout = sgtk_get_Object(o_layout);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_layout_set_vadjustment(layout, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_layout_put (SOBJ o_layout, SOBJ o_child_widget, SOBJ o_x, SOBJ o_y)
{
  GtkLayout* layout;
  GtkWidget* child_widget;
  gint x;
  gint y;

  layout = sgtk_get_Object(o_layout);
  child_widget = sgtk_get_Object(o_child_widget);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  gtk_layout_put(layout, child_widget, x, y);
  return(scm_undefined);
}

SOBJ sgtk_layout_move (SOBJ o_layout, SOBJ o_child_widget, SOBJ o_x, SOBJ o_y)
{
  GtkLayout* layout;
  GtkWidget* child_widget;
  gint x;
  gint y;

  layout = sgtk_get_Object(o_layout);
  child_widget = sgtk_get_Object(o_child_widget);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  gtk_layout_move(layout, child_widget, x, y);
  return(scm_undefined);
}

SOBJ sgtk_layout_set_size (SOBJ o_layout, SOBJ o_width, SOBJ o_height)
{
  GtkLayout* layout;
  guint width;
  guint height;

  layout = sgtk_get_Object(o_layout);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_layout_set_size(layout, width, height);
  return(scm_undefined);
}

SOBJ sgtk_layout_freeze (SOBJ o_layout)
{
  GtkLayout* layout;

  layout = sgtk_get_Object(o_layout);
  gtk_layout_freeze(layout);
  return(scm_undefined);
}

SOBJ sgtk_layout_thaw (SOBJ o_layout)
{
  GtkLayout* layout;

  layout = sgtk_get_Object(o_layout);
  gtk_layout_thaw(layout);
  return(scm_undefined);
}

SOBJ sgtk_layout_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_layout_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_list_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_list_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_list_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_list_new();
  return(sgtk_object_new((void*)__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_list_insert_items (SOBJ o_list, SOBJ o_items, SOBJ o_position)
{
  GtkList* list;
  GList* items;
  gint position;

  list = sgtk_get_Object(o_list);
  /* +++ undefined GList* */
  position = scm_number2long(o_position);
  gtk_list_insert_items(list, items, position);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_list_append_items (SOBJ o_list, SOBJ o_items)
{
  GtkList* list;
  GList* items;

  list = sgtk_get_Object(o_list);
  /* +++ undefined GList* */
  gtk_list_append_items(list, items);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_list_prepend_items (SOBJ o_list, SOBJ o_items)
{
  GtkList* list;
  GList* items;

  list = sgtk_get_Object(o_list);
  /* +++ undefined GList* */
  gtk_list_prepend_items(list, items);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_list_remove_items (SOBJ o_list, SOBJ o_items)
{
  GtkList* list;
  GList* items;

  list = sgtk_get_Object(o_list);
  /* +++ undefined GList* */
  gtk_list_remove_items(list, items);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_list_remove_items_no_unref (SOBJ o_list, SOBJ o_items)
{
  GtkList* list;
  GList* items;

  list = sgtk_get_Object(o_list);
  /* +++ undefined GList* */
  gtk_list_remove_items_no_unref(list, items);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_list_clear_items (SOBJ o_list, SOBJ o_start, SOBJ o_end)
{
  GtkList* list;
  gint start;
  gint end;

  list = sgtk_get_Object(o_list);
  start = scm_number2long(o_start);
  end = scm_number2long(o_end);
  gtk_list_clear_items(list, start, end);
  return(scm_undefined);
}

SOBJ sgtk_list_child_position (SOBJ o_list, SOBJ o_child)
{
  GtkList* list;
  GtkWidget* child;
  gint __retval__;

  list = sgtk_get_Object(o_list);
  child = sgtk_get_Object(o_child);
  __retval__ = gtk_list_child_position(list, child);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_list_set_selection_mode (SOBJ o_list, SOBJ o_mode)
{
  GtkList* list;
  GtkSelectionMode mode;

  list = sgtk_get_Object(o_list);
  mode = sgtk_enumget("GtkSelectionMode", o_mode);
  gtk_list_set_selection_mode(list, mode);
  return(scm_undefined);
}

SOBJ sgtk_list_select_item (SOBJ o_list, SOBJ o_item)
{
  GtkList* list;
  gint item;

  list = sgtk_get_Object(o_list);
  item = scm_number2long(o_item);
  gtk_list_select_item(list, item);
  return(scm_undefined);
}

SOBJ sgtk_list_unselect_item (SOBJ o_list, SOBJ o_item)
{
  GtkList* list;
  gint item;

  list = sgtk_get_Object(o_list);
  item = scm_number2long(o_item);
  gtk_list_unselect_item(list, item);
  return(scm_undefined);
}

SOBJ sgtk_list_select_child (SOBJ o_list, SOBJ o_child)
{
  GtkList* list;
  GtkWidget* child;

  list = sgtk_get_Object(o_list);
  child = sgtk_get_Object(o_child);
  gtk_list_select_child(list, child);
  return(scm_undefined);
}

SOBJ sgtk_list_unselect_child (SOBJ o_list, SOBJ o_child)
{
  GtkList* list;
  GtkWidget* child;

  list = sgtk_get_Object(o_list);
  child = sgtk_get_Object(o_child);
  gtk_list_unselect_child(list, child);
  return(scm_undefined);
}

SOBJ sgtk_list_select_all (SOBJ o_list)
{
  GtkList* list;

  list = sgtk_get_Object(o_list);
  gtk_list_select_all(list);
  return(scm_undefined);
}

SOBJ sgtk_list_unselect_all (SOBJ o_list)
{
  GtkList* list;

  list = sgtk_get_Object(o_list);
  gtk_list_unselect_all(list);
  return(scm_undefined);
}

SOBJ sgtk_list_extend_selection (SOBJ o_list, SOBJ o_scroll_type, SOBJ o_position, SOBJ o_auto_start_selection)
{
  GtkList* list;
  GtkScrollType scroll_type;
  gfloat position;
  gboolean auto_start_selection;

  list = sgtk_get_Object(o_list);
  scroll_type = sgtk_enumget("GtkScrollType", o_scroll_type);
  position = scm_number2double(o_position);
  auto_start_selection = (o_auto_start_selection != scm_false);
  gtk_list_extend_selection(list, scroll_type, position, auto_start_selection);
  return(scm_undefined);
}

SOBJ sgtk_list_end_drag_selection (SOBJ o_list)
{
  GtkList* list;

  list = sgtk_get_Object(o_list);
  gtk_list_end_drag_selection(list);
  return(scm_undefined);
}

SOBJ sgtk_list_start_selection (SOBJ o_list)
{
  GtkList* list;

  list = sgtk_get_Object(o_list);
  gtk_list_start_selection(list);
  return(scm_undefined);
}

SOBJ sgtk_list_end_selection (SOBJ o_list)
{
  GtkList* list;

  list = sgtk_get_Object(o_list);
  gtk_list_end_selection(list);
  return(scm_undefined);
}

SOBJ sgtk_list_toggle_row (SOBJ o_list, SOBJ o_item)
{
  GtkList* list;
  GtkWidget* item;

  list = sgtk_get_Object(o_list);
  item = sgtk_get_Object(o_item);
  gtk_list_toggle_row(list, item);
  return(scm_undefined);
}

SOBJ sgtk_list_toggle_focus_row (SOBJ o_list)
{
  GtkList* list;

  list = sgtk_get_Object(o_list);
  gtk_list_toggle_focus_row(list);
  return(scm_undefined);
}

SOBJ sgtk_list_toggle_add_mode (SOBJ o_list)
{
  GtkList* list;

  list = sgtk_get_Object(o_list);
  gtk_list_toggle_add_mode(list);
  return(scm_undefined);
}

SOBJ sgtk_list_undo_selection (SOBJ o_list)
{
  GtkList* list;

  list = sgtk_get_Object(o_list);
  gtk_list_undo_selection(list);
  return(scm_undefined);
}

SOBJ sgtk_list_scroll_horizontal (SOBJ o_list, SOBJ o_scroll_type, SOBJ o_position)
{
  GtkList* list;
  GtkScrollType scroll_type;
  gfloat position;

  list = sgtk_get_Object(o_list);
  scroll_type = sgtk_enumget("GtkScrollType", o_scroll_type);
  position = scm_number2double(o_position);
  gtk_list_scroll_horizontal(list, scroll_type, position);
  return(scm_undefined);
}

SOBJ sgtk_list_scroll_vertical (SOBJ o_list, SOBJ o_scroll_type, SOBJ o_position)
{
  GtkList* list;
  GtkScrollType scroll_type;
  gfloat position;

  list = sgtk_get_Object(o_list);
  scroll_type = sgtk_enumget("GtkScrollType", o_scroll_type);
  position = scm_number2double(o_position);
  gtk_list_scroll_vertical(list, scroll_type, position);
  return(scm_undefined);
}

SOBJ sgtk_list_item_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_list_item_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_list_item_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_list_item_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_list_item_new_with_label (SOBJ o_label)
{
  gchar* label;
  GtkWidget* __retval__;

  label = scm_getstr(o_label);
  __retval__ = gtk_list_item_new_with_label(label);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_list_item_select (SOBJ o_list_item)
{
  GtkListItem* list_item;

  list_item = sgtk_get_Object(o_list_item);
  gtk_list_item_select(list_item);
  return(scm_undefined);
}

SOBJ sgtk_list_item_deselect (SOBJ o_list_item)
{
  GtkListItem* list_item;

  list_item = sgtk_get_Object(o_list_item);
  gtk_list_item_deselect(list_item);
  return(scm_undefined);
}

SOBJ sgtk_check_version (SOBJ o_required_major, SOBJ o_required_minor, SOBJ o_required_micro)
{
  guint required_major;
  guint required_minor;
  guint required_micro;
  gchar* __retval__;

  required_major = scm_number2long(o_required_major);
  required_minor = scm_number2long(o_required_minor);
  required_micro = scm_number2long(o_required_micro);
  __retval__ = gtk_check_version(required_major, required_minor, required_micro);
  return(scm_mkstring(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_init_check (SOBJ o_argc, SOBJ o_argv)
{
  int* argc;
  char*** argv;
  gboolean __retval__;

  /* +++ undefined int* */
  /* +++ undefined char*** */
  __retval__ = gtk_init_check(argc, argv);
  return(SCM_MKBOOL(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_init (SOBJ o_argc, SOBJ o_argv)
{
  int* argc;
  char*** argv;

  /* +++ undefined int* */
  /* +++ undefined char*** */
  gtk_init(argc, argv);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_exit (SOBJ o_errorcode)
{
  int errorcode;

  errorcode = scm_number2long(o_errorcode);
  gtk_exit(errorcode);
  return(scm_undefined);
}

SOBJ sgtk_set_locale ()
{
  gchar* __retval__;

  __retval__ = gtk_set_locale();
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_main ()
{

  gtk_main();
  return(scm_undefined);
}

SOBJ sgtk_main_level ()
{
  guint __retval__;

  __retval__ = gtk_main_level();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_main_quit ()
{

  gtk_main_quit();
  return(scm_undefined);
}

SOBJ sgtk_events_pending ()
{
  gint __retval__;

  __retval__ = gtk_events_pending();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_main_iteration ()
{
  gint __retval__;

  __retval__ = gtk_main_iteration();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_main_iteration_do (SOBJ o_blocking)
{
  gboolean blocking;
  gint __retval__;

  blocking = (o_blocking != scm_false);
  __retval__ = gtk_main_iteration_do(blocking);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_main_do_event (SOBJ o_event)
{
  GdkEvent* event;

  event = sgdk_get_Event(o_event);
  gtk_main_do_event(event);
  return(scm_undefined);
}

SOBJ sgtk_true ()
{
  gint __retval__;

  __retval__ = gtk_true();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_false ()
{
  gint __retval__;

  __retval__ = gtk_false();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_grab_add (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_grab_add(widget);
  return(scm_undefined);
}

SOBJ sgtk_grab_get_current ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_grab_get_current();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_grab_remove (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_grab_remove(widget);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_init_add (SOBJ o_function, SOBJ o_data)
{
  GtkFunction function;
  gpointer data;

  /* +++ undefined GtkFunction */
  /* +++ get gpointer -> pointer failed */
  gtk_init_add(function, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_key_snooper_install (SOBJ o_snooper, SOBJ o_func_data)
{
  GtkKeySnoopFunc snooper;
  gpointer func_data;
  guint __retval__;

  /* +++ undefined GtkKeySnoopFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_key_snooper_install(snooper, func_data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_key_snooper_remove (SOBJ o_snooper_id)
{
  guint snooper_id;

  snooper_id = scm_number2long(o_snooper_id);
  gtk_key_snooper_remove(snooper_id);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_quit_add_full (SOBJ o_main_level, SOBJ o_function, SOBJ o_marshal, SOBJ o_data, SOBJ o_destroy)
{
  guint main_level;
  GtkFunction function;
  GtkCallbackMarshal marshal;
  gpointer data;
  GtkDestroyNotify destroy;
  guint __retval__;

  main_level = scm_number2long(o_main_level);
  /* +++ undefined GtkFunction */
  /* +++ undefined GtkCallbackMarshal */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  __retval__ = gtk_quit_add_full(main_level, function, marshal, data, destroy);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_quit_add_destroy (SOBJ o_main_level, SOBJ o_object)
{
  guint main_level;
  GtkObject* object;

  main_level = scm_number2long(o_main_level);
  object = sgtk_get_Object(o_object);
  gtk_quit_add_destroy(main_level, object);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_quit_add (SOBJ o_main_level, SOBJ o_function, SOBJ o_data)
{
  guint main_level;
  GtkFunction function;
  gpointer data;
  guint __retval__;

  main_level = scm_number2long(o_main_level);
  /* +++ undefined GtkFunction */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_quit_add(main_level, function, data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_quit_remove (SOBJ o_id)
{
  guint id;

  id = scm_number2long(o_id);
  gtk_quit_remove(id);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_quit_remove_by_data (SOBJ o_data)
{
  gpointer data;

  /* +++ get gpointer -> pointer failed */
  gtk_quit_remove_by_data(data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_timeout_add_full (SOBJ o_interval, SOBJ o_function, SOBJ o_marshal, SOBJ o_data, SOBJ o_destroy)
{
  guint32 interval;
  GtkFunction function;
  GtkCallbackMarshal marshal;
  gpointer data;
  GtkDestroyNotify destroy;
  guint __retval__;

  interval = scm_number2long(o_interval);
  /* +++ undefined GtkFunction */
  /* +++ undefined GtkCallbackMarshal */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  __retval__ = gtk_timeout_add_full(interval, function, marshal, data, destroy);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_timeout_add (SOBJ o_interval, SOBJ o_function, SOBJ o_data)
{
  guint32 interval;
  GtkFunction function;
  gpointer data;
  guint __retval__;

  interval = scm_number2long(o_interval);
  /* +++ undefined GtkFunction */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_timeout_add(interval, function, data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_timeout_remove (SOBJ o_tag)
{
  guint tag;

  tag = scm_number2long(o_tag);
  gtk_timeout_remove(tag);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_idle_add_full (SOBJ o_priority, SOBJ o_function, SOBJ o_marshal, SOBJ o_data, SOBJ o_destroy)
{
  gint priority;
  GtkFunction function;
  GtkCallbackMarshal marshal;
  gpointer data;
  GtkDestroyNotify destroy;
  guint __retval__;

  priority = scm_number2long(o_priority);
  /* +++ undefined GtkFunction */
  /* +++ undefined GtkCallbackMarshal */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  __retval__ = gtk_idle_add_full(priority, function, marshal, data, destroy);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_idle_add (SOBJ o_function, SOBJ o_data)
{
  GtkFunction function;
  gpointer data;
  guint __retval__;

  /* +++ undefined GtkFunction */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_idle_add(function, data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_idle_add_priority (SOBJ o_priority, SOBJ o_function, SOBJ o_data)
{
  gint priority;
  GtkFunction function;
  gpointer data;
  guint __retval__;

  priority = scm_number2long(o_priority);
  /* +++ undefined GtkFunction */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_idle_add_priority(priority, function, data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_idle_remove (SOBJ o_tag)
{
  guint tag;

  tag = scm_number2long(o_tag);
  gtk_idle_remove(tag);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_idle_remove_by_data (SOBJ o_data)
{
  gpointer data;

  /* +++ get gpointer -> pointer failed */
  gtk_idle_remove_by_data(data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_input_add_full (SOBJ o_source, SOBJ o_condition, SOBJ o_function, SOBJ o_marshal, SOBJ o_data, SOBJ o_destroy)
{
  gint source;
  GdkInputCondition condition;
  GdkInputFunction function;
  GtkCallbackMarshal marshal;
  gpointer data;
  GtkDestroyNotify destroy;
  guint __retval__;

  source = scm_number2long(o_source);
  condition = sgtk_flagsget("GdkInputCondition", o_condition);
  /* +++ undefined GdkInputFunction */
  /* +++ undefined GtkCallbackMarshal */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  __retval__ = gtk_input_add_full(source, condition, function, marshal, data, destroy);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_input_remove (SOBJ o_tag)
{
  guint tag;

  tag = scm_number2long(o_tag);
  gtk_input_remove(tag);
  return(scm_undefined);
}

SOBJ sgtk_get_current_event ()
{
  GdkEvent* __retval__;

  __retval__ = gtk_get_current_event();
  return(sgdk_Event_new(__retval__));
}

SOBJ sgtk_get_event_widget (SOBJ o_event)
{
  GdkEvent* event;
  GtkWidget* __retval__;

  event = sgdk_get_Event(o_event);
  __retval__ = gtk_get_event_widget(event);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_propagate_event (SOBJ o_widget, SOBJ o_event)
{
  GtkWidget* widget;
  GdkEvent* event;

  widget = sgtk_get_Object(o_widget);
  event = sgdk_get_Event(o_event);
  gtk_propagate_event(widget, event);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_marshal_BOOL__NONE (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_BOOL__NONE(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_BOOL__POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_BOOL__POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_BOOL__POINTER_POINTER_INT_INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_BOOL__POINTER_POINTER_INT_INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_BOOL__POINTER_INT_INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_BOOL__POINTER_INT_INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_BOOL__POINTER_INT_INT_INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_BOOL__POINTER_INT_INT_INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_BOOL__POINTER_POINTER_POINTER_POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_BOOL__POINTER_POINTER_POINTER_POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_INT__INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_INT__INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_INT__POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_INT__POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_INT__POINTER_CHAR_CHAR (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_INT__POINTER_CHAR_CHAR(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__BOOL (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__BOOL(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__C_CALLBACK (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__C_CALLBACK(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__C_CALLBACK_C_CALLBACK (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__C_CALLBACK_C_CALLBACK(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__INT_FLOAT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__INT_FLOAT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__INT_FLOAT_BOOL (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__INT_FLOAT_BOOL(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__INT_INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__INT_INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__INT_INT_POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__INT_INT_POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__NONE (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__NONE(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__POINTER_INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__POINTER_INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__POINTER_POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__POINTER_POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__POINTER_POINTER_POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__POINTER_POINTER_POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__POINTER_INT_INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__POINTER_INT_INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__POINTER_POINTER_INT_INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__POINTER_POINTER_INT_INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__POINTER_INT_INT_POINTER_INT_INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__POINTER_INT_INT_POINTER_INT_INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__POINTER_INT_POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__POINTER_INT_POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__INT_POINTER_INT_INT_INT_POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__INT_POINTER_INT_INT_INT_POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__INT_POINTER_INT_INT_INT (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__INT_POINTER_INT_INT_INT(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_marshal_NONE__INT_POINTER (SOBJ o_object, SOBJ o_func, SOBJ o_func_data, SOBJ o_args)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer func_data;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkArg* */
  gtk_marshal_NONE__INT_POINTER(object, func, func_data, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_menu_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_menu_get_type();
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_menu_attach_to_widget (SOBJ o_menu, SOBJ o_attach_widget, SOBJ o_detacher)
{
  GtkMenu* menu;
  GtkWidget* attach_widget;
  GtkMenuDetachFunc detacher;

  menu = sgtk_get_Object(o_menu);
  attach_widget = sgtk_get_Object(o_attach_widget);
  /* +++ undefined GtkMenuDetachFunc */
  gtk_menu_attach_to_widget(menu, attach_widget, detacher);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_menu_get_attach_widget (SOBJ o_menu)
{
  GtkMenu* menu;
  GtkWidget* __retval__;

  menu = sgtk_get_Object(o_menu);
  __retval__ = gtk_menu_get_attach_widget(menu);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_menu_detach (SOBJ o_menu)
{
  GtkMenu* menu;

  menu = sgtk_get_Object(o_menu);
  gtk_menu_detach(menu);
  return(scm_undefined);
}

SOBJ sgtk_menu_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_menu_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_menu_append (SOBJ o_menu, SOBJ o_child)
{
  GtkMenu* menu;
  GtkWidget* child;

  menu = sgtk_get_Object(o_menu);
  child = sgtk_get_Object(o_child);
  gtk_menu_append(menu, child);
  return(scm_undefined);
}

SOBJ sgtk_menu_prepend (SOBJ o_menu, SOBJ o_child)
{
  GtkMenu* menu;
  GtkWidget* child;

  menu = sgtk_get_Object(o_menu);
  child = sgtk_get_Object(o_child);
  gtk_menu_prepend(menu, child);
  return(scm_undefined);
}

SOBJ sgtk_menu_insert (SOBJ o_menu, SOBJ o_child, SOBJ o_position)
{
  GtkMenu* menu;
  GtkWidget* child;
  gint position;

  menu = sgtk_get_Object(o_menu);
  child = sgtk_get_Object(o_child);
  position = scm_number2long(o_position);
  gtk_menu_insert(menu, child, position);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_menu_popup (SOBJ o_menu, SOBJ o_parent_menu_shell, SOBJ o_parent_menu_item, SOBJ o_func, SOBJ o_data, SOBJ o_button, SOBJ o_activate_time)
{
  GtkMenu* menu;
  GtkWidget* parent_menu_shell;
  GtkWidget* parent_menu_item;
  GtkMenuPositionFunc func;
  gpointer data;
  guint button;
  guint32 activate_time;

  menu = sgtk_get_Object(o_menu);
  parent_menu_shell = sgtk_get_Object(o_parent_menu_shell);
  parent_menu_item = sgtk_get_Object(o_parent_menu_item);
  /* +++ undefined GtkMenuPositionFunc */
  /* +++ get gpointer -> pointer failed */
  button = scm_number2long(o_button);
  activate_time = scm_number2long(o_activate_time);
  gtk_menu_popup(menu, parent_menu_shell, parent_menu_item, func, data, button, activate_time);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_menu_popdown (SOBJ o_menu)
{
  GtkMenu* menu;

  menu = sgtk_get_Object(o_menu);
  gtk_menu_popdown(menu);
  return(scm_undefined);
}

SOBJ sgtk_menu_get_active (SOBJ o_menu)
{
  GtkMenu* menu;
  GtkWidget* __retval__;

  menu = sgtk_get_Object(o_menu);
  __retval__ = gtk_menu_get_active(menu);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_menu_set_active (SOBJ o_menu, SOBJ o_index)
{
  GtkMenu* menu;
  guint index;

  menu = sgtk_get_Object(o_menu);
  index = scm_number2long(o_index);
  gtk_menu_set_active(menu, index);
  return(scm_undefined);
}

SOBJ sgtk_menu_set_accel_group (SOBJ o_menu, SOBJ o_accel_group)
{
  GtkMenu* menu;
  GtkAccelGroup* accel_group;

  menu = sgtk_get_Object(o_menu);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  gtk_menu_set_accel_group(menu, accel_group);
  return(scm_undefined);
}

SOBJ sgtk_menu_get_accel_group (SOBJ o_menu)
{
  GtkMenu* menu;
  GtkAccelGroup* __retval__;

  menu = sgtk_get_Object(o_menu);
  __retval__ = gtk_menu_get_accel_group(menu);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_menu_ensure_uline_accel_group (SOBJ o_menu)
{
  GtkMenu* menu;
  GtkAccelGroup* __retval__;

  menu = sgtk_get_Object(o_menu);
  __retval__ = gtk_menu_ensure_uline_accel_group(menu);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_menu_get_uline_accel_group (SOBJ o_menu)
{
  GtkMenu* menu;
  GtkAccelGroup* __retval__;

  menu = sgtk_get_Object(o_menu);
  __retval__ = gtk_menu_get_uline_accel_group(menu);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_menu_reposition (SOBJ o_menu)
{
  GtkMenu* menu;

  menu = sgtk_get_Object(o_menu);
  gtk_menu_reposition(menu);
  return(scm_undefined);
}

SOBJ sgtk_menu_set_tearoff_state (SOBJ o_menu, SOBJ o_torn_off)
{
  GtkMenu* menu;
  gboolean torn_off;

  menu = sgtk_get_Object(o_menu);
  torn_off = (o_torn_off != scm_false);
  gtk_menu_set_tearoff_state(menu, torn_off);
  return(scm_undefined);
}

SOBJ sgtk_menu_set_title (SOBJ o_menu, SOBJ o_title)
{
  GtkMenu* menu;
  gchar* title;

  menu = sgtk_get_Object(o_menu);
  title = scm_getstr(o_title);
  gtk_menu_set_title(menu, title);
  return(scm_undefined);
}

SOBJ sgtk_menu_reorder_child (SOBJ o_menu, SOBJ o_child, SOBJ o_position)
{
  GtkMenu* menu;
  GtkWidget* child;
  gint position;

  menu = sgtk_get_Object(o_menu);
  child = sgtk_get_Object(o_child);
  position = scm_number2long(o_position);
  gtk_menu_reorder_child(menu, child, position);
  return(scm_undefined);
}

SOBJ sgtk_menu_bar_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_menu_bar_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_menu_bar_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_menu_bar_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_menu_bar_append (SOBJ o_menu_bar, SOBJ o_child)
{
  GtkMenuBar* menu_bar;
  GtkWidget* child;

  menu_bar = sgtk_get_Object(o_menu_bar);
  child = sgtk_get_Object(o_child);
  gtk_menu_bar_append(menu_bar, child);
  return(scm_undefined);
}

SOBJ sgtk_menu_bar_prepend (SOBJ o_menu_bar, SOBJ o_child)
{
  GtkMenuBar* menu_bar;
  GtkWidget* child;

  menu_bar = sgtk_get_Object(o_menu_bar);
  child = sgtk_get_Object(o_child);
  gtk_menu_bar_prepend(menu_bar, child);
  return(scm_undefined);
}

SOBJ sgtk_menu_bar_insert (SOBJ o_menu_bar, SOBJ o_child, SOBJ o_position)
{
  GtkMenuBar* menu_bar;
  GtkWidget* child;
  gint position;

  menu_bar = sgtk_get_Object(o_menu_bar);
  child = sgtk_get_Object(o_child);
  position = scm_number2long(o_position);
  gtk_menu_bar_insert(menu_bar, child, position);
  return(scm_undefined);
}

SOBJ sgtk_menu_bar_set_shadow_type (SOBJ o_menu_bar, SOBJ o_type)
{
  GtkMenuBar* menu_bar;
  GtkShadowType type;

  menu_bar = sgtk_get_Object(o_menu_bar);
  type = sgtk_enumget("GtkShadowType", o_type);
  gtk_menu_bar_set_shadow_type(menu_bar, type);
  return(scm_undefined);
}

#ifdef INCOMPLETE
  /* +++ return type GtkMenuFactory* not defined */
SOBJ sgtk_menu_factory_new (SOBJ o_type)
{
  GtkMenuFactoryType type;
  GtkMenuFactory* __retval__;

  type = sgtk_enumget("GtkMenuFactoryType", o_type);
  __retval__ = gtk_menu_factory_new(type);
  /* +++ don't know how to generate GtkMenuFactory* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_menu_factory_destroy (SOBJ o_factory)
{
  GtkMenuFactory* factory;

  /* +++ undefined GtkMenuFactory* */
  gtk_menu_factory_destroy(factory);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_menu_factory_add_entries (SOBJ o_factory, SOBJ o_entries, SOBJ o_nentries)
{
  GtkMenuFactory* factory;
  GtkMenuEntry* entries;
  int nentries;

  /* +++ undefined GtkMenuFactory* */
  /* +++ undefined GtkMenuEntry* */
  nentries = scm_number2long(o_nentries);
  gtk_menu_factory_add_entries(factory, entries, nentries);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_menu_factory_add_subfactory (SOBJ o_factory, SOBJ o_subfactory, SOBJ o_path)
{
  GtkMenuFactory* factory;
  GtkMenuFactory* subfactory;
  char* path;

  /* +++ undefined GtkMenuFactory* */
  /* +++ undefined GtkMenuFactory* */
  path = scm_getstr(o_path);
  gtk_menu_factory_add_subfactory(factory, subfactory, path);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_menu_factory_remove_paths (SOBJ o_factory, SOBJ o_paths, SOBJ o_npaths)
{
  GtkMenuFactory* factory;
  char** paths;
  int npaths;

  /* +++ undefined GtkMenuFactory* */
  /* +++ undefined char** */
  npaths = scm_number2long(o_npaths);
  gtk_menu_factory_remove_paths(factory, paths, npaths);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_menu_factory_remove_entries (SOBJ o_factory, SOBJ o_entries, SOBJ o_nentries)
{
  GtkMenuFactory* factory;
  GtkMenuEntry* entries;
  int nentries;

  /* +++ undefined GtkMenuFactory* */
  /* +++ undefined GtkMenuEntry* */
  nentries = scm_number2long(o_nentries);
  gtk_menu_factory_remove_entries(factory, entries, nentries);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_menu_factory_remove_subfactory (SOBJ o_factory, SOBJ o_subfactory, SOBJ o_path)
{
  GtkMenuFactory* factory;
  GtkMenuFactory* subfactory;
  char* path;

  /* +++ undefined GtkMenuFactory* */
  /* +++ undefined GtkMenuFactory* */
  path = scm_getstr(o_path);
  gtk_menu_factory_remove_subfactory(factory, subfactory, path);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkMenuPath* not defined */
SOBJ sgtk_menu_factory_find (SOBJ o_factory, SOBJ o_path)
{
  GtkMenuFactory* factory;
  char* path;
  GtkMenuPath* __retval__;

  /* +++ undefined GtkMenuFactory* */
  path = scm_getstr(o_path);
  __retval__ = gtk_menu_factory_find(factory, path);
  /* +++ don't know how to generate GtkMenuPath* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_menu_item_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_menu_item_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_menu_item_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_menu_item_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_menu_item_new_with_label (SOBJ o_label)
{
  gchar* label;
  GtkWidget* __retval__;

  label = scm_getstr(o_label);
  __retval__ = gtk_menu_item_new_with_label(label);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_menu_item_set_submenu (SOBJ o_menu_item, SOBJ o_submenu)
{
  GtkMenuItem* menu_item;
  GtkWidget* submenu;

  menu_item = sgtk_get_Object(o_menu_item);
  submenu = sgtk_get_Object(o_submenu);
  gtk_menu_item_set_submenu(menu_item, submenu);
  return(scm_undefined);
}

SOBJ sgtk_menu_item_remove_submenu (SOBJ o_menu_item)
{
  GtkMenuItem* menu_item;

  menu_item = sgtk_get_Object(o_menu_item);
  gtk_menu_item_remove_submenu(menu_item);
  return(scm_undefined);
}

SOBJ sgtk_menu_item_set_placement (SOBJ o_menu_item, SOBJ o_placement)
{
  GtkMenuItem* menu_item;
  GtkSubmenuPlacement placement;

  menu_item = sgtk_get_Object(o_menu_item);
  placement = sgtk_enumget("GtkSubmenuPlacement", o_placement);
  gtk_menu_item_set_placement(menu_item, placement);
  return(scm_undefined);
}

SOBJ sgtk_menu_item_configure (SOBJ o_menu_item, SOBJ o_show_toggle_indicator, SOBJ o_show_submenu_indicator)
{
  GtkMenuItem* menu_item;
  gint show_toggle_indicator;
  gint show_submenu_indicator;

  menu_item = sgtk_get_Object(o_menu_item);
  show_toggle_indicator = scm_number2long(o_show_toggle_indicator);
  show_submenu_indicator = scm_number2long(o_show_submenu_indicator);
  gtk_menu_item_configure(menu_item, show_toggle_indicator, show_submenu_indicator);
  return(scm_undefined);
}

SOBJ sgtk_menu_item_select (SOBJ o_menu_item)
{
  GtkMenuItem* menu_item;

  menu_item = sgtk_get_Object(o_menu_item);
  gtk_menu_item_select(menu_item);
  return(scm_undefined);
}

SOBJ sgtk_menu_item_deselect (SOBJ o_menu_item)
{
  GtkMenuItem* menu_item;

  menu_item = sgtk_get_Object(o_menu_item);
  gtk_menu_item_deselect(menu_item);
  return(scm_undefined);
}

SOBJ sgtk_menu_item_activate (SOBJ o_menu_item)
{
  GtkMenuItem* menu_item;

  menu_item = sgtk_get_Object(o_menu_item);
  gtk_menu_item_activate(menu_item);
  return(scm_undefined);
}

SOBJ sgtk_menu_item_right_justify (SOBJ o_menuitem)
{
  GtkMenuItem* menuitem;

  menuitem = sgtk_get_Object(o_menuitem);
  gtk_menu_item_right_justify(menuitem);
  return(scm_undefined);
}

SOBJ sgtk_menu_shell_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_menu_shell_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_menu_shell_append (SOBJ o_menu_shell, SOBJ o_child)
{
  GtkMenuShell* menu_shell;
  GtkWidget* child;

  menu_shell = sgtk_get_Object(o_menu_shell);
  child = sgtk_get_Object(o_child);
  gtk_menu_shell_append(menu_shell, child);
  return(scm_undefined);
}

SOBJ sgtk_menu_shell_prepend (SOBJ o_menu_shell, SOBJ o_child)
{
  GtkMenuShell* menu_shell;
  GtkWidget* child;

  menu_shell = sgtk_get_Object(o_menu_shell);
  child = sgtk_get_Object(o_child);
  gtk_menu_shell_prepend(menu_shell, child);
  return(scm_undefined);
}

SOBJ sgtk_menu_shell_insert (SOBJ o_menu_shell, SOBJ o_child, SOBJ o_position)
{
  GtkMenuShell* menu_shell;
  GtkWidget* child;
  gint position;

  menu_shell = sgtk_get_Object(o_menu_shell);
  child = sgtk_get_Object(o_child);
  position = scm_number2long(o_position);
  gtk_menu_shell_insert(menu_shell, child, position);
  return(scm_undefined);
}

SOBJ sgtk_menu_shell_deactivate (SOBJ o_menu_shell)
{
  GtkMenuShell* menu_shell;

  menu_shell = sgtk_get_Object(o_menu_shell);
  gtk_menu_shell_deactivate(menu_shell);
  return(scm_undefined);
}

SOBJ sgtk_menu_shell_select_item (SOBJ o_menu_shell, SOBJ o_menu_item)
{
  GtkMenuShell* menu_shell;
  GtkWidget* menu_item;

  menu_shell = sgtk_get_Object(o_menu_shell);
  menu_item = sgtk_get_Object(o_menu_item);
  gtk_menu_shell_select_item(menu_shell, menu_item);
  return(scm_undefined);
}

SOBJ sgtk_menu_shell_deselect (SOBJ o_menu_shell)
{
  GtkMenuShell* menu_shell;

  menu_shell = sgtk_get_Object(o_menu_shell);
  gtk_menu_shell_deselect(menu_shell);
  return(scm_undefined);
}

SOBJ sgtk_menu_shell_activate_item (SOBJ o_menu_shell, SOBJ o_menu_item, SOBJ o_force_deactivate)
{
  GtkMenuShell* menu_shell;
  GtkWidget* menu_item;
  gboolean force_deactivate;

  menu_shell = sgtk_get_Object(o_menu_shell);
  menu_item = sgtk_get_Object(o_menu_item);
  force_deactivate = (o_force_deactivate != scm_false);
  gtk_menu_shell_activate_item(menu_shell, menu_item, force_deactivate);
  return(scm_undefined);
}

SOBJ sgtk_misc_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_misc_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_misc_set_alignment (SOBJ o_misc, SOBJ o_xalign, SOBJ o_yalign)
{
  GtkMisc* misc;
  gfloat xalign;
  gfloat yalign;

  misc = sgtk_get_Object(o_misc);
  xalign = scm_number2double(o_xalign);
  yalign = scm_number2double(o_yalign);
  gtk_misc_set_alignment(misc, xalign, yalign);
  return(scm_undefined);
}

SOBJ sgtk_misc_set_padding (SOBJ o_misc, SOBJ o_xpad, SOBJ o_ypad)
{
  GtkMisc* misc;
  gint xpad;
  gint ypad;

  misc = sgtk_get_Object(o_misc);
  xpad = scm_number2long(o_xpad);
  ypad = scm_number2long(o_ypad);
  gtk_misc_set_padding(misc, xpad, ypad);
  return(scm_undefined);
}

SOBJ sgtk_notebook_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_notebook_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_notebook_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_notebook_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_notebook_append_page (SOBJ o_notebook, SOBJ o_child, SOBJ o_tab_label)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* tab_label;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  tab_label = sgtk_get_Object(o_tab_label);
  gtk_notebook_append_page(notebook, child, tab_label);
  return(scm_undefined);
}

SOBJ sgtk_notebook_append_page_menu (SOBJ o_notebook, SOBJ o_child, SOBJ o_tab_label, SOBJ o_menu_label)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* tab_label;
  GtkWidget* menu_label;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  tab_label = sgtk_get_Object(o_tab_label);
  menu_label = sgtk_get_Object(o_menu_label);
  gtk_notebook_append_page_menu(notebook, child, tab_label, menu_label);
  return(scm_undefined);
}

SOBJ sgtk_notebook_prepend_page (SOBJ o_notebook, SOBJ o_child, SOBJ o_tab_label)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* tab_label;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  tab_label = sgtk_get_Object(o_tab_label);
  gtk_notebook_prepend_page(notebook, child, tab_label);
  return(scm_undefined);
}

SOBJ sgtk_notebook_prepend_page_menu (SOBJ o_notebook, SOBJ o_child, SOBJ o_tab_label, SOBJ o_menu_label)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* tab_label;
  GtkWidget* menu_label;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  tab_label = sgtk_get_Object(o_tab_label);
  menu_label = sgtk_get_Object(o_menu_label);
  gtk_notebook_prepend_page_menu(notebook, child, tab_label, menu_label);
  return(scm_undefined);
}

SOBJ sgtk_notebook_insert_page (SOBJ o_notebook, SOBJ o_child, SOBJ o_tab_label, SOBJ o_position)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* tab_label;
  gint position;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  tab_label = sgtk_get_Object(o_tab_label);
  position = scm_number2long(o_position);
  gtk_notebook_insert_page(notebook, child, tab_label, position);
  return(scm_undefined);
}

SOBJ sgtk_notebook_insert_page_menu (SOBJ o_notebook, SOBJ o_child, SOBJ o_tab_label, SOBJ o_menu_label, SOBJ o_position)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* tab_label;
  GtkWidget* menu_label;
  gint position;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  tab_label = sgtk_get_Object(o_tab_label);
  menu_label = sgtk_get_Object(o_menu_label);
  position = scm_number2long(o_position);
  gtk_notebook_insert_page_menu(notebook, child, tab_label, menu_label, position);
  return(scm_undefined);
}

SOBJ sgtk_notebook_remove_page (SOBJ o_notebook, SOBJ o_page_num)
{
  GtkNotebook* notebook;
  gint page_num;

  notebook = sgtk_get_Object(o_notebook);
  page_num = scm_number2long(o_page_num);
  gtk_notebook_remove_page(notebook, page_num);
  return(scm_undefined);
}

SOBJ sgtk_notebook_get_current_page (SOBJ o_notebook)
{
  GtkNotebook* notebook;
  gint __retval__;

  notebook = sgtk_get_Object(o_notebook);
  __retval__ = gtk_notebook_get_current_page(notebook);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_notebook_get_nth_page (SOBJ o_notebook, SOBJ o_page_num)
{
  GtkNotebook* notebook;
  gint page_num;
  GtkWidget* __retval__;

  notebook = sgtk_get_Object(o_notebook);
  page_num = scm_number2long(o_page_num);
  __retval__ = gtk_notebook_get_nth_page(notebook, page_num);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_notebook_page_num (SOBJ o_notebook, SOBJ o_child)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  gint __retval__;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  __retval__ = gtk_notebook_page_num(notebook, child);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_notebook_set_page (SOBJ o_notebook, SOBJ o_page_num)
{
  GtkNotebook* notebook;
  gint page_num;

  notebook = sgtk_get_Object(o_notebook);
  page_num = scm_number2long(o_page_num);
  gtk_notebook_set_page(notebook, page_num);
  return(scm_undefined);
}

SOBJ sgtk_notebook_next_page (SOBJ o_notebook)
{
  GtkNotebook* notebook;

  notebook = sgtk_get_Object(o_notebook);
  gtk_notebook_next_page(notebook);
  return(scm_undefined);
}

SOBJ sgtk_notebook_prev_page (SOBJ o_notebook)
{
  GtkNotebook* notebook;

  notebook = sgtk_get_Object(o_notebook);
  gtk_notebook_prev_page(notebook);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_show_border (SOBJ o_notebook, SOBJ o_show_border)
{
  GtkNotebook* notebook;
  gboolean show_border;

  notebook = sgtk_get_Object(o_notebook);
  show_border = (o_show_border != scm_false);
  gtk_notebook_set_show_border(notebook, show_border);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_show_tabs (SOBJ o_notebook, SOBJ o_show_tabs)
{
  GtkNotebook* notebook;
  gboolean show_tabs;

  notebook = sgtk_get_Object(o_notebook);
  show_tabs = (o_show_tabs != scm_false);
  gtk_notebook_set_show_tabs(notebook, show_tabs);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_tab_pos (SOBJ o_notebook, SOBJ o_pos)
{
  GtkNotebook* notebook;
  GtkPositionType pos;

  notebook = sgtk_get_Object(o_notebook);
  pos = sgtk_enumget("GtkPositionType", o_pos);
  gtk_notebook_set_tab_pos(notebook, pos);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_homogeneous_tabs (SOBJ o_notebook, SOBJ o_homogeneous)
{
  GtkNotebook* notebook;
  gboolean homogeneous;

  notebook = sgtk_get_Object(o_notebook);
  homogeneous = (o_homogeneous != scm_false);
  gtk_notebook_set_homogeneous_tabs(notebook, homogeneous);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_tab_border (SOBJ o_notebook, SOBJ o_tab_border)
{
  GtkNotebook* notebook;
  guint tab_border;

  notebook = sgtk_get_Object(o_notebook);
  tab_border = scm_number2long(o_tab_border);
  gtk_notebook_set_tab_border(notebook, tab_border);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_tab_hborder (SOBJ o_notebook, SOBJ o_tab_hborder)
{
  GtkNotebook* notebook;
  guint tab_hborder;

  notebook = sgtk_get_Object(o_notebook);
  tab_hborder = scm_number2long(o_tab_hborder);
  gtk_notebook_set_tab_hborder(notebook, tab_hborder);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_tab_vborder (SOBJ o_notebook, SOBJ o_tab_vborder)
{
  GtkNotebook* notebook;
  guint tab_vborder;

  notebook = sgtk_get_Object(o_notebook);
  tab_vborder = scm_number2long(o_tab_vborder);
  gtk_notebook_set_tab_vborder(notebook, tab_vborder);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_scrollable (SOBJ o_notebook, SOBJ o_scrollable)
{
  GtkNotebook* notebook;
  gboolean scrollable;

  notebook = sgtk_get_Object(o_notebook);
  scrollable = (o_scrollable != scm_false);
  gtk_notebook_set_scrollable(notebook, scrollable);
  return(scm_undefined);
}

SOBJ sgtk_notebook_popup_enable (SOBJ o_notebook)
{
  GtkNotebook* notebook;

  notebook = sgtk_get_Object(o_notebook);
  gtk_notebook_popup_enable(notebook);
  return(scm_undefined);
}

SOBJ sgtk_notebook_popup_disable (SOBJ o_notebook)
{
  GtkNotebook* notebook;

  notebook = sgtk_get_Object(o_notebook);
  gtk_notebook_popup_disable(notebook);
  return(scm_undefined);
}

SOBJ sgtk_notebook_get_tab_label (SOBJ o_notebook, SOBJ o_child)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* __retval__;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  __retval__ = gtk_notebook_get_tab_label(notebook, child);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_notebook_set_tab_label (SOBJ o_notebook, SOBJ o_child, SOBJ o_tab_label)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* tab_label;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  tab_label = sgtk_get_Object(o_tab_label);
  gtk_notebook_set_tab_label(notebook, child, tab_label);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_tab_label_text (SOBJ o_notebook, SOBJ o_child, SOBJ o_tab_text)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  gchar* tab_text;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  tab_text = scm_getstr(o_tab_text);
  gtk_notebook_set_tab_label_text(notebook, child, tab_text);
  return(scm_undefined);
}

SOBJ sgtk_notebook_get_menu_label (SOBJ o_notebook, SOBJ o_child)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* __retval__;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  __retval__ = gtk_notebook_get_menu_label(notebook, child);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_notebook_set_menu_label (SOBJ o_notebook, SOBJ o_child, SOBJ o_menu_label)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  GtkWidget* menu_label;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  menu_label = sgtk_get_Object(o_menu_label);
  gtk_notebook_set_menu_label(notebook, child, menu_label);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_menu_label_text (SOBJ o_notebook, SOBJ o_child, SOBJ o_menu_text)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  gchar* menu_text;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  menu_text = scm_getstr(o_menu_text);
  gtk_notebook_set_menu_label_text(notebook, child, menu_text);
  return(scm_undefined);
}

SOBJ sgtk_notebook_set_tab_label_packing (SOBJ o_notebook, SOBJ o_child, SOBJ o_expand, SOBJ o_fill, SOBJ o_pack_type)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  gboolean expand;
  gboolean fill;
  GtkPackType pack_type;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  expand = (o_expand != scm_false);
  fill = (o_fill != scm_false);
  pack_type = sgtk_enumget("GtkPackType", o_pack_type);
  gtk_notebook_set_tab_label_packing(notebook, child, expand, fill, pack_type);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_notebook_query_tab_label_packing (SOBJ o_notebook, SOBJ o_child, SOBJ o_expand, SOBJ o_fill, SOBJ o_pack_type)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  gboolean* expand;
  gboolean* fill;
  GtkPackType* pack_type;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  /* +++ undefined gboolean* */
  /* +++ undefined gboolean* */
  /* +++ undefined GtkPackType* */
  gtk_notebook_query_tab_label_packing(notebook, child, expand, fill, pack_type);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_notebook_reorder_child (SOBJ o_notebook, SOBJ o_child, SOBJ o_position)
{
  GtkNotebook* notebook;
  GtkWidget* child;
  gint position;

  notebook = sgtk_get_Object(o_notebook);
  child = sgtk_get_Object(o_child);
  position = scm_number2long(o_position);
  gtk_notebook_reorder_child(notebook, child, position);
  return(scm_undefined);
}

SOBJ sgtk_object_post_arg_parsing_init ()
{

  gtk_object_post_arg_parsing_init();
  return(scm_undefined);
}

SOBJ sgtk_object_init_type ()
{

  gtk_object_init_type();
  return(scm_undefined);
}

SOBJ sgtk_object_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_object_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_object_destroy (SOBJ o_object)
{
  GtkObject* object;

  object = sgtk_get_Object(o_object);
  gtk_object_destroy(object);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_object_class_add_signals (SOBJ o_class, SOBJ o_signals, SOBJ o_nsignals)
{
  GtkObjectClass* class;
  guint* signals;
  guint nsignals;

  /* +++ undefined GtkObjectClass* */
  /* +++ undefined guint* */
  nsignals = scm_number2long(o_nsignals);
  gtk_object_class_add_signals(class, signals, nsignals);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_class_user_signal_newv (SOBJ o_class, SOBJ o_name, SOBJ o_signal_flags, SOBJ o_marshaller, SOBJ o_return_val, SOBJ o_nparams, SOBJ o_params)
{
  GtkObjectClass* class;
  gchar* name;
  GtkSignalRunType signal_flags;
  GtkSignalMarshaller marshaller;
  GtkType return_val;
  guint nparams;
  GtkType* params;
  guint __retval__;

  /* +++ undefined GtkObjectClass* */
  name = scm_getstr(o_name);
  signal_flags = sgtk_flagsget("GtkSignalRunType", o_signal_flags);
  /* +++ undefined GtkSignalMarshaller */
  return_val = scm_number2long(o_return_val);
  nparams = scm_number2long(o_nparams);
  /* +++ undefined GtkType* */
  __retval__ = gtk_object_class_user_signal_newv(class, name, signal_flags, marshaller, return_val, nparams, params);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_object_sink (SOBJ o_object)
{
  GtkObject* object;

  object = sgtk_get_Object(o_object);
  gtk_object_sink(object);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_object_weakref (SOBJ o_object, SOBJ o_notify, SOBJ o_data)
{
  GtkObject* object;
  GtkDestroyNotify notify;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkDestroyNotify */
  /* +++ get gpointer -> pointer failed */
  gtk_object_weakref(object, notify, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_weakunref (SOBJ o_object, SOBJ o_notify, SOBJ o_data)
{
  GtkObject* object;
  GtkDestroyNotify notify;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkDestroyNotify */
  /* +++ get gpointer -> pointer failed */
  gtk_object_weakunref(object, notify, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_newv (SOBJ o_object_type, SOBJ o_n_args, SOBJ o_args)
{
  GtkType object_type;
  guint n_args;
  GtkArg* args;
  GtkObject* __retval__;

  object_type = scm_number2long(o_object_type);
  n_args = scm_number2long(o_n_args);
  /* +++ undefined GtkArg* */
  __retval__ = gtk_object_newv(object_type, n_args, args);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_setv (SOBJ o_object, SOBJ o_n_args, SOBJ o_args)
{
  GtkObject* object;
  guint n_args;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  n_args = scm_number2long(o_n_args);
  /* +++ undefined GtkArg* */
  gtk_object_setv(object, n_args, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_getv (SOBJ o_object, SOBJ o_n_args, SOBJ o_args)
{
  GtkObject* object;
  guint n_args;
  GtkArg* args;

  object = sgtk_get_Object(o_object);
  n_args = scm_number2long(o_n_args);
  /* +++ undefined GtkArg* */
  gtk_object_getv(object, n_args, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_arg_set (SOBJ o_object, SOBJ o_arg, SOBJ o_info)
{
  GtkObject* object;
  GtkArg* arg;
  GtkArgInfo* info;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkArg* */
  /* +++ undefined GtkArgInfo* */
  gtk_object_arg_set(object, arg, info);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_arg_get (SOBJ o_object, SOBJ o_arg, SOBJ o_info)
{
  GtkObject* object;
  GtkArg* arg;
  GtkArgInfo* info;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkArg* */
  /* +++ undefined GtkArgInfo* */
  gtk_object_arg_get(object, arg, info);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_object_default_construct (SOBJ o_object)
{
  GtkObject* object;

  object = sgtk_get_Object(o_object);
  gtk_object_default_construct(object);
  return(scm_undefined);
}

SOBJ sgtk_object_constructed (SOBJ o_object)
{
  GtkObject* object;

  object = sgtk_get_Object(o_object);
  gtk_object_constructed(object);
  return(scm_undefined);
}

SOBJ sgtk_object_add_arg_type (SOBJ o_arg_name, SOBJ o_arg_type, SOBJ o_arg_flags, SOBJ o_arg_id)
{
  char* arg_name;
  GtkType arg_type;
  guint arg_flags;
  guint arg_id;

  arg_name = scm_getstr(o_arg_name);
  arg_type = scm_number2long(o_arg_type);
  arg_flags = scm_number2long(o_arg_flags);
  arg_id = scm_number2long(o_arg_id);
  gtk_object_add_arg_type(arg_name, arg_type, arg_flags, arg_id);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_object_args_collect (SOBJ o_object_type, SOBJ o_arg_list_p, SOBJ o_info_list_p, SOBJ o_first_arg_name, SOBJ o_var_args)
{
  GtkType object_type;
  GSList** arg_list_p;
  GSList** info_list_p;
  gchar* first_arg_name;
  va_list var_args;
  gchar* __retval__;

  object_type = scm_number2long(o_object_type);
  /* +++ undefined GSList** */
  /* +++ undefined GSList** */
  first_arg_name = scm_getstr(o_first_arg_name);
  /* +++ undefined va_list */
  __retval__ = gtk_object_args_collect(object_type, arg_list_p, info_list_p, first_arg_name, var_args);
  return(scm_mkstring(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_arg_get_info (SOBJ o_object_type, SOBJ o_arg_name, SOBJ o_info_p)
{
  GtkType object_type;
  gchar* arg_name;
  GtkArgInfo** info_p;
  gchar* __retval__;

  object_type = scm_number2long(o_object_type);
  arg_name = scm_getstr(o_arg_name);
  /* +++ undefined GtkArgInfo** */
  __retval__ = gtk_object_arg_get_info(object_type, arg_name, info_p);
  return(scm_mkstring(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkArg* not defined */
SOBJ sgtk_object_query_args (SOBJ o_class_type, SOBJ o_arg_flags, SOBJ o_n_args)
{
  GtkType class_type;
  guint32** arg_flags;
  guint* n_args;
  GtkArg* __retval__;

  class_type = scm_number2long(o_class_type);
  /* +++ undefined guint32** */
  /* +++ undefined guint* */
  __retval__ = gtk_object_query_args(class_type, arg_flags, n_args);
  /* +++ don't know how to generate GtkArg* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_set_data_by_id (SOBJ o_object, SOBJ o_data_id, SOBJ o_data)
{
  GtkObject* object;
  GQuark data_id;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GQuark */
  /* +++ get gpointer -> pointer failed */
  gtk_object_set_data_by_id(object, data_id, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_set_data (SOBJ o_object, SOBJ o_key, SOBJ o_data)
{
  GtkObject* object;
  gchar* key;
  gpointer data;

  object = sgtk_get_Object(o_object);
  key = scm_getstr(o_key);
  /* +++ get gpointer -> pointer failed */
  gtk_object_set_data(object, key, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_set_data_by_id_full (SOBJ o_object, SOBJ o_data_id, SOBJ o_data, SOBJ o_destroy)
{
  GtkObject* object;
  GQuark data_id;
  gpointer data;
  GtkDestroyNotify destroy;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GQuark */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  gtk_object_set_data_by_id_full(object, data_id, data, destroy);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_set_data_full (SOBJ o_object, SOBJ o_key, SOBJ o_data, SOBJ o_destroy)
{
  GtkObject* object;
  gchar* key;
  gpointer data;
  GtkDestroyNotify destroy;

  object = sgtk_get_Object(o_object);
  key = scm_getstr(o_key);
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  gtk_object_set_data_full(object, key, data, destroy);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_object_get_data_by_id (SOBJ o_object, SOBJ o_data_id)
{
  GtkObject* object;
  GQuark data_id;
  gpointer __retval__;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GQuark */
  __retval__ = gtk_object_get_data_by_id(object, data_id);
  return(scm_mkpointer(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_object_get_data (SOBJ o_object, SOBJ o_key)
{
  GtkObject* object;
  gchar* key;
  gpointer __retval__;

  object = sgtk_get_Object(o_object);
  key = scm_getstr(o_key);
  __retval__ = gtk_object_get_data(object, key);
  return(scm_mkpointer(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_object_remove_data_by_id (SOBJ o_object, SOBJ o_data_id)
{
  GtkObject* object;
  GQuark data_id;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GQuark */
  gtk_object_remove_data_by_id(object, data_id);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_object_remove_data (SOBJ o_object, SOBJ o_key)
{
  GtkObject* object;
  gchar* key;

  object = sgtk_get_Object(o_object);
  key = scm_getstr(o_key);
  gtk_object_remove_data(object, key);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_object_remove_no_notify_by_id (SOBJ o_object, SOBJ o_key_id)
{
  GtkObject* object;
  GQuark key_id;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GQuark */
  gtk_object_remove_no_notify_by_id(object, key_id);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_object_remove_no_notify (SOBJ o_object, SOBJ o_key)
{
  GtkObject* object;
  gchar* key;

  object = sgtk_get_Object(o_object);
  key = scm_getstr(o_key);
  gtk_object_remove_no_notify(object, key);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_object_set_user_data (SOBJ o_object, SOBJ o_data)
{
  GtkObject* object;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ get gpointer -> pointer failed */
  gtk_object_set_user_data(object, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_object_get_user_data (SOBJ o_object)
{
  GtkObject* object;
  gpointer __retval__;

  object = sgtk_get_Object(o_object);
  __retval__ = gtk_object_get_user_data(object);
  return(scm_mkpointer(__retval__));
}

SOBJ sgtk_object_ref (SOBJ o_object)
{
  GtkObject* object;

  object = sgtk_get_Object(o_object);
  gtk_object_ref(object);
  return(scm_undefined);
}

SOBJ sgtk_object_unref (SOBJ o_object)
{
  GtkObject* object;

  object = sgtk_get_Object(o_object);
  gtk_object_unref(object);
  return(scm_undefined);
}

SOBJ sgtk_trace_referencing (SOBJ o_object, SOBJ o_func, SOBJ o_dummy, SOBJ o_line, SOBJ o_do_ref)
{
  GtkObject* object;
  gchar* func;
  guint dummy;
  guint line;
  gboolean do_ref;

  object = sgtk_get_Object(o_object);
  func = scm_getstr(o_func);
  dummy = scm_number2long(o_dummy);
  line = scm_number2long(o_line);
  do_ref = (o_do_ref != scm_false);
  gtk_trace_referencing(object, func, dummy, line, do_ref);
  return(scm_undefined);
}

SOBJ sgtk_option_menu_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_option_menu_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_option_menu_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_option_menu_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_option_menu_get_menu (SOBJ o_option_menu)
{
  GtkOptionMenu* option_menu;
  GtkWidget* __retval__;

  option_menu = sgtk_get_Object(o_option_menu);
  __retval__ = gtk_option_menu_get_menu(option_menu);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_option_menu_set_menu (SOBJ o_option_menu, SOBJ o_menu)
{
  GtkOptionMenu* option_menu;
  GtkWidget* menu;

  option_menu = sgtk_get_Object(o_option_menu);
  menu = sgtk_get_Object(o_menu);
  gtk_option_menu_set_menu(option_menu, menu);
  return(scm_undefined);
}

SOBJ sgtk_option_menu_remove_menu (SOBJ o_option_menu)
{
  GtkOptionMenu* option_menu;

  option_menu = sgtk_get_Object(o_option_menu);
  gtk_option_menu_remove_menu(option_menu);
  return(scm_undefined);
}

SOBJ sgtk_option_menu_set_history (SOBJ o_option_menu, SOBJ o_index)
{
  GtkOptionMenu* option_menu;
  guint index;

  option_menu = sgtk_get_Object(o_option_menu);
  index = scm_number2long(o_index);
  gtk_option_menu_set_history(option_menu, index);
  return(scm_undefined);
}

SOBJ sgtk_packer_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_packer_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_packer_set_spacing (SOBJ o_packer, SOBJ o_spacing)
{
  GtkPacker* packer;
  guint spacing;

  packer = sgtk_get_Object(o_packer);
  spacing = scm_number2long(o_spacing);
  gtk_packer_set_spacing(packer, spacing);
  return(scm_undefined);
}

SOBJ sgtk_packer_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_packer_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_packer_set_default_border_width (SOBJ o_packer, SOBJ o_border)
{
  GtkPacker* packer;
  guint border;

  packer = sgtk_get_Object(o_packer);
  border = scm_number2long(o_border);
  gtk_packer_set_default_border_width(packer, border);
  return(scm_undefined);
}

SOBJ sgtk_packer_set_default_pad (SOBJ o_packer, SOBJ o_pad_x, SOBJ o_pad_y)
{
  GtkPacker* packer;
  guint pad_x;
  guint pad_y;

  packer = sgtk_get_Object(o_packer);
  pad_x = scm_number2long(o_pad_x);
  pad_y = scm_number2long(o_pad_y);
  gtk_packer_set_default_pad(packer, pad_x, pad_y);
  return(scm_undefined);
}

SOBJ sgtk_packer_set_default_ipad (SOBJ o_packer, SOBJ o_i_pad_x, SOBJ o_i_pad_y)
{
  GtkPacker* packer;
  guint i_pad_x;
  guint i_pad_y;

  packer = sgtk_get_Object(o_packer);
  i_pad_x = scm_number2long(o_i_pad_x);
  i_pad_y = scm_number2long(o_i_pad_y);
  gtk_packer_set_default_ipad(packer, i_pad_x, i_pad_y);
  return(scm_undefined);
}

SOBJ sgtk_packer_add_defaults (SOBJ o_packer, SOBJ o_child, SOBJ o_side, SOBJ o_anchor, SOBJ o_options)
{
  GtkPacker* packer;
  GtkWidget* child;
  GtkSideType side;
  GtkAnchorType anchor;
  GtkPackerOptions options;

  packer = sgtk_get_Object(o_packer);
  child = sgtk_get_Object(o_child);
  side = sgtk_enumget("GtkSideType", o_side);
  anchor = sgtk_enumget("GtkAnchorType", o_anchor);
  options = sgtk_flagsget("GtkPackerOptions", o_options);
  gtk_packer_add_defaults(packer, child, side, anchor, options);
  return(scm_undefined);
}

SOBJ sgtk_packer_add (SOBJ o_packer, SOBJ o_child, SOBJ o_side, SOBJ o_anchor, SOBJ o_options, SOBJ o_border_width, SOBJ o_pad_x, SOBJ o_pad_y, SOBJ o_i_pad_x, SOBJ o_i_pad_y)
{
  GtkPacker* packer;
  GtkWidget* child;
  GtkSideType side;
  GtkAnchorType anchor;
  GtkPackerOptions options;
  guint border_width;
  guint pad_x;
  guint pad_y;
  guint i_pad_x;
  guint i_pad_y;

  packer = sgtk_get_Object(o_packer);
  child = sgtk_get_Object(o_child);
  side = sgtk_enumget("GtkSideType", o_side);
  anchor = sgtk_enumget("GtkAnchorType", o_anchor);
  options = sgtk_flagsget("GtkPackerOptions", o_options);
  border_width = scm_number2long(o_border_width);
  pad_x = scm_number2long(o_pad_x);
  pad_y = scm_number2long(o_pad_y);
  i_pad_x = scm_number2long(o_i_pad_x);
  i_pad_y = scm_number2long(o_i_pad_y);
  gtk_packer_add(packer, child, side, anchor, options, border_width, pad_x, pad_y, i_pad_x, i_pad_y);
  return(scm_undefined);
}

SOBJ sgtk_packer_set_child_packing (SOBJ o_packer, SOBJ o_child, SOBJ o_side, SOBJ o_anchor, SOBJ o_options, SOBJ o_border_width, SOBJ o_pad_x, SOBJ o_pad_y, SOBJ o_i_pad_x, SOBJ o_i_pad_y)
{
  GtkPacker* packer;
  GtkWidget* child;
  GtkSideType side;
  GtkAnchorType anchor;
  GtkPackerOptions options;
  guint border_width;
  guint pad_x;
  guint pad_y;
  guint i_pad_x;
  guint i_pad_y;

  packer = sgtk_get_Object(o_packer);
  child = sgtk_get_Object(o_child);
  side = sgtk_enumget("GtkSideType", o_side);
  anchor = sgtk_enumget("GtkAnchorType", o_anchor);
  options = sgtk_flagsget("GtkPackerOptions", o_options);
  border_width = scm_number2long(o_border_width);
  pad_x = scm_number2long(o_pad_x);
  pad_y = scm_number2long(o_pad_y);
  i_pad_x = scm_number2long(o_i_pad_x);
  i_pad_y = scm_number2long(o_i_pad_y);
  gtk_packer_set_child_packing(packer, child, side, anchor, options, border_width, pad_x, pad_y, i_pad_x, i_pad_y);
  return(scm_undefined);
}

SOBJ sgtk_packer_reorder_child (SOBJ o_packer, SOBJ o_child, SOBJ o_position)
{
  GtkPacker* packer;
  GtkWidget* child;
  gint position;

  packer = sgtk_get_Object(o_packer);
  child = sgtk_get_Object(o_child);
  position = scm_number2long(o_position);
  gtk_packer_reorder_child(packer, child, position);
  return(scm_undefined);
}

SOBJ sgtk_paned_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_paned_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_paned_add1 (SOBJ o_paned, SOBJ o_widget)
{
  GtkPaned* paned;
  GtkWidget* widget;

  paned = sgtk_get_Object(o_paned);
  widget = sgtk_get_Object(o_widget);
  gtk_paned_add1(paned, widget);
  return(scm_undefined);
}

SOBJ sgtk_paned_add2 (SOBJ o_paned, SOBJ o_widget)
{
  GtkPaned* paned;
  GtkWidget* widget;

  paned = sgtk_get_Object(o_paned);
  widget = sgtk_get_Object(o_widget);
  gtk_paned_add2(paned, widget);
  return(scm_undefined);
}

SOBJ sgtk_paned_pack1 (SOBJ o_paned, SOBJ o_child, SOBJ o_resize, SOBJ o_shrink)
{
  GtkPaned* paned;
  GtkWidget* child;
  gboolean resize;
  gboolean shrink;

  paned = sgtk_get_Object(o_paned);
  child = sgtk_get_Object(o_child);
  resize = (o_resize != scm_false);
  shrink = (o_shrink != scm_false);
  gtk_paned_pack1(paned, child, resize, shrink);
  return(scm_undefined);
}

SOBJ sgtk_paned_pack2 (SOBJ o_paned, SOBJ o_child, SOBJ o_resize, SOBJ o_shrink)
{
  GtkPaned* paned;
  GtkWidget* child;
  gboolean resize;
  gboolean shrink;

  paned = sgtk_get_Object(o_paned);
  child = sgtk_get_Object(o_child);
  resize = (o_resize != scm_false);
  shrink = (o_shrink != scm_false);
  gtk_paned_pack2(paned, child, resize, shrink);
  return(scm_undefined);
}

SOBJ sgtk_paned_set_position (SOBJ o_paned, SOBJ o_position)
{
  GtkPaned* paned;
  gint position;

  paned = sgtk_get_Object(o_paned);
  position = scm_number2long(o_position);
  gtk_paned_set_position(paned, position);
  return(scm_undefined);
}

SOBJ sgtk_paned_set_handle_size (SOBJ o_paned, SOBJ o_size)
{
  GtkPaned* paned;
  guint16 size;

  paned = sgtk_get_Object(o_paned);
  size = scm_number2long(o_size);
  gtk_paned_set_handle_size(paned, size);
  return(scm_undefined);
}

SOBJ sgtk_paned_set_gutter_size (SOBJ o_paned, SOBJ o_size)
{
  GtkPaned* paned;
  guint16 size;

  paned = sgtk_get_Object(o_paned);
  size = scm_number2long(o_size);
  gtk_paned_set_gutter_size(paned, size);
  return(scm_undefined);
}

SOBJ sgtk_paned_compute_position (SOBJ o_paned, SOBJ o_allocation, SOBJ o_child1_req, SOBJ o_child2_req)
{
  GtkPaned* paned;
  gint allocation;
  gint child1_req;
  gint child2_req;

  paned = sgtk_get_Object(o_paned);
  allocation = scm_number2long(o_allocation);
  child1_req = scm_number2long(o_child1_req);
  child2_req = scm_number2long(o_child2_req);
  gtk_paned_compute_position(paned, allocation, child1_req, child2_req);
  return(scm_undefined);
}

SOBJ sgtk_pixmap_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_pixmap_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_pixmap_new (SOBJ o_val, SOBJ o_mask)
{
  GdkPixmap* val;
  GdkBitmap* mask;
  GtkWidget* __retval__;

  val = sgdk_get_Window(o_val);
  mask = sgdk_get_Window(o_mask);
  __retval__ = gtk_pixmap_new(val, mask);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_pixmap_set (SOBJ o_pixmap, SOBJ o_val, SOBJ o_mask)
{
  GtkPixmap* pixmap;
  GdkPixmap* val;
  GdkBitmap* mask;

  pixmap = sgtk_get_Object(o_pixmap);
  val = sgdk_get_Window(o_val);
  mask = sgdk_get_Window(o_mask);
  gtk_pixmap_set(pixmap, val, mask);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_pixmap_get (SOBJ o_pixmap, SOBJ o_val, SOBJ o_mask)
{
  GtkPixmap* pixmap;
  GdkPixmap** val;
  GdkBitmap** mask;

  pixmap = sgtk_get_Object(o_pixmap);
  /* +++ undefined GdkPixmap** */
  /* +++ undefined GdkBitmap** */
  gtk_pixmap_get(pixmap, val, mask);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_pixmap_set_build_insensitive (SOBJ o_pixmap, SOBJ o_build)
{
  GtkPixmap* pixmap;
  guint build;

  pixmap = sgtk_get_Object(o_pixmap);
  build = scm_number2long(o_build);
  gtk_pixmap_set_build_insensitive(pixmap, build);
  return(scm_undefined);
}

SOBJ sgtk_plug_get_type ()
{
  guint __retval__;

  __retval__ = gtk_plug_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_plug_construct (SOBJ o_plug, SOBJ o_socket_id)
{
  GtkPlug* plug;
  guint32 socket_id;

  plug = sgtk_get_Object(o_plug);
  socket_id = scm_number2long(o_socket_id);
  gtk_plug_construct(plug, socket_id);
  return(scm_undefined);
}

SOBJ sgtk_plug_new (SOBJ o_socket_id)
{
  guint32 socket_id;
  GtkWidget* __retval__;

  socket_id = scm_number2long(o_socket_id);
  __retval__ = gtk_plug_new(socket_id);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_preview_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_preview_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_preview_reset ()
{

  gtk_preview_reset();
  return(scm_undefined);
}

SOBJ sgtk_preview_uninit ()
{

  gtk_preview_uninit();
  return(scm_undefined);
}

SOBJ sgtk_preview_new (SOBJ o_type)
{
  GtkPreviewType type;
  GtkWidget* __retval__;

  type = sgtk_enumget("GtkPreviewType", o_type);
  __retval__ = gtk_preview_new(type);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_preview_size (SOBJ o_preview, SOBJ o_width, SOBJ o_height)
{
  GtkPreview* preview;
  gint width;
  gint height;

  preview = sgtk_get_Object(o_preview);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_preview_size(preview, width, height);
  return(scm_undefined);
}

SOBJ sgtk_preview_put (SOBJ o_preview, SOBJ o_window, SOBJ o_gc, SOBJ o_srcx, SOBJ o_srcy, SOBJ o_destx, SOBJ o_desty, SOBJ o_width, SOBJ o_height)
{
  GtkPreview* preview;
  GdkWindow* window;
  GdkGC* gc;
  gint srcx;
  gint srcy;
  gint destx;
  gint desty;
  gint width;
  gint height;

  preview = sgtk_get_Object(o_preview);
  window = sgdk_get_Window(o_window);
  gc = sgdk_get_GC(o_gc);
  srcx = scm_number2long(o_srcx);
  srcy = scm_number2long(o_srcy);
  destx = scm_number2long(o_destx);
  desty = scm_number2long(o_desty);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_preview_put(preview, window, gc, srcx, srcy, destx, desty, width, height);
  return(scm_undefined);
}

SOBJ sgtk_preview_draw_row (SOBJ o_preview, SOBJ o_data, SOBJ o_x, SOBJ o_y, SOBJ o_w)
{
  GtkPreview* preview;
  guchar* data;
  gint x;
  gint y;
  gint w;

  preview = sgtk_get_Object(o_preview);
  data = scm_getstr(o_data);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  w = scm_number2long(o_w);
  gtk_preview_draw_row(preview, data, x, y, w);
  return(scm_undefined);
}

SOBJ sgtk_preview_set_expand (SOBJ o_preview, SOBJ o_expand)
{
  GtkPreview* preview;
  gboolean expand;

  preview = sgtk_get_Object(o_preview);
  expand = (o_expand != scm_false);
  gtk_preview_set_expand(preview, expand);
  return(scm_undefined);
}

SOBJ sgtk_preview_set_gamma (SOBJ o__gamma)
{
  double _gamma;

  _gamma = scm_number2double(o__gamma);
  gtk_preview_set_gamma(_gamma);
  return(scm_undefined);
}

SOBJ sgtk_preview_set_color_cube (SOBJ o_nred_shades, SOBJ o_ngreen_shades, SOBJ o_nblue_shades, SOBJ o_ngray_shades)
{
  guint nred_shades;
  guint ngreen_shades;
  guint nblue_shades;
  guint ngray_shades;

  nred_shades = scm_number2long(o_nred_shades);
  ngreen_shades = scm_number2long(o_ngreen_shades);
  nblue_shades = scm_number2long(o_nblue_shades);
  ngray_shades = scm_number2long(o_ngray_shades);
  gtk_preview_set_color_cube(nred_shades, ngreen_shades, nblue_shades, ngray_shades);
  return(scm_undefined);
}

SOBJ sgtk_preview_set_install_cmap (SOBJ o__install_cmap)
{
  gint _install_cmap;

  _install_cmap = scm_number2long(o__install_cmap);
  gtk_preview_set_install_cmap(_install_cmap);
  return(scm_undefined);
}

SOBJ sgtk_preview_set_reserved (SOBJ o_nreserved)
{
  gint nreserved;

  nreserved = scm_number2long(o_nreserved);
  gtk_preview_set_reserved(nreserved);
  return(scm_undefined);
}

SOBJ sgtk_preview_set_dither (SOBJ o_preview, SOBJ o_dither)
{
  GtkPreview* preview;
  GdkRgbDither dither;

  preview = sgtk_get_Object(o_preview);
  dither = sgtk_enumget("GdkRgbDither", o_dither);
  gtk_preview_set_dither(preview, dither);
  return(scm_undefined);
}

SOBJ sgtk_preview_get_visual ()
{
  GdkVisual* __retval__;

  __retval__ = gtk_preview_get_visual();
  return(sgdk_Visual_new(__retval__));
}

SOBJ sgtk_preview_get_cmap ()
{
  GdkColormap* __retval__;

  __retval__ = gtk_preview_get_cmap();
  return(sgdk_Colormap_new(__retval__));
}

#ifdef INCOMPLETE
  /* +++ return type GtkPreviewInfo* not defined */
SOBJ sgtk_preview_get_info ()
{
  GtkPreviewInfo* __retval__;

  __retval__ = gtk_preview_get_info();
  /* +++ don't know how to generate GtkPreviewInfo* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_progress_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_progress_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_progress_set_adjustment (SOBJ o_progress, SOBJ o_adjustment)
{
  GtkProgress* progress;
  GtkAdjustment* adjustment;

  progress = sgtk_get_Object(o_progress);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_progress_set_adjustment(progress, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_progress_configure (SOBJ o_progress, SOBJ o_value, SOBJ o_min, SOBJ o_max)
{
  GtkProgress* progress;
  gfloat value;
  gfloat min;
  gfloat max;

  progress = sgtk_get_Object(o_progress);
  value = scm_number2double(o_value);
  min = scm_number2double(o_min);
  max = scm_number2double(o_max);
  gtk_progress_configure(progress, value, min, max);
  return(scm_undefined);
}

SOBJ sgtk_progress_set_percentage (SOBJ o_progress, SOBJ o_percentage)
{
  GtkProgress* progress;
  gfloat percentage;

  progress = sgtk_get_Object(o_progress);
  percentage = scm_number2double(o_percentage);
  gtk_progress_set_percentage(progress, percentage);
  return(scm_undefined);
}

SOBJ sgtk_progress_get_current_percentage (SOBJ o_progress)
{
  GtkProgress* progress;
  gfloat __retval__;

  progress = sgtk_get_Object(o_progress);
  __retval__ = gtk_progress_get_current_percentage(progress);
  return(scm_mkfnum(__retval__));
}

SOBJ sgtk_progress_get_percentage_from_value (SOBJ o_progress, SOBJ o_value)
{
  GtkProgress* progress;
  gfloat value;
  gfloat __retval__;

  progress = sgtk_get_Object(o_progress);
  value = scm_number2double(o_value);
  __retval__ = gtk_progress_get_percentage_from_value(progress, value);
  return(scm_mkfnum(__retval__));
}

SOBJ sgtk_progress_set_value (SOBJ o_progress, SOBJ o_value)
{
  GtkProgress* progress;
  gfloat value;

  progress = sgtk_get_Object(o_progress);
  value = scm_number2double(o_value);
  gtk_progress_set_value(progress, value);
  return(scm_undefined);
}

SOBJ sgtk_progress_get_value (SOBJ o_progress)
{
  GtkProgress* progress;
  gfloat __retval__;

  progress = sgtk_get_Object(o_progress);
  __retval__ = gtk_progress_get_value(progress);
  return(scm_mkfnum(__retval__));
}

SOBJ sgtk_progress_set_show_text (SOBJ o_progress, SOBJ o_show_text)
{
  GtkProgress* progress;
  gint show_text;

  progress = sgtk_get_Object(o_progress);
  show_text = scm_number2long(o_show_text);
  gtk_progress_set_show_text(progress, show_text);
  return(scm_undefined);
}

SOBJ sgtk_progress_set_text_alignment (SOBJ o_progress, SOBJ o_x_align, SOBJ o_y_align)
{
  GtkProgress* progress;
  gfloat x_align;
  gfloat y_align;

  progress = sgtk_get_Object(o_progress);
  x_align = scm_number2double(o_x_align);
  y_align = scm_number2double(o_y_align);
  gtk_progress_set_text_alignment(progress, x_align, y_align);
  return(scm_undefined);
}

SOBJ sgtk_progress_set_format_string (SOBJ o_progress, SOBJ o_format)
{
  GtkProgress* progress;
  gchar* format;

  progress = sgtk_get_Object(o_progress);
  format = scm_getstr(o_format);
  gtk_progress_set_format_string(progress, format);
  return(scm_undefined);
}

SOBJ sgtk_progress_get_current_text (SOBJ o_progress)
{
  GtkProgress* progress;
  gchar* __retval__;

  progress = sgtk_get_Object(o_progress);
  __retval__ = gtk_progress_get_current_text(progress);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_progress_get_text_from_value (SOBJ o_progress, SOBJ o_value)
{
  GtkProgress* progress;
  gfloat value;
  gchar* __retval__;

  progress = sgtk_get_Object(o_progress);
  value = scm_number2double(o_value);
  __retval__ = gtk_progress_get_text_from_value(progress, value);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_progress_set_activity_mode (SOBJ o_progress, SOBJ o_activity_mode)
{
  GtkProgress* progress;
  guint activity_mode;

  progress = sgtk_get_Object(o_progress);
  activity_mode = scm_number2long(o_activity_mode);
  gtk_progress_set_activity_mode(progress, activity_mode);
  return(scm_undefined);
}

SOBJ sgtk_progress_bar_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_progress_bar_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_progress_bar_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_progress_bar_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_progress_bar_new_with_adjustment (SOBJ o_adjustment)
{
  GtkAdjustment* adjustment;
  GtkWidget* __retval__;

  adjustment = sgtk_get_Object(o_adjustment);
  __retval__ = gtk_progress_bar_new_with_adjustment(adjustment);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_progress_bar_update (SOBJ o_pbar, SOBJ o_percentage)
{
  GtkProgressBar* pbar;
  gfloat percentage;

  pbar = sgtk_get_Object(o_pbar);
  percentage = scm_number2double(o_percentage);
  gtk_progress_bar_update(pbar, percentage);
  return(scm_undefined);
}

SOBJ sgtk_progress_bar_set_orientation (SOBJ o_pbar, SOBJ o_orientation)
{
  GtkProgressBar* pbar;
  GtkProgressBarOrientation orientation;

  pbar = sgtk_get_Object(o_pbar);
  orientation = sgtk_enumget("GtkProgressBarOrientation", o_orientation);
  gtk_progress_bar_set_orientation(pbar, orientation);
  return(scm_undefined);
}

SOBJ sgtk_progress_bar_set_bar_style (SOBJ o_pbar, SOBJ o_bar_style)
{
  GtkProgressBar* pbar;
  GtkProgressBarStyle bar_style;

  pbar = sgtk_get_Object(o_pbar);
  bar_style = sgtk_enumget("GtkProgressBarStyle", o_bar_style);
  gtk_progress_bar_set_bar_style(pbar, bar_style);
  return(scm_undefined);
}

SOBJ sgtk_progress_bar_set_discrete_blocks (SOBJ o_pbar, SOBJ o_blocks)
{
  GtkProgressBar* pbar;
  guint blocks;

  pbar = sgtk_get_Object(o_pbar);
  blocks = scm_number2long(o_blocks);
  gtk_progress_bar_set_discrete_blocks(pbar, blocks);
  return(scm_undefined);
}

SOBJ sgtk_progress_bar_set_activity_step (SOBJ o_pbar, SOBJ o_step)
{
  GtkProgressBar* pbar;
  guint step;

  pbar = sgtk_get_Object(o_pbar);
  step = scm_number2long(o_step);
  gtk_progress_bar_set_activity_step(pbar, step);
  return(scm_undefined);
}

SOBJ sgtk_progress_bar_set_activity_blocks (SOBJ o_pbar, SOBJ o_blocks)
{
  GtkProgressBar* pbar;
  guint blocks;

  pbar = sgtk_get_Object(o_pbar);
  blocks = scm_number2long(o_blocks);
  gtk_progress_bar_set_activity_blocks(pbar, blocks);
  return(scm_undefined);
}

SOBJ sgtk_radio_button_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_radio_button_get_type();
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_radio_button_set_group (SOBJ o_radio_button, SOBJ o_group)
{
  GtkRadioButton* radio_button;
  GSList* group;

  radio_button = sgtk_get_Object(o_radio_button);
  /* +++ undefined GSList* */
  gtk_radio_button_set_group(radio_button, group);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_radio_button_new (SOBJ o_group)
{
  GSList* group;
  GtkWidget* __retval__;

  /* +++ undefined GSList* */
  __retval__ = gtk_radio_button_new(group);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_radio_button_new_with_label (SOBJ o_group, SOBJ o_label)
{
  GSList* group;
  gchar* label;
  GtkWidget* __retval__;

  /* +++ undefined GSList* */
  label = scm_getstr(o_label);
  __retval__ = gtk_radio_button_new_with_label(group, label);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_radio_button_new_from_widget (SOBJ o_group)
{
  GtkRadioButton* group;
  GtkWidget* __retval__;

  group = sgtk_get_Object(o_group);
  __retval__ = gtk_radio_button_new_from_widget(group);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_radio_button_new_with_label_from_widget (SOBJ o_group, SOBJ o_label)
{
  GtkRadioButton* group;
  gchar* label;
  GtkWidget* __retval__;

  group = sgtk_get_Object(o_group);
  label = scm_getstr(o_label);
  __retval__ = gtk_radio_button_new_with_label_from_widget(group, label);
  return(sgtk_object_new((void*)__retval__));
}

#ifdef INCOMPLETE
  /* +++ return type GSList* not defined */
SOBJ sgtk_radio_button_group (SOBJ o_radio_button)
{
  GtkRadioButton* radio_button;
  GSList* __retval__;

  radio_button = sgtk_get_Object(o_radio_button);
  __retval__ = gtk_radio_button_group(radio_button);
  /* +++ don't know how to generate GSList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_radio_menu_item_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_radio_menu_item_get_type();
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_radio_menu_item_new (SOBJ o_group)
{
  GSList* group;
  GtkWidget* __retval__;

  /* +++ undefined GSList* */
  __retval__ = gtk_radio_menu_item_new(group);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_radio_menu_item_set_group (SOBJ o_radio_menu_item, SOBJ o_group)
{
  GtkRadioMenuItem* radio_menu_item;
  GSList* group;

  radio_menu_item = sgtk_get_Object(o_radio_menu_item);
  /* +++ undefined GSList* */
  gtk_radio_menu_item_set_group(radio_menu_item, group);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_radio_menu_item_new_with_label (SOBJ o_group, SOBJ o_label)
{
  GSList* group;
  gchar* label;
  GtkWidget* __retval__;

  /* +++ undefined GSList* */
  label = scm_getstr(o_label);
  __retval__ = gtk_radio_menu_item_new_with_label(group, label);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GSList* not defined */
SOBJ sgtk_radio_menu_item_group (SOBJ o_radio_menu_item)
{
  GtkRadioMenuItem* radio_menu_item;
  GSList* __retval__;

  radio_menu_item = sgtk_get_Object(o_radio_menu_item);
  __retval__ = gtk_radio_menu_item_group(radio_menu_item);
  /* +++ don't know how to generate GSList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_range_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_range_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_range_get_adjustment (SOBJ o_range)
{
  GtkRange* range;
  GtkAdjustment* __retval__;

  range = sgtk_get_Object(o_range);
  __retval__ = gtk_range_get_adjustment(range);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_range_set_update_policy (SOBJ o_range, SOBJ o_policy)
{
  GtkRange* range;
  GtkUpdateType policy;

  range = sgtk_get_Object(o_range);
  policy = sgtk_enumget("GtkUpdateType", o_policy);
  gtk_range_set_update_policy(range, policy);
  return(scm_undefined);
}

SOBJ sgtk_range_set_adjustment (SOBJ o_range, SOBJ o_adjustment)
{
  GtkRange* range;
  GtkAdjustment* adjustment;

  range = sgtk_get_Object(o_range);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_range_set_adjustment(range, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_range_draw_background (SOBJ o_range)
{
  GtkRange* range;

  range = sgtk_get_Object(o_range);
  gtk_range_draw_background(range);
  return(scm_undefined);
}

SOBJ sgtk_range_clear_background (SOBJ o_range)
{
  GtkRange* range;

  range = sgtk_get_Object(o_range);
  gtk_range_clear_background(range);
  return(scm_undefined);
}

SOBJ sgtk_range_draw_trough (SOBJ o_range)
{
  GtkRange* range;

  range = sgtk_get_Object(o_range);
  gtk_range_draw_trough(range);
  return(scm_undefined);
}

SOBJ sgtk_range_draw_slider (SOBJ o_range)
{
  GtkRange* range;

  range = sgtk_get_Object(o_range);
  gtk_range_draw_slider(range);
  return(scm_undefined);
}

SOBJ sgtk_range_draw_step_forw (SOBJ o_range)
{
  GtkRange* range;

  range = sgtk_get_Object(o_range);
  gtk_range_draw_step_forw(range);
  return(scm_undefined);
}

SOBJ sgtk_range_draw_step_back (SOBJ o_range)
{
  GtkRange* range;

  range = sgtk_get_Object(o_range);
  gtk_range_draw_step_back(range);
  return(scm_undefined);
}

SOBJ sgtk_range_slider_update (SOBJ o_range)
{
  GtkRange* range;

  range = sgtk_get_Object(o_range);
  gtk_range_slider_update(range);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_range_trough_click (SOBJ o_range, SOBJ o_x, SOBJ o_y, SOBJ o_jump_perc)
{
  GtkRange* range;
  gint x;
  gint y;
  gfloat* jump_perc;
  gint __retval__;

  range = sgtk_get_Object(o_range);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  /* +++ undefined gfloat* */
  __retval__ = gtk_range_trough_click(range, x, y, jump_perc);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_range_default_hslider_update (SOBJ o_range)
{
  GtkRange* range;

  range = sgtk_get_Object(o_range);
  gtk_range_default_hslider_update(range);
  return(scm_undefined);
}

SOBJ sgtk_range_default_vslider_update (SOBJ o_range)
{
  GtkRange* range;

  range = sgtk_get_Object(o_range);
  gtk_range_default_vslider_update(range);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_range_default_htrough_click (SOBJ o_range, SOBJ o_x, SOBJ o_y, SOBJ o_jump_perc)
{
  GtkRange* range;
  gint x;
  gint y;
  gfloat* jump_perc;
  gint __retval__;

  range = sgtk_get_Object(o_range);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  /* +++ undefined gfloat* */
  __retval__ = gtk_range_default_htrough_click(range, x, y, jump_perc);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_range_default_vtrough_click (SOBJ o_range, SOBJ o_x, SOBJ o_y, SOBJ o_jump_perc)
{
  GtkRange* range;
  gint x;
  gint y;
  gfloat* jump_perc;
  gint __retval__;

  range = sgtk_get_Object(o_range);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  /* +++ undefined gfloat* */
  __retval__ = gtk_range_default_vtrough_click(range, x, y, jump_perc);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_range_default_hmotion (SOBJ o_range, SOBJ o_xdelta, SOBJ o_ydelta)
{
  GtkRange* range;
  gint xdelta;
  gint ydelta;

  range = sgtk_get_Object(o_range);
  xdelta = scm_number2long(o_xdelta);
  ydelta = scm_number2long(o_ydelta);
  gtk_range_default_hmotion(range, xdelta, ydelta);
  return(scm_undefined);
}

SOBJ sgtk_range_default_vmotion (SOBJ o_range, SOBJ o_xdelta, SOBJ o_ydelta)
{
  GtkRange* range;
  gint xdelta;
  gint ydelta;

  range = sgtk_get_Object(o_range);
  xdelta = scm_number2long(o_xdelta);
  ydelta = scm_number2long(o_ydelta);
  gtk_range_default_vmotion(range, xdelta, ydelta);
  return(scm_undefined);
}

SOBJ sgtk_rc_get_theme_dir ()
{
  gchar* __retval__;

  __retval__ = gtk_rc_get_theme_dir();
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_rc_get_module_dir ()
{
  gchar* __retval__;

  __retval__ = gtk_rc_get_module_dir();
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_rc_add_default_file (SOBJ o_file)
{
  gchar* file;

  file = scm_getstr(o_file);
  gtk_rc_add_default_file(file);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_rc_set_default_files (SOBJ o_files)
{
  gchar** files;

  /* +++ undefined gchar** */
  gtk_rc_set_default_files(files);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type gchar** not defined */
SOBJ sgtk_rc_get_default_files ()
{
  gchar** __retval__;

  __retval__ = gtk_rc_get_default_files();
  /* +++ don't know how to generate gchar** */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_rc_init ()
{

  gtk_rc_init();
  return(scm_undefined);
}

SOBJ sgtk_rc_parse_string (SOBJ o_rc_string)
{
  gchar* rc_string;

  rc_string = scm_getstr(o_rc_string);
  gtk_rc_parse_string(rc_string);
  return(scm_undefined);
}

SOBJ sgtk_rc_parse (SOBJ o_filename)
{
  gchar* filename;

  filename = scm_getstr(o_filename);
  gtk_rc_parse(filename);
  return(scm_undefined);
}

#ifdef INCOMPLETE
  /* +++ return type GtkRcStyle* not defined */
SOBJ sgtk_rc_style_new ()
{
  GtkRcStyle* __retval__;

  __retval__ = gtk_rc_style_new();
  /* +++ don't know how to generate GtkRcStyle* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_rc_style_ref (SOBJ o_rc_style)
{
  GtkRcStyle* rc_style;

  /* +++ undefined GtkRcStyle* */
  gtk_rc_style_ref(rc_style);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_rc_style_unref (SOBJ o_rc_style)
{
  GtkRcStyle* rc_style;

  /* +++ undefined GtkRcStyle* */
  gtk_rc_style_unref(rc_style);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_rc_reparse_all ()
{
  gboolean __retval__;

  __retval__ = gtk_rc_reparse_all();
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_rc_get_style (SOBJ o_widget)
{
  GtkWidget* widget;
  GtkStyle* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_rc_get_style(widget);
  return(sgtk_Style_new(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_rc_add_widget_name_style (SOBJ o_rc_style, SOBJ o_pattern)
{
  GtkRcStyle* rc_style;
  gchar* pattern;

  /* +++ undefined GtkRcStyle* */
  pattern = scm_getstr(o_pattern);
  gtk_rc_add_widget_name_style(rc_style, pattern);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_rc_add_widget_class_style (SOBJ o_rc_style, SOBJ o_pattern)
{
  GtkRcStyle* rc_style;
  gchar* pattern;

  /* +++ undefined GtkRcStyle* */
  pattern = scm_getstr(o_pattern);
  gtk_rc_add_widget_class_style(rc_style, pattern);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_rc_add_class_style (SOBJ o_rc_style, SOBJ o_pattern)
{
  GtkRcStyle* rc_style;
  gchar* pattern;

  /* +++ undefined GtkRcStyle* */
  pattern = scm_getstr(o_pattern);
  gtk_rc_add_class_style(rc_style, pattern);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_rc_find_pixmap_in_path (SOBJ o_scanner, SOBJ o_pixmap_file)
{
  GScanner* scanner;
  gchar* pixmap_file;
  gchar* __retval__;

  /* +++ undefined GScanner* */
  pixmap_file = scm_getstr(o_pixmap_file);
  __retval__ = gtk_rc_find_pixmap_in_path(scanner, pixmap_file);
  return(scm_mkstring(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_rc_find_module_in_path (SOBJ o_module_file)
{
  gchar* module_file;
  gchar* __retval__;

  module_file = scm_getstr(o_module_file);
  __retval__ = gtk_rc_find_module_in_path(module_file);
  return(scm_mkstring(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_rc_parse_state (SOBJ o_scanner, SOBJ o_state)
{
  GScanner* scanner;
  GtkStateType* state;
  guint __retval__;

  /* +++ undefined GScanner* */
  /* +++ undefined GtkStateType* */
  __retval__ = gtk_rc_parse_state(scanner, state);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_rc_parse_priority (SOBJ o_scanner, SOBJ o_priority)
{
  GScanner* scanner;
  GtkPathPriorityType* priority;
  guint __retval__;

  /* +++ undefined GScanner* */
  /* +++ undefined GtkPathPriorityType* */
  __retval__ = gtk_rc_parse_priority(scanner, priority);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_rc_parse_color (SOBJ o_scanner, SOBJ o_color)
{
  GScanner* scanner;
  GdkColor* color;
  guint __retval__;

  /* +++ undefined GScanner* */
  color = sgdk_get_Color(o_color);
  __retval__ = gtk_rc_parse_color(scanner, color);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_rc_set_image_loader (SOBJ o_loader)
{
  GtkImageLoader loader;

  /* +++ undefined GtkImageLoader */
  gtk_rc_set_image_loader(loader);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_rc_load_image (SOBJ o_colormap, SOBJ o_transparent_color, SOBJ o_filename)
{
  GdkColormap* colormap;
  GdkColor* transparent_color;
  gchar* filename;
  GdkPixmap* __retval__;

  colormap = sgdk_get_Colormap(o_colormap);
  transparent_color = sgdk_get_Color(o_transparent_color);
  filename = scm_getstr(o_filename);
  __retval__ = gtk_rc_load_image(colormap, transparent_color, filename);
  return(sgdk_Window_new(__retval__));
}

SOBJ sgtk_ruler_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_ruler_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_ruler_set_metric (SOBJ o_ruler, SOBJ o_metric)
{
  GtkRuler* ruler;
  GtkMetricType metric;

  ruler = sgtk_get_Object(o_ruler);
  metric = sgtk_enumget("GtkMetricType", o_metric);
  gtk_ruler_set_metric(ruler, metric);
  return(scm_undefined);
}

SOBJ sgtk_ruler_set_range (SOBJ o_ruler, SOBJ o_lower, SOBJ o_upper, SOBJ o_position, SOBJ o_max_size)
{
  GtkRuler* ruler;
  gfloat lower;
  gfloat upper;
  gfloat position;
  gfloat max_size;

  ruler = sgtk_get_Object(o_ruler);
  lower = scm_number2double(o_lower);
  upper = scm_number2double(o_upper);
  position = scm_number2double(o_position);
  max_size = scm_number2double(o_max_size);
  gtk_ruler_set_range(ruler, lower, upper, position, max_size);
  return(scm_undefined);
}

SOBJ sgtk_ruler_draw_ticks (SOBJ o_ruler)
{
  GtkRuler* ruler;

  ruler = sgtk_get_Object(o_ruler);
  gtk_ruler_draw_ticks(ruler);
  return(scm_undefined);
}

SOBJ sgtk_ruler_draw_pos (SOBJ o_ruler)
{
  GtkRuler* ruler;

  ruler = sgtk_get_Object(o_ruler);
  gtk_ruler_draw_pos(ruler);
  return(scm_undefined);
}

SOBJ sgtk_scale_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_scale_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_scale_set_digits (SOBJ o_scale, SOBJ o_digits)
{
  GtkScale* scale;
  gint digits;

  scale = sgtk_get_Object(o_scale);
  digits = scm_number2long(o_digits);
  gtk_scale_set_digits(scale, digits);
  return(scm_undefined);
}

SOBJ sgtk_scale_set_draw_value (SOBJ o_scale, SOBJ o_draw_value)
{
  GtkScale* scale;
  gboolean draw_value;

  scale = sgtk_get_Object(o_scale);
  draw_value = (o_draw_value != scm_false);
  gtk_scale_set_draw_value(scale, draw_value);
  return(scm_undefined);
}

SOBJ sgtk_scale_set_value_pos (SOBJ o_scale, SOBJ o_pos)
{
  GtkScale* scale;
  GtkPositionType pos;

  scale = sgtk_get_Object(o_scale);
  pos = sgtk_enumget("GtkPositionType", o_pos);
  gtk_scale_set_value_pos(scale, pos);
  return(scm_undefined);
}

SOBJ sgtk_scale_get_value_width (SOBJ o_scale)
{
  GtkScale* scale;
  gint __retval__;

  scale = sgtk_get_Object(o_scale);
  __retval__ = gtk_scale_get_value_width(scale);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_scale_draw_value (SOBJ o_scale)
{
  GtkScale* scale;

  scale = sgtk_get_Object(o_scale);
  gtk_scale_draw_value(scale);
  return(scm_undefined);
}

SOBJ sgtk_scrollbar_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_scrollbar_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_scrolled_window_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_scrolled_window_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_scrolled_window_new (SOBJ o_hadjustment, SOBJ o_vadjustment)
{
  GtkAdjustment* hadjustment;
  GtkAdjustment* vadjustment;
  GtkWidget* __retval__;

  hadjustment = sgtk_get_Object(o_hadjustment);
  vadjustment = sgtk_get_Object(o_vadjustment);
  __retval__ = gtk_scrolled_window_new(hadjustment, vadjustment);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_scrolled_window_set_hadjustment (SOBJ o_scrolled_window, SOBJ o_hadjustment)
{
  GtkScrolledWindow* scrolled_window;
  GtkAdjustment* hadjustment;

  scrolled_window = sgtk_get_Object(o_scrolled_window);
  hadjustment = sgtk_get_Object(o_hadjustment);
  gtk_scrolled_window_set_hadjustment(scrolled_window, hadjustment);
  return(scm_undefined);
}

SOBJ sgtk_scrolled_window_set_vadjustment (SOBJ o_scrolled_window, SOBJ o_vadjustment)
{
  GtkScrolledWindow* scrolled_window;
  GtkAdjustment* vadjustment;

  scrolled_window = sgtk_get_Object(o_scrolled_window);
  vadjustment = sgtk_get_Object(o_vadjustment);
  gtk_scrolled_window_set_vadjustment(scrolled_window, vadjustment);
  return(scm_undefined);
}

SOBJ sgtk_scrolled_window_get_hadjustment (SOBJ o_scrolled_window)
{
  GtkScrolledWindow* scrolled_window;
  GtkAdjustment* __retval__;

  scrolled_window = sgtk_get_Object(o_scrolled_window);
  __retval__ = gtk_scrolled_window_get_hadjustment(scrolled_window);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_scrolled_window_get_vadjustment (SOBJ o_scrolled_window)
{
  GtkScrolledWindow* scrolled_window;
  GtkAdjustment* __retval__;

  scrolled_window = sgtk_get_Object(o_scrolled_window);
  __retval__ = gtk_scrolled_window_get_vadjustment(scrolled_window);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_scrolled_window_set_policy (SOBJ o_scrolled_window, SOBJ o_hscrollbar_policy, SOBJ o_vscrollbar_policy)
{
  GtkScrolledWindow* scrolled_window;
  GtkPolicyType hscrollbar_policy;
  GtkPolicyType vscrollbar_policy;

  scrolled_window = sgtk_get_Object(o_scrolled_window);
  hscrollbar_policy = sgtk_enumget("GtkPolicyType", o_hscrollbar_policy);
  vscrollbar_policy = sgtk_enumget("GtkPolicyType", o_vscrollbar_policy);
  gtk_scrolled_window_set_policy(scrolled_window, hscrollbar_policy, vscrollbar_policy);
  return(scm_undefined);
}

SOBJ sgtk_scrolled_window_set_placement (SOBJ o_scrolled_window, SOBJ o_window_placement)
{
  GtkScrolledWindow* scrolled_window;
  GtkCornerType window_placement;

  scrolled_window = sgtk_get_Object(o_scrolled_window);
  window_placement = sgtk_enumget("GtkCornerType", o_window_placement);
  gtk_scrolled_window_set_placement(scrolled_window, window_placement);
  return(scm_undefined);
}

SOBJ sgtk_scrolled_window_add_with_viewport (SOBJ o_scrolled_window, SOBJ o_child)
{
  GtkScrolledWindow* scrolled_window;
  GtkWidget* child;

  scrolled_window = sgtk_get_Object(o_scrolled_window);
  child = sgtk_get_Object(o_child);
  gtk_scrolled_window_add_with_viewport(scrolled_window, child);
  return(scm_undefined);
}

#ifdef INCOMPLETE
  /* +++ return type GtkTargetList* not defined */
SOBJ sgtk_target_list_new (SOBJ o_targets, SOBJ o_ntargets)
{
  GtkTargetEntry* targets;
  guint ntargets;
  GtkTargetList* __retval__;

  /* +++ undefined GtkTargetEntry* */
  ntargets = scm_number2long(o_ntargets);
  __retval__ = gtk_target_list_new(targets, ntargets);
  /* +++ don't know how to generate GtkTargetList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_target_list_ref (SOBJ o_list)
{
  GtkTargetList* list;

  /* +++ undefined GtkTargetList* */
  gtk_target_list_ref(list);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_target_list_unref (SOBJ o_list)
{
  GtkTargetList* list;

  /* +++ undefined GtkTargetList* */
  gtk_target_list_unref(list);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_target_list_add (SOBJ o_list, SOBJ o_target, SOBJ o_flags, SOBJ o_info)
{
  GtkTargetList* list;
  GdkAtom target;
  guint flags;
  guint info;

  /* +++ undefined GtkTargetList* */
  target = sgdk_get_Atom(o_target);
  flags = scm_number2long(o_flags);
  info = scm_number2long(o_info);
  gtk_target_list_add(list, target, flags, info);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_target_list_add_table (SOBJ o_list, SOBJ o_targets, SOBJ o_ntargets)
{
  GtkTargetList* list;
  GtkTargetEntry* targets;
  guint ntargets;

  /* +++ undefined GtkTargetList* */
  /* +++ undefined GtkTargetEntry* */
  ntargets = scm_number2long(o_ntargets);
  gtk_target_list_add_table(list, targets, ntargets);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_target_list_remove (SOBJ o_list, SOBJ o_target)
{
  GtkTargetList* list;
  GdkAtom target;

  /* +++ undefined GtkTargetList* */
  target = sgdk_get_Atom(o_target);
  gtk_target_list_remove(list, target);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_target_list_find (SOBJ o_list, SOBJ o_target, SOBJ o_info)
{
  GtkTargetList* list;
  GdkAtom target;
  guint* info;
  gboolean __retval__;

  /* +++ undefined GtkTargetList* */
  target = sgdk_get_Atom(o_target);
  /* +++ undefined guint* */
  __retval__ = gtk_target_list_find(list, target, info);
  return(SCM_MKBOOL(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_selection_owner_set (SOBJ o_widget, SOBJ o_selection, SOBJ o_time)
{
  GtkWidget* widget;
  GdkAtom selection;
  guint32 time;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  selection = sgdk_get_Atom(o_selection);
  time = scm_number2long(o_time);
  __retval__ = gtk_selection_owner_set(widget, selection, time);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_selection_add_target (SOBJ o_widget, SOBJ o_selection, SOBJ o_target, SOBJ o_info)
{
  GtkWidget* widget;
  GdkAtom selection;
  GdkAtom target;
  guint info;

  widget = sgtk_get_Object(o_widget);
  selection = sgdk_get_Atom(o_selection);
  target = sgdk_get_Atom(o_target);
  info = scm_number2long(o_info);
  gtk_selection_add_target(widget, selection, target, info);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_selection_add_targets (SOBJ o_widget, SOBJ o_selection, SOBJ o_targets, SOBJ o_ntargets)
{
  GtkWidget* widget;
  GdkAtom selection;
  GtkTargetEntry* targets;
  guint ntargets;

  widget = sgtk_get_Object(o_widget);
  selection = sgdk_get_Atom(o_selection);
  /* +++ undefined GtkTargetEntry* */
  ntargets = scm_number2long(o_ntargets);
  gtk_selection_add_targets(widget, selection, targets, ntargets);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_selection_remove_all (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_selection_remove_all(widget);
  return(scm_undefined);
}

SOBJ sgtk_selection_convert (SOBJ o_widget, SOBJ o_selection, SOBJ o_target, SOBJ o_time)
{
  GtkWidget* widget;
  GdkAtom selection;
  GdkAtom target;
  guint32 time;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  selection = sgdk_get_Atom(o_selection);
  target = sgdk_get_Atom(o_target);
  time = scm_number2long(o_time);
  __retval__ = gtk_selection_convert(widget, selection, target, time);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_selection_data_set (SOBJ o_selection_data, SOBJ o_type, SOBJ o_format, SOBJ o_data, SOBJ o_length)
{
  GtkSelectionData* selection_data;
  GdkAtom type;
  gint format;
  guchar* data;
  gint length;

  /* +++ undefined GtkSelectionData* */
  type = sgdk_get_Atom(o_type);
  format = scm_number2long(o_format);
  data = scm_getstr(o_data);
  length = scm_number2long(o_length);
  gtk_selection_data_set(selection_data, type, format, data, length);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_selection_clear (SOBJ o_widget, SOBJ o_event)
{
  GtkWidget* widget;
  GdkEventSelection* event;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GdkEventSelection* */
  __retval__ = gtk_selection_clear(widget, event);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_selection_request (SOBJ o_widget, SOBJ o_event)
{
  GtkWidget* widget;
  GdkEventSelection* event;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GdkEventSelection* */
  __retval__ = gtk_selection_request(widget, event);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_selection_incr_event (SOBJ o_window, SOBJ o_event)
{
  GdkWindow* window;
  GdkEventProperty* event;
  gint __retval__;

  window = sgdk_get_Window(o_window);
  /* +++ undefined GdkEventProperty* */
  __retval__ = gtk_selection_incr_event(window, event);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_selection_notify (SOBJ o_widget, SOBJ o_event)
{
  GtkWidget* widget;
  GdkEventSelection* event;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GdkEventSelection* */
  __retval__ = gtk_selection_notify(widget, event);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_selection_property_notify (SOBJ o_widget, SOBJ o_event)
{
  GtkWidget* widget;
  GdkEventProperty* event;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GdkEventProperty* */
  __retval__ = gtk_selection_property_notify(widget, event);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkSelectioData* not defined */
SOBJ sgtk_selection_data_copy (SOBJ o_data)
{
  GtkSelectionData* data;
  GtkSelectioData* __retval__;

  /* +++ undefined GtkSelectionData* */
  __retval__ = gtk_selection_data_copy(data);
  return(sgtk_SelectionData_new(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_selection_data_free (SOBJ o_data)
{
  GtkSelectionData* data;

  /* +++ undefined GtkSelectionData* */
  gtk_selection_data_free(data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_separator_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_separator_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_signal_init ()
{

  gtk_signal_init();
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_signal_newv (SOBJ o_r_name, SOBJ o_signal_flags, SOBJ o_object_type, SOBJ o_function_offset, SOBJ o_marshaller, SOBJ o_return_val, SOBJ o_nparams, SOBJ o_params)
{
  gchar* r_name;
  GtkSignalRunType signal_flags;
  GtkType object_type;
  guint function_offset;
  GtkSignalMarshaller marshaller;
  GtkType return_val;
  guint nparams;
  GtkType* params;
  guint __retval__;

  r_name = scm_getstr(o_r_name);
  signal_flags = sgtk_flagsget("GtkSignalRunType", o_signal_flags);
  object_type = scm_number2long(o_object_type);
  function_offset = scm_number2long(o_function_offset);
  /* +++ undefined GtkSignalMarshaller */
  return_val = scm_number2long(o_return_val);
  nparams = scm_number2long(o_nparams);
  /* +++ undefined GtkType* */
  __retval__ = gtk_signal_newv(r_name, signal_flags, object_type, function_offset, marshaller, return_val, nparams, params);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_lookup (SOBJ o_name, SOBJ o_object_type)
{
  gchar* name;
  GtkType object_type;
  guint __retval__;

  name = scm_getstr(o_name);
  object_type = scm_number2long(o_object_type);
  __retval__ = gtk_signal_lookup(name, object_type);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
  /* +++ return type GtkSignalQuery* not defined */
SOBJ sgtk_signal_query (SOBJ o_signal_id)
{
  guint signal_id;
  GtkSignalQuery* __retval__;

  signal_id = scm_number2long(o_signal_id);
  __retval__ = gtk_signal_query(signal_id);
  /* +++ don't know how to generate GtkSignalQuery* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_name (SOBJ o_signal_id)
{
  guint signal_id;
  gchar* __retval__;

  signal_id = scm_number2long(o_signal_id);
  __retval__ = gtk_signal_name(signal_id);
  return(scm_mkstring(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_signal_emitv (SOBJ o_object, SOBJ o_signal_id, SOBJ o_params)
{
  GtkObject* object;
  guint signal_id;
  GtkArg* params;

  object = sgtk_get_Object(o_object);
  signal_id = scm_number2long(o_signal_id);
  /* +++ undefined GtkArg* */
  gtk_signal_emitv(object, signal_id, params);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_emitv_by_name (SOBJ o_object, SOBJ o_name, SOBJ o_params)
{
  GtkObject* object;
  gchar* name;
  GtkArg* params;

  object = sgtk_get_Object(o_object);
  name = scm_getstr(o_name);
  /* +++ undefined GtkArg* */
  gtk_signal_emitv_by_name(object, name, params);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_emit_stop (SOBJ o_object, SOBJ o_signal_id)
{
  GtkObject* object;
  guint signal_id;

  object = sgtk_get_Object(o_object);
  signal_id = scm_number2long(o_signal_id);
  gtk_signal_emit_stop(object, signal_id);
  return(scm_undefined);
}

SOBJ sgtk_signal_emit_stop_by_name (SOBJ o_object, SOBJ o_name)
{
  GtkObject* object;
  gchar* name;

  object = sgtk_get_Object(o_object);
  name = scm_getstr(o_name);
  gtk_signal_emit_stop_by_name(object, name);
  return(scm_undefined);
}

SOBJ sgtk_signal_n_emissions (SOBJ o_object, SOBJ o_signal_id)
{
  GtkObject* object;
  guint signal_id;
  guint __retval__;

  object = sgtk_get_Object(o_object);
  signal_id = scm_number2long(o_signal_id);
  __retval__ = gtk_signal_n_emissions(object, signal_id);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_signal_n_emissions_by_name (SOBJ o_object, SOBJ o_name)
{
  GtkObject* object;
  gchar* name;
  guint __retval__;

  object = sgtk_get_Object(o_object);
  name = scm_getstr(o_name);
  __retval__ = gtk_signal_n_emissions_by_name(object, name);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_signal_connect (SOBJ o_object, SOBJ o_name, SOBJ o_func, SOBJ o_func_data)
{
  GtkObject* object;
  gchar* name;
  GtkSignalFunc func;
  gpointer func_data;
  guint __retval__;

  object = sgtk_get_Object(o_object);
  name = scm_getstr(o_name);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_signal_connect(object, name, func, func_data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_connect_after (SOBJ o_object, SOBJ o_name, SOBJ o_func, SOBJ o_func_data)
{
  GtkObject* object;
  gchar* name;
  GtkSignalFunc func;
  gpointer func_data;
  guint __retval__;

  object = sgtk_get_Object(o_object);
  name = scm_getstr(o_name);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_signal_connect_after(object, name, func, func_data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_connect_full (SOBJ o_object, SOBJ o_name, SOBJ o_func, SOBJ o_marshal, SOBJ o_func_data, SOBJ o_destroy_func, SOBJ o_object_signal, SOBJ o_after)
{
  GtkObject* object;
  gchar* name;
  GtkSignalFunc func;
  GtkCallbackMarshal marshal;
  gpointer func_data;
  GtkDestroyNotify destroy_func;
  gint object_signal;
  gint after;
  guint __retval__;

  object = sgtk_get_Object(o_object);
  name = scm_getstr(o_name);
  /* +++ undefined GtkSignalFunc */
  /* +++ undefined GtkCallbackMarshal */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GtkDestroyNotify */
  object_signal = scm_number2long(o_object_signal);
  after = scm_number2long(o_after);
  __retval__ = gtk_signal_connect_full(object, name, func, marshal, func_data, destroy_func, object_signal, after);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_connect_object (SOBJ o_object, SOBJ o_name, SOBJ o_func, SOBJ o_slot_object)
{
  GtkObject* object;
  gchar* name;
  GtkSignalFunc func;
  GtkObject* slot_object;
  guint __retval__;

  object = sgtk_get_Object(o_object);
  name = scm_getstr(o_name);
  /* +++ undefined GtkSignalFunc */
  slot_object = sgtk_get_Object(o_slot_object);
  __retval__ = gtk_signal_connect_object(object, name, func, slot_object);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_connect_object_after (SOBJ o_object, SOBJ o_name, SOBJ o_func, SOBJ o_slot_object)
{
  GtkObject* object;
  gchar* name;
  GtkSignalFunc func;
  GtkObject* slot_object;
  guint __retval__;

  object = sgtk_get_Object(o_object);
  name = scm_getstr(o_name);
  /* +++ undefined GtkSignalFunc */
  slot_object = sgtk_get_Object(o_slot_object);
  __retval__ = gtk_signal_connect_object_after(object, name, func, slot_object);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_connect_while_alive (SOBJ o_object, SOBJ o_signal, SOBJ o_func, SOBJ o_func_data, SOBJ o_alive_object)
{
  GtkObject* object;
  gchar* signal;
  GtkSignalFunc func;
  gpointer func_data;
  GtkObject* alive_object;

  object = sgtk_get_Object(o_object);
  signal = scm_getstr(o_signal);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  alive_object = sgtk_get_Object(o_alive_object);
  gtk_signal_connect_while_alive(object, signal, func, func_data, alive_object);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_connect_object_while_alive (SOBJ o_object, SOBJ o_signal, SOBJ o_func, SOBJ o_alive_object)
{
  GtkObject* object;
  gchar* signal;
  GtkSignalFunc func;
  GtkObject* alive_object;

  object = sgtk_get_Object(o_object);
  signal = scm_getstr(o_signal);
  /* +++ undefined GtkSignalFunc */
  alive_object = sgtk_get_Object(o_alive_object);
  gtk_signal_connect_object_while_alive(object, signal, func, alive_object);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_disconnect (SOBJ o_object, SOBJ o_handler_id)
{
  GtkObject* object;
  guint handler_id;

  object = sgtk_get_Object(o_object);
  handler_id = scm_number2long(o_handler_id);
  gtk_signal_disconnect(object, handler_id);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_signal_disconnect_by_func (SOBJ o_object, SOBJ o_func, SOBJ o_data)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  gtk_signal_disconnect_by_func(object, func, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_disconnect_by_data (SOBJ o_object, SOBJ o_data)
{
  GtkObject* object;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ get gpointer -> pointer failed */
  gtk_signal_disconnect_by_data(object, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_handler_block (SOBJ o_object, SOBJ o_handler_id)
{
  GtkObject* object;
  guint handler_id;

  object = sgtk_get_Object(o_object);
  handler_id = scm_number2long(o_handler_id);
  gtk_signal_handler_block(object, handler_id);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_signal_handler_block_by_func (SOBJ o_object, SOBJ o_func, SOBJ o_data)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  gtk_signal_handler_block_by_func(object, func, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_handler_block_by_data (SOBJ o_object, SOBJ o_data)
{
  GtkObject* object;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ get gpointer -> pointer failed */
  gtk_signal_handler_block_by_data(object, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_handler_unblock (SOBJ o_object, SOBJ o_handler_id)
{
  GtkObject* object;
  guint handler_id;

  object = sgtk_get_Object(o_object);
  handler_id = scm_number2long(o_handler_id);
  gtk_signal_handler_unblock(object, handler_id);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_signal_handler_unblock_by_func (SOBJ o_object, SOBJ o_func, SOBJ o_data)
{
  GtkObject* object;
  GtkSignalFunc func;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  gtk_signal_handler_unblock_by_func(object, func, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_handler_unblock_by_data (SOBJ o_object, SOBJ o_data)
{
  GtkObject* object;
  gpointer data;

  object = sgtk_get_Object(o_object);
  /* +++ get gpointer -> pointer failed */
  gtk_signal_handler_unblock_by_data(object, data);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_handlers_destroy (SOBJ o_object)
{
  GtkObject* object;

  object = sgtk_get_Object(o_object);
  gtk_signal_handlers_destroy(object);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_signal_set_funcs (SOBJ o_marshal_func, SOBJ o_destroy_func)
{
  GtkSignalMarshal marshal_func;
  GtkSignalDestroy destroy_func;

  /* +++ undefined GtkSignalMarshal */
  /* +++ undefined GtkSignalDestroy */
  gtk_signal_set_funcs(marshal_func, destroy_func);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_handler_pending (SOBJ o_object, SOBJ o_signal_id, SOBJ o_may_be_blocked)
{
  GtkObject* object;
  guint signal_id;
  gboolean may_be_blocked;
  guint __retval__;

  object = sgtk_get_Object(o_object);
  signal_id = scm_number2long(o_signal_id);
  may_be_blocked = (o_may_be_blocked != scm_false);
  __retval__ = gtk_signal_handler_pending(object, signal_id, may_be_blocked);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_signal_handler_pending_by_func (SOBJ o_object, SOBJ o_signal_id, SOBJ o_may_be_blocked, SOBJ o_func, SOBJ o_data)
{
  GtkObject* object;
  guint signal_id;
  gboolean may_be_blocked;
  GtkSignalFunc func;
  gpointer data;
  guint __retval__;

  object = sgtk_get_Object(o_object);
  signal_id = scm_number2long(o_signal_id);
  may_be_blocked = (o_may_be_blocked != scm_false);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_signal_handler_pending_by_func(object, signal_id, may_be_blocked, func, data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_handler_pending_by_id (SOBJ o_object, SOBJ o_handler_id, SOBJ o_may_be_blocked)
{
  GtkObject* object;
  guint handler_id;
  gboolean may_be_blocked;
  gint __retval__;

  object = sgtk_get_Object(o_object);
  handler_id = scm_number2long(o_handler_id);
  may_be_blocked = (o_may_be_blocked != scm_false);
  __retval__ = gtk_signal_handler_pending_by_id(object, handler_id, may_be_blocked);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_signal_add_emission_hook (SOBJ o_signal_id, SOBJ o_hook_func, SOBJ o_data)
{
  guint signal_id;
  GtkEmissionHook hook_func;
  gpointer data;
  guint __retval__;

  signal_id = scm_number2long(o_signal_id);
  /* +++ undefined GtkEmissionHook */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_signal_add_emission_hook(signal_id, hook_func, data);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_signal_add_emission_hook_full (SOBJ o_signal_id, SOBJ o_hook_func, SOBJ o_data, SOBJ o_destroy)
{
  guint signal_id;
  GtkEmissionHook hook_func;
  gpointer data;
  GDestroyNotify destroy;
  guint __retval__;

  signal_id = scm_number2long(o_signal_id);
  /* +++ undefined GtkEmissionHook */
  /* +++ get gpointer -> pointer failed */
  /* +++ undefined GDestroyNotify */
  __retval__ = gtk_signal_add_emission_hook_full(signal_id, hook_func, data, destroy);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_signal_remove_emission_hook (SOBJ o_signal_id, SOBJ o_hook_id)
{
  guint signal_id;
  guint hook_id;

  signal_id = scm_number2long(o_signal_id);
  hook_id = scm_number2long(o_hook_id);
  gtk_signal_remove_emission_hook(signal_id, hook_id);
  return(scm_undefined);
}

SOBJ sgtk_socket_get_type ()
{
  guint __retval__;

  __retval__ = gtk_socket_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_socket_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_socket_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_socket_steal (SOBJ o_socket, SOBJ o_id)
{
  GtkSocket* socket;
  guint32 id;

  socket = sgtk_get_Object(o_socket);
  id = scm_number2long(o_id);
  gtk_socket_steal(socket, id);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_spin_button_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_spin_button_update (SOBJ o_spin_button)
{
  GtkSpinButton* spin_button;

  spin_button = sgtk_get_Object(o_spin_button);
  gtk_spin_button_update(spin_button);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_configure (SOBJ o_spin_button, SOBJ o_adjustment, SOBJ o_climb_rate, SOBJ o_digits)
{
  GtkSpinButton* spin_button;
  GtkAdjustment* adjustment;
  gfloat climb_rate;
  guint digits;

  spin_button = sgtk_get_Object(o_spin_button);
  adjustment = sgtk_get_Object(o_adjustment);
  climb_rate = scm_number2double(o_climb_rate);
  digits = scm_number2long(o_digits);
  gtk_spin_button_configure(spin_button, adjustment, climb_rate, digits);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_new (SOBJ o_adjustment, SOBJ o_climb_rate, SOBJ o_digits)
{
  GtkAdjustment* adjustment;
  gfloat climb_rate;
  guint digits;
  GtkWidget* __retval__;

  adjustment = sgtk_get_Object(o_adjustment);
  climb_rate = scm_number2double(o_climb_rate);
  digits = scm_number2long(o_digits);
  __retval__ = gtk_spin_button_new(adjustment, climb_rate, digits);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_spin_button_set_adjustment (SOBJ o_spin_button, SOBJ o_adjustment)
{
  GtkSpinButton* spin_button;
  GtkAdjustment* adjustment;

  spin_button = sgtk_get_Object(o_spin_button);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_spin_button_set_adjustment(spin_button, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_get_adjustment (SOBJ o_spin_button)
{
  GtkSpinButton* spin_button;
  GtkAdjustment* __retval__;

  spin_button = sgtk_get_Object(o_spin_button);
  __retval__ = gtk_spin_button_get_adjustment(spin_button);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_spin_button_set_digits (SOBJ o_spin_button, SOBJ o_digits)
{
  GtkSpinButton* spin_button;
  guint digits;

  spin_button = sgtk_get_Object(o_spin_button);
  digits = scm_number2long(o_digits);
  gtk_spin_button_set_digits(spin_button, digits);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_get_value_as_float (SOBJ o_spin_button)
{
  GtkSpinButton* spin_button;
  gfloat __retval__;

  spin_button = sgtk_get_Object(o_spin_button);
  __retval__ = gtk_spin_button_get_value_as_float(spin_button);
  return(scm_mkfnum(__retval__));
}

SOBJ sgtk_spin_button_get_value_as_int (SOBJ o_spin_button)
{
  GtkSpinButton* spin_button;
  gint __retval__;

  spin_button = sgtk_get_Object(o_spin_button);
  __retval__ = gtk_spin_button_get_value_as_int(spin_button);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_spin_button_set_value (SOBJ o_spin_button, SOBJ o_value)
{
  GtkSpinButton* spin_button;
  gfloat value;

  spin_button = sgtk_get_Object(o_spin_button);
  value = scm_number2double(o_value);
  gtk_spin_button_set_value(spin_button, value);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_set_update_policy (SOBJ o_spin_button, SOBJ o_policy)
{
  GtkSpinButton* spin_button;
  GtkSpinButtonUpdatePolicy policy;

  spin_button = sgtk_get_Object(o_spin_button);
  policy = sgtk_enumget("GtkSpinButtonUpdatePolicy", o_policy);
  gtk_spin_button_set_update_policy(spin_button, policy);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_set_numeric (SOBJ o_spin_button, SOBJ o_numeric)
{
  GtkSpinButton* spin_button;
  gboolean numeric;

  spin_button = sgtk_get_Object(o_spin_button);
  numeric = (o_numeric != scm_false);
  gtk_spin_button_set_numeric(spin_button, numeric);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_set_wrap (SOBJ o_spin_button, SOBJ o_wrap)
{
  GtkSpinButton* spin_button;
  gboolean wrap;

  spin_button = sgtk_get_Object(o_spin_button);
  wrap = (o_wrap != scm_false);
  gtk_spin_button_set_wrap(spin_button, wrap);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_set_shadow_type (SOBJ o_spin_button, SOBJ o_shadow_type)
{
  GtkSpinButton* spin_button;
  GtkShadowType shadow_type;

  spin_button = sgtk_get_Object(o_spin_button);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  gtk_spin_button_set_shadow_type(spin_button, shadow_type);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_set_snap_to_ticks (SOBJ o_spin_button, SOBJ o_snap_to_ticks)
{
  GtkSpinButton* spin_button;
  gboolean snap_to_ticks;

  spin_button = sgtk_get_Object(o_spin_button);
  snap_to_ticks = (o_snap_to_ticks != scm_false);
  gtk_spin_button_set_snap_to_ticks(spin_button, snap_to_ticks);
  return(scm_undefined);
}

SOBJ sgtk_spin_button_spin (SOBJ o_spin_button, SOBJ o_direction, SOBJ o_increment)
{
  GtkSpinButton* spin_button;
  GtkSpinType direction;
  gfloat increment;

  spin_button = sgtk_get_Object(o_spin_button);
  direction = sgtk_enumget("GtkSpinType", o_direction);
  increment = scm_number2double(o_increment);
  gtk_spin_button_spin(spin_button, direction, increment);
  return(scm_undefined);
}

SOBJ sgtk_statusbar_get_type ()
{
  guint __retval__;

  __retval__ = gtk_statusbar_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_statusbar_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_statusbar_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_statusbar_get_context_id (SOBJ o_statusbar, SOBJ o_context_description)
{
  GtkStatusbar* statusbar;
  gchar* context_description;
  guint __retval__;

  statusbar = sgtk_get_Object(o_statusbar);
  context_description = scm_getstr(o_context_description);
  __retval__ = gtk_statusbar_get_context_id(statusbar, context_description);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_statusbar_push (SOBJ o_statusbar, SOBJ o_context_id, SOBJ o_text)
{
  GtkStatusbar* statusbar;
  guint context_id;
  gchar* text;
  guint __retval__;

  statusbar = sgtk_get_Object(o_statusbar);
  context_id = scm_number2long(o_context_id);
  text = scm_getstr(o_text);
  __retval__ = gtk_statusbar_push(statusbar, context_id, text);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_statusbar_pop (SOBJ o_statusbar, SOBJ o_context_id)
{
  GtkStatusbar* statusbar;
  guint context_id;

  statusbar = sgtk_get_Object(o_statusbar);
  context_id = scm_number2long(o_context_id);
  gtk_statusbar_pop(statusbar, context_id);
  return(scm_undefined);
}

SOBJ sgtk_statusbar_remove (SOBJ o_statusbar, SOBJ o_context_id, SOBJ o_message_id)
{
  GtkStatusbar* statusbar;
  guint context_id;
  guint message_id;

  statusbar = sgtk_get_Object(o_statusbar);
  context_id = scm_number2long(o_context_id);
  message_id = scm_number2long(o_message_id);
  gtk_statusbar_remove(statusbar, context_id, message_id);
  return(scm_undefined);
}

SOBJ sgtk_style_copy (SOBJ o_style)
{
  GtkStyle* style;
  GtkStyle* __retval__;

  style = sgtk_get_Style(o_style);
  __retval__ = gtk_style_copy(style);
  return(sgtk_Style_new(__retval__));
}

SOBJ sgtk_style_new ()
{
  GtkStyle* __retval__;

  __retval__ = gtk_style_new();
  return(sgtk_Style_new(__retval__));
}

SOBJ sgtk_style_attach (SOBJ o_style, SOBJ o_window)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStyle* __retval__;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  __retval__ = gtk_style_attach(style, window);
  return(sgtk_Style_new(__retval__));
}

SOBJ sgtk_style_detach (SOBJ o_style)
{
  GtkStyle* style;

  style = sgtk_get_Style(o_style);
  gtk_style_detach(style);
  return(scm_undefined);
}

SOBJ sgtk_style_ref (SOBJ o_style)
{
  GtkStyle* style;
  GtkStyle* __retval__;

  style = sgtk_get_Style(o_style);
  __retval__ = gtk_style_ref(style);
  return(sgtk_Style_new(__retval__));
}

SOBJ sgtk_style_unref (SOBJ o_style)
{
  GtkStyle* style;

  style = sgtk_get_Style(o_style);
  gtk_style_unref(style);
  return(scm_undefined);
}

SOBJ sgtk_draw_hline (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_x1, SOBJ o_x2, SOBJ o_y)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  gint x1;
  gint x2;
  gint y;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  x1 = scm_number2long(o_x1);
  x2 = scm_number2long(o_x2);
  y = scm_number2long(o_y);
  gtk_draw_hline(style, window, state_type, x1, x2, y);
  return(scm_undefined);
}

SOBJ sgtk_draw_vline (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_y1, SOBJ o_y2, SOBJ o_x)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  gint y1;
  gint y2;
  gint x;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  y1 = scm_number2long(o_y1);
  y2 = scm_number2long(o_y2);
  x = scm_number2long(o_x);
  gtk_draw_vline(style, window, state_type, y1, y2, x);
  return(scm_undefined);
}

SOBJ sgtk_draw_shadow (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_shadow(style, window, state_type, shadow_type, x, y, width, height);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_draw_polygon (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_points, SOBJ o_npoints, SOBJ o_fill)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkPoint* points;
  gint npoints;
  gboolean fill;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkPoint* */
  npoints = scm_number2long(o_npoints);
  fill = (o_fill != scm_false);
  gtk_draw_polygon(style, window, state_type, shadow_type, points, npoints, fill);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_draw_arrow (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_arrow_type, SOBJ o_fill, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GtkArrowType arrow_type;
  gboolean fill;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  arrow_type = sgtk_enumget("GtkArrowType", o_arrow_type);
  fill = (o_fill != scm_false);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_arrow(style, window, state_type, shadow_type, arrow_type, fill, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_diamond (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_diamond(style, window, state_type, shadow_type, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_oval (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_oval(style, window, state_type, shadow_type, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_string (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_x, SOBJ o_y, SOBJ o_string)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  gint x;
  gint y;
  gchar* string;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  string = scm_getstr(o_string);
  gtk_draw_string(style, window, state_type, x, y, string);
  return(scm_undefined);
}

SOBJ sgtk_draw_box (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_box(style, window, state_type, shadow_type, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_flat_box (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_flat_box(style, window, state_type, shadow_type, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_check (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_check(style, window, state_type, shadow_type, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_option (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_option(style, window, state_type, shadow_type, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_cross (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_cross(style, window, state_type, shadow_type, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_ramp (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_arrow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GtkArrowType arrow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  arrow_type = sgtk_enumget("GtkArrowType", o_arrow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_ramp(style, window, state_type, shadow_type, arrow_type, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_tab (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_tab(style, window, state_type, shadow_type, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_shadow_gap (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_gap_side, SOBJ o_gap_x, SOBJ o_gap_width)
{
  GtkStyle* style;
  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;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gap_side = sgtk_enumget("GtkPositionType", o_gap_side);
  gap_x = scm_number2long(o_gap_x);
  gap_width = scm_number2long(o_gap_width);
  gtk_draw_shadow_gap(style, window, state_type, shadow_type, x, y, width, height, gap_side, gap_x, gap_width);
  return(scm_undefined);
}

SOBJ sgtk_draw_box_gap (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_gap_side, SOBJ o_gap_x, SOBJ o_gap_width)
{
  GtkStyle* style;
  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;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gap_side = sgtk_enumget("GtkPositionType", o_gap_side);
  gap_x = scm_number2long(o_gap_x);
  gap_width = scm_number2long(o_gap_width);
  gtk_draw_box_gap(style, window, state_type, shadow_type, x, y, width, height, gap_side, gap_x, gap_width);
  return(scm_undefined);
}

SOBJ sgtk_draw_extension (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_gap_side)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;
  GtkPositionType gap_side;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gap_side = sgtk_enumget("GtkPositionType", o_gap_side);
  gtk_draw_extension(style, window, state_type, shadow_type, x, y, width, height, gap_side);
  return(scm_undefined);
}

SOBJ sgtk_draw_focus (SOBJ o_style, SOBJ o_window, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_draw_focus(style, window, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_draw_slider (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_orientation)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;
  GtkOrientation orientation;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  orientation = sgtk_enumget("GtkOrientation", o_orientation);
  gtk_draw_slider(style, window, state_type, shadow_type, x, y, width, height, orientation);
  return(scm_undefined);
}

SOBJ sgtk_draw_handle (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_orientation)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  gint x;
  gint y;
  gint width;
  gint height;
  GtkOrientation orientation;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  orientation = sgtk_enumget("GtkOrientation", o_orientation);
  gtk_draw_handle(style, window, state_type, shadow_type, x, y, width, height, orientation);
  return(scm_undefined);
}

SOBJ sgtk_style_set_background (SOBJ o_style, SOBJ o_window, SOBJ o_state_type)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  gtk_style_set_background(style, window, state_type);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_style_apply_default_background (SOBJ o_style, SOBJ o_window, SOBJ o_set_bg, SOBJ o_state_type, SOBJ o_area, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  gboolean set_bg;
  GtkStateType state_type;
  GdkRectangle* area;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  set_bg = (o_set_bg != scm_false);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  /* +++ undefined GdkRectangle* */
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_style_apply_default_background(style, window, set_bg, state_type, area, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_hline (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x1, SOBJ o_x2, SOBJ o_y)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x1;
  gint x2;
  gint y;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x1 = scm_number2long(o_x1);
  x2 = scm_number2long(o_x2);
  y = scm_number2long(o_y);
  gtk_paint_hline(style, window, state_type, area, widget, detail, x1, x2, y);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_vline (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_y1, SOBJ o_y2, SOBJ o_x)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint y1;
  gint y2;
  gint x;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  y1 = scm_number2long(o_y1);
  y2 = scm_number2long(o_y2);
  x = scm_number2long(o_x);
  gtk_paint_vline(style, window, state_type, area, widget, detail, y1, y2, x);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_shadow (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_shadow(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_polygon (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_points, SOBJ o_npoints, SOBJ o_fill)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  GdkPoint* points;
  gint npoints;
  gboolean fill;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  /* +++ undefined GdkPoint* */
  npoints = scm_number2long(o_npoints);
  fill = (o_fill != scm_false);
  gtk_paint_polygon(style, window, state_type, shadow_type, area, widget, detail, points, npoints, fill);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_arrow (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_arrow_type, SOBJ o_fill, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  GtkArrowType arrow_type;
  gboolean fill;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  arrow_type = sgtk_enumget("GtkArrowType", o_arrow_type);
  fill = (o_fill != scm_false);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_arrow(style, window, state_type, shadow_type, area, widget, detail, arrow_type, fill, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_diamond (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_diamond(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_oval (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_oval(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_string (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_string)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gchar* string;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  string = scm_getstr(o_string);
  gtk_paint_string(style, window, state_type, area, widget, detail, x, y, string);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_box (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_box(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_flat_box (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_flat_box(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_check (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_check(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_option (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_option(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_cross (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_cross(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_ramp (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_arrow_type, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  GtkArrowType arrow_type;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  arrow_type = sgtk_enumget("GtkArrowType", o_arrow_type);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_ramp(style, window, state_type, shadow_type, area, widget, detail, arrow_type, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_tab (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_tab(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_shadow_gap (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_gap_side, SOBJ o_gap_x, SOBJ o_gap_width)
{
  GtkStyle* style;
  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;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gap_side = sgtk_enumget("GtkPositionType", o_gap_side);
  gap_x = scm_number2long(o_gap_x);
  gap_width = scm_number2long(o_gap_width);
  gtk_paint_shadow_gap(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height, gap_side, gap_x, gap_width);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_box_gap (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_gap_side, SOBJ o_gap_x, SOBJ o_gap_width)
{
  GtkStyle* style;
  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;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gap_side = sgtk_enumget("GtkPositionType", o_gap_side);
  gap_x = scm_number2long(o_gap_x);
  gap_width = scm_number2long(o_gap_width);
  gtk_paint_box_gap(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height, gap_side, gap_x, gap_width);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_extension (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_gap_side)
{
  GtkStyle* style;
  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;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gap_side = sgtk_enumget("GtkPositionType", o_gap_side);
  gtk_paint_extension(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height, gap_side);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_focus (SOBJ o_style, SOBJ o_window, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkStyle* style;
  GdkWindow* window;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_paint_focus(style, window, area, widget, detail, x, y, width, height);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_slider (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_orientation)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;
  GtkOrientation orientation;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  orientation = sgtk_enumget("GtkOrientation", o_orientation);
  gtk_paint_slider(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height, orientation);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_paint_handle (SOBJ o_style, SOBJ o_window, SOBJ o_state_type, SOBJ o_shadow_type, SOBJ o_area, SOBJ o_widget, SOBJ o_detail, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height, SOBJ o_orientation)
{
  GtkStyle* style;
  GdkWindow* window;
  GtkStateType state_type;
  GtkShadowType shadow_type;
  GdkRectangle* area;
  GtkWidget* widget;
  gchar* detail;
  gint x;
  gint y;
  gint width;
  gint height;
  GtkOrientation orientation;

  style = sgtk_get_Style(o_style);
  window = sgdk_get_Window(o_window);
  state_type = sgtk_enumget("GtkStateType", o_state_type);
  shadow_type = sgtk_enumget("GtkShadowType", o_shadow_type);
  /* +++ undefined GdkRectangle* */
  widget = sgtk_get_Object(o_widget);
  detail = scm_getstr(o_detail);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  orientation = sgtk_enumget("GtkOrientation", o_orientation);
  gtk_paint_handle(style, window, state_type, shadow_type, area, widget, detail, x, y, width, height, orientation);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_table_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_table_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_table_new (SOBJ o_rows, SOBJ o_columns, SOBJ o_homogeneous)
{
  guint rows;
  guint columns;
  gboolean homogeneous;
  GtkWidget* __retval__;

  rows = scm_number2long(o_rows);
  columns = scm_number2long(o_columns);
  homogeneous = (o_homogeneous != scm_false);
  __retval__ = gtk_table_new(rows, columns, homogeneous);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_table_resize (SOBJ o_table, SOBJ o_n_rows, SOBJ o_n_cols)
{
  GtkTable* table;
  guint n_rows;
  guint n_cols;

  table = sgtk_get_Object(o_table);
  n_rows = scm_number2long(o_n_rows);
  n_cols = scm_number2long(o_n_cols);
  gtk_table_resize(table, n_rows, n_cols);
  return(scm_undefined);
}

SOBJ sgtk_table_attach (SOBJ o_table, SOBJ o_child, SOBJ o_left_attach, SOBJ o_right_attach, SOBJ o_top_attach, SOBJ o_bottom_attach, SOBJ o_xoptions, SOBJ o_yoptions, SOBJ o_xpadding, SOBJ o_ypadding)
{
  GtkTable* table;
  GtkWidget* child;
  guint left_attach;
  guint right_attach;
  guint top_attach;
  guint bottom_attach;
  GtkAttachOptions xoptions;
  GtkAttachOptions yoptions;
  guint xpadding;
  guint ypadding;

  table = sgtk_get_Object(o_table);
  child = sgtk_get_Object(o_child);
  left_attach = scm_number2long(o_left_attach);
  right_attach = scm_number2long(o_right_attach);
  top_attach = scm_number2long(o_top_attach);
  bottom_attach = scm_number2long(o_bottom_attach);
  xoptions = sgtk_flagsget("GtkAttachOptions", o_xoptions);
  yoptions = sgtk_flagsget("GtkAttachOptions", o_yoptions);
  xpadding = scm_number2long(o_xpadding);
  ypadding = scm_number2long(o_ypadding);
  gtk_table_attach(table, child, left_attach, right_attach, top_attach, bottom_attach, xoptions, yoptions, xpadding, ypadding);
  return(scm_undefined);
}

SOBJ sgtk_table_attach_defaults (SOBJ o_table, SOBJ o_widget, SOBJ o_left_attach, SOBJ o_right_attach, SOBJ o_top_attach, SOBJ o_bottom_attach)
{
  GtkTable* table;
  GtkWidget* widget;
  guint left_attach;
  guint right_attach;
  guint top_attach;
  guint bottom_attach;

  table = sgtk_get_Object(o_table);
  widget = sgtk_get_Object(o_widget);
  left_attach = scm_number2long(o_left_attach);
  right_attach = scm_number2long(o_right_attach);
  top_attach = scm_number2long(o_top_attach);
  bottom_attach = scm_number2long(o_bottom_attach);
  gtk_table_attach_defaults(table, widget, left_attach, right_attach, top_attach, bottom_attach);
  return(scm_undefined);
}

SOBJ sgtk_table_set_row_spacing (SOBJ o_table, SOBJ o_row, SOBJ o_spacing)
{
  GtkTable* table;
  guint row;
  guint spacing;

  table = sgtk_get_Object(o_table);
  row = scm_number2long(o_row);
  spacing = scm_number2long(o_spacing);
  gtk_table_set_row_spacing(table, row, spacing);
  return(scm_undefined);
}

SOBJ sgtk_table_set_col_spacing (SOBJ o_table, SOBJ o_column, SOBJ o_spacing)
{
  GtkTable* table;
  guint column;
  guint spacing;

  table = sgtk_get_Object(o_table);
  column = scm_number2long(o_column);
  spacing = scm_number2long(o_spacing);
  gtk_table_set_col_spacing(table, column, spacing);
  return(scm_undefined);
}

SOBJ sgtk_table_set_row_spacings (SOBJ o_table, SOBJ o_spacing)
{
  GtkTable* table;
  guint spacing;

  table = sgtk_get_Object(o_table);
  spacing = scm_number2long(o_spacing);
  gtk_table_set_row_spacings(table, spacing);
  return(scm_undefined);
}

SOBJ sgtk_table_set_col_spacings (SOBJ o_table, SOBJ o_spacing)
{
  GtkTable* table;
  guint spacing;

  table = sgtk_get_Object(o_table);
  spacing = scm_number2long(o_spacing);
  gtk_table_set_col_spacings(table, spacing);
  return(scm_undefined);
}

SOBJ sgtk_table_set_homogeneous (SOBJ o_table, SOBJ o_homogeneous)
{
  GtkTable* table;
  gboolean homogeneous;

  table = sgtk_get_Object(o_table);
  homogeneous = (o_homogeneous != scm_false);
  gtk_table_set_homogeneous(table, homogeneous);
  return(scm_undefined);
}

SOBJ sgtk_tearoff_menu_item_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_tearoff_menu_item_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_tearoff_menu_item_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_tearoff_menu_item_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_text_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_text_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_text_new (SOBJ o_hadj, SOBJ o_vadj)
{
  GtkAdjustment* hadj;
  GtkAdjustment* vadj;
  GtkWidget* __retval__;

  hadj = sgtk_get_Object(o_hadj);
  vadj = sgtk_get_Object(o_vadj);
  __retval__ = gtk_text_new(hadj, vadj);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_text_set_word_wrap (SOBJ o_text, SOBJ o_word_wrap)
{
  GtkText* text;
  gint word_wrap;

  text = sgtk_get_Object(o_text);
  word_wrap = scm_number2long(o_word_wrap);
  gtk_text_set_word_wrap(text, word_wrap);
  return(scm_undefined);
}

SOBJ sgtk_text_set_line_wrap (SOBJ o_text, SOBJ o_line_wrap)
{
  GtkText* text;
  gint line_wrap;

  text = sgtk_get_Object(o_text);
  line_wrap = scm_number2long(o_line_wrap);
  gtk_text_set_line_wrap(text, line_wrap);
  return(scm_undefined);
}

SOBJ sgtk_text_set_editable (SOBJ o_text, SOBJ o_is_editable)
{
  GtkText* text;
  gboolean is_editable;

  text = sgtk_get_Object(o_text);
  is_editable = (o_is_editable != scm_false);
  gtk_text_set_editable(text, is_editable);
  return(scm_undefined);
}

SOBJ sgtk_text_set_adjustments (SOBJ o_text, SOBJ o_hadj, SOBJ o_vadj)
{
  GtkText* text;
  GtkAdjustment* hadj;
  GtkAdjustment* vadj;

  text = sgtk_get_Object(o_text);
  hadj = sgtk_get_Object(o_hadj);
  vadj = sgtk_get_Object(o_vadj);
  gtk_text_set_adjustments(text, hadj, vadj);
  return(scm_undefined);
}

SOBJ sgtk_text_set_point (SOBJ o_text, SOBJ o_index)
{
  GtkText* text;
  guint index;

  text = sgtk_get_Object(o_text);
  index = scm_number2long(o_index);
  gtk_text_set_point(text, index);
  return(scm_undefined);
}

SOBJ sgtk_text_get_point (SOBJ o_text)
{
  GtkText* text;
  guint __retval__;

  text = sgtk_get_Object(o_text);
  __retval__ = gtk_text_get_point(text);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_text_get_length (SOBJ o_text)
{
  GtkText* text;
  guint __retval__;

  text = sgtk_get_Object(o_text);
  __retval__ = gtk_text_get_length(text);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_text_freeze (SOBJ o_text)
{
  GtkText* text;

  text = sgtk_get_Object(o_text);
  gtk_text_freeze(text);
  return(scm_undefined);
}

SOBJ sgtk_text_thaw (SOBJ o_text)
{
  GtkText* text;

  text = sgtk_get_Object(o_text);
  gtk_text_thaw(text);
  return(scm_undefined);
}

SOBJ sgtk_text_insert (SOBJ o_text, SOBJ o_font, SOBJ o_fore, SOBJ o_back, SOBJ o_chars, SOBJ o_nchars)
{
  GtkText* text;
  GdkFont* font;
  GdkColor* fore;
  GdkColor* back;
  char* chars;
  gint nchars;

  text = sgtk_get_Object(o_text);
  font = sgdk_get_Font(o_font);
  fore = sgdk_get_Color(o_fore);
  back = sgdk_get_Color(o_back);
  chars = scm_getstr(o_chars);
  nchars = scm_number2long(o_nchars);
  gtk_text_insert(text, font, fore, back, chars, nchars);
  return(scm_undefined);
}

SOBJ sgtk_text_backward_delete (SOBJ o_text, SOBJ o_nchars)
{
  GtkText* text;
  guint nchars;
  gint __retval__;

  text = sgtk_get_Object(o_text);
  nchars = scm_number2long(o_nchars);
  __retval__ = gtk_text_backward_delete(text, nchars);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_text_forward_delete (SOBJ o_text, SOBJ o_nchars)
{
  GtkText* text;
  guint nchars;
  gint __retval__;

  text = sgtk_get_Object(o_text);
  nchars = scm_number2long(o_nchars);
  __retval__ = gtk_text_forward_delete(text, nchars);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
  /* +++ return type GtkThemeEngine* not defined */
SOBJ sgtk_theme_engine_get (SOBJ o_name)
{
  gchar* name;
  GtkThemeEngine* __retval__;

  name = scm_getstr(o_name);
  __retval__ = gtk_theme_engine_get(name);
  /* +++ don't know how to generate GtkThemeEngine* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_theme_engine_ref (SOBJ o_engine)
{
  GtkThemeEngine* engine;

  /* +++ undefined GtkThemeEngine* */
  gtk_theme_engine_ref(engine);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_theme_engine_unref (SOBJ o_engine)
{
  GtkThemeEngine* engine;

  /* +++ undefined GtkThemeEngine* */
  gtk_theme_engine_unref(engine);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_tips_query_get_type ()
{
  guint __retval__;

  __retval__ = gtk_tips_query_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_tips_query_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_tips_query_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_tips_query_set_labels (SOBJ o_tips_query, SOBJ o_label_inactive, SOBJ o_label_no_tip)
{
  GtkTipsQuery* tips_query;
  gchar* label_inactive;
  gchar* label_no_tip;

  tips_query = sgtk_get_Object(o_tips_query);
  label_inactive = scm_getstr(o_label_inactive);
  label_no_tip = scm_getstr(o_label_no_tip);
  gtk_tips_query_set_labels(tips_query, label_inactive, label_no_tip);
  return(scm_undefined);
}

SOBJ sgtk_tips_query_set_caller (SOBJ o_tips_query, SOBJ o_caller)
{
  GtkTipsQuery* tips_query;
  GtkWidget* caller;

  tips_query = sgtk_get_Object(o_tips_query);
  caller = sgtk_get_Object(o_caller);
  gtk_tips_query_set_caller(tips_query, caller);
  return(scm_undefined);
}

SOBJ sgtk_tips_query_start_query (SOBJ o_tips_query)
{
  GtkTipsQuery* tips_query;

  tips_query = sgtk_get_Object(o_tips_query);
  gtk_tips_query_start_query(tips_query);
  return(scm_undefined);
}

SOBJ sgtk_tips_query_stop_query (SOBJ o_tips_query)
{
  GtkTipsQuery* tips_query;

  tips_query = sgtk_get_Object(o_tips_query);
  gtk_tips_query_stop_query(tips_query);
  return(scm_undefined);
}

SOBJ sgtk_toggle_button_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_toggle_button_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_toggle_button_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_toggle_button_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_toggle_button_new_with_label (SOBJ o_label)
{
  gchar* label;
  GtkWidget* __retval__;

  label = scm_getstr(o_label);
  __retval__ = gtk_toggle_button_new_with_label(label);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_toggle_button_set_mode (SOBJ o_toggle_button, SOBJ o_draw_indicator)
{
  GtkToggleButton* toggle_button;
  gboolean draw_indicator;

  toggle_button = sgtk_get_Object(o_toggle_button);
  draw_indicator = (o_draw_indicator != scm_false);
  gtk_toggle_button_set_mode(toggle_button, draw_indicator);
  return(scm_undefined);
}

SOBJ sgtk_toggle_button_set_active (SOBJ o_toggle_button, SOBJ o_is_active)
{
  GtkToggleButton* toggle_button;
  gboolean is_active;

  toggle_button = sgtk_get_Object(o_toggle_button);
  is_active = (o_is_active != scm_false);
  gtk_toggle_button_set_active(toggle_button, is_active);
  return(scm_undefined);
}

SOBJ sgtk_toggle_button_get_active (SOBJ o_toggle_button)
{
  GtkToggleButton* toggle_button;
  gboolean __retval__;

  toggle_button = sgtk_get_Object(o_toggle_button);
  __retval__ = gtk_toggle_button_get_active(toggle_button);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_toggle_button_toggled (SOBJ o_toggle_button)
{
  GtkToggleButton* toggle_button;

  toggle_button = sgtk_get_Object(o_toggle_button);
  gtk_toggle_button_toggled(toggle_button);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_get_type ()
{
  guint __retval__;

  __retval__ = gtk_toolbar_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_toolbar_new (SOBJ o_orientation, SOBJ o_style)
{
  GtkOrientation orientation;
  GtkToolbarStyle style;
  GtkWidget* __retval__;

  orientation = sgtk_enumget("GtkOrientation", o_orientation);
  style = sgtk_enumget("GtkToolbarStyle", o_style);
  __retval__ = gtk_toolbar_new(orientation, style);
  return(sgtk_object_new((void*)__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_toolbar_append_item (SOBJ o_toolbar, SOBJ o_text, SOBJ o_tooltip_text, SOBJ o_tooltip_private_text, SOBJ o_icon, SOBJ o_callback, SOBJ o_user_data)
{
  GtkToolbar* toolbar;
  char* text;
  char* tooltip_text;
  char* tooltip_private_text;
  GtkWidget* icon;
  GtkSignalFunc callback;
  gpointer user_data;
  GtkWidget* __retval__;

  toolbar = sgtk_get_Object(o_toolbar);
  text = scm_getstr(o_text);
  tooltip_text = scm_getstr(o_tooltip_text);
  tooltip_private_text = scm_getstr(o_tooltip_private_text);
  icon = sgtk_get_Object(o_icon);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_toolbar_append_item(toolbar, text, tooltip_text, tooltip_private_text, icon, callback, user_data);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_toolbar_prepend_item (SOBJ o_toolbar, SOBJ o_text, SOBJ o_tooltip_text, SOBJ o_tooltip_private_text, SOBJ o_icon, SOBJ o_callback, SOBJ o_user_data)
{
  GtkToolbar* toolbar;
  char* text;
  char* tooltip_text;
  char* tooltip_private_text;
  GtkWidget* icon;
  GtkSignalFunc callback;
  gpointer user_data;
  GtkWidget* __retval__;

  toolbar = sgtk_get_Object(o_toolbar);
  text = scm_getstr(o_text);
  tooltip_text = scm_getstr(o_tooltip_text);
  tooltip_private_text = scm_getstr(o_tooltip_private_text);
  icon = sgtk_get_Object(o_icon);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_toolbar_prepend_item(toolbar, text, tooltip_text, tooltip_private_text, icon, callback, user_data);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_toolbar_insert_item (SOBJ o_toolbar, SOBJ o_text, SOBJ o_tooltip_text, SOBJ o_tooltip_private_text, SOBJ o_icon, SOBJ o_callback, SOBJ o_user_data, SOBJ o_position)
{
  GtkToolbar* toolbar;
  char* text;
  char* tooltip_text;
  char* tooltip_private_text;
  GtkWidget* icon;
  GtkSignalFunc callback;
  gpointer user_data;
  gint position;
  GtkWidget* __retval__;

  toolbar = sgtk_get_Object(o_toolbar);
  text = scm_getstr(o_text);
  tooltip_text = scm_getstr(o_tooltip_text);
  tooltip_private_text = scm_getstr(o_tooltip_private_text);
  icon = sgtk_get_Object(o_icon);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  position = scm_number2long(o_position);
  __retval__ = gtk_toolbar_insert_item(toolbar, text, tooltip_text, tooltip_private_text, icon, callback, user_data, position);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_toolbar_append_space (SOBJ o_toolbar)
{
  GtkToolbar* toolbar;

  toolbar = sgtk_get_Object(o_toolbar);
  gtk_toolbar_append_space(toolbar);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_prepend_space (SOBJ o_toolbar)
{
  GtkToolbar* toolbar;

  toolbar = sgtk_get_Object(o_toolbar);
  gtk_toolbar_prepend_space(toolbar);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_insert_space (SOBJ o_toolbar, SOBJ o_position)
{
  GtkToolbar* toolbar;
  gint position;

  toolbar = sgtk_get_Object(o_toolbar);
  position = scm_number2long(o_position);
  gtk_toolbar_insert_space(toolbar, position);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_append_widget (SOBJ o_toolbar, SOBJ o_widget, SOBJ o_tooltip_text, SOBJ o_tooltip_private_text)
{
  GtkToolbar* toolbar;
  GtkWidget* widget;
  gchar* tooltip_text;
  gchar* tooltip_private_text;

  toolbar = sgtk_get_Object(o_toolbar);
  widget = sgtk_get_Object(o_widget);
  tooltip_text = scm_getstr(o_tooltip_text);
  tooltip_private_text = scm_getstr(o_tooltip_private_text);
  gtk_toolbar_append_widget(toolbar, widget, tooltip_text, tooltip_private_text);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_prepend_widget (SOBJ o_toolbar, SOBJ o_widget, SOBJ o_tooltip_text, SOBJ o_tooltip_private_text)
{
  GtkToolbar* toolbar;
  GtkWidget* widget;
  gchar* tooltip_text;
  gchar* tooltip_private_text;

  toolbar = sgtk_get_Object(o_toolbar);
  widget = sgtk_get_Object(o_widget);
  tooltip_text = scm_getstr(o_tooltip_text);
  tooltip_private_text = scm_getstr(o_tooltip_private_text);
  gtk_toolbar_prepend_widget(toolbar, widget, tooltip_text, tooltip_private_text);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_insert_widget (SOBJ o_toolbar, SOBJ o_widget, SOBJ o_tooltip_text, SOBJ o_tooltip_private_text, SOBJ o_position)
{
  GtkToolbar* toolbar;
  GtkWidget* widget;
  char* tooltip_text;
  char* tooltip_private_text;
  gint position;

  toolbar = sgtk_get_Object(o_toolbar);
  widget = sgtk_get_Object(o_widget);
  tooltip_text = scm_getstr(o_tooltip_text);
  tooltip_private_text = scm_getstr(o_tooltip_private_text);
  position = scm_number2long(o_position);
  gtk_toolbar_insert_widget(toolbar, widget, tooltip_text, tooltip_private_text, position);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_toolbar_append_element (SOBJ o_toolbar, SOBJ o_type, SOBJ o_widget, SOBJ o_text, SOBJ o_tooltip_text, SOBJ o_tooltip_private_text, SOBJ o_icon, SOBJ o_callback, SOBJ o_user_data)
{
  GtkToolbar* toolbar;
  GtkToolbarChildType type;
  GtkWidget* widget;
  char* text;
  char* tooltip_text;
  char* tooltip_private_text;
  GtkWidget* icon;
  GtkSignalFunc callback;
  gpointer user_data;
  GtkWidget* __retval__;

  toolbar = sgtk_get_Object(o_toolbar);
  type = sgtk_enumget("GtkToolbarChildType", o_type);
  widget = sgtk_get_Object(o_widget);
  text = scm_getstr(o_text);
  tooltip_text = scm_getstr(o_tooltip_text);
  tooltip_private_text = scm_getstr(o_tooltip_private_text);
  icon = sgtk_get_Object(o_icon);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_toolbar_append_element(toolbar, type, widget, text, tooltip_text, tooltip_private_text, icon, callback, user_data);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_toolbar_prepend_element (SOBJ o_toolbar, SOBJ o_type, SOBJ o_widget, SOBJ o_text, SOBJ o_tooltip_text, SOBJ o_tooltip_private_text, SOBJ o_icon, SOBJ o_callback, SOBJ o_user_data)
{
  GtkToolbar* toolbar;
  GtkToolbarChildType type;
  GtkWidget* widget;
  char* text;
  char* tooltip_text;
  char* tooltip_private_text;
  GtkWidget* icon;
  GtkSignalFunc callback;
  gpointer user_data;
  GtkWidget* __retval__;

  toolbar = sgtk_get_Object(o_toolbar);
  type = sgtk_enumget("GtkToolbarChildType", o_type);
  widget = sgtk_get_Object(o_widget);
  text = scm_getstr(o_text);
  tooltip_text = scm_getstr(o_tooltip_text);
  tooltip_private_text = scm_getstr(o_tooltip_private_text);
  icon = sgtk_get_Object(o_icon);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  __retval__ = gtk_toolbar_prepend_element(toolbar, type, widget, text, tooltip_text, tooltip_private_text, icon, callback, user_data);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_toolbar_insert_element (SOBJ o_toolbar, SOBJ o_type, SOBJ o_widget, SOBJ o_text, SOBJ o_tooltip_text, SOBJ o_tooltip_private_text, SOBJ o_icon, SOBJ o_callback, SOBJ o_user_data, SOBJ o_position)
{
  GtkToolbar* toolbar;
  GtkToolbarChildType type;
  GtkWidget* widget;
  char* text;
  char* tooltip_text;
  char* tooltip_private_text;
  GtkWidget* icon;
  GtkSignalFunc callback;
  gpointer user_data;
  gint position;
  GtkWidget* __retval__;

  toolbar = sgtk_get_Object(o_toolbar);
  type = sgtk_enumget("GtkToolbarChildType", o_type);
  widget = sgtk_get_Object(o_widget);
  text = scm_getstr(o_text);
  tooltip_text = scm_getstr(o_tooltip_text);
  tooltip_private_text = scm_getstr(o_tooltip_private_text);
  icon = sgtk_get_Object(o_icon);
  /* +++ undefined GtkSignalFunc */
  /* +++ get gpointer -> pointer failed */
  position = scm_number2long(o_position);
  __retval__ = gtk_toolbar_insert_element(toolbar, type, widget, text, tooltip_text, tooltip_private_text, icon, callback, user_data, position);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_toolbar_set_orientation (SOBJ o_toolbar, SOBJ o_orientation)
{
  GtkToolbar* toolbar;
  GtkOrientation orientation;

  toolbar = sgtk_get_Object(o_toolbar);
  orientation = sgtk_enumget("GtkOrientation", o_orientation);
  gtk_toolbar_set_orientation(toolbar, orientation);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_set_style (SOBJ o_toolbar, SOBJ o_style)
{
  GtkToolbar* toolbar;
  GtkToolbarStyle style;

  toolbar = sgtk_get_Object(o_toolbar);
  style = sgtk_enumget("GtkToolbarStyle", o_style);
  gtk_toolbar_set_style(toolbar, style);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_set_space_size (SOBJ o_toolbar, SOBJ o_space_size)
{
  GtkToolbar* toolbar;
  gint space_size;

  toolbar = sgtk_get_Object(o_toolbar);
  space_size = scm_number2long(o_space_size);
  gtk_toolbar_set_space_size(toolbar, space_size);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_set_space_style (SOBJ o_toolbar, SOBJ o_space_style)
{
  GtkToolbar* toolbar;
  GtkToolbarSpaceStyle space_style;

  toolbar = sgtk_get_Object(o_toolbar);
  space_style = sgtk_enumget("GtkToolbarSpaceStyle", o_space_style);
  gtk_toolbar_set_space_style(toolbar, space_style);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_set_tooltips (SOBJ o_toolbar, SOBJ o_enable)
{
  GtkToolbar* toolbar;
  gint enable;

  toolbar = sgtk_get_Object(o_toolbar);
  enable = scm_number2long(o_enable);
  gtk_toolbar_set_tooltips(toolbar, enable);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_set_button_relief (SOBJ o_toolbar, SOBJ o_relief)
{
  GtkToolbar* toolbar;
  GtkReliefStyle relief;

  toolbar = sgtk_get_Object(o_toolbar);
  relief = sgtk_enumget("GtkReliefStyle", o_relief);
  gtk_toolbar_set_button_relief(toolbar, relief);
  return(scm_undefined);
}

SOBJ sgtk_toolbar_get_button_relief (SOBJ o_toolbar)
{
  GtkToolbar* toolbar;
  GtkReliefStyle __retval__;

  toolbar = sgtk_get_Object(o_toolbar);
  __retval__ = gtk_toolbar_get_button_relief(toolbar);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_tooltips_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_tooltips_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_tooltips_new ()
{
  GtkTooltips* __retval__;

  __retval__ = gtk_tooltips_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_tooltips_force_window (SOBJ o_tooltips)
{
  GtkTooltips* tooltips;

  tooltips = sgtk_get_Object(o_tooltips);
  gtk_tooltips_force_window(tooltips);
  return(scm_undefined);
}

SOBJ sgtk_tooltips_enable (SOBJ o_tooltips)
{
  GtkTooltips* tooltips;

  tooltips = sgtk_get_Object(o_tooltips);
  gtk_tooltips_enable(tooltips);
  return(scm_undefined);
}

SOBJ sgtk_tooltips_disable (SOBJ o_tooltips)
{
  GtkTooltips* tooltips;

  tooltips = sgtk_get_Object(o_tooltips);
  gtk_tooltips_disable(tooltips);
  return(scm_undefined);
}

SOBJ sgtk_tooltips_set_delay (SOBJ o_tooltips, SOBJ o_delay)
{
  GtkTooltips* tooltips;
  guint delay;

  tooltips = sgtk_get_Object(o_tooltips);
  delay = scm_number2long(o_delay);
  gtk_tooltips_set_delay(tooltips, delay);
  return(scm_undefined);
}

#ifdef INCOMPLETE
  /* +++ return type GtkTooltipsData* not defined */
SOBJ sgtk_tooltips_data_get (SOBJ o_widget)
{
  GtkWidget* widget;
  GtkTooltipsData* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_tooltips_data_get(widget);
  /* +++ don't know how to generate GtkTooltipsData* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_tooltips_set_tip (SOBJ o_tooltips, SOBJ o_widget, SOBJ o_tip_text, SOBJ o_tip_private)
{
  GtkTooltips* tooltips;
  GtkWidget* widget;
  gchar* tip_text;
  gchar* tip_private;

  tooltips = sgtk_get_Object(o_tooltips);
  widget = sgtk_get_Object(o_widget);
  tip_text = scm_getstr(o_tip_text);
  tip_private = scm_getstr(o_tip_private);
  gtk_tooltips_set_tip(tooltips, widget, tip_text, tip_private);
  return(scm_undefined);
}

SOBJ sgtk_tooltips_set_colors (SOBJ o_tooltips, SOBJ o_background, SOBJ o_foreground)
{
  GtkTooltips* tooltips;
  GdkColor* background;
  GdkColor* foreground;

  tooltips = sgtk_get_Object(o_tooltips);
  background = sgdk_get_Color(o_background);
  foreground = sgdk_get_Color(o_foreground);
  gtk_tooltips_set_colors(tooltips, background, foreground);
  return(scm_undefined);
}

SOBJ sgtk_tree_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_tree_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_tree_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_tree_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_tree_append (SOBJ o_tree, SOBJ o_tree_item)
{
  GtkTree* tree;
  GtkWidget* tree_item;

  tree = sgtk_get_Object(o_tree);
  tree_item = sgtk_get_Object(o_tree_item);
  gtk_tree_append(tree, tree_item);
  return(scm_undefined);
}

SOBJ sgtk_tree_prepend (SOBJ o_tree, SOBJ o_tree_item)
{
  GtkTree* tree;
  GtkWidget* tree_item;

  tree = sgtk_get_Object(o_tree);
  tree_item = sgtk_get_Object(o_tree_item);
  gtk_tree_prepend(tree, tree_item);
  return(scm_undefined);
}

SOBJ sgtk_tree_insert (SOBJ o_tree, SOBJ o_tree_item, SOBJ o_position)
{
  GtkTree* tree;
  GtkWidget* tree_item;
  gint position;

  tree = sgtk_get_Object(o_tree);
  tree_item = sgtk_get_Object(o_tree_item);
  position = scm_number2long(o_position);
  gtk_tree_insert(tree, tree_item, position);
  return(scm_undefined);
}

SOBJ sgtk_tree_child_position (SOBJ o_tree, SOBJ o_child)
{
  GtkTree* tree;
  GtkWidget* child;
  gint __retval__;

  tree = sgtk_get_Object(o_tree);
  child = sgtk_get_Object(o_child);
  __retval__ = gtk_tree_child_position(tree, child);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_tree_clear_items (SOBJ o_tree, SOBJ o_start, SOBJ o_end)
{
  GtkTree* tree;
  gint start;
  gint end;

  tree = sgtk_get_Object(o_tree);
  start = scm_number2long(o_start);
  end = scm_number2long(o_end);
  gtk_tree_clear_items(tree, start, end);
  return(scm_undefined);
}

SOBJ sgtk_tree_remove_item (SOBJ o_container, SOBJ o_widget)
{
  GtkTree* container;
  GtkWidget* widget;

  container = sgtk_get_Object(o_container);
  widget = sgtk_get_Object(o_widget);
  gtk_tree_remove_item(container, widget);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_tree_remove_items (SOBJ o_tree, SOBJ o_items)
{
  GtkTree* tree;
  GList* items;

  tree = sgtk_get_Object(o_tree);
  /* +++ undefined GList* */
  gtk_tree_remove_items(tree, items);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_tree_select_child (SOBJ o_tree, SOBJ o_tree_item)
{
  GtkTree* tree;
  GtkWidget* tree_item;

  tree = sgtk_get_Object(o_tree);
  tree_item = sgtk_get_Object(o_tree_item);
  gtk_tree_select_child(tree, tree_item);
  return(scm_undefined);
}

SOBJ sgtk_tree_select_item (SOBJ o_tree, SOBJ o_item)
{
  GtkTree* tree;
  gint item;

  tree = sgtk_get_Object(o_tree);
  item = scm_number2long(o_item);
  gtk_tree_select_item(tree, item);
  return(scm_undefined);
}

SOBJ sgtk_tree_unselect_child (SOBJ o_tree, SOBJ o_tree_item)
{
  GtkTree* tree;
  GtkWidget* tree_item;

  tree = sgtk_get_Object(o_tree);
  tree_item = sgtk_get_Object(o_tree_item);
  gtk_tree_unselect_child(tree, tree_item);
  return(scm_undefined);
}

SOBJ sgtk_tree_unselect_item (SOBJ o_tree, SOBJ o_item)
{
  GtkTree* tree;
  gint item;

  tree = sgtk_get_Object(o_tree);
  item = scm_number2long(o_item);
  gtk_tree_unselect_item(tree, item);
  return(scm_undefined);
}

SOBJ sgtk_tree_set_selection_mode (SOBJ o_tree, SOBJ o_mode)
{
  GtkTree* tree;
  GtkSelectionMode mode;

  tree = sgtk_get_Object(o_tree);
  mode = sgtk_enumget("GtkSelectionMode", o_mode);
  gtk_tree_set_selection_mode(tree, mode);
  return(scm_undefined);
}

SOBJ sgtk_tree_set_view_mode (SOBJ o_tree, SOBJ o_mode)
{
  GtkTree* tree;
  GtkTreeViewMode mode;

  tree = sgtk_get_Object(o_tree);
  mode = sgtk_enumget("GtkTreeViewMode", o_mode);
  gtk_tree_set_view_mode(tree, mode);
  return(scm_undefined);
}

SOBJ sgtk_tree_set_view_lines (SOBJ o_tree, SOBJ o_flag)
{
  GtkTree* tree;
  guint flag;

  tree = sgtk_get_Object(o_tree);
  flag = scm_number2long(o_flag);
  gtk_tree_set_view_lines(tree, flag);
  return(scm_undefined);
}

SOBJ sgtk_tree_item_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_tree_item_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_tree_item_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_tree_item_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_tree_item_new_with_label (SOBJ o_label)
{
  gchar* label;
  GtkWidget* __retval__;

  label = scm_getstr(o_label);
  __retval__ = gtk_tree_item_new_with_label(label);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_tree_item_set_subtree (SOBJ o_tree_item, SOBJ o_subtree)
{
  GtkTreeItem* tree_item;
  GtkWidget* subtree;

  tree_item = sgtk_get_Object(o_tree_item);
  subtree = sgtk_get_Object(o_subtree);
  gtk_tree_item_set_subtree(tree_item, subtree);
  return(scm_undefined);
}

SOBJ sgtk_tree_item_select (SOBJ o_tree_item)
{
  GtkTreeItem* tree_item;

  tree_item = sgtk_get_Object(o_tree_item);
  gtk_tree_item_select(tree_item);
  return(scm_undefined);
}

SOBJ sgtk_tree_item_deselect (SOBJ o_tree_item)
{
  GtkTreeItem* tree_item;

  tree_item = sgtk_get_Object(o_tree_item);
  gtk_tree_item_deselect(tree_item);
  return(scm_undefined);
}

SOBJ sgtk_tree_item_expand (SOBJ o_tree_item)
{
  GtkTreeItem* tree_item;

  tree_item = sgtk_get_Object(o_tree_item);
  gtk_tree_item_expand(tree_item);
  return(scm_undefined);
}

SOBJ sgtk_tree_item_collapse (SOBJ o_tree_item)
{
  GtkTreeItem* tree_item;

  tree_item = sgtk_get_Object(o_tree_item);
  gtk_tree_item_collapse(tree_item);
  return(scm_undefined);
}

SOBJ sgtk_tree_item_remove_subtree (SOBJ o_item)
{
  GtkTreeItem* item;

  item = sgtk_get_Object(o_item);
  gtk_tree_item_remove_subtree(item);
  return(scm_undefined);
}

SOBJ sgtk_type_init ()
{

  gtk_type_init();
  return(scm_undefined);
}

SOBJ sgtk_type_set_chunk_alloc (SOBJ o_type, SOBJ o_n_chunks)
{
  GtkType type;
  guint n_chunks;

  type = scm_number2long(o_type);
  n_chunks = scm_number2long(o_n_chunks);
  gtk_type_set_chunk_alloc(type, n_chunks);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_type_unique (SOBJ o_parent_type, SOBJ o_type_info)
{
  GtkType parent_type;
  GtkTypeInfo* type_info;
  GtkType __retval__;

  parent_type = scm_number2long(o_parent_type);
  /* +++ undefined GtkTypeInfo* */
  __retval__ = gtk_type_unique(parent_type, type_info);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_type_name (SOBJ o_type)
{
  GtkType type;
  gchar* __retval__;

  type = scm_number2long(o_type);
  __retval__ = gtk_type_name(type);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_type_from_name (SOBJ o_name)
{
  gchar* name;
  GtkType __retval__;

  name = scm_getstr(o_name);
  __retval__ = gtk_type_from_name(name);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_type_parent (SOBJ o_type)
{
  GtkType type;
  GtkType __retval__;

  type = scm_number2long(o_type);
  __retval__ = gtk_type_parent(type);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_type_parent_class (SOBJ o_type)
{
  GtkType type;
  gpointer __retval__;

  type = scm_number2long(o_type);
  __retval__ = gtk_type_parent_class(type);
  return(scm_mkpointer(__retval__));
}

SOBJ sgtk_type_class (SOBJ o_type)
{
  GtkType type;
  gpointer __retval__;

  type = scm_number2long(o_type);
  __retval__ = gtk_type_class(type);
  return(scm_mkpointer(__retval__));
}

SOBJ sgtk_type_new (SOBJ o_type)
{
  GtkType type;
  gpointer __retval__;

  type = scm_number2long(o_type);
  __retval__ = gtk_type_new(type);
  return(scm_mkpointer(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_type_free (SOBJ o_type, SOBJ o_mem)
{
  GtkType type;
  gpointer mem;

  type = scm_number2long(o_type);
  /* +++ get gpointer -> pointer failed */
  gtk_type_free(type, mem);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GList* not defined */
SOBJ sgtk_type_children_types (SOBJ o_type)
{
  GtkType type;
  GList* __retval__;

  type = scm_number2long(o_type);
  __retval__ = gtk_type_children_types(type);
  /* +++ don't know how to generate GList* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_type_describe_heritage (SOBJ o_type)
{
  GtkType type;

  type = scm_number2long(o_type);
  gtk_type_describe_heritage(type);
  return(scm_undefined);
}

SOBJ sgtk_type_describe_tree (SOBJ o_type, SOBJ o_show_size)
{
  GtkType type;
  gboolean show_size;

  type = scm_number2long(o_type);
  show_size = (o_show_size != scm_false);
  gtk_type_describe_tree(type, show_size);
  return(scm_undefined);
}

SOBJ sgtk_type_is_a (SOBJ o_type, SOBJ o_is_a_type)
{
  GtkType type;
  GtkType is_a_type;
  gboolean __retval__;

  type = scm_number2long(o_type);
  is_a_type = scm_number2long(o_is_a_type);
  __retval__ = gtk_type_is_a(type, is_a_type);
  return(SCM_MKBOOL(__retval__));
}

#ifdef INCOMPLETE
  /* +++ return type GtkTypeObject* not defined */
SOBJ sgtk_type_check_object_cast (SOBJ o_type_object, SOBJ o_cast_type)
{
  GtkTypeObject* type_object;
  GtkType cast_type;
  GtkTypeObject* __retval__;

  /* +++ undefined GtkTypeObject* */
  cast_type = scm_number2long(o_cast_type);
  __retval__ = gtk_type_check_object_cast(type_object, cast_type);
  /* +++ don't know how to generate GtkTypeObject* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkTypeClass* not defined */
SOBJ sgtk_type_check_class_cast (SOBJ o_klass, SOBJ o_cast_type)
{
  GtkTypeClass* klass;
  GtkType cast_type;
  GtkTypeClass* __retval__;

  /* +++ undefined GtkTypeClass* */
  cast_type = scm_number2long(o_cast_type);
  __retval__ = gtk_type_check_class_cast(klass, cast_type);
  /* +++ don't know how to generate GtkTypeClass* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkEnumValue* not defined */
SOBJ sgtk_type_enum_get_values (SOBJ o_enum_type)
{
  GtkType enum_type;
  GtkEnumValue* __retval__;

  enum_type = scm_number2long(o_enum_type);
  __retval__ = gtk_type_enum_get_values(enum_type);
  /* +++ don't know how to generate GtkEnumValue* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkFlagValue* not defined */
SOBJ sgtk_type_flags_get_values (SOBJ o_flags_type)
{
  GtkType flags_type;
  GtkFlagValue* __retval__;

  flags_type = scm_number2long(o_flags_type);
  __retval__ = gtk_type_flags_get_values(flags_type);
  /* +++ don't know how to generate GtkFlagValue* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkEnumValue* not defined */
SOBJ sgtk_type_enum_find_value (SOBJ o_enum_type, SOBJ o_value_name)
{
  GtkType enum_type;
  gchar* value_name;
  GtkEnumValue* __retval__;

  enum_type = scm_number2long(o_enum_type);
  value_name = scm_getstr(o_value_name);
  __retval__ = gtk_type_enum_find_value(enum_type, value_name);
  /* +++ don't know how to generate GtkEnumValue* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkFlagValue* not defined */
SOBJ sgtk_type_flags_find_value (SOBJ o_flag_type, SOBJ o_value_name)
{
  GtkType flag_type;
  gchar* value_name;
  GtkFlagValue* __retval__;

  flag_type = scm_number2long(o_flag_type);
  value_name = scm_getstr(o_value_name);
  __retval__ = gtk_type_flags_find_value(flag_type, value_name);
  /* +++ don't know how to generate GtkFlagValue* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_type_set_varargs_type (SOBJ o_foreign_type, SOBJ o_varargs_type)
{
  GtkType foreign_type;
  GtkType varargs_type;

  foreign_type = scm_number2long(o_foreign_type);
  varargs_type = scm_number2long(o_varargs_type);
  gtk_type_set_varargs_type(foreign_type, varargs_type);
  return(scm_undefined);
}

SOBJ sgtk_type_get_varargs_type (SOBJ o_foreign_type)
{
  GtkType foreign_type;
  GtkType __retval__;

  foreign_type = scm_number2long(o_foreign_type);
  __retval__ = gtk_type_get_varargs_type(foreign_type);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_type_register_enum (SOBJ o_type_name, SOBJ o_values)
{
  gchar* type_name;
  GtkEnumValue* values;
  GtkType __retval__;

  type_name = scm_getstr(o_type_name);
  /* +++ undefined GtkEnumValue* */
  __retval__ = gtk_type_register_enum(type_name, values);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_type_register_flags (SOBJ o_type_name, SOBJ o_values)
{
  gchar* type_name;
  GtkFlagValue* values;
  GtkType __retval__;

  type_name = scm_getstr(o_type_name);
  /* +++ undefined GtkFlagValue* */
  __retval__ = gtk_type_register_flags(type_name, values);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
  /* +++ return type GtkTypeQuery* not defined */
SOBJ sgtk_type_query (SOBJ o_type)
{
  GtkType type;
  GtkTypeQuery* __retval__;

  type = scm_number2long(o_type);
  __retval__ = gtk_type_query(type);
  /* +++ don't know how to generate GtkTypeQuery* */
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_identifier_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_identifier_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vbutton_box_get_type ()
{
  guint __retval__;

  __retval__ = gtk_vbutton_box_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vbutton_box_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_vbutton_box_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_vbutton_box_set_spacing_default (SOBJ o_spacing)
{
  gint spacing;

  spacing = scm_number2long(o_spacing);
  gtk_vbutton_box_set_spacing_default(spacing);
  return(scm_undefined);
}

SOBJ sgtk_vbutton_box_set_layout_default (SOBJ o_layout)
{
  GtkButtonBoxStyle layout;

  layout = sgtk_enumget("GtkButtonBoxStyle", o_layout);
  gtk_vbutton_box_set_layout_default(layout);
  return(scm_undefined);
}

SOBJ sgtk_vbutton_box_get_spacing_default ()
{
  gint __retval__;

  __retval__ = gtk_vbutton_box_get_spacing_default();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vbutton_box_get_layout_default ()
{
  GtkButtonBoxStyle __retval__;

  __retval__ = gtk_vbutton_box_get_layout_default();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vbox_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_vbox_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vbox_new (SOBJ o_homogeneous, SOBJ o_spacing)
{
  gboolean homogeneous;
  gint spacing;
  GtkWidget* __retval__;

  homogeneous = (o_homogeneous != scm_false);
  spacing = scm_number2long(o_spacing);
  __retval__ = gtk_vbox_new(homogeneous, spacing);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_viewport_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_viewport_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_viewport_new (SOBJ o_hadjustment, SOBJ o_vadjustment)
{
  GtkAdjustment* hadjustment;
  GtkAdjustment* vadjustment;
  GtkWidget* __retval__;

  hadjustment = sgtk_get_Object(o_hadjustment);
  vadjustment = sgtk_get_Object(o_vadjustment);
  __retval__ = gtk_viewport_new(hadjustment, vadjustment);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_viewport_get_hadjustment (SOBJ o_viewport)
{
  GtkViewport* viewport;
  GtkAdjustment* __retval__;

  viewport = sgtk_get_Object(o_viewport);
  __retval__ = gtk_viewport_get_hadjustment(viewport);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_viewport_get_vadjustment (SOBJ o_viewport)
{
  GtkViewport* viewport;
  GtkAdjustment* __retval__;

  viewport = sgtk_get_Object(o_viewport);
  __retval__ = gtk_viewport_get_vadjustment(viewport);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_viewport_set_hadjustment (SOBJ o_viewport, SOBJ o_adjustment)
{
  GtkViewport* viewport;
  GtkAdjustment* adjustment;

  viewport = sgtk_get_Object(o_viewport);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_viewport_set_hadjustment(viewport, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_viewport_set_vadjustment (SOBJ o_viewport, SOBJ o_adjustment)
{
  GtkViewport* viewport;
  GtkAdjustment* adjustment;

  viewport = sgtk_get_Object(o_viewport);
  adjustment = sgtk_get_Object(o_adjustment);
  gtk_viewport_set_vadjustment(viewport, adjustment);
  return(scm_undefined);
}

SOBJ sgtk_viewport_set_shadow_type (SOBJ o_viewport, SOBJ o_type)
{
  GtkViewport* viewport;
  GtkShadowType type;

  viewport = sgtk_get_Object(o_viewport);
  type = sgtk_enumget("GtkShadowType", o_type);
  gtk_viewport_set_shadow_type(viewport, type);
  return(scm_undefined);
}

SOBJ sgtk_vpaned_get_type ()
{
  guint __retval__;

  __retval__ = gtk_vpaned_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vpaned_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_vpaned_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_vruler_get_type ()
{
  guint __retval__;

  __retval__ = gtk_vruler_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vruler_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_vruler_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_vscale_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_vscale_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vscale_new (SOBJ o_adjustment)
{
  GtkAdjustment* adjustment;
  GtkWidget* __retval__;

  adjustment = sgtk_get_Object(o_adjustment);
  __retval__ = gtk_vscale_new(adjustment);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_vscrollbar_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_vscrollbar_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vscrollbar_new (SOBJ o_adjustment)
{
  GtkAdjustment* adjustment;
  GtkWidget* __retval__;

  adjustment = sgtk_get_Object(o_adjustment);
  __retval__ = gtk_vscrollbar_new(adjustment);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_vseparator_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_vseparator_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_vseparator_new ()
{
  GtkWidget* __retval__;

  __retval__ = gtk_vseparator_new();
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_widget_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_widget_get_type();
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_widget_newv (SOBJ o_type, SOBJ o_nargs, SOBJ o_args)
{
  GtkType type;
  guint nargs;
  GtkArg* args;
  GtkWidget* __retval__;

  type = scm_number2long(o_type);
  nargs = scm_number2long(o_nargs);
  /* +++ undefined GtkArg* */
  __retval__ = gtk_widget_newv(type, nargs, args);
  return(sgtk_object_new((void*)__retval__));
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_widget_get (SOBJ o_widget, SOBJ o_arg)
{
  GtkWidget* widget;
  GtkArg* arg;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GtkArg* */
  gtk_widget_get(widget, arg);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_widget_getv (SOBJ o_widget, SOBJ o_nargs, SOBJ o_args)
{
  GtkWidget* widget;
  guint nargs;
  GtkArg* args;

  widget = sgtk_get_Object(o_widget);
  nargs = scm_number2long(o_nargs);
  /* +++ undefined GtkArg* */
  gtk_widget_getv(widget, nargs, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_widget_setv (SOBJ o_widget, SOBJ o_nargs, SOBJ o_args)
{
  GtkWidget* widget;
  guint nargs;
  GtkArg* args;

  widget = sgtk_get_Object(o_widget);
  nargs = scm_number2long(o_nargs);
  /* +++ undefined GtkArg* */
  gtk_widget_setv(widget, nargs, args);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_widget_unparent (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_unparent(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_destroy (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_destroy(widget);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_widget_destroyed (SOBJ o_widget, SOBJ o_widget_pointer)
{
  GtkWidget* widget;
  GtkWidget** widget_pointer;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GtkWidget** */
  gtk_widget_destroyed(widget, widget_pointer);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_widget_show (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_show(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_show_now (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_show_now(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_hide (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_hide(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_hide_on_delete (SOBJ o_widget)
{
  GtkWidget* widget;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_hide_on_delete(widget);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_widget_show_all (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_show_all(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_hide_all (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_hide_all(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_map (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_map(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_unmap (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_unmap(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_realize (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_realize(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_unrealize (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_unrealize(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_queue_draw_area (SOBJ o_widget, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkWidget* widget;
  gint x;
  gint y;
  gint width;
  gint height;

  widget = sgtk_get_Object(o_widget);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_widget_queue_draw_area(widget, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_widget_queue_draw (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_queue_draw(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_queue_clear_area (SOBJ o_widget, SOBJ o_x, SOBJ o_y, SOBJ o_width, SOBJ o_height)
{
  GtkWidget* widget;
  gint x;
  gint y;
  gint width;
  gint height;

  widget = sgtk_get_Object(o_widget);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_widget_queue_clear_area(widget, x, y, width, height);
  return(scm_undefined);
}

SOBJ sgtk_widget_queue_clear (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_queue_clear(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_queue_resize (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_queue_resize(widget);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_widget_draw (SOBJ o_widget, SOBJ o_area)
{
  GtkWidget* widget;
  GdkRectangle* area;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GdkRectangle* */
  gtk_widget_draw(widget, area);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_widget_draw_focus (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_draw_focus(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_draw_default (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_draw_default(widget);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_widget_size_request (SOBJ o_widget, SOBJ o_requisition)
{
  GtkWidget* widget;
  GtkRequisition* requisition;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GtkRequisition* */
  gtk_widget_size_request(widget, requisition);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_widget_get_child_requisition (SOBJ o_widget, SOBJ o_requisition)
{
  GtkWidget* widget;
  GtkRequisition* requisition;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GtkRequisition* */
  gtk_widget_get_child_requisition(widget, requisition);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_widget_size_allocate (SOBJ o_widget, SOBJ o_allocation)
{
  GtkWidget* widget;
  GtkAllocation* allocation;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GtkAllocation* */
  gtk_widget_size_allocate(widget, allocation);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_widget_lock_accelerators (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_lock_accelerators(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_unlock_accelerators (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_unlock_accelerators(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_accelerators_locked (SOBJ o_widget)
{
  GtkWidget* widget;
  gboolean __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_accelerators_locked(widget);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_widget_add_accelerator (SOBJ o_widget, SOBJ o_accel_signal, SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods, SOBJ o_accel_flags)
{
  GtkWidget* widget;
  gchar* accel_signal;
  GtkAccelGroup* accel_group;
  guint accel_key;
  guint accel_mods;
  GtkAccelFlags accel_flags;

  widget = sgtk_get_Object(o_widget);
  accel_signal = scm_getstr(o_accel_signal);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = scm_number2long(o_accel_mods);
  accel_flags = sgtk_flagsget("GtkAccelFlags", o_accel_flags);
  gtk_widget_add_accelerator(widget, accel_signal, accel_group, accel_key, accel_mods, accel_flags);
  return(scm_undefined);
}

SOBJ sgtk_widget_remove_accelerator (SOBJ o_widget, SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods)
{
  GtkWidget* widget;
  GtkAccelGroup* accel_group;
  guint accel_key;
  guint accel_mods;

  widget = sgtk_get_Object(o_widget);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = scm_number2long(o_accel_mods);
  gtk_widget_remove_accelerator(widget, accel_group, accel_key, accel_mods);
  return(scm_undefined);
}

SOBJ sgtk_widget_remove_accelerators (SOBJ o_widget, SOBJ o_accel_signal, SOBJ o_visible_only)
{
  GtkWidget* widget;
  gchar* accel_signal;
  gboolean visible_only;

  widget = sgtk_get_Object(o_widget);
  accel_signal = scm_getstr(o_accel_signal);
  visible_only = (o_visible_only != scm_false);
  gtk_widget_remove_accelerators(widget, accel_signal, visible_only);
  return(scm_undefined);
}

SOBJ sgtk_widget_accelerator_signal (SOBJ o_widget, SOBJ o_accel_group, SOBJ o_accel_key, SOBJ o_accel_mods)
{
  GtkWidget* widget;
  GtkAccelGroup* accel_group;
  guint accel_key;
  guint accel_mods;
  guint __retval__;

  widget = sgtk_get_Object(o_widget);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  accel_key = scm_number2long(o_accel_key);
  accel_mods = scm_number2long(o_accel_mods);
  __retval__ = gtk_widget_accelerator_signal(widget, accel_group, accel_key, accel_mods);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_widget_event (SOBJ o_widget, SOBJ o_event)
{
  GtkWidget* widget;
  GdkEvent* event;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  event = sgdk_get_Event(o_event);
  __retval__ = gtk_widget_event(widget, event);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_widget_activate (SOBJ o_widget)
{
  GtkWidget* widget;
  gboolean __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_activate(widget);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_widget_set_scroll_adjustments (SOBJ o_widget, SOBJ o_hadjustment, SOBJ o_vadjustment)
{
  GtkWidget* widget;
  GtkAdjustment* hadjustment;
  GtkAdjustment* vadjustment;
  gboolean __retval__;

  widget = sgtk_get_Object(o_widget);
  hadjustment = sgtk_get_Object(o_hadjustment);
  vadjustment = sgtk_get_Object(o_vadjustment);
  __retval__ = gtk_widget_set_scroll_adjustments(widget, hadjustment, vadjustment);
  return(SCM_MKBOOL(__retval__));
}

SOBJ sgtk_widget_reparent (SOBJ o_widget, SOBJ o_new_parent)
{
  GtkWidget* widget;
  GtkWidget* new_parent;

  widget = sgtk_get_Object(o_widget);
  new_parent = sgtk_get_Object(o_new_parent);
  gtk_widget_reparent(widget, new_parent);
  return(scm_undefined);
}

SOBJ sgtk_widget_popup (SOBJ o_widget, SOBJ o_x, SOBJ o_y)
{
  GtkWidget* widget;
  gint x;
  gint y;

  widget = sgtk_get_Object(o_widget);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  gtk_widget_popup(widget, x, y);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_widget_intersect (SOBJ o_widget, SOBJ o_area, SOBJ o_intersection)
{
  GtkWidget* widget;
  GdkRectangle* area;
  GdkRectangle* intersection;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GdkRectangle* */
  /* +++ undefined GdkRectangle* */
  __retval__ = gtk_widget_intersect(widget, area, intersection);
  return(SCM_MKINUM(__retval__));
}
#endif /* INCOMPLETE */

SOBJ sgtk_widget_grab_focus (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_grab_focus(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_grab_default (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_grab_default(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_name (SOBJ o_widget, SOBJ o_name)
{
  GtkWidget* widget;
  gchar* name;

  widget = sgtk_get_Object(o_widget);
  name = scm_getstr(o_name);
  gtk_widget_set_name(widget, name);
  return(scm_undefined);
}

SOBJ sgtk_widget_get_name (SOBJ o_widget)
{
  GtkWidget* widget;
  gchar* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_get_name(widget);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_widget_set_state (SOBJ o_widget, SOBJ o_state)
{
  GtkWidget* widget;
  GtkStateType state;

  widget = sgtk_get_Object(o_widget);
  state = sgtk_enumget("GtkStateType", o_state);
  gtk_widget_set_state(widget, state);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_app_paintable (SOBJ o_widget, SOBJ o_app_paintable)
{
  GtkWidget* widget;
  gboolean app_paintable;

  widget = sgtk_get_Object(o_widget);
  app_paintable = (o_app_paintable != scm_false);
  gtk_widget_set_app_paintable(widget, app_paintable);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_sensitive (SOBJ o_widget, SOBJ o_sensitive)
{
  GtkWidget* widget;
  gboolean sensitive;

  widget = sgtk_get_Object(o_widget);
  sensitive = (o_sensitive != scm_false);
  gtk_widget_set_sensitive(widget, sensitive);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_parent (SOBJ o_widget, SOBJ o_parent)
{
  GtkWidget* widget;
  GtkWidget* parent;

  widget = sgtk_get_Object(o_widget);
  parent = sgtk_get_Object(o_parent);
  gtk_widget_set_parent(widget, parent);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_style (SOBJ o_widget, SOBJ o_style)
{
  GtkWidget* widget;
  GtkStyle* style;

  widget = sgtk_get_Object(o_widget);
  style = sgtk_get_Style(o_style);
  gtk_widget_set_style(widget, style);
  return(scm_undefined);
}

SOBJ sgtk_widget_ensure_style (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_ensure_style(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_rc_style (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_set_rc_style(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_restore_default_style (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_restore_default_style(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_get_style (SOBJ o_widget)
{
  GtkWidget* widget;
  GtkStyle* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_get_style(widget);
  return(sgtk_Style_new(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_widget_modify_style (SOBJ o_widget, SOBJ o_style)
{
  GtkWidget* widget;
  GtkRcStyle* style;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined GtkRcStyle* */
  gtk_widget_modify_style(widget, style);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_widget_reset_rc_styles (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_reset_rc_styles(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_default_style (SOBJ o_style)
{
  GtkStyle* style;

  style = sgtk_get_Style(o_style);
  gtk_widget_set_default_style(style);
  return(scm_undefined);
}

SOBJ sgtk_widget_get_default_style ()
{
  GtkStyle* __retval__;

  __retval__ = gtk_widget_get_default_style();
  return(sgtk_Style_new(__retval__));
}

SOBJ sgtk_widget_push_style (SOBJ o_style)
{
  GtkStyle* style;

  style = sgtk_get_Style(o_style);
  gtk_widget_push_style(style);
  return(scm_undefined);
}

SOBJ sgtk_widget_pop_style ()
{

  gtk_widget_pop_style();
  return(scm_undefined);
}

SOBJ sgtk_widget_set_parent_window (SOBJ o_widget, SOBJ o_parent_window)
{
  GtkWidget* widget;
  GdkWindow* parent_window;

  widget = sgtk_get_Object(o_widget);
  parent_window = sgdk_get_Window(o_parent_window);
  gtk_widget_set_parent_window(widget, parent_window);
  return(scm_undefined);
}

SOBJ sgtk_widget_get_parent_window (SOBJ o_widget)
{
  GtkWidget* widget;
  GdkWindow* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_get_parent_window(widget);
  return(sgdk_Window_new(__retval__));
}

SOBJ sgtk_widget_set_uposition (SOBJ o_widget, SOBJ o_x, SOBJ o_y)
{
  GtkWidget* widget;
  gint x;
  gint y;

  widget = sgtk_get_Object(o_widget);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  gtk_widget_set_uposition(widget, x, y);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_usize (SOBJ o_widget, SOBJ o_width, SOBJ o_height)
{
  GtkWidget* widget;
  gint width;
  gint height;

  widget = sgtk_get_Object(o_widget);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_widget_set_usize(widget, width, height);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_events (SOBJ o_widget, SOBJ o_events)
{
  GtkWidget* widget;
  gint events;

  widget = sgtk_get_Object(o_widget);
  events = scm_number2long(o_events);
  gtk_widget_set_events(widget, events);
  return(scm_undefined);
}

SOBJ sgtk_widget_add_events (SOBJ o_widget, SOBJ o_events)
{
  GtkWidget* widget;
  gint events;

  widget = sgtk_get_Object(o_widget);
  events = scm_number2long(o_events);
  gtk_widget_add_events(widget, events);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_extension_events (SOBJ o_widget, SOBJ o_mode)
{
  GtkWidget* widget;
  GdkExtensionMode mode;

  widget = sgtk_get_Object(o_widget);
  mode = sgtk_enumget("GdkExtensionMode", o_mode);
  gtk_widget_set_extension_events(widget, mode);
  return(scm_undefined);
}

SOBJ sgtk_widget_get_toplevel (SOBJ o_widget)
{
  GtkWidget* widget;
  GtkWidget* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_get_toplevel(widget);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_widget_get_ancestor (SOBJ o_widget, SOBJ o_widget_type)
{
  GtkWidget* widget;
  GtkType widget_type;
  GtkWidget* __retval__;

  widget = sgtk_get_Object(o_widget);
  widget_type = scm_number2long(o_widget_type);
  __retval__ = gtk_widget_get_ancestor(widget, widget_type);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_widget_get_colormap (SOBJ o_widget)
{
  GtkWidget* widget;
  GdkColormap* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_get_colormap(widget);
  return(sgdk_Colormap_new(__retval__));
}

SOBJ sgtk_widget_get_visual (SOBJ o_widget)
{
  GtkWidget* widget;
  GdkVisual* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_get_visual(widget);
  return(sgdk_Visual_new(__retval__));
}

SOBJ sgtk_widget_set_colormap (SOBJ o_widget, SOBJ o_colormap)
{
  GtkWidget* widget;
  GdkColormap* colormap;

  widget = sgtk_get_Object(o_widget);
  colormap = sgdk_get_Colormap(o_colormap);
  gtk_widget_set_colormap(widget, colormap);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_visual (SOBJ o_widget, SOBJ o_visual)
{
  GtkWidget* widget;
  GdkVisual* visual;

  widget = sgtk_get_Object(o_widget);
  visual = sgdk_get_Visual(o_visual);
  gtk_widget_set_visual(widget, visual);
  return(scm_undefined);
}

SOBJ sgtk_widget_get_events (SOBJ o_widget)
{
  GtkWidget* widget;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_get_events(widget);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_widget_get_extension_events (SOBJ o_widget)
{
  GtkWidget* widget;
  GdkExtensionMode __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_get_extension_events(widget);
  return(SCM_MKINUM(__retval__));
}

#ifdef INCOMPLETE
SOBJ sgtk_widget_get_pointer (SOBJ o_widget, SOBJ o_x, SOBJ o_y)
{
  GtkWidget* widget;
  gint* x;
  gint* y;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined gint* */
  /* +++ undefined gint* */
  gtk_widget_get_pointer(widget, x, y);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_widget_is_ancestor (SOBJ o_widget, SOBJ o_ancestor)
{
  GtkWidget* widget;
  GtkWidget* ancestor;
  gint __retval__;

  widget = sgtk_get_Object(o_widget);
  ancestor = sgtk_get_Object(o_ancestor);
  __retval__ = gtk_widget_is_ancestor(widget, ancestor);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_widget_set_composite_name (SOBJ o_widget, SOBJ o_name)
{
  GtkWidget* widget;
  gchar* name;

  widget = sgtk_get_Object(o_widget);
  name = scm_getstr(o_name);
  gtk_widget_set_composite_name(widget, name);
  return(scm_undefined);
}

SOBJ sgtk_widget_get_composite_name (SOBJ o_widget)
{
  GtkWidget* widget;
  gchar* __retval__;

  widget = sgtk_get_Object(o_widget);
  __retval__ = gtk_widget_get_composite_name(widget);
  return(scm_mkstring(__retval__));
}

SOBJ sgtk_widget_push_composite_child ()
{

  gtk_widget_push_composite_child();
  return(scm_undefined);
}

SOBJ sgtk_widget_pop_composite_child ()
{

  gtk_widget_pop_composite_child();
  return(scm_undefined);
}

SOBJ sgtk_widget_push_colormap (SOBJ o_cmap)
{
  GdkColormap* cmap;

  cmap = sgdk_get_Colormap(o_cmap);
  gtk_widget_push_colormap(cmap);
  return(scm_undefined);
}

SOBJ sgtk_widget_push_visual (SOBJ o_visual)
{
  GdkVisual* visual;

  visual = sgdk_get_Visual(o_visual);
  gtk_widget_push_visual(visual);
  return(scm_undefined);
}

SOBJ sgtk_widget_pop_colormap ()
{

  gtk_widget_pop_colormap();
  return(scm_undefined);
}

SOBJ sgtk_widget_pop_visual ()
{

  gtk_widget_pop_visual();
  return(scm_undefined);
}

SOBJ sgtk_widget_set_default_colormap (SOBJ o_colormap)
{
  GdkColormap* colormap;

  colormap = sgdk_get_Colormap(o_colormap);
  gtk_widget_set_default_colormap(colormap);
  return(scm_undefined);
}

SOBJ sgtk_widget_set_default_visual (SOBJ o_visual)
{
  GdkVisual* visual;

  visual = sgdk_get_Visual(o_visual);
  gtk_widget_set_default_visual(visual);
  return(scm_undefined);
}

SOBJ sgtk_widget_get_default_colormap ()
{
  GdkColormap* __retval__;

  __retval__ = gtk_widget_get_default_colormap();
  return(sgdk_Colormap_new(__retval__));
}

SOBJ sgtk_widget_get_default_visual ()
{
  GdkVisual* __retval__;

  __retval__ = gtk_widget_get_default_visual();
  return(sgdk_Visual_new(__retval__));
}

SOBJ sgtk_widget_shape_combine_mask (SOBJ o_widget, SOBJ o_shape_mask, SOBJ o_offset_x, SOBJ o_offset_y)
{
  GtkWidget* widget;
  GdkBitmap* shape_mask;
  gint offset_x;
  gint offset_y;

  widget = sgtk_get_Object(o_widget);
  shape_mask = sgdk_get_Window(o_shape_mask);
  offset_x = scm_number2long(o_offset_x);
  offset_y = scm_number2long(o_offset_y);
  gtk_widget_shape_combine_mask(widget, shape_mask, offset_x, offset_y);
  return(scm_undefined);
}

SOBJ sgtk_widget_reset_shapes (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_reset_shapes(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_ref (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_ref(widget);
  return(scm_undefined);
}

SOBJ sgtk_widget_unref (SOBJ o_widget)
{
  GtkWidget* widget;

  widget = sgtk_get_Object(o_widget);
  gtk_widget_unref(widget);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_widget_path (SOBJ o_widget, SOBJ o_path_length_p, SOBJ o_path_p, SOBJ o_path_reversed_p)
{
  GtkWidget* widget;
  guint* path_length_p;
  gchar** path_p;
  gchar** path_reversed_p;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined guint* */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  gtk_widget_path(widget, path_length_p, path_p, path_reversed_p);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

#ifdef INCOMPLETE
SOBJ sgtk_widget_class_path (SOBJ o_widget, SOBJ o_path_length_p, SOBJ o_path_p, SOBJ o_path_reversed_p)
{
  GtkWidget* widget;
  guint* path_length_p;
  gchar** path_p;
  gchar** path_reversed_p;

  widget = sgtk_get_Object(o_widget);
  /* +++ undefined guint* */
  /* +++ undefined gchar** */
  /* +++ undefined gchar** */
  gtk_widget_class_path(widget, path_length_p, path_p, path_reversed_p);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_window_get_type ()
{
  GtkType __retval__;

  __retval__ = gtk_window_get_type();
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_window_new (SOBJ o_type)
{
  GtkWindowType type;
  GtkWidget* __retval__;

  type = sgtk_enumget("GtkWindowType", o_type);
  __retval__ = gtk_window_new(type);
  return(sgtk_object_new((void*)__retval__));
}

SOBJ sgtk_window_set_title (SOBJ o_window, SOBJ o_title)
{
  GtkWindow* window;
  gchar* title;

  window = sgtk_get_Object(o_window);
  title = scm_getstr(o_title);
  gtk_window_set_title(window, title);
  return(scm_undefined);
}

SOBJ sgtk_window_set_wmclass (SOBJ o_window, SOBJ o_wmclass_name, SOBJ o_wmclass_class)
{
  GtkWindow* window;
  gchar* wmclass_name;
  gchar* wmclass_class;

  window = sgtk_get_Object(o_window);
  wmclass_name = scm_getstr(o_wmclass_name);
  wmclass_class = scm_getstr(o_wmclass_class);
  gtk_window_set_wmclass(window, wmclass_name, wmclass_class);
  return(scm_undefined);
}

SOBJ sgtk_window_set_focus (SOBJ o_window, SOBJ o_focus)
{
  GtkWindow* window;
  GtkWidget* focus;

  window = sgtk_get_Object(o_window);
  focus = sgtk_get_Object(o_focus);
  gtk_window_set_focus(window, focus);
  return(scm_undefined);
}

SOBJ sgtk_window_set_default (SOBJ o_window, SOBJ o_default_widget)
{
  GtkWindow* window;
  GtkWidget* default_widget;

  window = sgtk_get_Object(o_window);
  default_widget = sgtk_get_Object(o_default_widget);
  gtk_window_set_default(window, default_widget);
  return(scm_undefined);
}

SOBJ sgtk_window_set_policy (SOBJ o_window, SOBJ o_allow_shrink, SOBJ o_allow_grow, SOBJ o_auto_shrink)
{
  GtkWindow* window;
  gint allow_shrink;
  gint allow_grow;
  gint auto_shrink;

  window = sgtk_get_Object(o_window);
  allow_shrink = scm_number2long(o_allow_shrink);
  allow_grow = scm_number2long(o_allow_grow);
  auto_shrink = scm_number2long(o_auto_shrink);
  gtk_window_set_policy(window, allow_shrink, allow_grow, auto_shrink);
  return(scm_undefined);
}

SOBJ sgtk_window_add_accel_group (SOBJ o_window, SOBJ o_accel_group)
{
  GtkWindow* window;
  GtkAccelGroup* accel_group;

  window = sgtk_get_Object(o_window);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  gtk_window_add_accel_group(window, accel_group);
  return(scm_undefined);
}

SOBJ sgtk_window_remove_accel_group (SOBJ o_window, SOBJ o_accel_group)
{
  GtkWindow* window;
  GtkAccelGroup* accel_group;

  window = sgtk_get_Object(o_window);
  accel_group = sgtk_get_AccelGroup(o_accel_group);
  gtk_window_remove_accel_group(window, accel_group);
  return(scm_undefined);
}

SOBJ sgtk_window_set_position (SOBJ o_window, SOBJ o_position)
{
  GtkWindow* window;
  GtkWindowPosition position;

  window = sgtk_get_Object(o_window);
  position = sgtk_enumget("GtkWindowPosition", o_position);
  gtk_window_set_position(window, position);
  return(scm_undefined);
}

SOBJ sgtk_window_activate_focus (SOBJ o_window)
{
  GtkWindow* window;
  gint __retval__;

  window = sgtk_get_Object(o_window);
  __retval__ = gtk_window_activate_focus(window);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_window_activate_default (SOBJ o_window)
{
  GtkWindow* window;
  gint __retval__;

  window = sgtk_get_Object(o_window);
  __retval__ = gtk_window_activate_default(window);
  return(SCM_MKINUM(__retval__));
}

SOBJ sgtk_window_set_modal (SOBJ o_window, SOBJ o_modal)
{
  GtkWindow* window;
  gboolean modal;

  window = sgtk_get_Object(o_window);
  modal = (o_modal != scm_false);
  gtk_window_set_modal(window, modal);
  return(scm_undefined);
}

SOBJ sgtk_window_add_embedded_xid (SOBJ o_window, SOBJ o_xid)
{
  GtkWindow* window;
  guint xid;

  window = sgtk_get_Object(o_window);
  xid = scm_number2long(o_xid);
  gtk_window_add_embedded_xid(window, xid);
  return(scm_undefined);
}

SOBJ sgtk_window_remove_embedded_xid (SOBJ o_window, SOBJ o_xid)
{
  GtkWindow* window;
  guint xid;

  window = sgtk_get_Object(o_window);
  xid = scm_number2long(o_xid);
  gtk_window_remove_embedded_xid(window, xid);
  return(scm_undefined);
}

SOBJ sgtk_window_reposition (SOBJ o_window, SOBJ o_x, SOBJ o_y)
{
  GtkWindow* window;
  gint x;
  gint y;

  window = sgtk_get_Object(o_window);
  x = scm_number2long(o_x);
  y = scm_number2long(o_y);
  gtk_window_reposition(window, x, y);
  return(scm_undefined);
}

SOBJ sgtk_window_set_transient_for (SOBJ o_window, SOBJ o_parent)
{
  GtkWindow* window;
  GtkWindow* parent;

  window = sgtk_get_Object(o_window);
  parent = sgtk_get_Object(o_parent);
  gtk_window_set_transient_for(window, parent);
  return(scm_undefined);
}

#ifdef INCOMPLETE
SOBJ sgtk_window_set_geometry_hints (SOBJ o_window, SOBJ o_geometry_widget, SOBJ o_geometry, SOBJ o_geom_mask)
{
  GtkWindow* window;
  GtkWidget* geometry_widget;
  GdkGeometry* geometry;
  GdkWindowHints geom_mask;

  window = sgtk_get_Object(o_window);
  geometry_widget = sgtk_get_Object(o_geometry_widget);
  /* +++ undefined GdkGeometry* */
  geom_mask = sgtk_flagsget("GdkWindowHints", o_geom_mask);
  gtk_window_set_geometry_hints(window, geometry_widget, geometry, geom_mask);
  return(scm_undefined);
}
#endif /* INCOMPLETE */

SOBJ sgtk_window_set_default_size (SOBJ o_window, SOBJ o_width, SOBJ o_height)
{
  GtkWindow* window;
  gint width;
  gint height;

  window = sgtk_get_Object(o_window);
  width = scm_number2long(o_width);
  height = scm_number2long(o_height);
  gtk_window_set_default_size(window, width, height);
  return(scm_undefined);
}



void scm_init_gtkdefs()
{
  scm_add_cprim("gtk-accel-group-new", sgtk_accel_group_new, 0);
  scm_add_cprim("gtk-accel-group-get-default", sgtk_accel_group_get_default, 0);
  scm_add_cprim("gtk-accel-group-ref", sgtk_accel_group_ref, 1);
  scm_add_cprim("gtk-accel-group-unref", sgtk_accel_group_unref, 1);
  scm_add_cprim("gtk-accel-group-attach", sgtk_accel_group_attach, 2);
  scm_add_cprim("gtk-accel-group-detach", sgtk_accel_group_detach, 2);
  scm_add_cprim("gtk-accel-group-lock", sgtk_accel_group_lock, 1);
  scm_add_cprim("gtk-accel-group-unlock", sgtk_accel_group_unlock, 1);
  scm_add_cprim("gtk-accel-group-activate", sgtk_accel_group_activate, 3);
  scm_add_cprim("gtk-accel-groups-activate", sgtk_accel_groups_activate, 3);
  scm_add_cprim("gtk-accel-group-lock-entry", sgtk_accel_group_lock_entry, 3);
  scm_add_cprim("gtk-accel-group-unlock-entry", sgtk_accel_group_unlock_entry, 3);
  scm_add_cprim("gtk-accel-group-add", sgtk_accel_group_add, 6);
  scm_add_cprim("gtk-accel-group-handle-add", sgtk_accel_group_handle_add, 6);
  scm_add_cprim("gtk-accel-group-remove", sgtk_accel_group_remove, 4);
  scm_add_cprim("gtk-accel-group-handle-remove", sgtk_accel_group_handle_remove, 4);
  scm_add_cprim("gtk-accel-group-create-add", sgtk_accel_group_create_add, 3);
  scm_add_cprim("gtk-accel-group-create-remove", sgtk_accel_group_create_remove, 3);
  scm_add_cprim("gtk-accelerator-valid", sgtk_accelerator_valid, 2);
  scm_add_cprim("gtk-accelerator-name", sgtk_accelerator_name, 2);
  scm_add_cprim("gtk-accelerator-set-default-mod-mask", sgtk_accelerator_set_default_mod_mask, 1);
  scm_add_cprim("gtk-accelerator-get-default-mod-mask", sgtk_accelerator_get_default_mod_mask, 0);
  scm_add_cprim("gtk-accel-label-get-type", sgtk_accel_label_get_type, 0);
  scm_add_cprim("gtk-accel-label-new", sgtk_accel_label_new, 1);
  scm_add_cprim("gtk-accel-label-get-accel-width", sgtk_accel_label_get_accel_width, 1);
  scm_add_cprim("gtk-accel-label-set-accel-widget", sgtk_accel_label_set_accel_widget, 2);
  scm_add_cprim("gtk-accel-label-refetch", sgtk_accel_label_refetch, 1);
  scm_add_cprim("gtk-adjustment-get-type", sgtk_adjustment_get_type, 0);
  scm_add_cprim("gtk-adjustment-new", sgtk_adjustment_new, 6);
  scm_add_cprim("gtk-adjustment-set-value", sgtk_adjustment_set_value, 2);
  scm_add_cprim("gtk-adjustment-changed", sgtk_adjustment_changed, 1);
  scm_add_cprim("gtk-adjustment-value-changed", sgtk_adjustment_value_changed, 1);
  scm_add_cprim("gtk-adjustment-clamp-page", sgtk_adjustment_clamp_page, 3);
  scm_add_cprim("gtk-alignment-get-type", sgtk_alignment_get_type, 0);
  scm_add_cprim("gtk-alignment-new", sgtk_alignment_new, 4);
  scm_add_cprim("gtk-alignment-set", sgtk_alignment_set, 5);
  scm_add_cprim("gtk-arg-name-strip-type", sgtk_arg_name_strip_type, 1);
  scm_add_cprim("gtk-arrow-get-type", sgtk_arrow_get_type, 0);
  scm_add_cprim("gtk-arrow-new", sgtk_arrow_new, 2);
  scm_add_cprim("gtk-arrow-set", sgtk_arrow_set, 3);
  scm_add_cprim("gtk-aspect-frame-get-type", sgtk_aspect_frame_get_type, 0);
  scm_add_cprim("gtk-aspect-frame-new", sgtk_aspect_frame_new, 5);
  scm_add_cprim("gtk-aspect-frame-set", sgtk_aspect_frame_set, 5);
  scm_add_cprim("gtk-button-box-get-type", sgtk_button_box_get_type, 0);
  scm_add_cprim("gtk-button-box-set-child-size-default", sgtk_button_box_set_child_size_default, 2);
  scm_add_cprim("gtk-button-box-set-child-ipadding-default", sgtk_button_box_set_child_ipadding_default, 2);
  scm_add_cprim("gtk-button-box-set-spacing", sgtk_button_box_set_spacing, 2);
  scm_add_cprim("gtk-button-box-set-child-size", sgtk_button_box_set_child_size, 3);
  scm_add_cprim("gtk-button-box-set-child-ipadding", sgtk_button_box_set_child_ipadding, 3);
  scm_add_cprim("gtk-button-box-set-layout", sgtk_button_box_set_layout, 2);
  scm_add_cprim("gtk-button-box-get-spacing", sgtk_button_box_get_spacing, 1);
  scm_add_cprim("gtk-button-box-get-layout", sgtk_button_box_get_layout, 1);
  scm_add_cprim("gtk-bin-get-type", sgtk_bin_get_type, 0);
  scm_add_cprim("gtk-bindings-activate", sgtk_bindings_activate, 3);
  scm_add_cprim("gtk-pattern-match-simple", sgtk_pattern_match_simple, 2);
  scm_add_cprim("gtk-box-get-type", sgtk_box_get_type, 0);
  scm_add_cprim("gtk-box-pack-start", sgtk_box_pack_start, 5);
  scm_add_cprim("gtk-box-pack-end", sgtk_box_pack_end, 5);
  scm_add_cprim("gtk-box-pack-start-defaults", sgtk_box_pack_start_defaults, 2);
  scm_add_cprim("gtk-box-pack-end-defaults", sgtk_box_pack_end_defaults, 2);
  scm_add_cprim("gtk-box-set-homogeneous", sgtk_box_set_homogeneous, 2);
  scm_add_cprim("gtk-box-set-spacing", sgtk_box_set_spacing, 2);
  scm_add_cprim("gtk-box-reorder-child", sgtk_box_reorder_child, 3);
  scm_add_cprim("gtk-box-set-child-packing", sgtk_box_set_child_packing, 6);
  scm_add_cprim("gtk-button-get-type", sgtk_button_get_type, 0);
  scm_add_cprim("gtk-button-new", sgtk_button_new, 0);
  scm_add_cprim("gtk-button-new-with-label", sgtk_button_new_with_label, 1);
  scm_add_cprim("gtk-button-pressed", sgtk_button_pressed, 1);
  scm_add_cprim("gtk-button-released", sgtk_button_released, 1);
  scm_add_cprim("gtk-button-clicked", sgtk_button_clicked, 1);
  scm_add_cprim("gtk-button-enter", sgtk_button_enter, 1);
  scm_add_cprim("gtk-button-leave", sgtk_button_leave, 1);
  scm_add_cprim("gtk-button-set-relief", sgtk_button_set_relief, 2);
  scm_add_cprim("gtk-button-get-relief", sgtk_button_get_relief, 1);
  scm_add_cprim("gtk-calendar-get-type", sgtk_calendar_get_type, 0);
  scm_add_cprim("gtk-calendar-new", sgtk_calendar_new, 0);
  scm_add_cprim("gtk-calendar-display-options", sgtk_calendar_display_options, 2);
  scm_add_cprim("gtk-calendar-select-month", sgtk_calendar_select_month, 3);
  scm_add_cprim("gtk-calendar-select-day", sgtk_calendar_select_day, 2);
  scm_add_cprim("gtk-calendar-clear-marks", sgtk_calendar_clear_marks, 1);
  scm_add_cprim("gtk-calendar-mark-day", sgtk_calendar_mark_day, 2);
  scm_add_cprim("gtk-calendar-unmark-day", sgtk_calendar_unmark_day, 2);
  scm_add_cprim("gtk-calendar-freeze", sgtk_calendar_freeze, 1);
  scm_add_cprim("gtk-calendar-thaw", sgtk_calendar_thaw, 1);
  scm_add_cprim("gtk-check-button-get-type", sgtk_check_button_get_type, 0);
  scm_add_cprim("gtk-check-button-new", sgtk_check_button_new, 0);
  scm_add_cprim("gtk-check-button-new-with-label", sgtk_check_button_new_with_label, 1);
  scm_add_cprim("gtk-check-menu-item-get-type", sgtk_check_menu_item_get_type, 0);
  scm_add_cprim("gtk-check-menu-item-new", sgtk_check_menu_item_new, 0);
  scm_add_cprim("gtk-check-menu-item-new-with-label", sgtk_check_menu_item_new_with_label, 1);
  scm_add_cprim("gtk-check-menu-item-set-active", sgtk_check_menu_item_set_active, 2);
  scm_add_cprim("gtk-check-menu-item-set-show-toggle", sgtk_check_menu_item_set_show_toggle, 2);
  scm_add_cprim("gtk-check-menu-item-toggled", sgtk_check_menu_item_toggled, 1);
  scm_add_cprim("gtk-clist-get-type", sgtk_clist_get_type, 0);
  scm_add_cprim("gtk-clist-new", sgtk_clist_new, 1);
  scm_add_cprim("gtk-clist-set-hadjustment", sgtk_clist_set_hadjustment, 2);
  scm_add_cprim("gtk-clist-get-hadjustment", sgtk_clist_get_hadjustment, 1);
  scm_add_cprim("gtk-clist-set-vadjustment", sgtk_clist_set_vadjustment, 2);
  scm_add_cprim("gtk-clist-get-vadjustment", sgtk_clist_get_vadjustment, 1);
  scm_add_cprim("gtk-clist-set-shadow-type", sgtk_clist_set_shadow_type, 2);
  scm_add_cprim("gtk-clist-set-selection-mode", sgtk_clist_set_selection_mode, 2);
  scm_add_cprim("gtk-clist-freeze", sgtk_clist_freeze, 1);
  scm_add_cprim("gtk-clist-thaw", sgtk_clist_thaw, 1);
  scm_add_cprim("gtk-clist-column-titles-show", sgtk_clist_column_titles_show, 1);
  scm_add_cprim("gtk-clist-column-titles-hide", sgtk_clist_column_titles_hide, 1);
  scm_add_cprim("gtk-clist-column-title-active", sgtk_clist_column_title_active, 2);
  scm_add_cprim("gtk-clist-column-title-passive", sgtk_clist_column_title_passive, 2);
  scm_add_cprim("gtk-clist-column-titles-active", sgtk_clist_column_titles_active, 1);
  scm_add_cprim("gtk-clist-column-titles-passive", sgtk_clist_column_titles_passive, 1);
  scm_add_cprim("gtk-clist-set-column-title", sgtk_clist_set_column_title, 3);
  scm_add_cprim("gtk-clist-get-column-title", sgtk_clist_get_column_title, 2);
  scm_add_cprim("gtk-clist-set-column-widget", sgtk_clist_set_column_widget, 3);
  scm_add_cprim("gtk-clist-get-column-widget", sgtk_clist_get_column_widget, 2);
  scm_add_cprim("gtk-clist-set-column-justification", sgtk_clist_set_column_justification, 3);
  scm_add_cprim("gtk-clist-set-column-visibility", sgtk_clist_set_column_visibility, 3);
  scm_add_cprim("gtk-clist-set-column-resizeable", sgtk_clist_set_column_resizeable, 3);
  scm_add_cprim("gtk-clist-set-column-auto-resize", sgtk_clist_set_column_auto_resize, 3);
  scm_add_cprim("gtk-clist-columns-autosize", sgtk_clist_columns_autosize, 1);
  scm_add_cprim("gtk-clist-optimal-column-width", sgtk_clist_optimal_column_width, 2);
  scm_add_cprim("gtk-clist-set-column-width", sgtk_clist_set_column_width, 3);
  scm_add_cprim("gtk-clist-set-column-min-width", sgtk_clist_set_column_min_width, 3);
  scm_add_cprim("gtk-clist-set-column-max-width", sgtk_clist_set_column_max_width, 3);
  scm_add_cprim("gtk-clist-get-cell-type", sgtk_clist_get_cell_type, 3);
  scm_add_cprim("gtk-clist-set-text", sgtk_clist_set_text, 4);
  scm_add_cprim("gtk-clist-set-pixmap", sgtk_clist_set_pixmap, 5);
  scm_add_cprim("gtk-clist-set-pixtext", sgtk_clist_set_pixtext, 7);
  scm_add_cprim("gtk-clist-set-shift", sgtk_clist_set_shift, 5);
  scm_add_cprim("gtk-clist-remove", sgtk_clist_remove, 2);
  scm_add_cprim("gtk-clist-clear", sgtk_clist_clear, 1);
  scm_add_cprim("gtk-clist-moveto", sgtk_clist_moveto, 5);
  scm_add_cprim("gtk-clist-set-row-height", sgtk_clist_set_row_height, 2);
  scm_add_cprim("gtk-clist-get-row-data", sgtk_clist_get_row_data, 2);
  scm_add_cprim("gtk-clist-swap-rows", sgtk_clist_swap_rows, 3);
  scm_add_cprim("gtk-clist-row-move", sgtk_clist_row_move, 3);
  scm_add_cprim("gtk-clist-row-is-visible", sgtk_clist_row_is_visible, 2);
  scm_add_cprim("gtk-clist-set-foreground", sgtk_clist_set_foreground, 3);
  scm_add_cprim("gtk-clist-set-background", sgtk_clist_set_background, 3);
  scm_add_cprim("gtk-clist-set-cell-style", sgtk_clist_set_cell_style, 4);
  scm_add_cprim("gtk-clist-get-cell-style", sgtk_clist_get_cell_style, 3);
  scm_add_cprim("gtk-clist-set-row-style", sgtk_clist_set_row_style, 3);
  scm_add_cprim("gtk-clist-get-row-style", sgtk_clist_get_row_style, 2);
  scm_add_cprim("gtk-clist-set-selectable", sgtk_clist_set_selectable, 3);
  scm_add_cprim("gtk-clist-get-selectable", sgtk_clist_get_selectable, 2);
  scm_add_cprim("gtk-clist-select-row", sgtk_clist_select_row, 3);
  scm_add_cprim("gtk-clist-unselect-row", sgtk_clist_unselect_row, 3);
  scm_add_cprim("gtk-clist-select-all", sgtk_clist_select_all, 1);
  scm_add_cprim("gtk-clist-unselect-all", sgtk_clist_unselect_all, 1);
  scm_add_cprim("gtk-clist-undo-selection", sgtk_clist_undo_selection, 1);
  scm_add_cprim("gtk-clist-sort", sgtk_clist_sort, 1);
  scm_add_cprim("gtk-clist-set-auto-sort", sgtk_clist_set_auto_sort, 2);
  scm_add_cprim("gtk-clist-set-sort-type", sgtk_clist_set_sort_type, 2);
  scm_add_cprim("gtk-clist-set-sort-column", sgtk_clist_set_sort_column, 2);
  scm_add_cprim("gtk-clist-set-reorderable", sgtk_clist_set_reorderable, 2);
  scm_add_cprim("gtk-clist-set-use-drag-icons", sgtk_clist_set_use_drag_icons, 2);
  scm_add_cprim("gtk-clist-set-button-actions", sgtk_clist_set_button_actions, 3);
  scm_add_cprim("gtk-color-selection-get-type", sgtk_color_selection_get_type, 0);
  scm_add_cprim("gtk-color-selection-new", sgtk_color_selection_new, 0);
  scm_add_cprim("gtk-color-selection-set-update-policy", sgtk_color_selection_set_update_policy, 2);
  scm_add_cprim("gtk-color-selection-set-opacity", sgtk_color_selection_set_opacity, 2);
  scm_add_cprim("gtk-color-selection-dialog-get-type", sgtk_color_selection_dialog_get_type, 0);
  scm_add_cprim("gtk-color-selection-dialog-new", sgtk_color_selection_dialog_new, 1);
  scm_add_cprim("gtk-combo-get-type", sgtk_combo_get_type, 0);
  scm_add_cprim("gtk-combo-new", sgtk_combo_new, 0);
  scm_add_cprim("gtk-combo-set-value-in-list", sgtk_combo_set_value_in_list, 3);
  scm_add_cprim("gtk-combo-set-case-sensitive", sgtk_combo_set_case_sensitive, 2);
  scm_add_cprim("gtk-combo-set-use-arrows", sgtk_combo_set_use_arrows, 2);
  scm_add_cprim("gtk-combo-set-use-arrows-always", sgtk_combo_set_use_arrows_always, 2);
  scm_add_cprim("gtk-combo-set-item-string", sgtk_combo_set_item_string, 3);
  scm_add_cprim("gtk-combo-disable-activate", sgtk_combo_disable_activate, 1);
  scm_add_cprim("gtk-container-get-type", sgtk_container_get_type, 0);
  scm_add_cprim("gtk-container-child-type", sgtk_container_child_type, 1);
  scm_add_cprim("gtk-container-add-child-arg-type", sgtk_container_add_child_arg_type, 4);
  scm_add_cprim("gtk-container-set-border-width", sgtk_container_set_border_width, 2);
  scm_add_cprim("gtk-container-add", sgtk_container_add, 2);
  scm_add_cprim("gtk-container-remove", sgtk_container_remove, 2);
  scm_add_cprim("gtk-container-dequeue-resize-handler", sgtk_container_dequeue_resize_handler, 1);
  scm_add_cprim("gtk-container-clear-resize-widgets", sgtk_container_clear_resize_widgets, 1);
  scm_add_cprim("gtk-container-set-resize-mode", sgtk_container_set_resize_mode, 2);
  scm_add_cprim("gtk-container-set-reallocate-redraws", sgtk_container_set_reallocate_redraws, 2);
  scm_add_cprim("gtk-container-queue-resize", sgtk_container_queue_resize, 1);
  scm_add_cprim("gtk-container-check-resize", sgtk_container_check_resize, 1);
  scm_add_cprim("gtk-container-resize-children", sgtk_container_resize_children, 1);
  scm_add_cprim("gtk-container-focus", sgtk_container_focus, 2);
  scm_add_cprim("gtk-container-set-focus-child", sgtk_container_set_focus_child, 2);
  scm_add_cprim("gtk-container-register-toplevel", sgtk_container_register_toplevel, 1);
  scm_add_cprim("gtk-container-unregister-toplevel", sgtk_container_unregister_toplevel, 1);
  scm_add_cprim("gtk-container-child-composite-name", sgtk_container_child_composite_name, 2);
  scm_add_cprim("gtk-container-set-focus-vadjustment", sgtk_container_set_focus_vadjustment, 2);
  scm_add_cprim("gtk-container-set-focus-hadjustment", sgtk_container_set_focus_hadjustment, 2);
  scm_add_cprim("gtk-ctree-get-type", sgtk_ctree_get_type, 0);
  scm_add_cprim("gtk-ctree-new", sgtk_ctree_new, 2);
  scm_add_cprim("gtk-ctree-remove-node", sgtk_ctree_remove_node, 2);
  scm_add_cprim("gtk-ctree-is-viewable", sgtk_ctree_is_viewable, 2);
  scm_add_cprim("gtk-ctree-last", sgtk_ctree_last, 2);
  scm_add_cprim("gtk-ctree-find-node-ptr", sgtk_ctree_find_node_ptr, 2);
  scm_add_cprim("gtk-ctree-node-nth", sgtk_ctree_node_nth, 2);
  scm_add_cprim("gtk-ctree-find", sgtk_ctree_find, 3);
  scm_add_cprim("gtk-ctree-is-ancestor", sgtk_ctree_is_ancestor, 3);
  scm_add_cprim("gtk-ctree-is-hot-spot", sgtk_ctree_is_hot_spot, 3);
  scm_add_cprim("gtk-ctree-move", sgtk_ctree_move, 4);
  scm_add_cprim("gtk-ctree-expand", sgtk_ctree_expand, 2);
  scm_add_cprim("gtk-ctree-expand-recursive", sgtk_ctree_expand_recursive, 2);
  scm_add_cprim("gtk-ctree-expand-to-depth", sgtk_ctree_expand_to_depth, 3);
  scm_add_cprim("gtk-ctree-collapse", sgtk_ctree_collapse, 2);
  scm_add_cprim("gtk-ctree-collapse-recursive", sgtk_ctree_collapse_recursive, 2);
  scm_add_cprim("gtk-ctree-collapse-to-depth", sgtk_ctree_collapse_to_depth, 3);
  scm_add_cprim("gtk-ctree-toggle-expansion", sgtk_ctree_toggle_expansion, 2);
  scm_add_cprim("gtk-ctree-toggle-expansion-recursive", sgtk_ctree_toggle_expansion_recursive, 2);
  scm_add_cprim("gtk-ctree-select", sgtk_ctree_select, 2);
  scm_add_cprim("gtk-ctree-unselect", sgtk_ctree_unselect, 2);
  scm_add_cprim("gtk-ctree-select-recursive", sgtk_ctree_select_recursive, 2);
  scm_add_cprim("gtk-ctree-unselect-recursive", sgtk_ctree_unselect_recursive, 2);
  scm_add_cprim("gtk-ctree-node-set-text", sgtk_ctree_node_set_text, 4);
  scm_add_cprim("gtk-ctree-node-set-pixmap", sgtk_ctree_node_set_pixmap, 5);
  scm_add_cprim("gtk-ctree-node-set-pixtext", sgtk_ctree_node_set_pixtext, 7);
  scm_add_cprim("gtk-ctree-set-node-info", sgtk_ctree_set_node_info, 10);
  scm_add_cprim("gtk-ctree-node-set-shift", sgtk_ctree_node_set_shift, 5);
  scm_add_cprim("gtk-ctree-node-set-selectable", sgtk_ctree_node_set_selectable, 3);
  scm_add_cprim("gtk-ctree-node-get-selectable", sgtk_ctree_node_get_selectable, 2);
  scm_add_cprim("gtk-ctree-node-get-cell-type", sgtk_ctree_node_get_cell_type, 3);
  scm_add_cprim("gtk-ctree-node-set-cell-style", sgtk_ctree_node_set_cell_style, 4);
  scm_add_cprim("gtk-ctree-node-get-cell-style", sgtk_ctree_node_get_cell_style, 3);
  scm_add_cprim("gtk-ctree-node-set-row-style", sgtk_ctree_node_set_row_style, 3);
  scm_add_cprim("gtk-ctree-node-get-row-style", sgtk_ctree_node_get_row_style, 2);
  scm_add_cprim("gtk-ctree-node-set-foreground", sgtk_ctree_node_set_foreground, 3);
  scm_add_cprim("gtk-ctree-node-set-background", sgtk_ctree_node_set_background, 3);
  scm_add_cprim("gtk-ctree-node-get-row-data", sgtk_ctree_node_get_row_data, 2);
  scm_add_cprim("gtk-ctree-node-moveto", sgtk_ctree_node_moveto, 5);
  scm_add_cprim("gtk-ctree-node-is-visible", sgtk_ctree_node_is_visible, 2);
  scm_add_cprim("gtk-ctree-set-indent", sgtk_ctree_set_indent, 2);
  scm_add_cprim("gtk-ctree-set-spacing", sgtk_ctree_set_spacing, 2);
  scm_add_cprim("gtk-ctree-set-show-stub", sgtk_ctree_set_show_stub, 2);
  scm_add_cprim("gtk-ctree-set-line-style", sgtk_ctree_set_line_style, 2);
  scm_add_cprim("gtk-ctree-set-expander-style", sgtk_ctree_set_expander_style, 2);
  scm_add_cprim("gtk-ctree-sort-recursive", sgtk_ctree_sort_recursive, 2);
  scm_add_cprim("gtk-ctree-sort-node", sgtk_ctree_sort_node, 2);
  scm_add_cprim("gtk-curve-get-type", sgtk_curve_get_type, 0);
  scm_add_cprim("gtk-curve-set-curve-type", sgtk_curve_set_curve_type, 2);
  scm_add_cprim("gtk-curve-reset", sgtk_curve_reset, 1);
  scm_add_cprim("gtk-curve-set-gamma", sgtk_curve_set_gamma, 2);
  scm_add_cprim("gtk-curve-set-range", sgtk_curve_set_range, 5);
  scm_add_cprim("gtk-curve-new", sgtk_curve_new, 0);
  scm_add_cprim("gtk-data-get-type", sgtk_data_get_type, 0);
  scm_add_cprim("gtk-dialog-get-type", sgtk_dialog_get_type, 0);
  scm_add_cprim("gtk-dialog-new", sgtk_dialog_new, 0);
  scm_add_cprim("gtk-drag-get-data", sgtk_drag_get_data, 4);
  scm_add_cprim("gtk-drag-get-source-widget", sgtk_drag_get_source_widget, 1);
  scm_add_cprim("gtk-drag-finish", sgtk_drag_finish, 4);
  scm_add_cprim("gtk-drag-highlight", sgtk_drag_highlight, 1);
  scm_add_cprim("gtk-drag-unhighlight", sgtk_drag_unhighlight, 1);
  scm_add_cprim("gtk-drag-dest-set-proxy", sgtk_drag_dest_set_proxy, 4);
  scm_add_cprim("gtk-drag-dest-unset", sgtk_drag_dest_unset, 1);
  scm_add_cprim("gtk-drag-dest-handle-event", sgtk_drag_dest_handle_event, 2);
  scm_add_cprim("gtk-drag-source-unset", sgtk_drag_source_unset, 1);
  scm_add_cprim("gtk-drag-source-set-icon", sgtk_drag_source_set_icon, 4);
  scm_add_cprim("gtk-drag-set-icon-widget", sgtk_drag_set_icon_widget, 4);
  scm_add_cprim("gtk-drag-set-icon-pixmap", sgtk_drag_set_icon_pixmap, 6);
  scm_add_cprim("gtk-drag-set-icon-default", sgtk_drag_set_icon_default, 1);
  scm_add_cprim("gtk-drag-set-default-icon", sgtk_drag_set_default_icon, 5);
  scm_add_cprim("gtk-drag-source-handle-event", sgtk_drag_source_handle_event, 2);
  scm_add_cprim("gtk-drawing-area-get-type", sgtk_drawing_area_get_type, 0);
  scm_add_cprim("gtk-drawing-area-new", sgtk_drawing_area_new, 0);
  scm_add_cprim("gtk-drawing-area-size", sgtk_drawing_area_size, 3);
  scm_add_cprim("gtk-editable-get-type", sgtk_editable_get_type, 0);
  scm_add_cprim("gtk-editable-delete-text", sgtk_editable_delete_text, 3);
  scm_add_cprim("gtk-editable-get-chars", sgtk_editable_get_chars, 3);
  scm_add_cprim("gtk-editable-set-position", sgtk_editable_set_position, 2);
  scm_add_cprim("gtk-editable-get-position", sgtk_editable_get_position, 1);
  scm_add_cprim("gtk-editable-delete-selection", sgtk_editable_delete_selection, 1);
  scm_add_cprim("gtk-editable-claim-selection", sgtk_editable_claim_selection, 3);
  scm_add_cprim("gtk-editable-select-region", sgtk_editable_select_region, 3);
  scm_add_cprim("gtk-editable-cut-clipboard", sgtk_editable_cut_clipboard, 1);
  scm_add_cprim("gtk-editable-copy-clipboard", sgtk_editable_copy_clipboard, 1);
  scm_add_cprim("gtk-editable-paste-clipboard", sgtk_editable_paste_clipboard, 1);
  scm_add_cprim("gtk-editable-set-editable", sgtk_editable_set_editable, 2);
  scm_add_cprim("gtk-editable-changed", sgtk_editable_changed, 1);
  scm_add_cprim("gtk-entry-get-type", sgtk_entry_get_type, 0);
  scm_add_cprim("gtk-entry-new", sgtk_entry_new, 0);
  scm_add_cprim("gtk-entry-new-with-max-length", sgtk_entry_new_with_max_length, 1);
  scm_add_cprim("gtk-entry-set-text", sgtk_entry_set_text, 2);
  scm_add_cprim("gtk-entry-append-text", sgtk_entry_append_text, 2);
  scm_add_cprim("gtk-entry-prepend-text", sgtk_entry_prepend_text, 2);
  scm_add_cprim("gtk-entry-set-position", sgtk_entry_set_position, 2);
  scm_add_cprim("gtk-entry-set-visibility", sgtk_entry_set_visibility, 2);
  scm_add_cprim("gtk-entry-set-editable", sgtk_entry_set_editable, 2);
  scm_add_cprim("gtk-entry-get-text", sgtk_entry_get_text, 1);
  scm_add_cprim("gtk-entry-select-region", sgtk_entry_select_region, 3);
  scm_add_cprim("gtk-entry-set-max-length", sgtk_entry_set_max_length, 2);
  scm_add_cprim("gtk-event-box-get-type", sgtk_event_box_get_type, 0);
  scm_add_cprim("gtk-event-box-new", sgtk_event_box_new, 0);
  scm_add_cprim("gtk-file-selection-get-type", sgtk_file_selection_get_type, 0);
  scm_add_cprim("gtk-file-selection-new", sgtk_file_selection_new, 1);
  scm_add_cprim("gtk-file-selection-show-fileop-buttons", sgtk_file_selection_show_fileop_buttons, 1);
  scm_add_cprim("gtk-file-selection-hide-fileop-buttons", sgtk_file_selection_hide_fileop_buttons, 1);
  scm_add_cprim("gtk-file-selection-set-filename", sgtk_file_selection_set_filename, 2);
  scm_add_cprim("gtk-file-selection-get-filename", sgtk_file_selection_get_filename, 1);
  scm_add_cprim("gtk-file-selection-complete", sgtk_file_selection_complete, 2);
  scm_add_cprim("gtk-fixed-get-type", sgtk_fixed_get_type, 0);
  scm_add_cprim("gtk-fixed-new", sgtk_fixed_new, 0);
  scm_add_cprim("gtk-fixed-put", sgtk_fixed_put, 4);
  scm_add_cprim("gtk-fixed-move", sgtk_fixed_move, 4);
  scm_add_cprim("gtk-font-selection-get-type", sgtk_font_selection_get_type, 0);
  scm_add_cprim("gtk-font-selection-new", sgtk_font_selection_new, 0);
  scm_add_cprim("gtk-font-selection-get-font", sgtk_font_selection_get_font, 1);
  scm_add_cprim("gtk-font-selection-get-font-name", sgtk_font_selection_get_font_name, 1);
  scm_add_cprim("gtk-font-selection-set-font-name", sgtk_font_selection_set_font_name, 2);
  scm_add_cprim("gtk-font-selection-get-preview-text", sgtk_font_selection_get_preview_text, 1);
  scm_add_cprim("gtk-font-selection-set-preview-text", sgtk_font_selection_set_preview_text, 2);
  scm_add_cprim("gtk-font-selection-dialog-get-type", sgtk_font_selection_dialog_get_type, 0);
  scm_add_cprim("gtk-font-selection-dialog-new", sgtk_font_selection_dialog_new, 1);
  scm_add_cprim("gtk-font-selection-dialog-get-font-name", sgtk_font_selection_dialog_get_font_name, 1);
  scm_add_cprim("gtk-font-selection-dialog-get-font", sgtk_font_selection_dialog_get_font, 1);
  scm_add_cprim("gtk-font-selection-dialog-set-font-name", sgtk_font_selection_dialog_set_font_name, 2);
  scm_add_cprim("gtk-font-selection-dialog-get-preview-text", sgtk_font_selection_dialog_get_preview_text, 1);
  scm_add_cprim("gtk-font-selection-dialog-set-preview-text", sgtk_font_selection_dialog_set_preview_text, 2);
  scm_add_cprim("gtk-frame-get-type", sgtk_frame_get_type, 0);
  scm_add_cprim("gtk-frame-new", sgtk_frame_new, 1);
  scm_add_cprim("gtk-frame-set-label", sgtk_frame_set_label, 2);
  scm_add_cprim("gtk-frame-set-label-align", sgtk_frame_set_label_align, 3);
  scm_add_cprim("gtk-frame-set-shadow-type", sgtk_frame_set_shadow_type, 2);
  scm_add_cprim("gtk-gamma-curve-get-type", sgtk_gamma_curve_get_type, 0);
  scm_add_cprim("gtk-gamma-curve-new", sgtk_gamma_curve_new, 0);
  scm_add_cprim("gtk-gc-release", sgtk_gc_release, 1);
  scm_add_cprim("gtk-handle-box-get-type", sgtk_handle_box_get_type, 0);
  scm_add_cprim("gtk-handle-box-new", sgtk_handle_box_new, 0);
  scm_add_cprim("gtk-handle-box-set-shadow-type", sgtk_handle_box_set_shadow_type, 2);
  scm_add_cprim("gtk-handle-box-set-handle-position", sgtk_handle_box_set_handle_position, 2);
  scm_add_cprim("gtk-handle-box-set-snap-edge", sgtk_handle_box_set_snap_edge, 2);
  scm_add_cprim("gtk-hbutton-box-get-type", sgtk_hbutton_box_get_type, 0);
  scm_add_cprim("gtk-hbutton-box-new", sgtk_hbutton_box_new, 0);
  scm_add_cprim("gtk-hbutton-box-set-spacing-default", sgtk_hbutton_box_set_spacing_default, 1);
  scm_add_cprim("gtk-hbutton-box-set-layout-default", sgtk_hbutton_box_set_layout_default, 1);
  scm_add_cprim("gtk-hbutton-box-get-spacing-default", sgtk_hbutton_box_get_spacing_default, 0);
  scm_add_cprim("gtk-hbutton-box-get-layout-default", sgtk_hbutton_box_get_layout_default, 0);
  scm_add_cprim("gtk-hbox-get-type", sgtk_hbox_get_type, 0);
  scm_add_cprim("gtk-hbox-new", sgtk_hbox_new, 2);
  scm_add_cprim("gtk-hpaned-get-type", sgtk_hpaned_get_type, 0);
  scm_add_cprim("gtk-hpaned-new", sgtk_hpaned_new, 0);
  scm_add_cprim("gtk-hruler-get-type", sgtk_hruler_get_type, 0);
  scm_add_cprim("gtk-hruler-new", sgtk_hruler_new, 0);
  scm_add_cprim("gtk-hscale-get-type", sgtk_hscale_get_type, 0);
  scm_add_cprim("gtk-hscale-new", sgtk_hscale_new, 1);
  scm_add_cprim("gtk-hscrollbar-get-type", sgtk_hscrollbar_get_type, 0);
  scm_add_cprim("gtk-hscrollbar-new", sgtk_hscrollbar_new, 1);
  scm_add_cprim("gtk-hseparator-get-type", sgtk_hseparator_get_type, 0);
  scm_add_cprim("gtk-hseparator-new", sgtk_hseparator_new, 0);
  scm_add_cprim("gtk-image-get-type", sgtk_image_get_type, 0);
  scm_add_cprim("gtk-input-dialog-get-type", sgtk_input_dialog_get_type, 0);
  scm_add_cprim("gtk-input-dialog-new", sgtk_input_dialog_new, 0);
  scm_add_cprim("gtk-invisible-get-type", sgtk_invisible_get_type, 0);
  scm_add_cprim("gtk-invisible-new", sgtk_invisible_new, 0);
  scm_add_cprim("gtk-item-get-type", sgtk_item_get_type, 0);
  scm_add_cprim("gtk-item-select", sgtk_item_select, 1);
  scm_add_cprim("gtk-item-deselect", sgtk_item_deselect, 1);
  scm_add_cprim("gtk-item-toggle", sgtk_item_toggle, 1);
  scm_add_cprim("gtk-item-factory-get-type", sgtk_item_factory_get_type, 0);
  scm_add_cprim("gtk-item-factory-new", sgtk_item_factory_new, 3);
  scm_add_cprim("gtk-item-factory-add-foreign", sgtk_item_factory_add_foreign, 5);
  scm_add_cprim("gtk-item-factory-construct", sgtk_item_factory_construct, 4);
  scm_add_cprim("gtk-item-factory-from-path", sgtk_item_factory_from_path, 1);
  scm_add_cprim("gtk-item-factory-from-widget", sgtk_item_factory_from_widget, 1);
  scm_add_cprim("gtk-item-factory-path-from-widget", sgtk_item_factory_path_from_widget, 1);
  scm_add_cprim("gtk-item-factory-get-widget", sgtk_item_factory_get_widget, 2);
  scm_add_cprim("gtk-item-factory-get-widget-by-action", sgtk_item_factory_get_widget_by_action, 2);
  scm_add_cprim("gtk-item-factory-get-item", sgtk_item_factory_get_item, 2);
  scm_add_cprim("gtk-item-factory-get-item-by-action", sgtk_item_factory_get_item_by_action, 2);
  scm_add_cprim("gtk-item-factories-path-delete", sgtk_item_factories_path_delete, 2);
  scm_add_cprim("gtk-item-factory-delete-item", sgtk_item_factory_delete_item, 2);
  scm_add_cprim("gtk-item-factory-popup-data-from-widget", sgtk_item_factory_popup_data_from_widget, 1);
  scm_add_cprim("gtk-item-factory-popup-data", sgtk_item_factory_popup_data, 1);
  scm_add_cprim("gtk-item-factory-popup", sgtk_item_factory_popup, 5);
  scm_add_cprim("gtk-item-factory-parse-rc-string", sgtk_item_factory_parse_rc_string, 1);
  scm_add_cprim("gtk-item-factory-parse-rc", sgtk_item_factory_parse_rc, 1);
  scm_add_cprim("gtk-label-get-type", sgtk_label_get_type, 0);
  scm_add_cprim("gtk-label-new", sgtk_label_new, 1);
  scm_add_cprim("gtk-label-set-text", sgtk_label_set_text, 2);
  scm_add_cprim("gtk-label-set-pattern", sgtk_label_set_pattern, 2);
  scm_add_cprim("gtk-label-set-justify", sgtk_label_set_justify, 2);
  scm_add_cprim("gtk-label-set-line-wrap", sgtk_label_set_line_wrap, 2);
  scm_add_cprim("gtk-label-parse-uline", sgtk_label_parse_uline, 2);
  scm_add_cprim("gtk-layout-new", sgtk_layout_new, 2);
  scm_add_cprim("gtk-layout-get-hadjustment", sgtk_layout_get_hadjustment, 1);
  scm_add_cprim("gtk-layout-get-vadjustment", sgtk_layout_get_vadjustment, 1);
  scm_add_cprim("gtk-layout-set-hadjustment", sgtk_layout_set_hadjustment, 2);
  scm_add_cprim("gtk-layout-set-vadjustment", sgtk_layout_set_vadjustment, 2);
  scm_add_cprim("gtk-layout-put", sgtk_layout_put, 4);
  scm_add_cprim("gtk-layout-move", sgtk_layout_move, 4);
  scm_add_cprim("gtk-layout-set-size", sgtk_layout_set_size, 3);
  scm_add_cprim("gtk-layout-freeze", sgtk_layout_freeze, 1);
  scm_add_cprim("gtk-layout-thaw", sgtk_layout_thaw, 1);
  scm_add_cprim("gtk-layout-get-type", sgtk_layout_get_type, 0);
  scm_add_cprim("gtk-list-get-type", sgtk_list_get_type, 0);
  scm_add_cprim("gtk-list-new", sgtk_list_new, 0);
  scm_add_cprim("gtk-list-clear-items", sgtk_list_clear_items, 3);
  scm_add_cprim("gtk-list-child-position", sgtk_list_child_position, 2);
  scm_add_cprim("gtk-list-set-selection-mode", sgtk_list_set_selection_mode, 2);
  scm_add_cprim("gtk-list-select-item", sgtk_list_select_item, 2);
  scm_add_cprim("gtk-list-unselect-item", sgtk_list_unselect_item, 2);
  scm_add_cprim("gtk-list-select-child", sgtk_list_select_child, 2);
  scm_add_cprim("gtk-list-unselect-child", sgtk_list_unselect_child, 2);
  scm_add_cprim("gtk-list-select-all", sgtk_list_select_all, 1);
  scm_add_cprim("gtk-list-unselect-all", sgtk_list_unselect_all, 1);
  scm_add_cprim("gtk-list-extend-selection", sgtk_list_extend_selection, 4);
  scm_add_cprim("gtk-list-end-drag-selection", sgtk_list_end_drag_selection, 1);
  scm_add_cprim("gtk-list-start-selection", sgtk_list_start_selection, 1);
  scm_add_cprim("gtk-list-end-selection", sgtk_list_end_selection, 1);
  scm_add_cprim("gtk-list-toggle-row", sgtk_list_toggle_row, 2);
  scm_add_cprim("gtk-list-toggle-focus-row", sgtk_list_toggle_focus_row, 1);
  scm_add_cprim("gtk-list-toggle-add-mode", sgtk_list_toggle_add_mode, 1);
  scm_add_cprim("gtk-list-undo-selection", sgtk_list_undo_selection, 1);
  scm_add_cprim("gtk-list-scroll-horizontal", sgtk_list_scroll_horizontal, 3);
  scm_add_cprim("gtk-list-scroll-vertical", sgtk_list_scroll_vertical, 3);
  scm_add_cprim("gtk-list-item-get-type", sgtk_list_item_get_type, 0);
  scm_add_cprim("gtk-list-item-new", sgtk_list_item_new, 0);
  scm_add_cprim("gtk-list-item-new-with-label", sgtk_list_item_new_with_label, 1);
  scm_add_cprim("gtk-list-item-select", sgtk_list_item_select, 1);
  scm_add_cprim("gtk-list-item-deselect", sgtk_list_item_deselect, 1);
  scm_add_cprim("gtk-check-version", sgtk_check_version, 3);
  scm_add_cprim("gtk-exit", sgtk_exit, 1);
  scm_add_cprim("gtk-set-locale", sgtk_set_locale, 0);
  scm_add_cprim("gtk-main", sgtk_main, 0);
  scm_add_cprim("gtk-main-level", sgtk_main_level, 0);
  scm_add_cprim("gtk-main-quit", sgtk_main_quit, 0);
  scm_add_cprim("gtk-events-pending", sgtk_events_pending, 0);
  scm_add_cprim("gtk-main-iteration", sgtk_main_iteration, 0);
  scm_add_cprim("gtk-main-iteration-do", sgtk_main_iteration_do, 1);
  scm_add_cprim("gtk-main-do-event", sgtk_main_do_event, 1);
  scm_add_cprim("gtk-true", sgtk_true, 0);
  scm_add_cprim("gtk-false", sgtk_false, 0);
  scm_add_cprim("gtk-grab-add", sgtk_grab_add, 1);
  scm_add_cprim("gtk-grab-get-current", sgtk_grab_get_current, 0);
  scm_add_cprim("gtk-grab-remove", sgtk_grab_remove, 1);
  scm_add_cprim("gtk-key-snooper-remove", sgtk_key_snooper_remove, 1);
  scm_add_cprim("gtk-quit-add-destroy", sgtk_quit_add_destroy, 2);
  scm_add_cprim("gtk-quit-remove", sgtk_quit_remove, 1);
  scm_add_cprim("gtk-timeout-remove", sgtk_timeout_remove, 1);
  scm_add_cprim("gtk-idle-remove", sgtk_idle_remove, 1);
  scm_add_cprim("gtk-input-remove", sgtk_input_remove, 1);
  scm_add_cprim("gtk-get-current-event", sgtk_get_current_event, 0);
  scm_add_cprim("gtk-get-event-widget", sgtk_get_event_widget, 1);
  scm_add_cprim("gtk-propagate-event", sgtk_propagate_event, 2);
  scm_add_cprim("gtk-menu-get-type", sgtk_menu_get_type, 0);
  scm_add_cprim("gtk-menu-get-attach-widget", sgtk_menu_get_attach_widget, 1);
  scm_add_cprim("gtk-menu-detach", sgtk_menu_detach, 1);
  scm_add_cprim("gtk-menu-new", sgtk_menu_new, 0);
  scm_add_cprim("gtk-menu-append", sgtk_menu_append, 2);
  scm_add_cprim("gtk-menu-prepend", sgtk_menu_prepend, 2);
  scm_add_cprim("gtk-menu-insert", sgtk_menu_insert, 3);
  scm_add_cprim("gtk-menu-popdown", sgtk_menu_popdown, 1);
  scm_add_cprim("gtk-menu-get-active", sgtk_menu_get_active, 1);
  scm_add_cprim("gtk-menu-set-active", sgtk_menu_set_active, 2);
  scm_add_cprim("gtk-menu-set-accel-group", sgtk_menu_set_accel_group, 2);
  scm_add_cprim("gtk-menu-get-accel-group", sgtk_menu_get_accel_group, 1);
  scm_add_cprim("gtk-menu-ensure-uline-accel-group", sgtk_menu_ensure_uline_accel_group, 1);
  scm_add_cprim("gtk-menu-get-uline-accel-group", sgtk_menu_get_uline_accel_group, 1);
  scm_add_cprim("gtk-menu-reposition", sgtk_menu_reposition, 1);
  scm_add_cprim("gtk-menu-set-tearoff-state", sgtk_menu_set_tearoff_state, 2);
  scm_add_cprim("gtk-menu-set-title", sgtk_menu_set_title, 2);
  scm_add_cprim("gtk-menu-reorder-child", sgtk_menu_reorder_child, 3);
  scm_add_cprim("gtk-menu-bar-get-type", sgtk_menu_bar_get_type, 0);
  scm_add_cprim("gtk-menu-bar-new", sgtk_menu_bar_new, 0);
  scm_add_cprim("gtk-menu-bar-append", sgtk_menu_bar_append, 2);
  scm_add_cprim("gtk-menu-bar-prepend", sgtk_menu_bar_prepend, 2);
  scm_add_cprim("gtk-menu-bar-insert", sgtk_menu_bar_insert, 3);
  scm_add_cprim("gtk-menu-bar-set-shadow-type", sgtk_menu_bar_set_shadow_type, 2);
  scm_add_cprim("gtk-menu-item-get-type", sgtk_menu_item_get_type, 0);
  scm_add_cprim("gtk-menu-item-new", sgtk_menu_item_new, 0);
  scm_add_cprim("gtk-menu-item-new-with-label", sgtk_menu_item_new_with_label, 1);
  scm_add_cprim("gtk-menu-item-set-submenu", sgtk_menu_item_set_submenu, 2);
  scm_add_cprim("gtk-menu-item-remove-submenu", sgtk_menu_item_remove_submenu, 1);
  scm_add_cprim("gtk-menu-item-set-placement", sgtk_menu_item_set_placement, 2);
  scm_add_cprim("gtk-menu-item-configure", sgtk_menu_item_configure, 3);
  scm_add_cprim("gtk-menu-item-select", sgtk_menu_item_select, 1);
  scm_add_cprim("gtk-menu-item-deselect", sgtk_menu_item_deselect, 1);
  scm_add_cprim("gtk-menu-item-activate", sgtk_menu_item_activate, 1);
  scm_add_cprim("gtk-menu-item-right-justify", sgtk_menu_item_right_justify, 1);
  scm_add_cprim("gtk-menu-shell-get-type", sgtk_menu_shell_get_type, 0);
  scm_add_cprim("gtk-menu-shell-append", sgtk_menu_shell_append, 2);
  scm_add_cprim("gtk-menu-shell-prepend", sgtk_menu_shell_prepend, 2);
  scm_add_cprim("gtk-menu-shell-insert", sgtk_menu_shell_insert, 3);
  scm_add_cprim("gtk-menu-shell-deactivate", sgtk_menu_shell_deactivate, 1);
  scm_add_cprim("gtk-menu-shell-select-item", sgtk_menu_shell_select_item, 2);
  scm_add_cprim("gtk-menu-shell-deselect", sgtk_menu_shell_deselect, 1);
  scm_add_cprim("gtk-menu-shell-activate-item", sgtk_menu_shell_activate_item, 3);
  scm_add_cprim("gtk-misc-get-type", sgtk_misc_get_type, 0);
  scm_add_cprim("gtk-misc-set-alignment", sgtk_misc_set_alignment, 3);
  scm_add_cprim("gtk-misc-set-padding", sgtk_misc_set_padding, 3);
  scm_add_cprim("gtk-notebook-get-type", sgtk_notebook_get_type, 0);
  scm_add_cprim("gtk-notebook-new", sgtk_notebook_new, 0);
  scm_add_cprim("gtk-notebook-append-page", sgtk_notebook_append_page, 3);
  scm_add_cprim("gtk-notebook-append-page-menu", sgtk_notebook_append_page_menu, 4);
  scm_add_cprim("gtk-notebook-prepend-page", sgtk_notebook_prepend_page, 3);
  scm_add_cprim("gtk-notebook-prepend-page-menu", sgtk_notebook_prepend_page_menu, 4);
  scm_add_cprim("gtk-notebook-insert-page", sgtk_notebook_insert_page, 4);
  scm_add_cprim("gtk-notebook-insert-page-menu", sgtk_notebook_insert_page_menu, 5);
  scm_add_cprim("gtk-notebook-remove-page", sgtk_notebook_remove_page, 2);
  scm_add_cprim("gtk-notebook-get-current-page", sgtk_notebook_get_current_page, 1);
  scm_add_cprim("gtk-notebook-get-nth-page", sgtk_notebook_get_nth_page, 2);
  scm_add_cprim("gtk-notebook-page-num", sgtk_notebook_page_num, 2);
  scm_add_cprim("gtk-notebook-set-page", sgtk_notebook_set_page, 2);
  scm_add_cprim("gtk-notebook-next-page", sgtk_notebook_next_page, 1);
  scm_add_cprim("gtk-notebook-prev-page", sgtk_notebook_prev_page, 1);
  scm_add_cprim("gtk-notebook-set-show-border", sgtk_notebook_set_show_border, 2);
  scm_add_cprim("gtk-notebook-set-show-tabs", sgtk_notebook_set_show_tabs, 2);
  scm_add_cprim("gtk-notebook-set-tab-pos", sgtk_notebook_set_tab_pos, 2);
  scm_add_cprim("gtk-notebook-set-homogeneous-tabs", sgtk_notebook_set_homogeneous_tabs, 2);
  scm_add_cprim("gtk-notebook-set-tab-border", sgtk_notebook_set_tab_border, 2);
  scm_add_cprim("gtk-notebook-set-tab-hborder", sgtk_notebook_set_tab_hborder, 2);
  scm_add_cprim("gtk-notebook-set-tab-vborder", sgtk_notebook_set_tab_vborder, 2);
  scm_add_cprim("gtk-notebook-set-scrollable", sgtk_notebook_set_scrollable, 2);
  scm_add_cprim("gtk-notebook-popup-enable", sgtk_notebook_popup_enable, 1);
  scm_add_cprim("gtk-notebook-popup-disable", sgtk_notebook_popup_disable, 1);
  scm_add_cprim("gtk-notebook-get-tab-label", sgtk_notebook_get_tab_label, 2);
  scm_add_cprim("gtk-notebook-set-tab-label", sgtk_notebook_set_tab_label, 3);
  scm_add_cprim("gtk-notebook-set-tab-label-text", sgtk_notebook_set_tab_label_text, 3);
  scm_add_cprim("gtk-notebook-get-menu-label", sgtk_notebook_get_menu_label, 2);
  scm_add_cprim("gtk-notebook-set-menu-label", sgtk_notebook_set_menu_label, 3);
  scm_add_cprim("gtk-notebook-set-menu-label-text", sgtk_notebook_set_menu_label_text, 3);
  scm_add_cprim("gtk-notebook-set-tab-label-packing", sgtk_notebook_set_tab_label_packing, 5);
  scm_add_cprim("gtk-notebook-reorder-child", sgtk_notebook_reorder_child, 3);
  scm_add_cprim("gtk-object-post-arg-parsing-init", sgtk_object_post_arg_parsing_init, 0);
  scm_add_cprim("gtk-object-init-type", sgtk_object_init_type, 0);
  scm_add_cprim("gtk-object-get-type", sgtk_object_get_type, 0);
  scm_add_cprim("gtk-object-destroy", sgtk_object_destroy, 1);
  scm_add_cprim("gtk-object-sink", sgtk_object_sink, 1);
  scm_add_cprim("gtk-object-default-construct", sgtk_object_default_construct, 1);
  scm_add_cprim("gtk-object-constructed", sgtk_object_constructed, 1);
  scm_add_cprim("gtk-object-add-arg-type", sgtk_object_add_arg_type, 4);
  scm_add_cprim("gtk-object-get-data", sgtk_object_get_data, 2);
  scm_add_cprim("gtk-object-remove-data", sgtk_object_remove_data, 2);
  scm_add_cprim("gtk-object-remove-no-notify", sgtk_object_remove_no_notify, 2);
  scm_add_cprim("gtk-object-get-user-data", sgtk_object_get_user_data, 1);
  scm_add_cprim("gtk-object-ref", sgtk_object_ref, 1);
  scm_add_cprim("gtk-object-unref", sgtk_object_unref, 1);
  scm_add_cprim("gtk-trace-referencing", sgtk_trace_referencing, 5);
  scm_add_cprim("gtk-option-menu-get-type", sgtk_option_menu_get_type, 0);
  scm_add_cprim("gtk-option-menu-new", sgtk_option_menu_new, 0);
  scm_add_cprim("gtk-option-menu-get-menu", sgtk_option_menu_get_menu, 1);
  scm_add_cprim("gtk-option-menu-set-menu", sgtk_option_menu_set_menu, 2);
  scm_add_cprim("gtk-option-menu-remove-menu", sgtk_option_menu_remove_menu, 1);
  scm_add_cprim("gtk-option-menu-set-history", sgtk_option_menu_set_history, 2);
  scm_add_cprim("gtk-packer-get-type", sgtk_packer_get_type, 0);
  scm_add_cprim("gtk-packer-set-spacing", sgtk_packer_set_spacing, 2);
  scm_add_cprim("gtk-packer-new", sgtk_packer_new, 0);
  scm_add_cprim("gtk-packer-set-default-border-width", sgtk_packer_set_default_border_width, 2);
  scm_add_cprim("gtk-packer-set-default-pad", sgtk_packer_set_default_pad, 3);
  scm_add_cprim("gtk-packer-set-default-ipad", sgtk_packer_set_default_ipad, 3);
  scm_add_cprim("gtk-packer-add-defaults", sgtk_packer_add_defaults, 5);
  scm_add_cprim("gtk-packer-add", sgtk_packer_add, 10);
  scm_add_cprim("gtk-packer-set-child-packing", sgtk_packer_set_child_packing, 10);
  scm_add_cprim("gtk-packer-reorder-child", sgtk_packer_reorder_child, 3);
  scm_add_cprim("gtk-paned-get-type", sgtk_paned_get_type, 0);
  scm_add_cprim("gtk-paned-add1", sgtk_paned_add1, 2);
  scm_add_cprim("gtk-paned-add2", sgtk_paned_add2, 2);
  scm_add_cprim("gtk-paned-pack1", sgtk_paned_pack1, 4);
  scm_add_cprim("gtk-paned-pack2", sgtk_paned_pack2, 4);
  scm_add_cprim("gtk-paned-set-position", sgtk_paned_set_position, 2);
  scm_add_cprim("gtk-paned-set-handle-size", sgtk_paned_set_handle_size, 2);
  scm_add_cprim("gtk-paned-set-gutter-size", sgtk_paned_set_gutter_size, 2);
  scm_add_cprim("gtk-paned-compute-position", sgtk_paned_compute_position, 4);
  scm_add_cprim("gtk-pixmap-get-type", sgtk_pixmap_get_type, 0);
  scm_add_cprim("gtk-pixmap-new", sgtk_pixmap_new, 2);
  scm_add_cprim("gtk-pixmap-set", sgtk_pixmap_set, 3);
  scm_add_cprim("gtk-pixmap-set-build-insensitive", sgtk_pixmap_set_build_insensitive, 2);
  scm_add_cprim("gtk-plug-get-type", sgtk_plug_get_type, 0);
  scm_add_cprim("gtk-plug-construct", sgtk_plug_construct, 2);
  scm_add_cprim("gtk-plug-new", sgtk_plug_new, 1);
  scm_add_cprim("gtk-preview-get-type", sgtk_preview_get_type, 0);
  scm_add_cprim("gtk-preview-reset", sgtk_preview_reset, 0);
  scm_add_cprim("gtk-preview-uninit", sgtk_preview_uninit, 0);
  scm_add_cprim("gtk-preview-new", sgtk_preview_new, 1);
  scm_add_cprim("gtk-preview-size", sgtk_preview_size, 3);
  scm_add_cprim("gtk-preview-put", sgtk_preview_put, 9);
  scm_add_cprim("gtk-preview-draw-row", sgtk_preview_draw_row, 5);
  scm_add_cprim("gtk-preview-set-expand", sgtk_preview_set_expand, 2);
  scm_add_cprim("gtk-preview-set-gamma", sgtk_preview_set_gamma, 1);
  scm_add_cprim("gtk-preview-set-color-cube", sgtk_preview_set_color_cube, 4);
  scm_add_cprim("gtk-preview-set-install-cmap", sgtk_preview_set_install_cmap, 1);
  scm_add_cprim("gtk-preview-set-reserved", sgtk_preview_set_reserved, 1);
  scm_add_cprim("gtk-preview-set-dither", sgtk_preview_set_dither, 2);
  scm_add_cprim("gtk-preview-get-visual", sgtk_preview_get_visual, 0);
  scm_add_cprim("gtk-preview-get-cmap", sgtk_preview_get_cmap, 0);
  scm_add_cprim("gtk-progress-get-type", sgtk_progress_get_type, 0);
  scm_add_cprim("gtk-progress-set-adjustment", sgtk_progress_set_adjustment, 2);
  scm_add_cprim("gtk-progress-configure", sgtk_progress_configure, 4);
  scm_add_cprim("gtk-progress-set-percentage", sgtk_progress_set_percentage, 2);
  scm_add_cprim("gtk-progress-get-current-percentage", sgtk_progress_get_current_percentage, 1);
  scm_add_cprim("gtk-progress-get-percentage-from-value", sgtk_progress_get_percentage_from_value, 2);
  scm_add_cprim("gtk-progress-set-value", sgtk_progress_set_value, 2);
  scm_add_cprim("gtk-progress-get-value", sgtk_progress_get_value, 1);
  scm_add_cprim("gtk-progress-set-show-text", sgtk_progress_set_show_text, 2);
  scm_add_cprim("gtk-progress-set-text-alignment", sgtk_progress_set_text_alignment, 3);
  scm_add_cprim("gtk-progress-set-format-string", sgtk_progress_set_format_string, 2);
  scm_add_cprim("gtk-progress-get-current-text", sgtk_progress_get_current_text, 1);
  scm_add_cprim("gtk-progress-get-text-from-value", sgtk_progress_get_text_from_value, 2);
  scm_add_cprim("gtk-progress-set-activity-mode", sgtk_progress_set_activity_mode, 2);
  scm_add_cprim("gtk-progress-bar-get-type", sgtk_progress_bar_get_type, 0);
  scm_add_cprim("gtk-progress-bar-new", sgtk_progress_bar_new, 0);
  scm_add_cprim("gtk-progress-bar-new-with-adjustment", sgtk_progress_bar_new_with_adjustment, 1);
  scm_add_cprim("gtk-progress-bar-update", sgtk_progress_bar_update, 2);
  scm_add_cprim("gtk-progress-bar-set-orientation", sgtk_progress_bar_set_orientation, 2);
  scm_add_cprim("gtk-progress-bar-set-bar-style", sgtk_progress_bar_set_bar_style, 2);
  scm_add_cprim("gtk-progress-bar-set-discrete-blocks", sgtk_progress_bar_set_discrete_blocks, 2);
  scm_add_cprim("gtk-progress-bar-set-activity-step", sgtk_progress_bar_set_activity_step, 2);
  scm_add_cprim("gtk-progress-bar-set-activity-blocks", sgtk_progress_bar_set_activity_blocks, 2);
  scm_add_cprim("gtk-radio-button-get-type", sgtk_radio_button_get_type, 0);
  scm_add_cprim("gtk-radio-button-new-from-widget", sgtk_radio_button_new_from_widget, 1);
  scm_add_cprim("gtk-radio-button-new-with-label-from-widget", sgtk_radio_button_new_with_label_from_widget, 2);
  scm_add_cprim("gtk-radio-menu-item-get-type", sgtk_radio_menu_item_get_type, 0);
  scm_add_cprim("gtk-range-get-type", sgtk_range_get_type, 0);
  scm_add_cprim("gtk-range-get-adjustment", sgtk_range_get_adjustment, 1);
  scm_add_cprim("gtk-range-set-update-policy", sgtk_range_set_update_policy, 2);
  scm_add_cprim("gtk-range-set-adjustment", sgtk_range_set_adjustment, 2);
  scm_add_cprim("gtk-range-draw-background", sgtk_range_draw_background, 1);
  scm_add_cprim("gtk-range-clear-background", sgtk_range_clear_background, 1);
  scm_add_cprim("gtk-range-draw-trough", sgtk_range_draw_trough, 1);
  scm_add_cprim("gtk-range-draw-slider", sgtk_range_draw_slider, 1);
  scm_add_cprim("gtk-range-draw-step-forw", sgtk_range_draw_step_forw, 1);
  scm_add_cprim("gtk-range-draw-step-back", sgtk_range_draw_step_back, 1);
  scm_add_cprim("gtk-range-slider-update", sgtk_range_slider_update, 1);
  scm_add_cprim("gtk-range-default-hslider-update", sgtk_range_default_hslider_update, 1);
  scm_add_cprim("gtk-range-default-vslider-update", sgtk_range_default_vslider_update, 1);
  scm_add_cprim("gtk-range-default-hmotion", sgtk_range_default_hmotion, 3);
  scm_add_cprim("gtk-range-default-vmotion", sgtk_range_default_vmotion, 3);
  scm_add_cprim("gtk-rc-get-theme-dir", sgtk_rc_get_theme_dir, 0);
  scm_add_cprim("gtk-rc-get-module-dir", sgtk_rc_get_module_dir, 0);
  scm_add_cprim("gtk-rc-add-default-file", sgtk_rc_add_default_file, 1);
  scm_add_cprim("gtk-rc-init", sgtk_rc_init, 0);
  scm_add_cprim("gtk-rc-parse-string", sgtk_rc_parse_string, 1);
  scm_add_cprim("gtk-rc-parse", sgtk_rc_parse, 1);
  scm_add_cprim("gtk-rc-reparse-all", sgtk_rc_reparse_all, 0);
  scm_add_cprim("gtk-rc-get-style", sgtk_rc_get_style, 1);
  scm_add_cprim("gtk-rc-find-module-in-path", sgtk_rc_find_module_in_path, 1);
  scm_add_cprim("gtk-rc-load-image", sgtk_rc_load_image, 3);
  scm_add_cprim("gtk-ruler-get-type", sgtk_ruler_get_type, 0);
  scm_add_cprim("gtk-ruler-set-metric", sgtk_ruler_set_metric, 2);
  scm_add_cprim("gtk-ruler-set-range", sgtk_ruler_set_range, 5);
  scm_add_cprim("gtk-ruler-draw-ticks", sgtk_ruler_draw_ticks, 1);
  scm_add_cprim("gtk-ruler-draw-pos", sgtk_ruler_draw_pos, 1);
  scm_add_cprim("gtk-scale-get-type", sgtk_scale_get_type, 0);
  scm_add_cprim("gtk-scale-set-digits", sgtk_scale_set_digits, 2);
  scm_add_cprim("gtk-scale-set-draw-value", sgtk_scale_set_draw_value, 2);
  scm_add_cprim("gtk-scale-set-value-pos", sgtk_scale_set_value_pos, 2);
  scm_add_cprim("gtk-scale-get-value-width", sgtk_scale_get_value_width, 1);
  scm_add_cprim("gtk-scale-draw-value", sgtk_scale_draw_value, 1);
  scm_add_cprim("gtk-scrollbar-get-type", sgtk_scrollbar_get_type, 0);
  scm_add_cprim("gtk-scrolled-window-get-type", sgtk_scrolled_window_get_type, 0);
  scm_add_cprim("gtk-scrolled-window-new", sgtk_scrolled_window_new, 2);
  scm_add_cprim("gtk-scrolled-window-set-hadjustment", sgtk_scrolled_window_set_hadjustment, 2);
  scm_add_cprim("gtk-scrolled-window-set-vadjustment", sgtk_scrolled_window_set_vadjustment, 2);
  scm_add_cprim("gtk-scrolled-window-get-hadjustment", sgtk_scrolled_window_get_hadjustment, 1);
  scm_add_cprim("gtk-scrolled-window-get-vadjustment", sgtk_scrolled_window_get_vadjustment, 1);
  scm_add_cprim("gtk-scrolled-window-set-policy", sgtk_scrolled_window_set_policy, 3);
  scm_add_cprim("gtk-scrolled-window-set-placement", sgtk_scrolled_window_set_placement, 2);
  scm_add_cprim("gtk-scrolled-window-add-with-viewport", sgtk_scrolled_window_add_with_viewport, 2);
  scm_add_cprim("gtk-selection-owner-set", sgtk_selection_owner_set, 3);
  scm_add_cprim("gtk-selection-add-target", sgtk_selection_add_target, 4);
  scm_add_cprim("gtk-selection-remove-all", sgtk_selection_remove_all, 1);
  scm_add_cprim("gtk-selection-convert", sgtk_selection_convert, 4);
  scm_add_cprim("gtk-separator-get-type", sgtk_separator_get_type, 0);
  scm_add_cprim("gtk-signal-init", sgtk_signal_init, 0);
  scm_add_cprim("gtk-signal-lookup", sgtk_signal_lookup, 2);
  scm_add_cprim("gtk-signal-name", sgtk_signal_name, 1);
  scm_add_cprim("gtk-signal-emit-stop", sgtk_signal_emit_stop, 2);
  scm_add_cprim("gtk-signal-emit-stop-by-name", sgtk_signal_emit_stop_by_name, 2);
  scm_add_cprim("gtk-signal-n-emissions", sgtk_signal_n_emissions, 2);
  scm_add_cprim("gtk-signal-n-emissions-by-name", sgtk_signal_n_emissions_by_name, 2);
  scm_add_cprim("gtk-signal-disconnect", sgtk_signal_disconnect, 2);
  scm_add_cprim("gtk-signal-handler-block", sgtk_signal_handler_block, 2);
  scm_add_cprim("gtk-signal-handler-unblock", sgtk_signal_handler_unblock, 2);
  scm_add_cprim("gtk-signal-handlers-destroy", sgtk_signal_handlers_destroy, 1);
  scm_add_cprim("gtk-signal-handler-pending", sgtk_signal_handler_pending, 3);
  scm_add_cprim("gtk-signal-handler-pending-by-id", sgtk_signal_handler_pending_by_id, 3);
  scm_add_cprim("gtk-signal-remove-emission-hook", sgtk_signal_remove_emission_hook, 2);
  scm_add_cprim("gtk-socket-get-type", sgtk_socket_get_type, 0);
  scm_add_cprim("gtk-socket-new", sgtk_socket_new, 0);
  scm_add_cprim("gtk-socket-steal", sgtk_socket_steal, 2);
  scm_add_cprim("gtk-spin-button-get-type", sgtk_spin_button_get_type, 0);
  scm_add_cprim("gtk-spin-button-update", sgtk_spin_button_update, 1);
  scm_add_cprim("gtk-spin-button-configure", sgtk_spin_button_configure, 4);
  scm_add_cprim("gtk-spin-button-new", sgtk_spin_button_new, 3);
  scm_add_cprim("gtk-spin-button-set-adjustment", sgtk_spin_button_set_adjustment, 2);
  scm_add_cprim("gtk-spin-button-get-adjustment", sgtk_spin_button_get_adjustment, 1);
  scm_add_cprim("gtk-spin-button-set-digits", sgtk_spin_button_set_digits, 2);
  scm_add_cprim("gtk-spin-button-get-value-as-float", sgtk_spin_button_get_value_as_float, 1);
  scm_add_cprim("gtk-spin-button-get-value-as-int", sgtk_spin_button_get_value_as_int, 1);
  scm_add_cprim("gtk-spin-button-set-value", sgtk_spin_button_set_value, 2);
  scm_add_cprim("gtk-spin-button-set-update-policy", sgtk_spin_button_set_update_policy, 2);
  scm_add_cprim("gtk-spin-button-set-numeric", sgtk_spin_button_set_numeric, 2);
  scm_add_cprim("gtk-spin-button-set-wrap", sgtk_spin_button_set_wrap, 2);
  scm_add_cprim("gtk-spin-button-set-shadow-type", sgtk_spin_button_set_shadow_type, 2);
  scm_add_cprim("gtk-spin-button-set-snap-to-ticks", sgtk_spin_button_set_snap_to_ticks, 2);
  scm_add_cprim("gtk-spin-button-spin", sgtk_spin_button_spin, 3);
  scm_add_cprim("gtk-statusbar-get-type", sgtk_statusbar_get_type, 0);
  scm_add_cprim("gtk-statusbar-new", sgtk_statusbar_new, 0);
  scm_add_cprim("gtk-statusbar-get-context-id", sgtk_statusbar_get_context_id, 2);
  scm_add_cprim("gtk-statusbar-push", sgtk_statusbar_push, 3);
  scm_add_cprim("gtk-statusbar-pop", sgtk_statusbar_pop, 2);
  scm_add_cprim("gtk-statusbar-remove", sgtk_statusbar_remove, 3);
  scm_add_cprim("gtk-style-copy", sgtk_style_copy, 1);
  scm_add_cprim("gtk-style-new", sgtk_style_new, 0);
  scm_add_cprim("gtk-style-attach", sgtk_style_attach, 2);
  scm_add_cprim("gtk-style-detach", sgtk_style_detach, 1);
  scm_add_cprim("gtk-style-ref", sgtk_style_ref, 1);
  scm_add_cprim("gtk-style-unref", sgtk_style_unref, 1);
  scm_add_cprim("gtk-draw-hline", sgtk_draw_hline, 6);
  scm_add_cprim("gtk-draw-vline", sgtk_draw_vline, 6);
  scm_add_cprim("gtk-draw-shadow", sgtk_draw_shadow, 8);
  scm_add_cprim("gtk-draw-arrow", sgtk_draw_arrow, 10);
  scm_add_cprim("gtk-draw-diamond", sgtk_draw_diamond, 8);
  scm_add_cprim("gtk-draw-oval", sgtk_draw_oval, 8);
  scm_add_cprim("gtk-draw-string", sgtk_draw_string, 6);
  scm_add_cprim("gtk-draw-box", sgtk_draw_box, 8);
  scm_add_cprim("gtk-draw-flat-box", sgtk_draw_flat_box, 8);
  scm_add_cprim("gtk-draw-check", sgtk_draw_check, 8);
  scm_add_cprim("gtk-draw-option", sgtk_draw_option, 8);
  scm_add_cprim("gtk-draw-cross", sgtk_draw_cross, 8);
  scm_add_cprim("gtk-draw-ramp", sgtk_draw_ramp, 9);
  scm_add_cprim("gtk-draw-tab", sgtk_draw_tab, 8);
  scm_add_cprim("gtk-draw-shadow-gap", sgtk_draw_shadow_gap, 11);
  scm_add_cprim("gtk-draw-box-gap", sgtk_draw_box_gap, 11);
  scm_add_cprim("gtk-draw-extension", sgtk_draw_extension, 9);
  scm_add_cprim("gtk-draw-focus", sgtk_draw_focus, 6);
  scm_add_cprim("gtk-draw-slider", sgtk_draw_slider, 9);
  scm_add_cprim("gtk-draw-handle", sgtk_draw_handle, 9);
  scm_add_cprim("gtk-style-set-background", sgtk_style_set_background, 3);
  scm_add_cprim("gtk-table-get-type", sgtk_table_get_type, 0);
  scm_add_cprim("gtk-table-new", sgtk_table_new, 3);
  scm_add_cprim("gtk-table-resize", sgtk_table_resize, 3);
  scm_add_cprim("gtk-table-attach", sgtk_table_attach, 10);
  scm_add_cprim("gtk-table-attach-defaults", sgtk_table_attach_defaults, 6);
  scm_add_cprim("gtk-table-set-row-spacing", sgtk_table_set_row_spacing, 3);
  scm_add_cprim("gtk-table-set-col-spacing", sgtk_table_set_col_spacing, 3);
  scm_add_cprim("gtk-table-set-row-spacings", sgtk_table_set_row_spacings, 2);
  scm_add_cprim("gtk-table-set-col-spacings", sgtk_table_set_col_spacings, 2);
  scm_add_cprim("gtk-table-set-homogeneous", sgtk_table_set_homogeneous, 2);
  scm_add_cprim("gtk-tearoff-menu-item-get-type", sgtk_tearoff_menu_item_get_type, 0);
  scm_add_cprim("gtk-tearoff-menu-item-new", sgtk_tearoff_menu_item_new, 0);
  scm_add_cprim("gtk-text-get-type", sgtk_text_get_type, 0);
  scm_add_cprim("gtk-text-new", sgtk_text_new, 2);
  scm_add_cprim("gtk-text-set-word-wrap", sgtk_text_set_word_wrap, 2);
  scm_add_cprim("gtk-text-set-line-wrap", sgtk_text_set_line_wrap, 2);
  scm_add_cprim("gtk-text-set-editable", sgtk_text_set_editable, 2);
  scm_add_cprim("gtk-text-set-adjustments", sgtk_text_set_adjustments, 3);
  scm_add_cprim("gtk-text-set-point", sgtk_text_set_point, 2);
  scm_add_cprim("gtk-text-get-point", sgtk_text_get_point, 1);
  scm_add_cprim("gtk-text-get-length", sgtk_text_get_length, 1);
  scm_add_cprim("gtk-text-freeze", sgtk_text_freeze, 1);
  scm_add_cprim("gtk-text-thaw", sgtk_text_thaw, 1);
  scm_add_cprim("gtk-text-insert", sgtk_text_insert, 6);
  scm_add_cprim("gtk-text-backward-delete", sgtk_text_backward_delete, 2);
  scm_add_cprim("gtk-text-forward-delete", sgtk_text_forward_delete, 2);
  scm_add_cprim("gtk-tips-query-get-type", sgtk_tips_query_get_type, 0);
  scm_add_cprim("gtk-tips-query-new", sgtk_tips_query_new, 0);
  scm_add_cprim("gtk-tips-query-set-labels", sgtk_tips_query_set_labels, 3);
  scm_add_cprim("gtk-tips-query-set-caller", sgtk_tips_query_set_caller, 2);
  scm_add_cprim("gtk-tips-query-start-query", sgtk_tips_query_start_query, 1);
  scm_add_cprim("gtk-tips-query-stop-query", sgtk_tips_query_stop_query, 1);
  scm_add_cprim("gtk-toggle-button-get-type", sgtk_toggle_button_get_type, 0);
  scm_add_cprim("gtk-toggle-button-new", sgtk_toggle_button_new, 0);
  scm_add_cprim("gtk-toggle-button-new-with-label", sgtk_toggle_button_new_with_label, 1);
  scm_add_cprim("gtk-toggle-button-set-mode", sgtk_toggle_button_set_mode, 2);
  scm_add_cprim("gtk-toggle-button-set-active", sgtk_toggle_button_set_active, 2);
  scm_add_cprim("gtk-toggle-button-get-active", sgtk_toggle_button_get_active, 1);
  scm_add_cprim("gtk-toggle-button-toggled", sgtk_toggle_button_toggled, 1);
  scm_add_cprim("gtk-toolbar-get-type", sgtk_toolbar_get_type, 0);
  scm_add_cprim("gtk-toolbar-new", sgtk_toolbar_new, 2);
  scm_add_cprim("gtk-toolbar-append-space", sgtk_toolbar_append_space, 1);
  scm_add_cprim("gtk-toolbar-prepend-space", sgtk_toolbar_prepend_space, 1);
  scm_add_cprim("gtk-toolbar-insert-space", sgtk_toolbar_insert_space, 2);
  scm_add_cprim("gtk-toolbar-append-widget", sgtk_toolbar_append_widget, 4);
  scm_add_cprim("gtk-toolbar-prepend-widget", sgtk_toolbar_prepend_widget, 4);
  scm_add_cprim("gtk-toolbar-insert-widget", sgtk_toolbar_insert_widget, 5);
  scm_add_cprim("gtk-toolbar-set-orientation", sgtk_toolbar_set_orientation, 2);
  scm_add_cprim("gtk-toolbar-set-style", sgtk_toolbar_set_style, 2);
  scm_add_cprim("gtk-toolbar-set-space-size", sgtk_toolbar_set_space_size, 2);
  scm_add_cprim("gtk-toolbar-set-space-style", sgtk_toolbar_set_space_style, 2);
  scm_add_cprim("gtk-toolbar-set-tooltips", sgtk_toolbar_set_tooltips, 2);
  scm_add_cprim("gtk-toolbar-set-button-relief", sgtk_toolbar_set_button_relief, 2);
  scm_add_cprim("gtk-toolbar-get-button-relief", sgtk_toolbar_get_button_relief, 1);
  scm_add_cprim("gtk-tooltips-get-type", sgtk_tooltips_get_type, 0);
  scm_add_cprim("gtk-tooltips-new", sgtk_tooltips_new, 0);
  scm_add_cprim("gtk-tooltips-force-window", sgtk_tooltips_force_window, 1);
  scm_add_cprim("gtk-tooltips-enable", sgtk_tooltips_enable, 1);
  scm_add_cprim("gtk-tooltips-disable", sgtk_tooltips_disable, 1);
  scm_add_cprim("gtk-tooltips-set-delay", sgtk_tooltips_set_delay, 2);
  scm_add_cprim("gtk-tooltips-set-tip", sgtk_tooltips_set_tip, 4);
  scm_add_cprim("gtk-tooltips-set-colors", sgtk_tooltips_set_colors, 3);
  scm_add_cprim("gtk-tree-get-type", sgtk_tree_get_type, 0);
  scm_add_cprim("gtk-tree-new", sgtk_tree_new, 0);
  scm_add_cprim("gtk-tree-append", sgtk_tree_append, 2);
  scm_add_cprim("gtk-tree-prepend", sgtk_tree_prepend, 2);
  scm_add_cprim("gtk-tree-insert", sgtk_tree_insert, 3);
  scm_add_cprim("gtk-tree-child-position", sgtk_tree_child_position, 2);
  scm_add_cprim("gtk-tree-clear-items", sgtk_tree_clear_items, 3);
  scm_add_cprim("gtk-tree-remove-item", sgtk_tree_remove_item, 2);
  scm_add_cprim("gtk-tree-select-child", sgtk_tree_select_child, 2);
  scm_add_cprim("gtk-tree-select-item", sgtk_tree_select_item, 2);
  scm_add_cprim("gtk-tree-unselect-child", sgtk_tree_unselect_child, 2);
  scm_add_cprim("gtk-tree-unselect-item", sgtk_tree_unselect_item, 2);
  scm_add_cprim("gtk-tree-set-selection-mode", sgtk_tree_set_selection_mode, 2);
  scm_add_cprim("gtk-tree-set-view-mode", sgtk_tree_set_view_mode, 2);
  scm_add_cprim("gtk-tree-set-view-lines", sgtk_tree_set_view_lines, 2);
  scm_add_cprim("gtk-tree-item-get-type", sgtk_tree_item_get_type, 0);
  scm_add_cprim("gtk-tree-item-new", sgtk_tree_item_new, 0);
  scm_add_cprim("gtk-tree-item-new-with-label", sgtk_tree_item_new_with_label, 1);
  scm_add_cprim("gtk-tree-item-set-subtree", sgtk_tree_item_set_subtree, 2);
  scm_add_cprim("gtk-tree-item-select", sgtk_tree_item_select, 1);
  scm_add_cprim("gtk-tree-item-deselect", sgtk_tree_item_deselect, 1);
  scm_add_cprim("gtk-tree-item-expand", sgtk_tree_item_expand, 1);
  scm_add_cprim("gtk-tree-item-collapse", sgtk_tree_item_collapse, 1);
  scm_add_cprim("gtk-tree-item-remove-subtree", sgtk_tree_item_remove_subtree, 1);
  scm_add_cprim("gtk-type-init", sgtk_type_init, 0);
  scm_add_cprim("gtk-type-set-chunk-alloc", sgtk_type_set_chunk_alloc, 2);
  scm_add_cprim("gtk-type-name", sgtk_type_name, 1);
  scm_add_cprim("gtk-type-from-name", sgtk_type_from_name, 1);
  scm_add_cprim("gtk-type-parent", sgtk_type_parent, 1);
  scm_add_cprim("gtk-type-parent-class", sgtk_type_parent_class, 1);
  scm_add_cprim("gtk-type-class", sgtk_type_class, 1);
  scm_add_cprim("gtk-type-new", sgtk_type_new, 1);
  scm_add_cprim("gtk-type-describe-heritage", sgtk_type_describe_heritage, 1);
  scm_add_cprim("gtk-type-describe-tree", sgtk_type_describe_tree, 2);
  scm_add_cprim("gtk-type-is-a", sgtk_type_is_a, 2);
  scm_add_cprim("gtk-type-set-varargs-type", sgtk_type_set_varargs_type, 2);
  scm_add_cprim("gtk-type-get-varargs-type", sgtk_type_get_varargs_type, 1);
  scm_add_cprim("gtk-identifier-get-type", sgtk_identifier_get_type, 0);
  scm_add_cprim("gtk-vbutton-box-get-type", sgtk_vbutton_box_get_type, 0);
  scm_add_cprim("gtk-vbutton-box-new", sgtk_vbutton_box_new, 0);
  scm_add_cprim("gtk-vbutton-box-set-spacing-default", sgtk_vbutton_box_set_spacing_default, 1);
  scm_add_cprim("gtk-vbutton-box-set-layout-default", sgtk_vbutton_box_set_layout_default, 1);
  scm_add_cprim("gtk-vbutton-box-get-spacing-default", sgtk_vbutton_box_get_spacing_default, 0);
  scm_add_cprim("gtk-vbutton-box-get-layout-default", sgtk_vbutton_box_get_layout_default, 0);
  scm_add_cprim("gtk-vbox-get-type", sgtk_vbox_get_type, 0);
  scm_add_cprim("gtk-vbox-new", sgtk_vbox_new, 2);
  scm_add_cprim("gtk-viewport-get-type", sgtk_viewport_get_type, 0);
  scm_add_cprim("gtk-viewport-new", sgtk_viewport_new, 2);
  scm_add_cprim("gtk-viewport-get-hadjustment", sgtk_viewport_get_hadjustment, 1);
  scm_add_cprim("gtk-viewport-get-vadjustment", sgtk_viewport_get_vadjustment, 1);
  scm_add_cprim("gtk-viewport-set-hadjustment", sgtk_viewport_set_hadjustment, 2);
  scm_add_cprim("gtk-viewport-set-vadjustment", sgtk_viewport_set_vadjustment, 2);
  scm_add_cprim("gtk-viewport-set-shadow-type", sgtk_viewport_set_shadow_type, 2);
  scm_add_cprim("gtk-vpaned-get-type", sgtk_vpaned_get_type, 0);
  scm_add_cprim("gtk-vpaned-new", sgtk_vpaned_new, 0);
  scm_add_cprim("gtk-vruler-get-type", sgtk_vruler_get_type, 0);
  scm_add_cprim("gtk-vruler-new", sgtk_vruler_new, 0);
  scm_add_cprim("gtk-vscale-get-type", sgtk_vscale_get_type, 0);
  scm_add_cprim("gtk-vscale-new", sgtk_vscale_new, 1);
  scm_add_cprim("gtk-vscrollbar-get-type", sgtk_vscrollbar_get_type, 0);
  scm_add_cprim("gtk-vscrollbar-new", sgtk_vscrollbar_new, 1);
  scm_add_cprim("gtk-vseparator-get-type", sgtk_vseparator_get_type, 0);
  scm_add_cprim("gtk-vseparator-new", sgtk_vseparator_new, 0);
  scm_add_cprim("gtk-widget-get-type", sgtk_widget_get_type, 0);
  scm_add_cprim("gtk-widget-unparent", sgtk_widget_unparent, 1);
  scm_add_cprim("gtk-widget-destroy", sgtk_widget_destroy, 1);
  scm_add_cprim("gtk-widget-show", sgtk_widget_show, 1);
  scm_add_cprim("gtk-widget-show-now", sgtk_widget_show_now, 1);
  scm_add_cprim("gtk-widget-hide", sgtk_widget_hide, 1);
  scm_add_cprim("gtk-widget-hide-on-delete", sgtk_widget_hide_on_delete, 1);
  scm_add_cprim("gtk-widget-show-all", sgtk_widget_show_all, 1);
  scm_add_cprim("gtk-widget-hide-all", sgtk_widget_hide_all, 1);
  scm_add_cprim("gtk-widget-map", sgtk_widget_map, 1);
  scm_add_cprim("gtk-widget-unmap", sgtk_widget_unmap, 1);
  scm_add_cprim("gtk-widget-realize", sgtk_widget_realize, 1);
  scm_add_cprim("gtk-widget-unrealize", sgtk_widget_unrealize, 1);
  scm_add_cprim("gtk-widget-queue-draw-area", sgtk_widget_queue_draw_area, 5);
  scm_add_cprim("gtk-widget-queue-draw", sgtk_widget_queue_draw, 1);
  scm_add_cprim("gtk-widget-queue-clear-area", sgtk_widget_queue_clear_area, 5);
  scm_add_cprim("gtk-widget-queue-clear", sgtk_widget_queue_clear, 1);
  scm_add_cprim("gtk-widget-queue-resize", sgtk_widget_queue_resize, 1);
  scm_add_cprim("gtk-widget-draw-focus", sgtk_widget_draw_focus, 1);
  scm_add_cprim("gtk-widget-draw-default", sgtk_widget_draw_default, 1);
  scm_add_cprim("gtk-widget-lock-accelerators", sgtk_widget_lock_accelerators, 1);
  scm_add_cprim("gtk-widget-unlock-accelerators", sgtk_widget_unlock_accelerators, 1);
  scm_add_cprim("gtk-widget-accelerators-locked", sgtk_widget_accelerators_locked, 1);
  scm_add_cprim("gtk-widget-add-accelerator", sgtk_widget_add_accelerator, 6);
  scm_add_cprim("gtk-widget-remove-accelerator", sgtk_widget_remove_accelerator, 4);
  scm_add_cprim("gtk-widget-remove-accelerators", sgtk_widget_remove_accelerators, 3);
  scm_add_cprim("gtk-widget-accelerator-signal", sgtk_widget_accelerator_signal, 4);
  scm_add_cprim("gtk-widget-event", sgtk_widget_event, 2);
  scm_add_cprim("gtk-widget-activate", sgtk_widget_activate, 1);
  scm_add_cprim("gtk-widget-set-scroll-adjustments", sgtk_widget_set_scroll_adjustments, 3);
  scm_add_cprim("gtk-widget-reparent", sgtk_widget_reparent, 2);
  scm_add_cprim("gtk-widget-popup", sgtk_widget_popup, 3);
  scm_add_cprim("gtk-widget-grab-focus", sgtk_widget_grab_focus, 1);
  scm_add_cprim("gtk-widget-grab-default", sgtk_widget_grab_default, 1);
  scm_add_cprim("gtk-widget-set-name", sgtk_widget_set_name, 2);
  scm_add_cprim("gtk-widget-get-name", sgtk_widget_get_name, 1);
  scm_add_cprim("gtk-widget-set-state", sgtk_widget_set_state, 2);
  scm_add_cprim("gtk-widget-set-app-paintable", sgtk_widget_set_app_paintable, 2);
  scm_add_cprim("gtk-widget-set-sensitive", sgtk_widget_set_sensitive, 2);
  scm_add_cprim("gtk-widget-set-parent", sgtk_widget_set_parent, 2);
  scm_add_cprim("gtk-widget-set-style", sgtk_widget_set_style, 2);
  scm_add_cprim("gtk-widget-ensure-style", sgtk_widget_ensure_style, 1);
  scm_add_cprim("gtk-widget-set-rc-style", sgtk_widget_set_rc_style, 1);
  scm_add_cprim("gtk-widget-restore-default-style", sgtk_widget_restore_default_style, 1);
  scm_add_cprim("gtk-widget-get-style", sgtk_widget_get_style, 1);
  scm_add_cprim("gtk-widget-reset-rc-styles", sgtk_widget_reset_rc_styles, 1);
  scm_add_cprim("gtk-widget-set-default-style", sgtk_widget_set_default_style, 1);
  scm_add_cprim("gtk-widget-get-default-style", sgtk_widget_get_default_style, 0);
  scm_add_cprim("gtk-widget-push-style", sgtk_widget_push_style, 1);
  scm_add_cprim("gtk-widget-pop-style", sgtk_widget_pop_style, 0);
  scm_add_cprim("gtk-widget-set-parent-window", sgtk_widget_set_parent_window, 2);
  scm_add_cprim("gtk-widget-get-parent-window", sgtk_widget_get_parent_window, 1);
  scm_add_cprim("gtk-widget-set-uposition", sgtk_widget_set_uposition, 3);
  scm_add_cprim("gtk-widget-set-usize", sgtk_widget_set_usize, 3);
  scm_add_cprim("gtk-widget-set-events", sgtk_widget_set_events, 2);
  scm_add_cprim("gtk-widget-add-events", sgtk_widget_add_events, 2);
  scm_add_cprim("gtk-widget-set-extension-events", sgtk_widget_set_extension_events, 2);
  scm_add_cprim("gtk-widget-get-toplevel", sgtk_widget_get_toplevel, 1);
  scm_add_cprim("gtk-widget-get-ancestor", sgtk_widget_get_ancestor, 2);
  scm_add_cprim("gtk-widget-get-colormap", sgtk_widget_get_colormap, 1);
  scm_add_cprim("gtk-widget-get-visual", sgtk_widget_get_visual, 1);
  scm_add_cprim("gtk-widget-set-colormap", sgtk_widget_set_colormap, 2);
  scm_add_cprim("gtk-widget-set-visual", sgtk_widget_set_visual, 2);
  scm_add_cprim("gtk-widget-get-events", sgtk_widget_get_events, 1);
  scm_add_cprim("gtk-widget-get-extension-events", sgtk_widget_get_extension_events, 1);
  scm_add_cprim("gtk-widget-is-ancestor", sgtk_widget_is_ancestor, 2);
  scm_add_cprim("gtk-widget-set-composite-name", sgtk_widget_set_composite_name, 2);
  scm_add_cprim("gtk-widget-get-composite-name", sgtk_widget_get_composite_name, 1);
  scm_add_cprim("gtk-widget-push-composite-child", sgtk_widget_push_composite_child, 0);
  scm_add_cprim("gtk-widget-pop-composite-child", sgtk_widget_pop_composite_child, 0);
  scm_add_cprim("gtk-widget-push-colormap", sgtk_widget_push_colormap, 1);
  scm_add_cprim("gtk-widget-push-visual", sgtk_widget_push_visual, 1);
  scm_add_cprim("gtk-widget-pop-colormap", sgtk_widget_pop_colormap, 0);
  scm_add_cprim("gtk-widget-pop-visual", sgtk_widget_pop_visual, 0);
  scm_add_cprim("gtk-widget-set-default-colormap", sgtk_widget_set_default_colormap, 1);
  scm_add_cprim("gtk-widget-set-default-visual", sgtk_widget_set_default_visual, 1);
  scm_add_cprim("gtk-widget-get-default-colormap", sgtk_widget_get_default_colormap, 0);
  scm_add_cprim("gtk-widget-get-default-visual", sgtk_widget_get_default_visual, 0);
  scm_add_cprim("gtk-widget-shape-combine-mask", sgtk_widget_shape_combine_mask, 4);
  scm_add_cprim("gtk-widget-reset-shapes", sgtk_widget_reset_shapes, 1);
  scm_add_cprim("gtk-widget-ref", sgtk_widget_ref, 1);
  scm_add_cprim("gtk-widget-unref", sgtk_widget_unref, 1);
  scm_add_cprim("gtk-window-get-type", sgtk_window_get_type, 0);
  scm_add_cprim("gtk-window-new", sgtk_window_new, 1);
  scm_add_cprim("gtk-window-set-title", sgtk_window_set_title, 2);
  scm_add_cprim("gtk-window-set-wmclass", sgtk_window_set_wmclass, 3);
  scm_add_cprim("gtk-window-set-focus", sgtk_window_set_focus, 2);
  scm_add_cprim("gtk-window-set-default", sgtk_window_set_default, 2);
  scm_add_cprim("gtk-window-set-policy", sgtk_window_set_policy, 4);
  scm_add_cprim("gtk-window-add-accel-group", sgtk_window_add_accel_group, 2);
  scm_add_cprim("gtk-window-remove-accel-group", sgtk_window_remove_accel_group, 2);
  scm_add_cprim("gtk-window-set-position", sgtk_window_set_position, 2);
  scm_add_cprim("gtk-window-activate-focus", sgtk_window_activate_focus, 1);
  scm_add_cprim("gtk-window-activate-default", sgtk_window_activate_default, 1);
  scm_add_cprim("gtk-window-set-modal", sgtk_window_set_modal, 2);
  scm_add_cprim("gtk-window-add-embedded-xid", sgtk_window_add_embedded_xid, 2);
  scm_add_cprim("gtk-window-remove-embedded-xid", sgtk_window_remove_embedded_xid, 2);
  scm_add_cprim("gtk-window-reposition", sgtk_window_reposition, 3);
  scm_add_cprim("gtk-window-set-transient-for", sgtk_window_set_transient_for, 2);
  scm_add_cprim("gtk-window-set-default-size", sgtk_window_set_default_size, 3);
  scm_puts("; gtkdefs loaded...\n");
}