gio2 1.0.3-x86-mingw32 → 1.1.0-x86-mingw32

data/ext/gio2/gioscheduler.c

@@ -1,193 +0,0 @@
-/* -*- c-file-style: "ruby" -*- */
-/*
- * Ruby/GIO: a Ruby binding of gio-2.0.x.
- * Copyright (C) 2008-2009  Ruby-GNOME2 Project Team
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- */
-
-#include "gio2.h"
-
-static GIOSchedulerJob *
-ioschedulerjob_copy(const GIOSchedulerJob *job)
-{
-        return (GIOSchedulerJob *)job;
-}
-
-static void
-ioschedulerjob_free(G_GNUC_UNUSED GIOSchedulerJob *job)
-{
-        return;
-}
-
-static GType
-g_io_scheduler_job_get_type(void)
-{
-        static GType our_type = 0;
-
-        if (our_type == 0)
-                our_type = g_boxed_type_register_static("GIOSchedulerJob",
-                                                        (GBoxedCopyFunc)ioschedulerjob_copy,
-                                                        (GBoxedFreeFunc)ioschedulerjob_free);
-
-        return our_type;
-}
-
-#define G_TYPE_IO_SCHEDULER_JOB (g_io_scheduler_job_get_type())
-
-#define RVAL2GIOSCHEDULERJOB(object) \
-        ((GIOSchedulerJob *)(RVAL2BOXED(object, G_TYPE_IO_SCHEDULER_JOB)))
-
-#define GIOSCHEDULERJOB2RVAL(object) \
-        BOXED2RVAL(object, G_TYPE_IO_SCHEDULER_JOB)
-
-#define _SELF(value) RVAL2GIOSCHEDULERJOB(value)
-
-struct ioscheduler_job_callback_data
-{
-        GIOSchedulerJob *job;
-        GCancellable *cancellable;
-        gpointer data;
-};
-
-static VALUE
-ioscheduler_job_callback_call(VALUE data)
-{
-        static VALUE s_id_call;
-        struct ioscheduler_job_callback_data *real;
- 
-        if (s_id_call == 0)
-                s_id_call = rb_intern("call");
-
-        real = (struct ioscheduler_job_callback_data *)data;
-
-        /* TODO: Totally unsure if _UNREF is correct here or not. */
-        return rb_funcall(USE_BLOCK_AND_SAVE(real->data), s_id_call, 2,
-                          GOBJ2RVAL_UNREF(real->job),
-                          GOBJ2RVAL_UNREF(real->cancellable));
-}
-
-static gboolean
-ioscheduler_job_callback(GIOSchedulerJob *job,
-                         GCancellable *cancellable,
-                         gpointer data)
-{
-        struct ioscheduler_job_callback_data real = { job, cancellable, data };
-
-        return RVAL2CBOOL(G_PROTECT_CALLBACK(ioscheduler_job_callback_call,
-                                             &real));
-}
-
-static void
-ioscheduler_job_callback_free(gpointer data)
-{
-        USE_BLOCK((VALUE)data);
-}
-
-static VALUE
-ioscheduler_push_job(int argc, VALUE *argv, VALUE self)
-{
-        VALUE rbio_priority, rbcancellable, block;
-        gint io_priority;
-        GCancellable *cancellable;
-
-        rb_scan_args(argc, argv, "02", &rbio_priority, &rbcancellable);
-        io_priority = RVAL2IOPRIORITYDEFAULT(rbio_priority);
-        cancellable = RVAL2GCANCELLABLE(rbcancellable);
-        block = rb_block_proc();
-        SAVE_BLOCK(block);
-        g_io_scheduler_push_job(ioscheduler_job_callback,
-                                (gpointer)block,
-                                ioscheduler_job_callback_free,
-                                io_priority,
-                                cancellable);
-
-        return self;
-}
-
-static VALUE
-ioscheduler_cancel_all_jobs(VALUE self)
-{
-        g_io_scheduler_cancel_all_jobs();
-
-        return self;
-}
-
-static VALUE
-ioscheduler_source_callback_call(VALUE data)
-{
-        static VALUE s_id_call;
- 
-        if (s_id_call == 0)
-                s_id_call = rb_intern("call");
-
-        return rb_funcall(USE_BLOCK_AND_SAVE(data), s_id_call, 0);
-}
-
-static gboolean
-ioscheduler_source_callback(gpointer data)
-{
-        return RVAL2CBOOL(G_PROTECT_CALLBACK(ioscheduler_source_callback_call,
-                                             data));
-}
-
-static void
-ioscheduler_source_callback_free(gpointer data)
-{
-        USE_BLOCK(data);
-}
-
-static VALUE
-ioschedulerjob_send_to_mainloop(VALUE self)
-{
-        VALUE block;
-
-        block = rb_block_proc();
-        SAVE_BLOCK(block);
-
-        return CBOOL2RVAL(g_io_scheduler_job_send_to_mainloop(_SELF(self),
-                                                              ioscheduler_source_callback,
-                                                              (gpointer)block,
-                                                              ioscheduler_source_callback_free));
-}
-
-static VALUE
-ioschedulerjob_send_to_mainloop_async(VALUE self)
-{
-        VALUE block;
-
-        block = rb_block_proc();
-        SAVE_BLOCK(block);
-
-        g_io_scheduler_job_send_to_mainloop_async(_SELF(self),
-                                                  ioscheduler_source_callback,
-                                                  (gpointer)block,
-                                                  ioscheduler_source_callback_free);
-
-        return self;
-}
-
-void
-Init_gioscheduler(VALUE glib)
-{
-        VALUE ioschedulerjob = G_DEF_CLASS(G_TYPE_IO_SCHEDULER_JOB, "IOSchedulerJob", glib);
-
-        VALUE ioscheduler = rb_define_module_under(glib, "IOScheduler");
-        rb_define_singleton_method(ioscheduler, "push_job", ioscheduler_push_job, -1);
-        rb_define_singleton_method(ioscheduler, "cancel_all_jobs", ioscheduler_cancel_all_jobs, 0);
-
-        rb_define_method(ioschedulerjob, "send_to_mainloop", ioschedulerjob_send_to_mainloop, 0);
-        rb_define_method(ioschedulerjob, "send_to_mainloop_async", ioschedulerjob_send_to_mainloop_async, 0);
-}

