From fa71851de06bba5fe0870131e1be4e1f98a51d79 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 12 Sep 2005 01:51:57 +0000
Subject: * ext/dl/dl.c (rb_io_to_ptr): merged a patch for DragonFly BSD   from
 Takahiro Kambe <taca@back-street.net>.  [ruby-dev:27023]

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@9124 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog   | 5 +++++
 ext/dl/dl.c | 4 ++++
 2 files changed, 9 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 5640ac25d..7a6eb9528 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Mon Sep 12 10:45:58 2005  Yukihiro Matsumoto  <matz@ruby-lang.org>
+
+	* ext/dl/dl.c (rb_io_to_ptr): merged a patch for DragonFly BSD
+	  from Takahiro Kambe <taca@back-street.net>.  [ruby-dev:27023]
+
 Sun Sep 11 22:05:51 2005  Masatoshi SEKI  <m_seki@mva.biglobe.ne.jp>
 
 	* bin/erb (ERB::Main#run): set ERB#filename so that it is used
diff --git a/ext/dl/dl.c b/ext/dl/dl.c
index 02cfcf011..8972f24e0 100644
--- a/ext/dl/dl.c
+++ b/ext/dl/dl.c
@@ -557,7 +557,11 @@ rb_io_to_ptr(VALUE self)
   GetOpenFile(self, fptr);
   fp = fptr->f;
 
+#if defined(__DragonFly__)
+  return fp ? rb_dlptr_new(fp, 1, 0) : Qnil;
+#else
   return fp ? rb_dlptr_new(fp, sizeof(FILE), 0) : Qnil;
+#endif
 }
 
 VALUE
-- 
cgit