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
|
require 'test/unit'
$KCODE = 'none'
class TestEnv < Test::Unit::TestCase
IGNORE_CASE = /djgpp|bccwin|mswin|mingw/ =~ RUBY_PLATFORM
def setup
@backup = ENV['test']
@BACKUP = ENV['TEST']
ENV['test'] = nil
ENV['TEST'] = nil
end
def teardown
ENV['test'] = @backup
ENV['TEST'] = @BACKUP
end
def test_bracket
assert_nil(ENV['test'])
assert_nil(ENV['TEST'])
ENV['test'] = 'foo'
assert_equal('foo', ENV['test'])
if IGNORE_CASE
assert_equal('foo', ENV['TEST'])
else
assert_nil(ENV['TEST'])
end
ENV['TEST'] = 'bar'
assert_equal('bar', ENV['TEST'])
if IGNORE_CASE
assert_equal('bar', ENV['test'])
else
assert_equal('foo', ENV['test'])
end
assert_raises(TypeError) {
tmp = ENV[1]
}
assert_raises(TypeError) {
ENV[1] = 'foo'
}
assert_raises(TypeError) {
ENV['test'] = 0
}
end
def test_has_value
val = 'a'
val.succ! while ENV.has_value?(val) && ENV.has_value?(val.upcase)
ENV['test'] = val[0...-1]
assert_equal(false, ENV.has_value?(val))
assert_equal(false, ENV.has_value?(val.upcase))
ENV['test'] = val
assert_equal(true, ENV.has_value?(val))
assert_equal(false, ENV.has_value?(val.upcase))
ENV['test'] = val.upcase
assert_equal(false, ENV.has_value?(val))
assert_equal(true, ENV.has_value?(val.upcase))
end
def test_index
val = 'a'
val.succ! while ENV.has_value?(val) && ENV.has_value?(val.upcase)
ENV['test'] = val[0...-1]
assert_nil(ENV.index(val))
assert_nil(ENV.index(val.upcase))
ENV['test'] = val
if IGNORE_CASE
assert_equal('TEST', ENV.index(val).upcase)
else
assert_equal('test', ENV.index(val))
end
assert_nil(ENV.index(val.upcase))
ENV['test'] = val.upcase
assert_nil(ENV.index(val))
if IGNORE_CASE
assert_equal('TEST', ENV.index(val.upcase).upcase)
else
assert_equal('test', ENV.index(val.upcase))
end
end
end
|