data/ext/gio2/giostream.c

@@ -1,106 +0,0 @@
-/* -*- c-file-style: "ruby" -*- */
-/*
- * Ruby/GIO: a Ruby binding of gio-2.0.x.
- * Copyright (C) 2008-2009  Ruby-GNOME2 Project Team
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- */
-
-#include "gio2.h"
-
-#define _SELF(value) G_IO_STREAM(RVAL2GOBJ(value))
-
-static VALUE
-iostream_close(VALUE self, VALUE cancellable)
-{
-        GError *error = NULL;
-
-        if (!g_io_stream_close(_SELF(self), RVAL2GCANCELLABLE(cancellable), &error))
-                rbgio_raise_error(error);
-
-        return self;
-}
-
-static VALUE
-iostream_close_async(int argc, VALUE *argv, VALUE self)
-{
-        VALUE rbio_priority, rbcancellable, block;
-        int io_priority;
-        GCancellable *cancellable;
-
-        rb_scan_args(argc, argv, "01&", &rbio_priority, &rbcancellable, &block);
-        io_priority = RVAL2IOPRIORITYDEFAULT(rbio_priority);
-        cancellable = RVAL2GCANCELLABLE(rbcancellable);
-        SAVE_BLOCK(block);
-        g_io_stream_close_async(_SELF(self),
-                                io_priority,
-                                cancellable,
-                                rbgio_async_ready_callback,
-                                (gpointer)block);
-
-        return self;
-}
-
-static VALUE
-iostream_close_finish(VALUE self, VALUE result)
-{
-        GError *error = NULL;
-
-        if (!g_io_stream_close_finish(_SELF(self),
-                                      RVAL2GASYNCRESULT(result),
-                                      &error))
-                rbgio_raise_error(error);
-
-        return self;
-}
-
-static VALUE
-iostream_has_pending(VALUE self)
-{
-        return CBOOL2RVAL(g_io_stream_has_pending(_SELF(self)));
-}
-
-static VALUE
-iostream_set_pending(VALUE self)
-{
-        GError *error = NULL;
-
-        if (!g_io_stream_set_pending(_SELF(self), &error))
-                rbgio_raise_error(error);
-
-        return self;
-}
-
-static VALUE
-iostream_clear_pending(VALUE self)
-{
-        g_io_stream_clear_pending(_SELF(self));
-
-        return self;
-}
-
-void
-Init_giostream(VALUE glib)
-{
-        VALUE iostream = G_DEF_CLASS(G_TYPE_IO_STREAM, "IOStream", glib);
-
-        rb_define_method(iostream, "close", iostream_close, 1);
-        rb_define_method(iostream, "close_async", iostream_close_async, -1);
-        rb_define_method(iostream, "close_finish", iostream_close_finish, 1);
-        rb_define_method(iostream, "has_pending?", iostream_has_pending, 0);
-        rb_define_method(iostream, "set_pending", iostream_set_pending, 0);
-        G_DEF_SETTER(iostream, "pending");
-        rb_define_method(iostream, "clear_pending", iostream_clear_pending, 0);
-}

