striuct 0.3.3 → 0.3.4

data/test/test_striuct-subclass-instance-compare.rb

@@ -1,52 +1,52 @@
-require_relative 'helper'
-
-
-class Test_Striuct_Subclass_Instance_Compare < Test::Unit::TestCase
-  
-  class User < Striuct.new
-    member :id, Integer
-    member :last_name, /\A\w+\z/
-    member :family_name, /\A\w+\z/
-    member :address, /\A((\w+) ?)+\z/
-    member :age, ->age{(20..140).include? age}
-  end
-
-  def setup
-    @user = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
-    @user2 = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
-  end
-  
-  def test_hash
-    assert_kind_of Integer, @user.hash
-    assert_equal @user.hash, @user2.hash
-  end
-  
-  def test_eql?
-    assert_equal true, @user.eql?(@user2)
-    assert_equal true, @user2.eql?(@user)
-    assert_equal false, @user.eql?(User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 31)
-  end
-  
-  def test_equal
-    user1 = User.new 11218, 'taro'
-    user2 = User.new 11218, 'taro'
-    assert_equal true, (user1 == user2)
-    user2.last_name = 'ichiro'
-    assert_equal false, (user1 == user2)
-  end
-  
-  Sth = Striuct.new :foo, :bar, :hoge
-
-  def test_hashkeyable
-    sth1 = Sth[hoge: 7, foo: 8]
-    sth2 = Sth[hoge: 7, foo: 8]
-    assert_equal true, sth1.eql?(sth2)
-    assert_equal true, sth2.eql?(sth1)
-    assert_equal sth1.hash, sth2.hash
-    assert_equal true, {sth1 => 1}.has_key?(sth2)
-    assert_equal true, {sth2 => 1}.has_key?(sth1)
-    assert_equal 1, {sth1 => 1}[sth2]
-    assert_equal 1, {sth2 => 1}[sth1]
-  end
-  
+require_relative 'helper'
+
+
+class Test_Striuct_Subclass_Instance_Compare < Test::Unit::TestCase
+  
+  class User < Striuct.new
+    member :id, Integer
+    member :last_name, /\A\w+\z/
+    member :family_name, /\A\w+\z/
+    member :address, /\A((\w+) ?)+\z/
+    member :age, ->age{(20..140).include? age}
+  end
+
+  def setup
+    @user = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
+    @user2 = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
+  end
+  
+  def test_hash
+    assert_kind_of Integer, @user.hash
+    assert_equal @user.hash, @user2.hash
+  end
+  
+  def test_eql?
+    assert_equal true, @user.eql?(@user2)
+    assert_equal true, @user2.eql?(@user)
+    assert_equal false, @user.eql?(User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 31)
+  end
+  
+  def test_equal
+    user1 = User.new 11218, 'taro'
+    user2 = User.new 11218, 'taro'
+    assert_equal true, (user1 == user2)
+    user2.last_name = 'ichiro'
+    assert_equal false, (user1 == user2)
+  end
+  
+  Sth = Striuct.new :foo, :bar, :hoge
+
+  def test_hashkeyable
+    sth1 = Sth[hoge: 7, foo: 8]
+    sth2 = Sth[hoge: 7, foo: 8]
+    assert_equal true, sth1.eql?(sth2)
+    assert_equal true, sth2.eql?(sth1)
+    assert_equal sth1.hash, sth2.hash
+    assert_equal true, {sth1 => 1}.has_key?(sth2)
+    assert_equal true, {sth2 => 1}.has_key?(sth1)
+    assert_equal 1, {sth1 => 1}[sth2]
+    assert_equal 1, {sth2 => 1}[sth1]
+  end
+  
 end

data/test/test_striuct-subclass-instance-default_value.rb

