third-party/mruby/mrbgems/mruby-struct/test/struct.rb

   1 ##
   2 # Struct ISO Test
   3
   4 assert('Struct', '15.2.18') do
   5   assert_equal Class, Struct.class
   6 end
   7
   8 assert('Struct.new', '15.2.18.3.1') do
   9   c = Struct.new(:m1, :m2)
  10   assert_equal Struct, c.superclass
  11   assert_equal [:m1, :m2], c.members
  12 end
  13
  14 assert('Struct#==', '15.2.18.4.1') do
  15   c = Struct.new(:m1, :m2)
  16   cc1 = c.new(1,2)
  17   cc2 = c.new(1,2)
  18   assert_true cc1 == cc2
  19
  20   Struct.new(:m1, :m2) { def foo; end }
  21   assert_raise(NoMethodError) { Struct.new(:m1).new.foo }
  22 end
  23
  24 assert('Struct#[]', '15.2.18.4.2') do
  25   c = Struct.new(:m1, :m2)
  26   cc = c.new(1,2)
  27   assert_equal 1, cc[:m1]
  28   assert_equal 2, cc["m2"]
  29   assert_equal 1, cc[0]
  30   assert_equal 2, cc[-1]
  31   assert_raise(TypeError) { cc[[]] }
  32   assert_raise(IndexError) { cc[2] }
  33   assert_raise(NameError) { cc['tama'] }
  34 end
  35
  36 assert('Struct#[]=', '15.2.18.4.3') do
  37   c = Struct.new(:m1, :m2)
  38   cc = c.new(1,2)
  39   cc[:m1] = 3
  40   assert_equal 3, cc[:m1]
  41   cc["m2"] = 3
  42   assert_equal 3, cc["m2"]
  43   cc[0] = 4
  44   assert_equal 4, cc[0]
  45   cc[-1] = 5
  46   assert_equal 5, cc[-1]
  47   assert_raise(TypeError) { cc[[]] = 3 }
  48   assert_raise(IndexError) { cc[2] = 7 }
  49   assert_raise(NameError) { cc['pochi'] = 8 }
  50 end
  51
  52 assert('Struct#each', '15.2.18.4.4') do
  53   c = Struct.new(:m1, :m2)
  54   cc = c.new(1,2)
  55   a = []
  56   cc.each{|x|
  57     a << x
  58   }
  59   assert_equal [1, 2], a
  60 end
  61
  62 assert('Struct#each_pair', '15.2.18.4.5') do
  63   c = Struct.new(:m1, :m2)
  64   cc = c.new(1,2)
  65   a = []
  66   cc.each_pair{|k,v|
  67     a << [k,v]
  68   }
  69   assert_equal [[:m1, 1], [:m2, 2]], a
  70 end
  71
  72 assert('Struct#members', '15.2.18.4.6') do
  73   c = Struct.new(:m1, :m2)
  74   assert_equal [:m1, :m2], c.new(1,2).members
  75 end
  76
  77 assert('Struct#select', '15.2.18.4.7') do
  78   c = Struct.new(:m1, :m2)
  79   assert_equal([2]) { c.new(1,2).select{|v| v % 2 == 0} }
  80 end
  81
  82 assert('large struct') do
  83   c = Struct.new(:m1, :m2, :m3, :m4, :m5, :m6, :m7, :m8, :m9, :m10, :m11, :m12, :m13)
  84   cc = c.new(1,2,3,4,5,6,7,8,9,10,11,12,13)
  85   assert_equal 1, cc.m1
  86   assert_equal 2, cc.m2
  87   assert_equal 3, cc.m3
  88   assert_equal 4, cc.m4
  89   assert_equal 5, cc.m5
  90   assert_equal 6, cc.m6
  91   assert_equal 7, cc.m7
  92   assert_equal 8, cc.m8
  93   assert_equal 9, cc.m9
  94   assert_equal 10, cc.m10
  95   assert_equal 13, cc.m13
  96
  97   cc.m13 = 'test'
  98   assert_equal 'test', cc.m13
  99
 100   assert_raise(NoMethodError) { cc.m14 }
 101 end
 102
 103 assert('wrong struct arg count') do
 104   c = Struct.new(:m1)
 105   assert_raise ArgumentError do
 106     cc = c.new(1,2,3)
 107   end
 108 end
 109
 110 assert('struct dup') do
 111   c = Struct.new(:m1, :m2, :m3, :m4, :m5)
 112   cc = c.new(1,2,3,4,5)
 113   assert_nothing_raised {
 114     assert_equal(cc, cc.dup)
 115   }
 116 end
 117
 118 assert('struct inspect') do
 119   c = Struct.new(:m1, :m2, :m3, :m4, :m5)
 120   cc = c.new(1,2,3,4,5)
 121   assert_equal "#<struct m1=1, m2=2, m3=3, m4=4, m5=5>", cc.inspect
 122 end
 123
 124 assert('Struct#length, Struct#size') do
 125   s = Struct.new(:f1, :f2).new(0, 1)
 126   assert_equal 2, s.size
 127   assert_equal 2, s.length
 128 end
 129
 130 assert('Struct#to_a, Struct#values') do
 131   s = Struct.new(:mem1, :mem2).new('a', 'b')
 132   assert_equal ['a', 'b'], s.to_a
 133   assert_equal ['a', 'b'], s.values
 134 end
 135
 136 assert('Struct#to_h') do
 137   s = Struct.new(:white, :red, :green).new('ruuko', 'yuzuki', 'hitoe')
 138   assert_equal(:white => 'ruuko', :red => 'yuzuki', :green => 'hitoe') { s.to_h }
 139 end
 140
 141 assert('Struct#values_at') do
 142   a = Struct.new(:blue, :purple).new('aki', 'io')
 143   assert_equal ['aki'], a.values_at(0)
 144   assert_equal ['io', 'aki'], a.values_at(1, 0)
 145   assert_raise(IndexError) { a.values_at 2 }
 146 end
 147
 148 assert("Struct#dig") do
 149   a = Struct.new(:blue, :purple).new('aki', Struct.new(:red).new(1))
 150   assert_equal 'aki', a.dig(:blue)
 151   assert_equal 1, a.dig(:purple, :red)
 152   assert_equal 1, a.dig(1, 0)
 153 end
 154
 155 assert("Struct.new removes existing constant") do
 156   skip "redefining Struct with same name cause warnings"
 157   begin
 158     assert_not_equal Struct.new("Test", :a), Struct.new("Test", :a, :b)
 159   ensure
 160     Struct.remove_const :Test
 161   end
 162 end
 163
 164 assert("Struct#initialize_copy requires struct to be the same type") do
 165   begin
 166     Struct.new("Test", :a)
 167     a = Struct::Test.new("a")
 168     Struct.remove_const :Test
 169     Struct.new("Test", :a, :b)
 170     assert_raise(TypeError) do
 171       a.initialize_copy(Struct::Test.new("a", "b"))
 172     end
 173   ensure
 174     Struct.remove_const :Test
 175   end
 176 end
 177
 178 assert("Struct.new does not allow array") do
 179   assert_raise(TypeError) do
 180     Struct.new("Test", [:a])
 181   end
 182 end
 183
 184 assert("Struct.new generates subclass of Struct") do
 185   begin
 186     original_struct = Struct
 187     Struct = String
 188     assert_equal original_struct, original_struct.new(:foo).superclass
 189   ensure
 190     Struct = original_struct
 191   end
 192 end
 193
 194 assert 'Struct#freeze' do
 195   c = Struct.new :m
 196
 197   o = c.new
 198   o.m = :test
 199   assert_equal :test, o.m
 200
 201   o.freeze
 202   assert_raise(FrozenError) { o.m = :modify }
 203   assert_raise(FrozenError) { o[:m] = :modify }
 204   assert_equal :test, o.m
 205 end