data/ext/gio2/gmemoryinputstream.c

@@ -1,65 +0,0 @@
-/* -*- c-file-style: "ruby" -*- */
-/*
- * Ruby/GIO: a Ruby binding of gio-2.0.x.
- * Copyright (C) 2008-2009  Ruby-GNOME2 Project Team
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- */
-
-#include "gio2.h"
-
-#define _SELF(value) G_MEMORY_INPUT_STREAM(RVAL2GOBJ(value))
-
-static VALUE
-memoryinputstream_initialize(int argc, VALUE *argv, VALUE self)
-{
-        VALUE data;
-
-        rb_scan_args(argc, argv, "01", &data);
-        if (NIL_P(data)) {
-                G_INITIALIZE(self, g_memory_input_stream_new());
-                return Qnil;
-        }
-
-        StringValue(data);
-        G_RELATIVE(self, data);
-        G_INITIALIZE(self, g_memory_input_stream_new_from_data(RSTRING_PTR(data),
-                                                               RSTRING_LEN(data),
-                                                               NULL));
-
-        return Qnil;
-}
-
-static VALUE
-memoryinputstream_add_data(VALUE self, VALUE data)
-{
-        StringValue(data);
-        G_RELATIVE(self, data);
-        g_memory_input_stream_add_data(_SELF(self),
-                                       RSTRING_PTR(data),
-                                       RSTRING_LEN(data),
-                                       NULL);
-
-        return self;
-}
-
-void
-Init_gmemoryinputstream(VALUE glib)
-{
-        VALUE memoryinputstream = G_DEF_CLASS(G_TYPE_MEMORY_INPUT_STREAM, "MemoryInputStream", glib);
-
-        rb_define_method(memoryinputstream, "initialize", memoryinputstream_initialize, -1);
-        rb_define_method(memoryinputstream, "add_data", memoryinputstream_add_data, 1);
-}

data/ext/gio2/gmemoryoutputstream.c

@@ -1,41 +0,0 @@
-/* -*- c-file-style: "ruby" -*- */
-/*
- * Ruby/GIO: a Ruby binding of gio-2.0.x.
- * Copyright (C) 2008-2009  Ruby-GNOME2 Project Team
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- */
-
-#include "gio2.h"
-
-/* TODO: Take string argument? */
-static VALUE
-memoryoutputstream_initialize(VALUE self)
-{
-        G_INITIALIZE(self, g_memory_output_stream_new(NULL,
-                                                      0,
-                                                      g_realloc,
-                                                      g_free));
-
-        return Qnil;
-}
-
-void
-Init_gmemoryoutputstream(VALUE glib)
-{
-        VALUE memoryoutputstream = G_DEF_CLASS(G_TYPE_MEMORY_OUTPUT_STREAM, "MemoryOutputStream", glib);
-
-        rb_define_method(memoryoutputstream, "initialize", memoryoutputstream_initialize, 0);
-}

