gtksourceview2 0.90.6

data/ext/gtksourceview2/rbgtksourcelanguagemanager.c

@@ -0,0 +1,188 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtksourcelanguagemanager.c -
+
+  $Author $
+  $Date: 2004/08/05 18:13:49 $
+
+  Copyright (C) 2004 Ruby-GNOME2 Project Team
+  Copyright (C) 2003 Geoff Youngs, based on gtktextview.c by Masao Mutoh
+************************************************/
+#include "rbgtksourcemain.h"
+
+/* Class: Gtk::SourceLanguageManager
+ * A class to manage source language.
+ */
+
+#define _SELF(self) (GTK_SOURCE_LANGUAGE_MANAGER(RVAL2GOBJ(self)))
+
+/* Class method: new
+ * Returns: a newly created Gtk::SourceLanguageManager object.
+ */
+static VALUE
+slm_new (self)
+	VALUE self;
+{
+	G_INITIALIZE (self, gtk_source_language_manager_new ());
+	return Qnil;
+}
+
+/* Class method: default
+ *
+ * Gets the default language manager.
+ *
+ * Returns: a Gtk::SourceLanguageManager
+ */
+static VALUE
+slm_get_default(self)
+    VALUE self;
+{
+    GtkSourceLanguageManager* slm = gtk_source_language_manager_get_default();
+    GType gtype = G_TYPE_FROM_INSTANCE(slm);
+
+    gchar *gtypename = (gchar *) g_type_name (gtype);
+    if (strncmp (gtypename, "Gtk", 3) == 0)
+        gtypename += 3;
+    if (!rb_const_defined_at (mGtk, rb_intern (gtypename)))
+        G_DEF_CLASS (gtype, gtypename, mGtk);
+
+    return GOBJ2RVAL(slm);
+}
+
+/* Method: set_search_path(dirs)
+ * dirs: language file directory path
+ *
+ * Sets the language files directories for the given language manager.
+ *
+ * Returns: self.
+ */
+static VALUE
+slm_set_search_path (self, dirs)
+	VALUE self, dirs;
+{
+    gchar** gdirs = (gchar**)NULL;
+	gint i;
+
+    if (! NIL_P(dirs)){
+        Check_Type(dirs, T_ARRAY);
+        i = RARRAY_LEN(dirs);
+        gdirs = ALLOCA_N(gchar*, i + 1);
+        for (i = 0; i < i; i++) {
+            if (TYPE(RARRAY_PTR(dirs)[i]) == T_STRING) {
+                gdirs[i] = RVAL2CSTR(RARRAY_PTR(dirs)[i]);
+            }
+            else {
+                gdirs[i] = "";
+            }
+        }
+        gdirs[i] = (gchar*)NULL;
+    }
+
+	gtk_source_language_manager_set_search_path (_SELF (self), gdirs);
+
+	return self;
+}
+
+/* Method: search_path
+ * Returns: a list of language files directories (strings) for the given
+ * language manager.
+ */
+static VALUE
+slm_get_search_path (self)
+	VALUE self;
+{
+	VALUE ary;
+ 	const gchar * const * dirs =
+            gtk_source_language_manager_get_search_path (_SELF (self));
+    if (!dirs)
+        return Qnil;
+
+    ary = rb_ary_new();
+    while (*dirs){
+        rb_ary_push(ary, CSTR2RVAL(*dirs));
+        dirs++;
+    }
+    return ary;
+}
+
+/* Method: language_ids
+ * Returns: a list of languages ids for the given language manager
+ */
+static VALUE
+slm_get_language_ids (self)
+	VALUE self;
+{
+	VALUE ary;
+ 	const gchar * const * ids =
+            gtk_source_language_manager_get_language_ids (_SELF (self));
+    if (!ids)
+        return Qnil;
+
+    ary = rb_ary_new();
+    while (*ids){
+        rb_ary_push(ary, CSTR2RVAL(*ids));
+        ids++;
+    }
+    return ary;
+}
+
+/*
+ * Method: get_language(id)
+ * id: a language id (as a string).
+ *
+ * Gets the Gtk::SourceLanguage which is associated with the given id
+ * in the language manager.
+ *
+ * Returns: a Gtk::SourceLanguage, or nil if there is no language associated
+ * with the given id.
+ */
+static VALUE
+slm_get_language (self, id)
+	VALUE self, id;
+{
+	return
+	    GOBJ2RVAL (gtk_source_language_manager_get_language
+		       (_SELF (self), RVAL2CSTR (id)));
+}
+
+#ifdef HAVE_GTK_SOURCE_LANGUAGE_MANAGER_GUESS_LANGUAGE
+/*
+ * Method: guess_language(filename, content_type)
+ * filename: a file name (as a string), or nil.
+ * content_type: content type (as a string), or nil.
+ *
+ * Guesses the Gtk::SourceLanguage for the given file name and content type.
+ *
+ * Returns: a Gtk::SourceLanguage, or nil if there is no language associated
+ * with the given filename or content_type.
+ */
+static VALUE
+slm_guess_language (self, filename, content_type)
+	VALUE self, filename, content_type;
+{
+	return GOBJ2RVAL (gtk_source_language_manager_guess_language
+	                     (_SELF (self),
+		                  NIL_P(filename) ? NULL : RVAL2CSTR (filename),
+		                  NIL_P(content_type) ? NULL : RVAL2CSTR (content_type)));
+}
+#endif /* HAVE_GTK_SOURCE_LANGUAGE_MANAGER_GUESS_LANGUAGE */
+
+void
+Init_gtk_sourcelanguagemanager ()
+{
+	VALUE cslm =
+	    G_DEF_CLASS (GTK_TYPE_SOURCE_LANGUAGE_MANAGER,
+			 "SourceLanguageManager", mGtk);
+
+	rb_define_method (cslm, "initialize", slm_new, 0);
+	rb_define_method (cslm, "set_search_path", slm_set_search_path, 1);
+	rb_define_method (cslm, "search_path", slm_get_search_path, 0);
+	rb_define_method (cslm, "language_ids", slm_get_language_ids, 0);
+	rb_define_method (cslm, "get_language", slm_get_language, 1);
+#ifdef HAVE_GTK_SOURCE_LANGUAGE_MANAGER_GUESS_LANGUAGE
+	rb_define_method (cslm, "guess_language", slm_guess_language, 2);
+#endif
+	rb_define_singleton_method(cslm, "default", slm_get_default, 0);
+	G_DEF_SETTERS (cslm);
+}