@@ -1,129 +1,129 @@
-require_relative 'helper'
-
-class Test_Striuct_Subclass_Instance_Default_Value < Test::Unit::TestCase
-
-  Sth = Striuct.new do
-    member :lank, OR(Bignum, Fixnum)
-    default :lank, 1
-  end
-  
-  def test_default
-    sth = Sth.new 2
-    assert_equal 2, sth.lank
-    sth = Sth.new
-    assert_equal 1, sth.lank
-    assert_equal true, sth.default?(:lank)
-    sth.lank = 2
-    assert_equal false, sth.default?(:lank)
-  end
-  
-  def test_define_default
-    assert_raises NameError do
-      Sth.class_eval do
-        default :anything, 10
-      end
-    end
-    
-    klass = Striuct.define do
-      member :lank2, Integer
-      default :lank2, '10'
-    end
-
-    assert_raises Validation::InvalidWritingError do
-      klass.new
-    end
-    
-    scope = self
-    seef = nil
-    klass = Striuct.define do
-      member :lank, Integer
-
-      scope.assert_raises ArgumentError do
-        default :lank, &->own, name, exess{rand}
-      end
-
-      scope.assert_raises ArgumentError do
-        default :lank, '10', &->own, name{rand}
-      end
-      
-      scope.assert_raises ArgumentError do
-        default :lank, '10', &->own{rand}
-      end
-      
-      scope.assert_raises ArgumentError do
-        default :lank, '10', &->{rand}
-      end
-      
-      default :lank, &->own, name{(seef = own); rand}
-    end
-    
-    assert_raises Validation::InvalidWritingError do
-      klass.new
-    end
-    
-    klass = Striuct.define do
-      member :lank, Integer      
-      default :lank, &->own, name{(seef = own); 10 - name.length}
-    end
-    
-    assert_equal 6, klass.new.lank
-    assert_equal seef, klass.new
-  end
-
-end
-
-class Test_Striuct_Subclass_Instance_DefaultValue_Under_MemberMacro < Test::Unit::TestCase
-
-  Sth = Striuct.new do
-    member :lank, OR(Bignum, Fixnum), default: 1
-  end
-  
-  def test_default
-    sth = Sth.new 2
-    assert_equal 2, sth.lank
-    sth = Sth.new
-    assert_equal 1, sth.lank
-    assert_equal true, sth.default?(:lank)
-    sth.lank = 2
-    assert_equal false, sth.default?(:lank)
-  end
-  
-  def test_define_default
-    assert_raises NameError do
-      Sth.class_eval do
-        default :anything, 10
-      end
-    end
-    
-    klass = Striuct.define do
-      member :lank2, Integer, default: '10'
-    end
-
-    assert_raises Validation::InvalidWritingError do
-      klass.new
-    end
-    
-    scope = self
-    seef = nil
-    klass = Striuct.define do
-      
-      scope.assert_raises ArgumentError do
-        member :lank, Integer, default: '10', default_proc: ->own,name{rand}
-      end
-      
-      member :lank, Integer, default_proc: ->own,name{(seef = own); rand}
-    end
-    
-    assert_raises Validation::InvalidWritingError do
-      klass.new
-    end
-    
-    klass = Striuct.define do
-      member :lank, Integer, default_proc: ->own,name{(seef = own); 10 - name.length}
-    end
-    
-    assert_equal 6, klass.new.lank
-    assert_equal seef, klass.new
-  end
-
+require_relative 'helper'
+
+class Test_Striuct_Subclass_Instance_Default_Value < Test::Unit::TestCase
+
+  Sth = Striuct.new do
+    member :lank, OR(Bignum, Fixnum)
+    default :lank, 1
+  end
+  
+  def test_default
+    sth = Sth.new 2
+    assert_equal 2, sth.lank
+    sth = Sth.new
+    assert_equal 1, sth.lank
+    assert_equal true, sth.default?(:lank)
+    sth.lank = 2
+    assert_equal false, sth.default?(:lank)
+  end
+  
+  def test_define_default
+    assert_raises NameError do
+      Sth.class_eval do
+        default :anything, 10
+      end
+    end
+    
+    klass = Striuct.define do
+      member :lank2, Integer
+      default :lank2, '10'
+    end
+
+    assert_raises Validation::InvalidWritingError do
+      klass.new
+    end
+    
+    scope = self
+    seef = nil
+    klass = Striuct.define do
+      member :lank, Integer
+
+      scope.assert_raises ArgumentError do
+        default :lank, &->own, name, exess{rand}
+      end
+
+      scope.assert_raises ArgumentError do
+        default :lank, '10', &->own, name{rand}
+      end
+      
+      scope.assert_raises ArgumentError do
+        default :lank, '10', &->own{rand}
+      end
+      
+      scope.assert_raises ArgumentError do
+        default :lank, '10', &->{rand}
+      end
+      
+      default :lank, &->own, name{(seef = own); rand}
+    end
+    
+    assert_raises Validation::InvalidWritingError do
+      klass.new
+    end
+    
+    klass = Striuct.define do
+      member :lank, Integer      
+      default :lank, &->own, name{(seef = own); 10 - name.length}
+    end
+    
+    assert_equal 6, klass.new.lank
+    assert_equal seef, klass.new
+  end
+
+end
+
+class Test_Striuct_Subclass_Instance_DefaultValue_Under_MemberMacro < Test::Unit::TestCase
+
+  Sth = Striuct.new do
+    member :lank, OR(Bignum, Fixnum), default: 1
+  end
+  
+  def test_default
+    sth = Sth.new 2
+    assert_equal 2, sth.lank
+    sth = Sth.new
+    assert_equal 1, sth.lank
+    assert_equal true, sth.default?(:lank)
+    sth.lank = 2
+    assert_equal false, sth.default?(:lank)
+  end
+  
+  def test_define_default
+    assert_raises NameError do
+      Sth.class_eval do
+        default :anything, 10
+      end
+    end
+    
+    klass = Striuct.define do
+      member :lank2, Integer, default: '10'
+    end
+
+    assert_raises Validation::InvalidWritingError do
+      klass.new
+    end
+    
+    scope = self
+    seef = nil
+    klass = Striuct.define do
+      
+      scope.assert_raises ArgumentError do
+        member :lank, Integer, default: '10', default_proc: ->own,name{rand}
+      end
+      
+      member :lank, Integer, default_proc: ->own,name{(seef = own); rand}
+    end
+    
+    assert_raises Validation::InvalidWritingError do
+      klass.new
+    end
+    
+    klass = Striuct.define do
+      member :lank, Integer, default_proc: ->own,name{(seef = own); 10 - name.length}
+    end
+    
+    assert_equal 6, klass.new.lank
+    assert_equal seef, klass.new
+  end
+
 end

