striuct 0.3.2 → 0.3.3

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

@@ -0,0 +1,23 @@
+require_relative 'helper'
+
+class Test_Striuct_Subclass_Instance_Cloning < Test::Unit::TestCase
+
+  class Sth < Striuct.new
+    member :sth
+  end
+  
+  def test_dup
+    sth = Sth.new
+    sth2 = sth.dup
+    sth.sth = 1
+    assert_equal false, (sth.sth == sth2.sth)
+  end
+  
+  def test_clone
+    sth = Sth.new
+    sth2 = sth.clone
+    sth.sth = 2
+    assert_equal false, (sth.sth == sth2.sth)
+  end
+
+end

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

@@ -0,0 +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
+  
+end

data/test/{test_striuct_subclass_default_value.rb → test_striuct-subclass-instance-default_value.rb}

@@ -1,6 +1,6 @@
 require_relative 'helper'
 
-class TestStriuctDefaultValue < Test::Unit::TestCase
+class Test_Striuct_Subclass_Instance_Default_Value < Test::Unit::TestCase
 
   Sth = Striuct.new do
     member :lank, OR(Bignum, Fixnum)
@@ -72,7 +72,7 @@ class TestStriuctDefaultValue < Test::Unit::TestCase
 
 end
 
-class TestStriuctDefaultValueinMemberMacro < Test::Unit::TestCase
+class Test_Striuct_Subclass_Instance_DefaultValue_Under_MemberMacro < Test::Unit::TestCase
 
   Sth = Striuct.new do
     member :lank, OR(Bignum, Fixnum), default: 1

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

@@ -0,0 +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
+
+end

data/test/{test_striuct_subclass_freeze.rb → test_striuct-subclass-instance-freeze.rb}

@@ -1,6 +1,6 @@
 require_relative 'helper'
 
-class TestStriuctFreeze < Test::Unit::TestCase
+class Test_Striuct_Subclass_Instance__Freeze < Test::Unit::TestCase
 
   Sth = Striuct.new :foo
   

data/test/{test_striuct_subclass_hashlike.rb → test_striuct-subclass-instance-hashlike.rb}

@@ -1,6 +1,6 @@
 require_relative 'helper'
 
-class TestStriuctHashLike < Test::Unit::TestCase
+class Test_Striuct_Subclass_Instance_HashLike < Test::Unit::TestCase
 
   Sth = Striuct.new :foo, :bar, :hoge
 

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

@@ -0,0 +1,25 @@
+require_relative 'helper'
+
+class Test_Striuct_Subclass_Instance_KeyVallidatable < Test::Unit::TestCase
+
+  Sth = Striuct.new :foo, :bar
+  
+  def test_valid_keys?
+    sth = Sth.new
+    assert(sth.valid_keys?(must: [:foo, :bar]))
+    assert(sth.valid_keys?(let: [:foo, :bar]))
+    assert(sth.valid_keys?(must: [:foo], let: [:bar]))
+    assert(sth.valid_keys?(let: [:foo, :bar, :hoge]))
+    assert_same(false, sth.valid_keys?(must: [:foo, :bar, :hoge]))
+  end
+  
+  def test_valid_autonyms?
+    sth = Sth.new
+    assert(sth.valid_autonyms?(must: [:foo, :bar]))
+    assert(sth.valid_autonyms?(let: [:foo, :bar]))
+    assert(sth.valid_autonyms?(must: [:foo], let: [:bar]))
+    assert(sth.valid_autonyms?(let: [:foo, :bar, :hoge]))
+    assert_same(false, sth.valid_autonyms?(must: [:foo, :bar, :hoge]))
+  end
+  
+end

data/test/{test_striuct_subclass_lock.rb → test_striuct-subclass-instance-lock.rb}

@@ -1,6 +1,6 @@
 require_relative 'helper'
 
-class TestStriuctLock < Test::Unit::TestCase
+class Test_Striuct_Subclass_Instance_Lock < Test::Unit::TestCase
 
   Sth = Striuct.new :foo, :bar
   Sth.__send__ :close

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

