CAMLprim value ml_gtkrange_init(value unit)
{
/* Since these are declared const, must force gcc to call them! */
GType t =
gtk_progress_bar_get_type() +
gtk_hscale_get_type() +
gtk_vscale_get_type() +
gtk_hscrollbar_get_type() +
gtk_vscrollbar_get_type() +
gtk_hruler_get_type() +
gtk_vruler_get_type();
return Val_GType(t);
}
CLIP_DLLEXPORT GtkType _gtk_type_hruler() { return gtk_hruler_get_type(); }
GtkWidget*
gtk_hruler_new (void)
{
return GTK_WIDGET (gtk_type_new (gtk_hruler_get_type ()));
}
