[ruby-dev:29573] Digest::Base#inspect

Digest::SHA256 のインスタンスとかを p で表示すると以下のよう
に 16進の文字列が出てきます。

% ./ruby -v -rdigest -e 'p Digest::SHA256.new'
ruby 1.9.0 (2006-09-13) [i686-linux]
e3b0c44298fc1c149afbf4c8996fb92427ae41e4649b934ca495991b7852b855

だいたい一意であるといわれればそれはそうなのかもしれませんが
やはりここは以下のようになってほしいのですが、どうでしょう?

% ./ruby -rdigest -e 'p Digest::SHA256.new'   
#<Digest::SHA256: e3b0c44298fc1c149afbf4c8996fb92427ae41e4649b934ca495991b7852b855>

Index: ext/digest/digest.c
===================================================================
RCS file: /src/ruby/ext/digest/digest.c,v
retrieving revision 1.17
diff -u -p -r1.17 digest.c
--- ext/digest/digest.c	12 Dec 2005 05:15:33 -0000	1.17
+++ ext/digest/digest.c	13 Sep 2006 17:20:19 -0000
@@ -210,6 +210,27 @@ rb_digest_base_hexdigest(VALUE self)
 }
 
 static VALUE
+rb_digest_base_inspect(VALUE self)
+{
+    algo_t *algo;
+    VALUE str;
+    char *cname;
+
+    algo = get_digest_base_metadata(rb_obj_class(self));
+
+    cname = rb_obj_classname(self);
+
+    /* #<Digest::Alg: xxxxx...xxxx> */
+    str = rb_str_buf_new(2 + strlen(cname) + 2 + algo->digest_len * 2 + 1);
+    rb_str_buf_cat2(str, "#<");
+    rb_str_buf_cat2(str, cname);
+    rb_str_buf_cat2(str, ": ");
+    rb_str_buf_append(str, rb_digest_base_hexdigest(self));
+    rb_str_buf_cat2(str, ">");
+    return str;
+}
+
+static VALUE
 rb_digest_base_equal(VALUE self, VALUE other)
 {
     algo_t *algo;
@@ -265,6 +286,7 @@ Init_digest()
     rb_define_method(cDigest_Base, "digest", rb_digest_base_digest, 0);
     rb_define_method(cDigest_Base, "hexdigest", rb_digest_base_hexdigest, 0);
     rb_define_method(cDigest_Base, "to_s", rb_digest_base_hexdigest, 0);
+    rb_define_method(cDigest_Base, "inspect", rb_digest_base_inspect, 0);
     rb_define_method(cDigest_Base, "==", rb_digest_base_equal, 1);
 
     id_metadata = rb_intern("metadata");
-- 
[田中 哲][たなか あきら][Tanaka Akira]