@@ -0,0 +1,25 @@
+require_relative 'helper'
+
+class Test_Striuct_Subclass_Instance_to_s_Family < 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 test_to_s
+    user = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
+    assert_equal %q!#<struct' Test_Striuct_Subclass_Instance_to_s_Family::User id=9999, last_name="taro", family_name="yamada", address="Tokyo Japan", age=30>!,
+                 user.to_s
+  end
+
+  def test_inspect
+    user = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
+    assert_equal %q!#<struct' Test_Striuct_Subclass_Instance_to_s_Family::User strict?:true id=9999(valid?:true, lock?:false), last_name="taro"(valid?:true, lock?:false), family_name="yamada"(valid?:true, lock?:false), address="Tokyo Japan"(valid?:true, lock?:false), age=30(valid?:true, lock?:false)>!,
+                 user.inspect
+  end
+
+end

data/test/{test_striuct_subclass_inference.rb → test_striuct-subclass-instance-validation_inference.rb}

@@ -1,6 +1,6 @@
 require_relative 'helper'
 
-class TestStriuctInference < Test::Unit::TestCase
+class Test_Striuct_Subclass_Instance_Inference < Test::Unit::TestCase
 
   def test_inference
     klass = Striuct.define do

data/test/{test_striuct_subclass_specific_conditions.rb → test_striuct-subclass-instance-validation_specific_conditions.rb}

@@ -1,6 +1,6 @@
 require_relative 'helper'
 
-class TestStriuctSpecificConditions < Test::Unit::TestCase
+class Test_Striuct_Subclass_Instance_SpecificConditions < Test::Unit::TestCase
 
   Sth = Striuct.define do
     member :list_only_int, GENERICS(Integer)

data/test/{test_striuct_subclass_getter_validation.rb → test_striuct-subclass-instance-validation_with_getter.rb}

@@ -1,6 +1,6 @@
 require_relative 'helper'
 
-class TestGetterValidation < Test::Unit::TestCase
+class Test_Striuct_Subclass_Instance_GetterValidation < Test::Unit::TestCase
 
   Sth = Striuct.define do
     member :plus_getter, /./, getter_validation: true

data/test/test_striuct-subclass-instance_names.rb

@@ -0,0 +1,18 @@
+require_relative 'helper'
+
+class Test_Striuct_Subclass_Instance_Names < 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 test_members
+    user = User.new 9999, 'taro', 'yamada', 'Tokyo Japan', 30
+    assert_equal user.members, [:id, :last_name, :family_name, :address, :age]
+  end
+
+end

data/test/test_striuct-version.rb

@@ -0,0 +1,11 @@
+require_relative 'helper'
+
+class Test_Striuct_Version < Test::Unit::TestCase
+
+  def test_const_version
+    assert_kind_of String, Striuct::VERSION
+    assert(/\A\d+\.\d+\.\d+(\.\w+)?\z/ =~ Striuct::VERSION)
+    assert_equal true, Striuct::VERSION.frozen?
+  end
+
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: striuct
 version: !ruby/object:Gem::Version
-  version: 0.3.2
+  version: 0.3.3
   prerelease: 
 platform: ruby
 authors:
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-09-03 00:00:00.000000000 Z
+date: 2012-09-06 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: validation
@@ -18,7 +18,7 @@ dependencies:
     requirements:
     - - ~>
       - !ruby/object:Gem::Version
-        version: 0.0.3.1
+        version: 0.0.3
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
@@ -26,7 +26,7 @@ dependencies:
     requirements:
     - - ~>
       - !ruby/object:Gem::Version
-        version: 0.0.3.1
+        version: 0.0.3
 - !ruby/object:Gem::Dependency
   name: keyvalidatable
   requirement: !ruby/object:Gem::Requirement