data/ext/gtksourceview2/rbgtksourcemain.c

@@ -0,0 +1,38 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtksourcemain.c -
+
+  $Author $
+  $Date: 2005/10/07 19:26:15 $
+
+  Copyright (C) 2004,2005 Ruby-GNOME2 Project Team
+  Copyright (C) 2003 Geoff Youngs, based on gtktextview.c by Masao Mutoh
+************************************************/
+#include "rbgtksourcemain.h"
+
+extern void Init_gtk_sourceview (void);
+extern void Init_gtk_sourcebuffer (void);
+extern void Init_gtk_sourceiter (void);
+extern void Init_gtk_sourcelanguage (void);
+extern void Init_gtk_sourcelanguagemanager (void);
+extern void Init_gtk_sourcemark (void);
+extern void Init_gtk_sourceprintcompositor (void);
+extern void Init_gtk_sourcestyle (void);
+extern void Init_gtk_sourcestylescheme (void);
+extern void Init_gtk_sourcestyleschememanager (void);
+
+void
+Init_gtksourceview2 (void)
+{
+    Init_gtk_sourceview ();
+    Init_gtk_sourcebuffer ();
+    Init_gtk_sourceiter ();
+    Init_gtk_sourcelanguage ();
+    Init_gtk_sourcelanguagemanager ();
+    Init_gtk_sourcemark ();
+    Init_gtk_sourceprintcompositor ();
+    Init_gtk_sourcestyle ();
+    Init_gtk_sourcestylescheme ();
+    Init_gtk_sourcestyleschememanager ();
+}