data/test/test_striuct-subclass-instance-enum.rb

@@ -1,93 +1,93 @@
-require_relative 'helper'
-
-
-class Test_Striuct_Subclass_Instance_Enum < Test::Unit::TestCase
-
-  class User < Striuct.new
-    member :id, Integer
-    member :last_name, /\A\w+\z/
-    member :family_name, /\A\w+\z/
-    member :address, /\A((\w+) ?)+\z/
-    member :age, ->age{(20..140).include? age}
-  end
-
-  def setup
-    @user = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
-    @user2 = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
-  end
-  
-  def test_each
-    assert_same @user, @user.each{}
-    assert_kind_of Enumerator, enum = @user.each
-    assert_equal enum.next, 9999
-    assert_equal enum.next, 'taro'
-  end
-  
-  def test_each_member
-    assert_same @user, @user.each_member{}
-    assert_kind_of Enumerator, enum = @user.each_member
-    assert_equal :id, enum.next
-    assert_equal :last_name, enum.next
-    assert_equal :family_name, enum.next
-    assert_equal :address, enum.next
-    assert_equal :age, enum.next
-    assert_raises StopIteration do
-      enum.next
-    end
-  end
-  
-  def test_each_index
-    assert_same @user, @user.each_index{}
-    assert_kind_of Enumerator, enum = @user.each_index
-    assert_equal 0, enum.next
-    assert_equal 1, enum.next
-    assert_equal 2, enum.next
-    assert_equal 3, enum.next
-    assert_equal 4, enum.next
-    assert_raises StopIteration do
-      enum.next
-    end
-  end
-  
-  def test_each_with_index
-    assert_same @user, @user.each_with_index{}
-    assert_kind_of Enumerator, @user.each_with_index
-    
-    r = []
-    @user.each_with_index do |value, index|
-      r << [value, index]
-    end
-    
-    assert_equal [@user.each_value.to_a, @user.each_index.to_a].transpose, r
-  end
-
-  def test_each_member_with_index
-    assert_same @user, @user.each_member_with_index{}
-    assert_kind_of Enumerator, @user.each_member_with_index
-    
-    r = []
-    @user.each_member_with_index do |name, index|
-      r << [name, index]
-    end
-    
-    assert_equal [@user.each_key.to_a, @user.each_index.to_a].transpose, r
-  end
-  
-  Sth = Striuct.define do
-    member :name
-    member :age
-  end
-  
-  def test_each_pair_with_index
-    sth = Sth.new 'a', 10
-    assert_same sth, sth.each_pair_with_index{}
-    
-    enum = sth.each_pair_with_index    
-    assert_equal [:name, 'a', 0], enum.next
-    assert_equal [:age, 10, 1], enum.next
-    assert_raises StopIteration do
-      enum.next
-    end
-  end
-
+require_relative 'helper'
+
+
+class Test_Striuct_Subclass_Instance_Enum < Test::Unit::TestCase
+
+  class User < Striuct.new
+    member :id, Integer
+    member :last_name, /\A\w+\z/
+    member :family_name, /\A\w+\z/
+    member :address, /\A((\w+) ?)+\z/
+    member :age, ->age{(20..140).include? age}
+  end
+
+  def setup
+    @user = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
+    @user2 = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
+  end
+  
+  def test_each
+    assert_same @user, @user.each{}
+    assert_kind_of Enumerator, enum = @user.each
+    assert_equal enum.next, 9999
+    assert_equal enum.next, 'taro'
+  end
+  
+  def test_each_member
+    assert_same @user, @user.each_member{}
+    assert_kind_of Enumerator, enum = @user.each_member
+    assert_equal :id, enum.next
+    assert_equal :last_name, enum.next
+    assert_equal :family_name, enum.next
+    assert_equal :address, enum.next
+    assert_equal :age, enum.next
+    assert_raises StopIteration do
+      enum.next
+    end
+  end
+  
+  def test_each_index
+    assert_same @user, @user.each_index{}
+    assert_kind_of Enumerator, enum = @user.each_index
+    assert_equal 0, enum.next
+    assert_equal 1, enum.next
+    assert_equal 2, enum.next
+    assert_equal 3, enum.next
+    assert_equal 4, enum.next
+    assert_raises StopIteration do
+      enum.next
+    end
+  end
+  
+  def test_each_with_index
+    assert_same @user, @user.each_with_index{}
+    assert_kind_of Enumerator, @user.each_with_index
+    
+    r = []
+    @user.each_with_index do |value, index|
+      r << [value, index]
+    end
+    
+    assert_equal [@user.each_value.to_a, @user.each_index.to_a].transpose, r
+  end
+
+  def test_each_member_with_index
+    assert_same @user, @user.each_member_with_index{}
+    assert_kind_of Enumerator, @user.each_member_with_index
+    
+    r = []
+    @user.each_member_with_index do |name, index|
+      r << [name, index]
+    end
+    
+    assert_equal [@user.each_key.to_a, @user.each_index.to_a].transpose, r
+  end
+  
+  Sth = Striuct.define do
+    member :name
+    member :age
+  end
+  
+  def test_each_pair_with_index
+    sth = Sth.new 'a', 10
+    assert_same sth, sth.each_pair_with_index{}
+    
+    enum = sth.each_pair_with_index    
+    assert_equal [:name, 'a', 0], enum.next
+    assert_equal [:age, 10, 1], enum.next
+    assert_raises StopIteration do
+      enum.next
+    end
+  end
+
 end

data/test/test_striuct-subclass-instance-freeze.rb

@@ -1,19 +1,19 @@
-require_relative 'helper'
-
-class Test_Striuct_Subclass_Instance__Freeze < Test::Unit::TestCase
-
-  Sth = Striuct.new :foo
-  
-  def test_freeze
-    sth = Sth.new
-    sth.freeze
-    
-    assert_raises RuntimeError do
-     sth.foo = 8
-    end
-   
-    assert_equal true, sth.frozen?
-  end
-
-end
-
+require_relative 'helper'
+
+class Test_Striuct_Subclass_Instance__Freeze < Test::Unit::TestCase
+
+  Sth = Striuct.new :foo
+  
+  def test_freeze
+    sth = Sth.new
+    sth.freeze
+    
+    assert_raises RuntimeError do
+     sth.foo = 8
+    end
+   
+    assert_equal true, sth.frozen?
+  end
+
+end
+