@@ -84,6 +84,7 @@ files:
 - example/see_trace.rb
 - lib/striuct.rb
 - lib/striuct/classmethods.rb
+- lib/striuct/classmethods/README.md
 - lib/striuct/classmethods/adjustment.rb
 - lib/striuct/classmethods/constructor.rb
 - lib/striuct/classmethods/default.rb
@@ -98,20 +99,21 @@ files:
 - lib/striuct/classmethods/to_struct.rb
 - lib/striuct/classmethods/validation.rb
 - lib/striuct/instancemethods.rb
+- lib/striuct/instancemethods/README.md
 - lib/striuct/instancemethods/assign.rb
+- lib/striuct/instancemethods/cast.rb
 - lib/striuct/instancemethods/compare.rb
 - lib/striuct/instancemethods/default.rb
 - lib/striuct/instancemethods/delegate_class_methods.rb
 - lib/striuct/instancemethods/enum.rb
 - lib/striuct/instancemethods/hashy.rb
 - lib/striuct/instancemethods/inner.rb
+- lib/striuct/instancemethods/keyvalidatable.rb
 - lib/striuct/instancemethods/lock.rb
 - lib/striuct/instancemethods/object.rb
 - lib/striuct/instancemethods/requirements.rb
 - lib/striuct/instancemethods/safety.rb
-- lib/striuct/instancemethods/singleton_class.rb
 - lib/striuct/instancemethods/subscript.rb
-- lib/striuct/instancemethods/to_struct.rb
 - lib/striuct/instancemethods/validation.rb
 - lib/striuct/instancemethods/values.rb
 - lib/striuct/requirements.rb
@@ -121,28 +123,36 @@ files:
 - lib/striuct/version.rb
 - striuct.gemspec
 - test/helper.rb
-- test/test_striuct.rb
-- test/test_striuct_define.rb
-- test/test_striuct_subclass_adjuster.rb
-- test/test_striuct_subclass_alias_member.rb
-- test/test_striuct_subclass_assign.rb
-- test/test_striuct_subclass_classlock.rb
-- test/test_striuct_subclass_classmethods.rb
-- test/test_striuct_subclass_cloning.rb
-- test/test_striuct_subclass_default_value.rb
-- test/test_striuct_subclass_for_pairs.rb
-- test/test_striuct_subclass_freeze.rb
-- test/test_striuct_subclass_functional_condition.rb
-- test/test_striuct_subclass_getter_validation.rb
-- test/test_striuct_subclass_hashlike.rb
-- test/test_striuct_subclass_inference.rb
-- test/test_striuct_subclass_inheritable.rb
-- test/test_striuct_subclass_instance.rb
-- test/test_striuct_subclass_lock.rb
-- test/test_striuct_subclass_safetynaming.rb
-- test/test_striuct_subclass_specific_conditions.rb
-- test/test_striuct_subclass_to_struct.rb
-- test/test_striuct_version.rb
+- test/test_striuct-singleton_class-define.rb
+- test/test_striuct-subclass-class-cloning.rb
+- test/test_striuct-subclass-class-close.rb
+- test/test_striuct-subclass-class-constructor.rb
+- test/test_striuct-subclass-class-freeze.rb
+- test/test_striuct-subclass-class-inheritable.rb
+- test/test_striuct-subclass-class-macro.rb
+- test/test_striuct-subclass-class-safety_naming.rb
+- test/test_striuct-subclass-class-validation.rb
+- test/test_striuct-subclass-feature-alias_member.rb
+- test/test_striuct-subclass-feature-to_struct.rb
+- test/test_striuct-subclass-instance-accessor.rb
+- test/test_striuct-subclass-instance-adjuster.rb
+- test/test_striuct-subclass-instance-assign.rb
+- test/test_striuct-subclass-instance-basic.rb
+- test/test_striuct-subclass-instance-cloning.rb
+- test/test_striuct-subclass-instance-compare.rb
+- test/test_striuct-subclass-instance-default_value.rb
+- test/test_striuct-subclass-instance-enum.rb
+- test/test_striuct-subclass-instance-freeze.rb
+- test/test_striuct-subclass-instance-hashlike.rb
+- test/test_striuct-subclass-instance-keyvalidatable.rb
+- test/test_striuct-subclass-instance-lock.rb
+- test/test_striuct-subclass-instance-to_s_family.rb
+- test/test_striuct-subclass-instance-validation_functional_condition.rb
+- test/test_striuct-subclass-instance-validation_inference.rb
+- test/test_striuct-subclass-instance-validation_specific_conditions.rb
+- test/test_striuct-subclass-instance-validation_with_getter.rb
+- test/test_striuct-subclass-instance_names.rb
+- test/test_striuct-version.rb
 homepage: https://github.com/kachick/striuct
 licenses: []
 post_install_message: 