data/ext/gtksourceview2/rbgtksourcemain.h

@@ -0,0 +1,32 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtksourcemain.h -
+
+  $Author: mutoh $
+  $Date: 2005/10/07 19:26:15 $
+
+  Copyright (C) 2004,2005 Ruby-GNOME2 Project Team
+  Copyright (C) 2003 Geoff Youngs
+************************************************/
+
+#ifndef __RBGTKSOURCEVIEWMAIN_H_
+#define __RBGTKSOURCEVIEWMAIN_H_
+
+#include <gtksourceview/gtksourcebuffer.h>
+#include <gtksourceview/gtksourceiter.h>
+#include <gtksourceview/gtksourcelanguage.h>
+#include <gtksourceview/gtksourcelanguagemanager.h>
+#include <gtksourceview/gtksourcemark.h>
+#include <gtksourceview/gtksourceprintcompositor.h>
+#include <gtksourceview/gtksourcestyle.h>
+#include <gtksourceview/gtksourcestylescheme.h>
+#include <gtksourceview/gtksourcestyleschememanager.h>
+#include <gtksourceview/gtksourceview.h>
+#include <gtksourceview/gtksourceview-typebuiltins.h>
+
+#include "ruby.h"
+#include "rbgtk.h"
+#include "rbgtksourceview2version.h"
+
+#endif /* __RBGTKSOURCEVIEWMAIN_H_ */

data/ext/gtksourceview2/rbgtksourcemark.c

@@ -0,0 +1,90 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtksourcemark.c -
+
+  $Author $
+  $Date: 2004/08/05 18:13:49 $
+
+  Copyright (C) 2003 Geoff Youngs, based on gtktextview.c by Masao Mutoh
+************************************************/
+#include "rbgtksourcemain.h"
+
+#ifdef HAVE_GTK_SOURCE_MARK_GET_TYPE
+/* Class: Gtk::SourceMark
+ * A source mark.
+ */
+
+#define _SELF(self) (GTK_SOURCE_MARK(RVAL2GOBJ(self)))
+
+/* Class method: new(name, category)
+ * name: mark name (string)
+ * category: marker category (string)
+ *
+ * Returns: a newly created Gtk::SourceMark object.
+ */
+static VALUE
+sourcemark_new (self, name, category)
+	VALUE self, name, category;
+{
+	G_INITIALIZE (self,
+		      gtk_source_mark_new (RVAL2CSTR(name), RVAL2CSTR(category)));
+	return Qnil;
+}
+
+/* Defined as properties.
+const gchar*        gtk_source_mark_get_category        (GtkSourceMark *mark);
+*/
+
+/* Method: next(category=nil)
+ * category: the category (string), or nil.
+ *
+ * Returns: the next Gtk::SourceMark after the mark.
+ */
+static VALUE
+sourcemark_next (argc, argv, self)
+    int argc;
+    VALUE *argv;
+    VALUE self;
+{
+    VALUE category;
+
+    rb_scan_args (argc, argv, "01", &category);
+
+    return GOBJ2RVAL (gtk_source_mark_next (_SELF (self),
+                                NIL_P (category) ? NULL : RVAL2CSTR(category)));
+}
+
+/* Method: prev(category=nil)
+ * category: the category (string), or nil.
+ *
+ * Returns: the previous Gtk::SourceMark before the mark.
+ */
+static VALUE
+sourcemark_prev (argc, argv, self)
+    int argc;
+    VALUE *argv;
+    VALUE self;
+{
+    VALUE category;
+
+    rb_scan_args (argc, argv, "01", &category);
+
+    return GOBJ2RVAL (gtk_source_mark_prev (_SELF (self),
+                                NIL_P (category) ? NULL : RVAL2CSTR(category)));
+}
+#endif /* HAVE_GTK_SOURCE_MARK_GET_TYPE */
+
+void
+Init_gtk_sourcemark ()
+{
+#ifdef HAVE_GTK_SOURCE_MARK_GET_TYPE
+	VALUE csm = G_DEF_CLASS (GTK_TYPE_SOURCE_MARK, "SourceMark", mGtk);
+
+	rb_define_method (csm, "initialize", sourcemark_new, 2);
+	rb_define_method (csm, "next", sourcemark_next, -1);
+	rb_define_method (csm, "prev", sourcemark_prev, -1);
+
+	G_DEF_SETTERS (csm);
+#endif /* HAVE_GTK_SOURCE_MARK_GET_TYPE */
+}