data/ext/gio2/gmountoperation.c

@@ -1,66 +0,0 @@
-/* -*- c-file-style: "ruby" -*- */
-/*
- * Ruby/GIO: a Ruby binding of gio-2.0.x.
- * Copyright (C) 2008-2009  Ruby-GNOME2 Project Team
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- */
-
-#include "gio2.h"
-
-#define _SELF(value) RVAL2GMOUNTOPERATION(value)
-
-#define GPASSWORDSAVE2RVAL(value) \
-        GENUM2RVAL((value), G_TYPE_PASSWORD_SAVE)
-
-#define RVAL2GPASSWORDSAVE(value) \
-        RVAL2GENUM((value), G_TYPE_PASSWORD_SAVE)
-
-#define RVAL2GMOUNTOPERATIONRESULT(value) \
-        RVAL2GENUM((value), G_TYPE_MOUNT_OPERATION_RESULT)
-
-static VALUE
-mountoperation_initialize(VALUE self)
-{
-        G_INITIALIZE(self, g_mount_operation_new());
-
-        return Qnil;
-}
-
-static VALUE
-mountoperation_reply(VALUE self, VALUE value)
-{
-        g_mount_operation_reply(_SELF(self), RVAL2GMOUNTOPERATIONRESULT(value));
-
-        return self;
-}
-
-void
-Init_gmountoperation(VALUE glib)
-{
-        VALUE mountoperation = G_DEF_CLASS(G_TYPE_MOUNT_OPERATION, "MountOperation", glib);
-
-        G_DEF_CLASS(G_TYPE_MOUNT_OPERATION_RESULT, "Result", mountoperation);
-        G_DEF_CONSTANTS(mountoperation, G_TYPE_MOUNT_OPERATION_RESULT, "G_MOUNT_OPERATION_");
-
-        G_DEF_CLASS(G_TYPE_ASK_PASSWORD_FLAGS, "AskPasswordFlags", glib);
-        G_DEF_CONSTANTS(glib, G_TYPE_ASK_PASSWORD_FLAGS, "G_");
-
-        G_DEF_CLASS(G_TYPE_PASSWORD_SAVE, "PasswordSave", glib);
-        G_DEF_CONSTANTS(glib, G_TYPE_PASSWORD_SAVE, "G_");
-
-        rb_define_method(mountoperation, "initialize", mountoperation_initialize, 0);
-        rb_define_method(mountoperation, "reply", mountoperation_reply, 1);
-}

data/ext/gio2/gnetworkaddress.c

@@ -1,57 +0,0 @@
-/* -*- c-file-style: "ruby" -*- */
-/*
- * Ruby/GIO: a Ruby binding of gio-2.0.x.
- * Copyright (C) 2008-2009  Ruby-GNOME2 Project Team
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- */
-
-#include "gio2.h"
-
-#define _SELF(value) G_NETWORK_ADDRESS(RVAL2GOBJ(value))
-
-static VALUE
-networkaddress_initialize(VALUE self, VALUE hostname, VALUE port)
-{
-        G_INITIALIZE(self, g_network_address_new(RVAL2CSTR(hostname),
-                                                 RVAL2GUINT16(port)));
-
-        return Qnil;
-}
-
-static VALUE
-networkaddress_parse(G_GNUC_UNUSED VALUE self, VALUE host_and_port, VALUE default_port)
-{
-        GError *error = NULL;
-        GSocketConnectable *connectable;
-
-        connectable = g_network_address_parse(RVAL2CSTR(host_and_port),
-                                              RVAL2GUINT16(default_port),
-                                              &error);
-        if (connectable == NULL)
-                rbgio_raise_error(error);
-
-        return GOBJ2RVAL_UNREF(connectable);
-}
-
-void
-Init_gnetworkaddress(VALUE glib)
-{
-        VALUE networkaddress = G_DEF_CLASS(G_TYPE_NETWORK_ADDRESS, "NetworkAddress", glib);
-
-        rb_define_singleton_method(networkaddress, "parse", networkaddress_parse, 2);
-
-        rb_define_method(networkaddress, "initialize", networkaddress_initialize, 2);
-}