@@ -169,26 +179,34 @@ specification_version: 3
 summary: Struct++
 test_files:
 - test/helper.rb
-- test/test_striuct.rb
-- test/test_striuct_define.rb
-- test/test_striuct_subclass_adjuster.rb
-- test/test_striuct_subclass_alias_member.rb
-- test/test_striuct_subclass_assign.rb
-- test/test_striuct_subclass_classlock.rb
-- test/test_striuct_subclass_classmethods.rb
-- test/test_striuct_subclass_cloning.rb
-- test/test_striuct_subclass_default_value.rb
-- test/test_striuct_subclass_for_pairs.rb
-- test/test_striuct_subclass_freeze.rb
-- test/test_striuct_subclass_functional_condition.rb
-- test/test_striuct_subclass_getter_validation.rb
-- test/test_striuct_subclass_hashlike.rb
-- test/test_striuct_subclass_inference.rb
-- test/test_striuct_subclass_inheritable.rb
-- test/test_striuct_subclass_instance.rb
-- test/test_striuct_subclass_lock.rb
-- test/test_striuct_subclass_safetynaming.rb
-- test/test_striuct_subclass_specific_conditions.rb
-- test/test_striuct_subclass_to_struct.rb
-- test/test_striuct_version.rb
+- test/test_striuct-singleton_class-define.rb
+- test/test_striuct-subclass-class-cloning.rb
+- test/test_striuct-subclass-class-close.rb
+- test/test_striuct-subclass-class-constructor.rb
+- test/test_striuct-subclass-class-freeze.rb
+- test/test_striuct-subclass-class-inheritable.rb
+- test/test_striuct-subclass-class-macro.rb
+- test/test_striuct-subclass-class-safety_naming.rb
+- test/test_striuct-subclass-class-validation.rb
+- test/test_striuct-subclass-feature-alias_member.rb
+- test/test_striuct-subclass-feature-to_struct.rb
+- test/test_striuct-subclass-instance-accessor.rb
+- test/test_striuct-subclass-instance-adjuster.rb
+- test/test_striuct-subclass-instance-assign.rb
+- test/test_striuct-subclass-instance-basic.rb
+- test/test_striuct-subclass-instance-cloning.rb
+- test/test_striuct-subclass-instance-compare.rb
+- test/test_striuct-subclass-instance-default_value.rb
+- test/test_striuct-subclass-instance-enum.rb
+- test/test_striuct-subclass-instance-freeze.rb
+- test/test_striuct-subclass-instance-hashlike.rb
+- test/test_striuct-subclass-instance-keyvalidatable.rb
+- test/test_striuct-subclass-instance-lock.rb
+- test/test_striuct-subclass-instance-to_s_family.rb
+- test/test_striuct-subclass-instance-validation_functional_condition.rb
+- test/test_striuct-subclass-instance-validation_inference.rb
+- test/test_striuct-subclass-instance-validation_specific_conditions.rb
+- test/test_striuct-subclass-instance-validation_with_getter.rb
+- test/test_striuct-subclass-instance_names.rb
+- test/test_striuct-version.rb
 has_rdoc: 