data/ext/gtksourceview2/rbgtksourceprintcompositor.c

@@ -0,0 +1,249 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtksourceprintcompositor.c -
+
+  $Author: ggc $
+  $Date: 2007/07/13 16:07:33 $
+
+  Copyright (C) 2005  Masao Mutoh
+************************************************/
+#include "rbgtksourcemain.h"
+
+#ifdef HAVE_GTK_SOURCE_PRINT_COMPOSITOR_GET_TYPE
+/* Module: Gtk::SourcePrintCompositor
+ */
+#define _SELF(self) (GTK_SOURCE_PRINT_COMPOSITOR(RVAL2GOBJ(self)))
+#define RVAL2UNIT(o) (RVAL2GENUM(o, GTK_TYPE_UNIT))
+
+/*
+ * Class method: new(buffer)
+ * buffer: a Gtk::SourceBuffer or Gtk::SourceView object.
+ *
+ * Creates a new print compositor to print buffer.
+ *
+ * Returns: the new print compositor object.
+ */
+static VALUE
+sprintcompositor_initialize (self, val)
+    VALUE self, val;
+{
+    if (rb_obj_is_kind_of (val, GTYPE2CLASS (GTK_TYPE_SOURCE_BUFFER))) {
+       G_INITIALIZE(self,
+           gtk_source_print_compositor_new (GTK_SOURCE_BUFFER (RVAL2GOBJ (val))));
+    } else
+        if (rb_obj_is_kind_of (val, GTYPE2CLASS (GTK_TYPE_SOURCE_VIEW))) {
+            G_INITIALIZE(self,
+                gtk_source_print_compositor_new_from_view (GTK_SOURCE_VIEW (RVAL2GOBJ (val))));
+    } else {
+        rb_raise (rb_eArgError,
+            "invalid argument %s (expect Gtk::SourceBuffer or Gtk::SourceView)",
+            rb_class2name (CLASS_OF (val)));
+    }
+    return Qnil;
+}
+
+/* Defined as properties.
+GtkSourceBuffer*    gtk_source_print_compositor_get_buffer
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_tab_width
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         guint width);
+guint               gtk_source_print_compositor_get_tab_width
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_wrap_mode
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         GtkWrapMode wrap_mode);
+GtkWrapMode         gtk_source_print_compositor_get_wrap_mode
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_highlight_syntax
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         gboolean highlight);
+gboolean            gtk_source_print_compositor_get_highlight_syntax
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_print_line_numbers
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         guint interval);
+guint               gtk_source_print_compositor_get_print_line_numbers
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_body_font_name
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         const gchar *font_name);
+gchar*              gtk_source_print_compositor_get_body_font_name
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_line_numbers_font_name
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         const gchar *font_name);
+gchar*              gtk_source_print_compositor_get_line_numbers_font_name
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_header_font_name
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         const gchar *font_name);
+gchar*              gtk_source_print_compositor_get_header_font_name
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_footer_font_name
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         const gchar *font_name);
+gchar*              gtk_source_print_compositor_get_footer_font_name
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_print_header
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         gboolean print);
+gboolean            gtk_source_print_compositor_get_print_header
+                                                        (GtkSourcePrintCompositor *compositor);
+void                gtk_source_print_compositor_set_print_footer
+                                                        (GtkSourcePrintCompositor *compositor,
+                                                         gboolean print);
+gboolean            gtk_source_print_compositor_get_print_footer
+                                                        (GtkSourcePrintCompositor *compositor);
+gint                gtk_source_print_compositor_get_n_pages
+                                                        (GtkSourcePrintCompositor *compositor);
+*/
+
+static VALUE
+sprintcompositor_get_top_margin(self, unit)
+    VALUE self, unit;
+{
+    return DBL2NUM(gtk_source_print_compositor_get_top_margin(_SELF(self), RVAL2UNIT (unit)));
+}
+
+static VALUE
+sprintcompositor_set_top_margin(self, top, unit)
+    VALUE self, top, unit;
+{
+    gtk_source_print_compositor_set_top_margin(_SELF(self), NUM2DBL(top), RVAL2UNIT (unit));
+    return self;
+}
+
+static VALUE
+sprintcompositor_get_bottom_margin(self, unit)
+    VALUE self, unit;
+{
+    return DBL2NUM(gtk_source_print_compositor_get_bottom_margin(_SELF(self), RVAL2UNIT (unit)));
+}
+
+static VALUE
+sprintcompositor_set_bottom_margin(self, bottom, unit)
+    VALUE self, bottom, unit;
+{
+    gtk_source_print_compositor_set_bottom_margin(_SELF(self), NUM2DBL(bottom), RVAL2UNIT (unit));
+    return self;
+}
+
+static VALUE
+sprintcompositor_get_left_margin(self, unit)
+    VALUE self, unit;
+{
+    return DBL2NUM(gtk_source_print_compositor_get_left_margin(_SELF(self), RVAL2UNIT (unit)));
+}
+
+static VALUE
+sprintcompositor_set_left_margin(self, left, unit)
+    VALUE self, left, unit;
+{
+    gtk_source_print_compositor_set_left_margin(_SELF(self), NUM2DBL(left), RVAL2UNIT (unit));
+    return self;
+}
+
+static VALUE
+sprintcompositor_get_right_margin(self, unit)
+    VALUE self, unit;
+{
+    return DBL2NUM(gtk_source_print_compositor_get_right_margin(_SELF(self), RVAL2UNIT (unit)));
+}
+
+static VALUE
+sprintcompositor_set_right_margin(self, right, unit)
+    VALUE self, right, unit;
+{
+    gtk_source_print_compositor_set_right_margin(_SELF(self), NUM2DBL(right), RVAL2UNIT (unit));
+    return self;
+}
+
+static VALUE
+sprintcompositor_set_header_format(self, separator, left, center, right)
+    VALUE self, separator, left, center, right;
+{
+    gtk_source_print_compositor_set_header_format(_SELF(self),
+                                           RVAL2CBOOL(separator),
+                                           RVAL2CSTR(left),
+                                           RVAL2CSTR(center),
+                                           RVAL2CSTR(right));
+    return self;
+}
+
+static VALUE
+sprintcompositor_set_footer_format(self, separator, left, center, right)
+    VALUE self, separator, left, center, right;
+{
+    gtk_source_print_compositor_set_footer_format(_SELF(self),
+                                           RVAL2CBOOL(separator),
+                                           RVAL2CSTR(left),
+                                           RVAL2CSTR(center),
+                                           RVAL2CSTR(right));
+    return self;
+}
+
+static VALUE
+sprintcompositor_paginate (self, context)
+    VALUE self, context;
+{
+    return CBOOL2RVAL (gtk_source_print_compositor_paginate (_SELF (self),
+                                        GTK_PRINT_CONTEXT (RVAL2GOBJ (context))));
+}
+
+static VALUE
+sprintcompositor_get_pagination_progress (self)
+    VALUE self;
+{
+    return DBL2NUM (gtk_source_print_compositor_get_pagination_progress (_SELF (self)));
+}
+
+static VALUE
+sprintcompositor_draw_page (self, context, page_nr)
+    VALUE self, context, page_nr;
+{
+    gtk_source_print_compositor_draw_page (_SELF (self),
+                                           GTK_PRINT_CONTEXT (RVAL2GOBJ (context)),
+                                           NUM2INT (page_nr));
+    return self;
+}
+#endif /* HAVE_GTK_SOURCE_PRINT_COMPOSITOR_GET_TYPE */
+
+void
+Init_gtk_sourceprintcompositor()
+{
+#ifdef HAVE_GTK_SOURCE_PRINT_COMPOSITOR_GET_TYPE
+    VALUE pc = G_DEF_CLASS(GTK_TYPE_SOURCE_PRINT_COMPOSITOR, "SourcePrintCompositor", mGtk);
+
+    rb_define_method(pc, "initialize", sprintcompositor_initialize, 1);
+    rb_define_method(pc, "get_top_margin",
+                     sprintcompositor_get_top_margin, 1);
+    rb_define_method(pc, "set_top_margin",
+                     sprintcompositor_set_top_margin, 2);
+    rb_define_method(pc, "get_bottom_margin",
+                     sprintcompositor_get_bottom_margin, 1);
+    rb_define_method(pc, "set_bottom_margin",
+                     sprintcompositor_set_bottom_margin, 2);
+    rb_define_method(pc, "get_left_margin",
+                     sprintcompositor_get_left_margin, 1);
+    rb_define_method(pc, "set_left_margin",
+                     sprintcompositor_set_left_margin, 2);
+    rb_define_method(pc, "get_right_margin",
+                     sprintcompositor_get_right_margin, 1);
+    rb_define_method(pc, "set_right_margin",
+                     sprintcompositor_set_right_margin, 2);
+    rb_define_method(pc, "set_header_format",
+                     sprintcompositor_set_header_format, 4);
+    rb_define_method(pc, "set_footer_format",
+                     sprintcompositor_set_footer_format, 4);
+    rb_define_method(pc, "paginate",
+                     sprintcompositor_paginate, 1);
+    rb_define_method(pc, "pagination_progress",
+                     sprintcompositor_get_pagination_progress, 0);
+    rb_define_method(pc, "draw_page",
+                     sprintcompositor_draw_page, 2);
+
+    G_DEF_SETTERS(pc);
+#endif /* HAVE_GTK_SOURCE_PRINT_COMPOSITOR_GET_TYPE */
+}