data/ext/gio2/gnetworkservice.c

@@ -1,43 +0,0 @@
-/* -*- c-file-style: "ruby" -*- */
-/*
- * Ruby/GIO: a Ruby binding of gio-2.0.x.
- * Copyright (C) 2008-2009  Ruby-GNOME2 Project Team
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- */
-
-#include "gio2.h"
-
-#define _SELF(value) G_NETWORK_SERVICE(RVAL2GOBJ(value))
-
-static VALUE
-networkservice_initialize(VALUE self, VALUE service, VALUE protocol, VALUE domain)
-{
-        /* TODO: If these are infected, so should they be when returned.  How
-         * do we deal with that? */
-        G_INITIALIZE(self, g_network_service_new(RVAL2CSTR(service),
-                                                 RVAL2CSTR(protocol),
-                                                 RVAL2CSTR(domain)));
-
-        return Qnil;
-}
-
-void
-Init_gnetworkservice(VALUE glib)
-{
-        VALUE networkservice = G_DEF_CLASS(G_TYPE_NETWORK_SERVICE, "NetworkService", glib);
-
-        rb_define_method(networkservice, "initialize", networkservice_initialize, 3);
-}

data/ext/gio2/gseekable.c

@@ -1,89 +0,0 @@
-/* -*- c-file-style: "ruby" -*- */
-/*
- * Ruby/GIO: a Ruby binding of gio-2.0.x.
- * Copyright (C) 2008-2009  Ruby-GNOME2 Project Team
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2.1 of the License.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- */
-
-#include "gio2.h"
-
-#define _SELF(value) G_SEEKABLE(RVAL2GOBJ(value))
-
-#define RVAL2GSEEKTYPEDEFAULT(value) \
-        RVAL2TYPE_WITH_DEFAULT((value), NUM2INT, G_SEEK_CUR)
-
-static VALUE
-seekable_tell(VALUE self)
-{
-        return GOFFSET2RVAL(g_seekable_tell(_SELF(self)));
-}
-
-static VALUE
-seekable_can_seek(VALUE self)
-{
-        return CBOOL2RVAL(g_seekable_can_seek(_SELF(self)));
-}
-
-static VALUE
-seekable_seek(int argc, VALUE *argv, VALUE self)
-{
-        VALUE offset, type, cancellable;
-        GError *error = NULL;
-
-        rb_scan_args(argc, argv, "12", &offset, &type, &cancellable);
-        if (!g_seekable_seek(_SELF(self),
-                             RVAL2GOFFSET(offset),
-                             RVAL2GSEEKTYPEDEFAULT(type),
-                             RVAL2GCANCELLABLE(cancellable),
-                             &error))
-                rbgio_raise_error(error);
-
-        return self;
-}
-
-static VALUE
-seekable_can_truncate(VALUE self)
-{
-        return CBOOL2RVAL(g_seekable_can_truncate(_SELF(self)));
-}
-
-static VALUE
-seekable_truncate(int argc, VALUE *argv, VALUE self)
-{
-        VALUE offset, cancellable;
-        GError *error = NULL;
-
-        rb_scan_args(argc, argv, "11", &offset, &cancellable);
-        if (!g_seekable_truncate(_SELF(self),
-                                 RVAL2GOFFSET(offset),
-                                 RVAL2GCANCELLABLE(cancellable),
-                                 &error))
-                rbgio_raise_error(error);
-
-        return self;
-}
-
-void
-Init_gseekable(VALUE glib)
-{
-        VALUE seekable = G_DEF_INTERFACE(G_TYPE_SEEKABLE, "Seekable", glib);
-
-        rb_define_method(seekable, "tell", seekable_tell, 0);
-        rb_define_method(seekable, "can_seek?", seekable_can_seek, 0);
-        rb_define_method(seekable, "seek", seekable_seek, -1);
-        rb_define_method(seekable, "can_truncate?", seekable_can_truncate, 0);
-        rb_define_method(seekable, "truncate", seekable_truncate, -1);
-}