data/lib/striuct/instancemethods/singleton_class.rb

@@ -1,22 +0,0 @@
-class Striuct; module InstanceMethods
-
-  class << self
-    
-    private
-    
-    # @param [Symbol, String] name
-    def delegate_class_method(name)
-      define_method name do |*args, &block|
-        self.class.__send__ name, *args, &block
-      end
-    end
-
-    # @param [Symbol, String] name
-    # @param [Symbol, String] names
-    def delegate_class_methods(name, *names)
-      [name, *names].each{|_name|delegate_class_method _name}
-    end
-    
-  end
-
-end; end

data/lib/striuct/instancemethods/to_struct.rb

@@ -1,12 +0,0 @@
-class Striuct; module InstanceMethods 
-
-  # @group To Ruby's Struct
-  
-  # @return [Struct]
-  def to_struct
-    self.class.to_struct_class.new(*values)
-  end
-
-  # @endgroup
-
-end; end

data/test/test_striuct.rb

@@ -1,24 +0,0 @@
-$VERBOSE = true
-require_relative 'helper'
-
-require_relative 'test_striuct_define'
-require_relative 'test_striuct_subclass_adjuster'
-require_relative 'test_striuct_subclass_alias_member'
-require_relative 'test_striuct_subclass_assign'
-require_relative 'test_striuct_subclass_classlock'
-require_relative 'test_striuct_subclass_classmethods'
-require_relative 'test_striuct_subclass_cloning'
-require_relative 'test_striuct_subclass_default_value'
-require_relative 'test_striuct_subclass_for_pairs'
-require_relative 'test_striuct_subclass_freeze'
-require_relative 'test_striuct_subclass_functional_condition'
-require_relative 'test_striuct_subclass_getter_validation'
-require_relative 'test_striuct_subclass_hashlike'
-require_relative 'test_striuct_subclass_inference'
-require_relative 'test_striuct_subclass_inheritable'
-require_relative 'test_striuct_subclass_instance'
-require_relative 'test_striuct_subclass_lock'
-require_relative 'test_striuct_subclass_safetynaming'
-require_relative 'test_striuct_subclass_specific_conditions'
-require_relative 'test_striuct_subclass_to_struct'
-require_relative 'test_striuct_version'

data/test/test_striuct_subclass_cloning.rb

@@ -1,36 +0,0 @@
-$VERBOSE = true
-require_relative 'helper'
-
-class TestStriuctCloning < Test::Unit::TestCase
-
-  class Sth < Striuct.new
-    member :sth
-  end
-  
-  def setup
-    @sth = Sth.new
-  end
-  
-  def test_clone
-    sth2 = @sth.dup
-    @sth.sth = 1
-    assert_equal false, (@sth.sth == sth2.sth)
-    
-    sth2 = @sth.clone
-    @sth.sth = 2
-    assert_equal false, (@sth.sth == sth2.sth)
-  end
-  
-  def test_class_dup
-    klass = Sth.dup
-    Sth.__send__ :member, :dummy1
-    assert_equal false, klass.member?(:dummy1)
-  end
-  
-  def test_class_clone
-    klass = Sth.clone
-    Sth.__send__ :member, :dummy2
-    assert_equal false, klass.member?(:dummy2)
-  end
-
-end

data/test/test_striuct_subclass_for_pairs.rb

@@ -1,20 +0,0 @@
-require_relative 'helper'
-
-class TestStriuctForPairs < Test::Unit::TestCase
-
-  Sth = Striuct.new :foo, :bar, :hoge
-  SampleStruct = Struct.new :foo, :bar, :hoge
-  
-  def test_for_pairs_from_hash
-    sth = Sth[hoge: 7, foo: 8]
-   
-    assert_equal [8, nil, 7], sth.values
-  end
-
-  def test_for_pairs_from_struct
-    sth = Sth[SampleStruct.new 8, nil, 7]
-   
-    assert_equal [8, nil, 7], sth.values
-  end
-
-end