data/ext/gtksourceview2/rbgtksourcestyle.c

@@ -0,0 +1,48 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/************************************************
+
+  rbgtksourcestyle.c -
+
+  $Author: mutoh $
+  $Date: 2005/10/02 18:40:34 $
+
+  Copyright (C) 2005  Masao Mutoh
+************************************************/
+#include "rbgtksourcemain.h"
+
+/* Module: Gtk::SourceStyle
+ */
+
+#define _SELF(self) (GTK_SOURCE_STYLE(RVAL2GOBJ(self)))
+
+static VALUE
+sourcestyle_copy (self)
+	VALUE self;
+{
+	return GOBJ2RVAL (gtk_source_style_copy (_SELF (self)));
+}
+
+/* Defined as properties.
+  "background"               gchar*                : Read / Write / Construct Only
+  "background-set"           gboolean              : Read / Write / Construct Only
+  "bold"                     gboolean              : Read / Write / Construct Only
+  "bold-set"                 gboolean              : Read / Write / Construct Only
+  "foreground"               gchar*                : Read / Write / Construct Only
+  "foreground-set"           gboolean              : Read / Write / Construct Only
+  "italic"                   gboolean              : Read / Write / Construct Only
+  "italic-set"               gboolean              : Read / Write / Construct Only
+  "line-background"          gchar*                : Read / Write / Construct Only
+  "line-background-set"      gboolean              : Read / Write / Construct Only
+  "strikethrough"            gboolean              : Read / Write / Construct Only
+  "strikethrough-set"        gboolean              : Read / Write / Construct Only
+  "underline"                gboolean              : Read / Write / Construct Only
+  "underline-set"            gboolean              : Read / Write / Construct Only
+*/
+
+void
+Init_gtk_sourcestyle ()
+{
+	VALUE style = G_DEF_CLASS (GTK_TYPE_SOURCE_STYLE, "SourceStyle", mGtk);
+
+	rb_define_method(style, "copy", sourcestyle_copy, 0);
+}