summaryrefslogtreecommitdiffstats
path: root/web/server/h2o/libh2o/deps/mruby/mrbgems/mruby-inline-struct/test/inline.rb
blob: 49585923216638f51bc6f4f6ef3ccf3ab5635d4e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
##
# InlineStruct Test

class InlineStructTest
  def extra_method
    :ok
  end

  def test_ivar_set
    @var = :ivar
  end

  def test_ivar_get
    @vat
  end
end

assert('InlineStructTest#dup') do
  obj = InlineStructTest.new(1)
  assert_equal obj.to_s, 'fixnum(1)'
  assert_equal obj.dup.to_s, 'fixnum(1)'
end

assert('InlineStructTest#clone') do
  obj = InlineStructTest.new(1)
  assert_equal obj.to_s, 'fixnum(1)'
  assert_equal obj.clone.to_s, 'fixnum(1)'
end

assert('InlineStruct#object_id') do
  obj1 = InlineStructTest.new(1)
  obj2 = InlineStructTest.new(1)
  assert_not_equal obj1, obj2
  assert_not_equal obj1.object_id, obj2.object_id
  assert_not_equal obj1.object_id, obj1.dup.object_id
  assert_not_equal obj1.object_id, obj1.clone.object_id
end

assert('InlineStructTest#mutate (dup)') do
  obj1 = InlineStructTest.new("foo")
  assert_equal obj1.to_s, "string(foo)"
  obj2 = obj1.dup
  assert_equal obj2.to_s, "string(foo)"
  obj1.mutate
  assert_equal obj1.to_s, "mutate(foo)"
  assert_equal obj2.to_s, "string(foo)"
end

assert('InlineStructTest#mutate (clone)') do
  obj1 = InlineStructTest.new("foo")
  assert_equal obj1.to_s, "string(foo)"
  obj2 = obj1.clone
  assert_equal obj2.to_s, "string(foo)"
  obj1.mutate
  assert_equal obj1.to_s, "mutate(foo)"
  assert_equal obj2.to_s, "string(foo)"
end

assert('InlineStructTest#test_receive(string)') do
  assert_equal InlineStructTest.test_receive(InlineStructTest.new('a')), true
end

assert('InlineStructTest#test_receive(float)') do
  assert_equal InlineStructTest.test_receive(InlineStructTest.new(1.25)), false
end

assert('InlineStructTest#test_receive(invalid object)') do
  assert_raise(TypeError) do
    InlineStructTest.test_receive([])
  end
end

assert('InlineStructTest#test_receive(string)') do
  assert_equal InlineStructTest.test_receive_direct(InlineStructTest.new('a')), true
end

assert('InlineStructTest#test_receive(float)') do
  assert_equal InlineStructTest.test_receive_direct(InlineStructTest.new(1.25)), false
end

assert('InlineStructTest#test_receive(invalid object)') do
  assert_raise(TypeError) do
    InlineStructTest.test_receive_direct([])
  end
end

assert('InlineStructTest#extra_method') do
  assert_equal InlineStructTest.new(1).extra_method, :ok
end

assert('InlineStructTest instance variable') do
  obj = InlineStructTest.new(1)
  assert_raise(ArgumentError) do
    obj.test_ivar_set
  end
  assert_equal obj.test_ivar_get, nil
end

# 64-bit mode
if InlineStructTest.length == 24
  assert('InlineStructTest length [64 bit]') do
    assert_equal InlineStructTest.length, 3 * 8
  end

  assert('InlineStructTest w/float [64 bit]') do
    obj = InlineStructTest.new(1.25)
    assert_equal obj.to_s, "float(1.250)"
  end

  assert('InlineStructTest w/fixnum [64 bit]') do
    obj = InlineStructTest.new(42)
    assert_equal obj.to_s, "fixnum(42)"
  end

  assert('InlineStructTest w/string [64 bit]') do
    obj = InlineStructTest.new("hello")
    assert_equal obj.to_s, "string(hello)"
  end

  assert('InlineStructTest w/long string [64 bit]') do
    obj = InlineStructTest.new("this won't fit in 3 * 8 bytes available for the structure")
    assert_equal obj.to_s, "string(this won't fit i"
  end
end

# 32-bit mode
if InlineStructTest.length == 12
  assert('InlineStructTest length [32 bit]') do
    assert_equal InlineStructTest.length, 3 * 4
  end

  assert('InlineStructTest w/float [32 bit]') do
    obj = InlineStructTest.new(1.25)
    assert_equal obj.to_s, "float(1.250"
  end

  assert('InlineStructTest w/fixnum [32 bit]') do
    obj = InlineStructTest.new(42)
    assert_equal obj.to_s, "fixnum(42)"
  end

  assert('InlineStructTest w/string [32 bit]') do
    obj = InlineStructTest.new("hello")
    assert_equal obj.to_s, "string(hell"
  end

  assert('InlineStructTest w/long string [32 bit]') do
    obj = InlineStructTest.new("this won't fit in 3 * 4 bytes available for the structure")
    assert_equal obj.to_s, "string(this"
  end
end