nobu	2007-10-14 17:31:51 +0900 (Sun, 14 Oct 2007)

  New Revision: 13697

  Added files:
    trunk/test/ruby/test_encoding.rb
  Modified files:
    trunk/ChangeLog
    trunk/encoding.c

  Log:
    * encoding.c (rb_obj_encoding): rdoc update.  a patch from David
      Flanagan <david AT davidflanagan.com>.  [ruby-core:12664]
    
    * encoding.c (enc_dump, enc_load): marshaling feature.  a patch from
      David Flanagan.  [ruby-core:12665]
    
    * encoding.c (Init_Encoding): undefine allocator of Encoding.
      [ruby-core:12665], [ruby-core:12666]
    
    * test/ruby/test_encoding.rb: tests for Encoding from David Flanagan
      [ruby-core:12665]


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/ChangeLog?r1=13697&r2=13696
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/test/ruby/test_encoding.rb?r1=13697&r2=13696
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/test/ruby/test_encoding.rb?revision=13697&view=markup
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/encoding.c?r1=13697&r2=13696
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/encoding.c?r1=13697&r2=13696

Index: encoding.c
===================================================================
--- encoding.c	(revision 13696)
+++ encoding.c	(revision 13697)
@@ -2,8 +2,8 @@
 
   encoding.c -
 
-  $Author: matz $
-  $Date: 2007-05-24 17:22:33 +0900 (Thu, 24 May 2007) $
+  $Author$
+  $Date$
   created at: Thu May 24 17:23:27 JST 2007
 
   Copyright (C) 2007 Yukihiro Matsumoto
@@ -372,9 +372,9 @@
 
 /*
  *  call-seq:
- *     obj.encoding   => str
+ *     obj.encoding   => encoding
  *
- *  Retruns the encoding name.
+ *  Returns the Encoding object that represents the encoding of obj.
  */
 
 VALUE
@@ -498,12 +498,31 @@
     return enc_from_encoding(rb_enc_from_index(idx));
 }
 
+/* :nodoc: */
+static VALUE
+enc_dump(int argc, VALUE *argv, VALUE self)
+{
+    rb_scan_args(argc, argv, "01", 0);
+    return enc_name(self);
+}
+
+/* :nodoc: */
+static VALUE
+enc_load(VALUE klass, VALUE str)
+{
+    return enc_find(klass, str);
+}
+
 void
 Init_Encoding(void)
 {
     rb_cEncoding = rb_define_class("Encoding", rb_cObject);
+    rb_undef_alloc_func(rb_cEncoding);
     rb_define_method(rb_cEncoding, "inspect", enc_inspect, 0);
     rb_define_method(rb_cEncoding, "name", enc_name, 0);
     rb_define_singleton_method(rb_cEncoding, "list", enc_list, 0);
     rb_define_singleton_method(rb_cEncoding, "find", enc_find, 1);
+
+    rb_define_method(rb_cEncoding, "_dump", enc_dump, -1);
+    rb_define_singleton_method(rb_cEncoding, "_load", enc_load, 1);
 }

Property changes on: encoding.c
___________________________________________________________________
Name: svn:keywords
   + Author Date Id Revision
Name: svn:eol-style
   + LF

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 13696)
+++ ChangeLog	(revision 13697)
@@ -1,3 +1,17 @@
+Sun Oct 14 17:31:48 2007  Nobuyoshi Nakada  <nobu@r...>
+
+	* encoding.c (rb_obj_encoding): rdoc update.  a patch from David
+	  Flanagan <david AT davidflanagan.com>.  [ruby-core:12664]
+
+	* encoding.c (enc_dump, enc_load): marshaling feature.  a patch from
+	  David Flanagan.  [ruby-core:12665]
+
+	* encoding.c (Init_Encoding): undefine allocator of Encoding.
+	  [ruby-core:12665], [ruby-core:12666]
+
+	* test/ruby/test_encoding.rb: tests for Encoding from David Flanagan
+	  [ruby-core:12665]
+
 Sun Oct 14 11:09:09 2007  Tanaka Akira  <akr@f...>
 
 	* lib/pp.rb (PP::PPMethods#pp_hash): don't sort keys because hash is
Index: test/ruby/test_encoding.rb
===================================================================
--- test/ruby/test_encoding.rb	(revision 0)
+++ test/ruby/test_encoding.rb	(revision 13697)
@@ -0,0 +1,28 @@
+require 'test/unit'
+
+class TestEncoding < Test::Unit::TestCase
+
+  # Test basic encoding methods: list, find, name
+  def test_encoding
+    encodings = Encoding.list
+    assert_equal(encodings.empty?, false)
+
+    encodings.each do |e|
+      assert_equal(e, Encoding.find(e.name))
+      assert_equal(e, Encoding.find(e.name.upcase))
+      assert_equal(e, Encoding.find(e.name.capitalize))
+      assert_equal(e, Encoding.find(e.name.downcase))
+    end
+  end
+
+  # Test that Encoding objects can't be copied
+  # And that they can be compared by object_id
+  def test_singleton
+    encodings = Encoding.list
+    encodings.each do |e|
+      assert_raise(TypeError) { e.dup }
+      assert_raise(TypeError) { e.clone }
+      assert_equal(e.object_id, Marshal.load(Marshal.dump(e)).object_id)
+    end    
+  end
+end

Property changes on: test/ruby/test_encoding.rb
___________________________________________________________________
Name: svn:keywords
   + Author Date Id Revision
Name: svn:eol-style
   + LF


--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml