mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
452 lines
8.3 KiB
Ruby
452 lines
8.3 KiB
Ruby
# frozen_string_literal: false
|
|
require 'test/unit'
|
|
|
|
class TestRubyPrimitive < Test::Unit::TestCase
|
|
|
|
def test_not
|
|
assert_equal false, !true
|
|
assert_equal true, !false
|
|
assert_equal true, !nil
|
|
assert_equal false, !(1+1)
|
|
assert_equal false, !!nil
|
|
assert_equal true, !!1
|
|
end
|
|
|
|
def test_lvar
|
|
a = 1
|
|
assert_equal 1, a
|
|
b = 2
|
|
assert_equal 1, a
|
|
a = b = 3
|
|
assert_equal 3, a
|
|
assert_equal 3, b
|
|
a = b = c = 4
|
|
assert_equal 4, a
|
|
assert_equal 4, b
|
|
assert_equal 4, c
|
|
end
|
|
|
|
C_Setup = -> do
|
|
remove_const :C if defined? ::TestRubyPrimitive::C
|
|
remove_const :A if defined? ::TestRubyPrimitive::A
|
|
|
|
C = 1
|
|
class A
|
|
Const = 1
|
|
class B
|
|
Const = 2
|
|
class C
|
|
Const = 3
|
|
def const
|
|
Const
|
|
end
|
|
end
|
|
end
|
|
end
|
|
(1..2).map {
|
|
A::B::C::Const
|
|
}
|
|
end
|
|
|
|
def test_constant
|
|
C_Setup.call
|
|
|
|
assert_equal 1, C
|
|
assert_equal 1, C
|
|
assert_equal 1, A::Const
|
|
assert_equal 2, A::B::Const
|
|
assert_equal 3, A::B::C::Const
|
|
assert_equal 3, A::B::C.new.const
|
|
assert_equal 1, ::TestRubyPrimitive::A::Const
|
|
A::B::C.send(:remove_const, :Const)
|
|
assert_equal 2, A::B::C.new.const
|
|
assert_raise(TypeError) {
|
|
C::CONST
|
|
}
|
|
end
|
|
|
|
class A2
|
|
class B2
|
|
class C2
|
|
C = 7
|
|
end
|
|
end
|
|
end
|
|
|
|
def test_constant_cache
|
|
i = 0
|
|
while i < 3
|
|
r = A2::B2::C2::C
|
|
i += 1
|
|
end
|
|
assert_equal 7, r
|
|
end
|
|
|
|
class A3
|
|
class B3
|
|
C = 99
|
|
end
|
|
end
|
|
i = 0
|
|
while i < 3
|
|
r = r = A3::B3::C # cache
|
|
class A3::B3
|
|
remove_const :C
|
|
end
|
|
A3::B3::C = i ** i
|
|
i += 1
|
|
end
|
|
|
|
def test_constant_cache2
|
|
assert_equal 4, A3::B3::C
|
|
end
|
|
|
|
class A4
|
|
Const = 7
|
|
(1..3).map {
|
|
$test_ruby_primitive_constant_cache3 = self::Const
|
|
}
|
|
end
|
|
|
|
def test_constant_cache3
|
|
assert_equal 7, $test_ruby_primitive_constant_cache3
|
|
end
|
|
|
|
class A5
|
|
Const = 8
|
|
(1..3).map {
|
|
$test_ruby_primitive_constant_cache4 = eval('self')::Const
|
|
}
|
|
end
|
|
|
|
def test_constatant_cache4
|
|
assert_equal 8, $test_ruby_primitive_constant_cache4
|
|
end
|
|
|
|
class A6
|
|
Const = 0
|
|
def self.foo
|
|
self::Const
|
|
end
|
|
end
|
|
class B6 < A6
|
|
Const = 1
|
|
end
|
|
class C6 < B6
|
|
Const = 2
|
|
end
|
|
$test_ruby_primitive_constant_cache5 = [A6.foo, B6.foo, C6.foo]
|
|
|
|
def test_constant_cache5
|
|
assert_equal [0, 1, 2], $test_ruby_primitive_constant_cache5
|
|
end
|
|
|
|
def test_gvar
|
|
$test_ruby_primitive_gvar = 7
|
|
assert_equal 7, $test_ruby_primitive_gvar
|
|
assert_equal 7, $test_ruby_primitive_gvar
|
|
$test_ruby_primitive_gvar = 88
|
|
assert_equal 88, $test_ruby_primitive_gvar
|
|
assert_equal 88, $test_ruby_primitive_gvar
|
|
assert_equal 7, ($test_ruby_primitive_gvar = 7)
|
|
assert_equal 7, ($test_ruby_primitive_gvar = 7)
|
|
end
|
|
|
|
A7_Setup = -> do
|
|
remove_const :A7 if defined? TestRubyPrimitive::A7
|
|
|
|
class A7
|
|
@@c = 1
|
|
def m
|
|
@@c += 1
|
|
end
|
|
end
|
|
end
|
|
|
|
def test_cvar_from_instance_method
|
|
A7_Setup.call
|
|
|
|
assert_equal 2, A7.new.m
|
|
assert_equal 3, A7.new.m
|
|
assert_equal 4, A7.new.m
|
|
end
|
|
|
|
A8_Setup = -> do
|
|
remove_const :A8 if defined? TestRubyPrimitive::A8
|
|
|
|
class A8
|
|
@@c = 1
|
|
class << self
|
|
def m
|
|
@@c += 1
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
def test_cvar_from_singleton_method
|
|
A8_Setup.call
|
|
|
|
assert_equal 2, A8.m
|
|
assert_equal 3, A8.m
|
|
assert_equal 4, A8.m
|
|
end
|
|
|
|
A9_Setup = -> do
|
|
remove_const :A8 if defined? TestRubyPrimitive::A8
|
|
|
|
class A9
|
|
@@c = 1
|
|
def self.m
|
|
@@c += 1
|
|
end
|
|
end
|
|
end
|
|
|
|
def test_cvar_from_singleton_method2
|
|
A9_Setup.call
|
|
|
|
assert_equal 2, A9.m
|
|
assert_equal 3, A9.m
|
|
assert_equal 4, A9.m
|
|
end
|
|
|
|
class A10
|
|
attr_accessor :a
|
|
end
|
|
|
|
def test_opassign
|
|
i = 0
|
|
i += 1
|
|
assert_equal 1, i
|
|
|
|
@iv = 2
|
|
@iv += 2
|
|
assert_equal 4, @iv
|
|
|
|
# init @@cv
|
|
@@cv = nil
|
|
|
|
@@cv ||= 1
|
|
assert_equal 1, @@cv
|
|
@@cv &&= 2
|
|
assert_equal 2, @@cv
|
|
@@cv ||= 99
|
|
assert_equal 2, @@cv
|
|
|
|
$gv = 3
|
|
$gv += 4
|
|
assert_equal 7, $gv
|
|
|
|
obj = A10.new
|
|
obj.a = 9
|
|
obj.a &&= 7
|
|
assert_equal 7, obj.a
|
|
|
|
obj.a = nil
|
|
obj.a ||= 2
|
|
assert_equal 2, obj.a
|
|
|
|
obj.a &&= 3
|
|
assert_equal 3, obj.a
|
|
|
|
a = []
|
|
a[0] ||= 3
|
|
assert_equal 3, a[0]
|
|
a[0] &&= 7
|
|
assert_equal 7, a[0]
|
|
a[0] ||= 3
|
|
assert_equal 7, a[0]
|
|
|
|
a = [0, 1, nil, 3, 4]
|
|
a[*[2]] ||= :foo
|
|
assert_equal [0, 1, :foo, 3, 4], a
|
|
a[*[1,3]] &&= [:bar]
|
|
assert_equal [0, :bar, 4], a
|
|
end
|
|
|
|
def test_opassign_and_or
|
|
a = 1
|
|
a ||= 2
|
|
assert_equal 1, a
|
|
a = nil
|
|
a ||= 2
|
|
assert_equal 2, a
|
|
a = 1
|
|
a &&= 3
|
|
assert_equal 3, a
|
|
a = nil
|
|
a &&= 4
|
|
assert_nil a
|
|
|
|
h = {}
|
|
h[0] ||= 1
|
|
assert_equal 1, h[0]
|
|
h = {}
|
|
h[0] &&= 1
|
|
assert_nil h[0]
|
|
h = {0 => 7}
|
|
h[0] ||= 1
|
|
assert_equal 7, h[0]
|
|
h = {0 => 7}
|
|
h[0] &&= 1
|
|
assert_equal 1, h[0]
|
|
end
|
|
|
|
def test_backref
|
|
/a(b)(c)d/ =~ 'xyzabcdefgabcdefg'
|
|
assert_equal 'b', $1
|
|
assert_equal 'c', $2
|
|
assert_nil $3
|
|
assert_instance_of MatchData, $~
|
|
assert_equal 'abcd', $&
|
|
assert_equal 'xyz', $`
|
|
assert_equal 'efgabcdefg', $'
|
|
assert_equal 'c', $+
|
|
|
|
/(?!)/ =~ 'xyzabcdefgabcdefg'
|
|
assert_nil $1
|
|
assert_nil $2
|
|
assert_nil $3
|
|
assert_nil $~
|
|
assert_nil $&
|
|
assert_nil $`
|
|
assert_nil $'
|
|
assert_nil $+
|
|
end
|
|
|
|
def test_fact
|
|
assert_equal 306057512216440636035370461297268629388588804173576999416776741259476533176716867465515291422477573349939147888701726368864263907759003154226842927906974559841225476930271954604008012215776252176854255965356903506788725264321896264299365204576448830388909753943489625436053225980776521270822437639449120128678675368305712293681943649956460498166450227716500185176546469340112226034729724066333258583506870150169794168850353752137554910289126407157154830282284937952636580145235233156936482233436799254594095276820608062232812387383880817049600000000000000000000000000000000000000000000000000000000000000000000000000, fact(300)
|
|
end
|
|
|
|
def fact(n)
|
|
if n > 1
|
|
n * fact(n - 1)
|
|
else
|
|
1
|
|
end
|
|
end
|
|
|
|
def test_mul
|
|
assert_equal 0, 2 * 0
|
|
assert_equal 0, 0 * 2
|
|
assert_equal 4, 2 * 2
|
|
end
|
|
|
|
class MyNum
|
|
def /(a)
|
|
a * 100
|
|
end
|
|
end
|
|
|
|
def test_div
|
|
assert_equal 1, 3 / 2
|
|
assert_equal 1.5, 3.0 / 2.0
|
|
assert_equal 300, MyNum.new / 3
|
|
end
|
|
|
|
class MyArr
|
|
def length
|
|
'string'
|
|
end
|
|
end
|
|
|
|
def test_length
|
|
assert_equal 0, [].length
|
|
assert_equal 1, [1].length
|
|
assert_equal 2, [1,2].length
|
|
assert_equal 0, {}.length
|
|
assert_equal 1, {1=>1}.length
|
|
assert_equal 2, {1=>1, 2=>2}.length
|
|
assert_equal 'string', MyArr.new.length
|
|
end
|
|
|
|
class MyNum2
|
|
def %(a)
|
|
a * 100
|
|
end
|
|
end
|
|
|
|
def test_mod
|
|
assert_equal 2, 5 % 3
|
|
assert_equal 1.0, 3.0 % 2.0
|
|
assert_equal 300, MyNum2.new % 3
|
|
end
|
|
|
|
class MyObj
|
|
def [](*args)
|
|
args
|
|
end
|
|
|
|
def []=(*args)
|
|
args
|
|
end
|
|
end
|
|
|
|
def test_aref
|
|
a = [0,1]
|
|
assert_equal 0, a[0]
|
|
assert_equal 1, a[1]
|
|
assert_nil a[2]
|
|
h = {0=>0, 1=>1}
|
|
obj = MyObj.new
|
|
assert_equal 0, h[0]
|
|
assert_equal 1, h[1]
|
|
assert_nil h[2]
|
|
assert_equal [0], obj[0]
|
|
assert_equal [0,1], obj[0,1]
|
|
assert_equal [0,1,2], obj[0,1,2]
|
|
end
|
|
|
|
def test_aset
|
|
obj = MyObj.new
|
|
assert_equal 7, (obj[0] = 7)
|
|
assert_equal 7, (obj[0,1] = 7)
|
|
assert_equal 7, (obj[0,1,2] = 7)
|
|
end
|
|
|
|
class MyObj2
|
|
def attr=(*args)
|
|
args
|
|
end
|
|
end
|
|
|
|
def test_attr_setter
|
|
obj = MyObj2.new
|
|
assert_equal 1, (obj.attr = 1)
|
|
end
|
|
|
|
def test_list_expand
|
|
a = []
|
|
assert_equal [0], [0, *a]
|
|
a = [1]
|
|
assert_equal [0,1], [0, *a]
|
|
a = [1,2]
|
|
assert_equal [0,1,2], [0, *a]
|
|
a = [1,2,3]
|
|
assert_equal [0,1,2,3], [0, *a]
|
|
#a = [1,2,3]
|
|
#assert_equal [0,1,2,3,4], [0, *a, 4]
|
|
end
|
|
|
|
def test_concatarray_ruby_dev_41933
|
|
bug3658 = '[ruby-dev:41933]'
|
|
[0, *x=1]
|
|
assert_equal(1, x, bug3658)
|
|
[0, *x=1, 2]
|
|
assert_equal(1, x, bug3658)
|
|
class << (x = Object.new)
|
|
attr_accessor :to_a_called
|
|
def to_a
|
|
@to_a_called = true
|
|
[self]
|
|
end
|
|
end
|
|
x.to_a_called = false
|
|
[0, *x]
|
|
assert_predicate(x, :to_a_called, bug3658)
|
|
x.to_a_called = false
|
|
[0, *x, 2]
|
|
assert_predicate(x, :to_a_called, bug3658)
|
|
end
|
|
end
|