diff --git a/ChangeLog b/ChangeLog
index f7ec6d727d..c38faafe3a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Fri Apr  2 07:00:28 2010  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* ext/dl/cptr.c (rb_dlptr_inspect): fix format specifiers.
+
 Fri Apr  2 05:38:17 2010  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* include/ruby/ruby.h (InitVM): calls per-VM initialization in
diff --git a/ext/dl/cptr.c b/ext/dl/cptr.c
index 11ecf6f81d..8ae1829efa 100644
--- a/ext/dl/cptr.c
+++ b/ext/dl/cptr.c
@@ -388,7 +388,7 @@ rb_dlptr_inspect(VALUE self)
     char str[1024];
 
     TypedData_Get_Struct(self, struct ptr_data, &dlptr_data_type, data);
-    snprintf(str, 1023, "#<%s:%p ptr=%#lx size=%ld free=%#lx>",
+    snprintf(str, 1023, "#<%s:%p ptr=%p size=%ld free=%p>",
 	     rb_class2name(CLASS_OF(self)), data, data->ptr, data->size, data->free);
     return rb_str_new2(str);
 }