diff --git a/ChangeLog b/ChangeLog
index f8cde729b4..87ecabc46f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Wed Dec 22 08:34:32 2004  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* ext/dl/sym.c (rb_dlsym_initialize): extract internal pointers after
+	  all argument conversion.  fixed: [ruby-dev:25271]
+
 Tue Dec 21 16:15:21 2004  Michael Neumann  <mneumann@ruby-lang.org>
 
 	* lib/xmlrpc/client.rb: use "" instead of "." if prefix argument is
diff --git a/ext/dl/sym.c b/ext/dl/sym.c
index 751b2be39f..7151d3c04e 100644
--- a/ext/dl/sym.c
+++ b/ext/dl/sym.c
@@ -154,8 +154,9 @@ rb_dlsym_initialize(int argc, VALUE argv[], VALUE self)
   rb_scan_args(argc, argv, "12", &addr, &name, &type);
 
   saddr = (void*)(DLNUM2LONG(rb_Integer(addr)));
-  sname = NIL_P(name) ? NULL : StringValuePtr(name);
+  if (!NIL_P(name)) StringValue(name);
   stype = NIL_P(type) ? NULL : StringValuePtr(type);
+  sname = NIL_P(name) ? NULL : RSTRING(name)->ptr;
 
   if( saddr ){
     Data_Get_Struct(self, struct sym_data, data);