diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/t/hash.rb | 227 | ||||
| -rw-r--r-- | test/t/range.rb | 65 | ||||
| -rw-r--r-- | test/t/string.rb | 322 | ||||
| -rw-r--r-- | test/t/symbol.rb | 23 |
4 files changed, 637 insertions, 0 deletions
diff --git a/test/t/hash.rb b/test/t/hash.rb new file mode 100644 index 000000000..020c2aa3a --- /dev/null +++ b/test/t/hash.rb @@ -0,0 +1,227 @@ +## +# Hash ISO Test + +assert('Hash', '15.2.13') do + Hash.class == Class +end + +assert('Hash#==', '15.2.13.4.1') do + ({ 'abc' => 'abc' } == { 'abc' => 'abc' }) and + not ({ 'abc' => 'abc' } == { 'cba' => 'cba' }) +end + +assert('Hash#[]', '15.2.13.4.2') do + a = { 'abc' => 'abc' } + + a['abc'] == 'abc' +end + +assert('Hash#[]=', '15.2.13.4.3') do + a = Hash.new + a['abc'] = 'abc' + + a['abc'] == 'abc' +end + +assert('Hash#clear', '15.2.13.4.4') do + a = { 'abc' => 'abc' } + a.clear + + a == { } +end + +assert('Hash#default', '15.2.13.4.5') do + a = Hash.new + b = Hash.new('abc') + c = Hash.new {|s,k| s[k] = k} + + a.default == nil and b.default == 'abc' and + c.default == nil and c.default('abc') == 'abc' +end + +assert('Hash#default=', '15.2.13.4.6') do + a = { 'abc' => 'abc' } + a.default = 'cba' + + a['abc'] == 'abc' and a['notexist'] == 'cba' +end + +assert('Hash#default_proc', '15.2.13.4.7') do + a = Hash.new + b = Hash.new {|s,k| s[k] = k} + + a.default_proc == nil and b.default_proc.class == Proc +end + +assert('Hash#delete', '15.2.13.4.8') do + a = { 'abc' => 'abc' } + b = { 'abc' => 'abc' } + b_tmp_1 = false + b_tmp_2 = false + + a.delete('abc') + b.delete('abc') do |k| + b_tmp_1 = true + end + b.delete('abc') do |k| + b_tmp_2 = true + end + + a.delete('cba') == nil and not a.has_key?('abc') and + not b_tmp_1 and b_tmp_2 +end + +assert('Hash#each', '15.2.13.4.9') do + a = { 'abc_key' => 'abc_value' } + key = nil + value = nil + + a.each do |k,v| + key = k + value = v + end + + key == 'abc_key' and value == 'abc_value' +end + +assert('Hash#each_key', '15.2.13.4.10') do + a = { 'abc_key' => 'abc_value' } + key = nil + + a.each_key do |k| + key = k + end + + key == 'abc_key' +end + +assert('Hash#each_value', '15.2.13.4.11') do + a = { 'abc_key' => 'abc_value' } + value = nil + + a.each_value do |v| + value = v + end + + value == 'abc_value' +end + +assert('Hash#empty?', '15.2.13.4.12') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new + + not a.empty? and b.empty? +end + +assert('Hash#has_key?', '15.2.13.4.13') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new + + a.has_key?('abc_key') and not b.has_key?('cba') +end + +assert('Hash#has_value?', '15.2.13.4.14') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new + + a.has_value?('abc_value') and not b.has_value?('cba') +end + +assert('Hash#include?', '15.2.13.4.15') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new + + a.include?('abc_key') and not b.include?('cba') +end + +assert('Hash#initialize copy', '15.2.13.4.17') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new.initialize_copy(a) + + b == { 'abc_key' => 'abc_value' } +end + +assert('Hash#key?', '15.2.13.4.18') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new + + a.key?('abc_key') and not b.key?('cba') +end + +assert('Hash#keys', '15.2.13.4.19') do + a = { 'abc_key' => 'abc_value' } + + a.keys == ['abc_key'] +end + +assert('Hash#length', '15.2.13.4.20') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new + + a.length == 1 and b.length == 0 +end + +assert('Hash#member?', '15.2.13.4.21') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new + + a.member?('abc_key') and not b.member?('cba') +end + +assert('Hash#merge', '15.2.13.4.22') do + a = { 'abc_key' => 'abc_value', 'cba_key' => 'cba_value' } + b = { 'cba_key' => 'XXX', 'xyz_key' => 'xyz_value' } + + result_1 = a.merge b + result_2 = a.merge(b) do |key, original, new| + original + end + + result_1 == {'abc_key' => 'abc_value', 'cba_key' => 'XXX', + 'xyz_key' => 'xyz_value' } and + result_2 == {'abc_key' => 'abc_value', 'cba_key' => 'cba_value', + 'xyz_key' => 'xyz_value' } +end + +assert('Hash#replace', '15.2.13.4.23') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new.replace(a) + + b == { 'abc_key' => 'abc_value' } +end + +assert('Hash#shift', '15.2.13.4.24') do + a = { 'abc_key' => 'abc_value', 'cba_key' => 'cba_value' } + # TODO Broken ATM (Hash instead of Array + b = a.shift + + a == { 'abc_key' => 'abc_value' } +end + +assert('Hash#size', '15.2.13.4.25') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new + + a.size == 1 and b.size == 0 +end + +assert('Hash#store', '15.2.13.4.26') do + a = Hash.new + a.store('abc', 'abc') + + a['abc'] == 'abc' +end + +assert('Hash#value?', '15.2.13.4.27') do + a = { 'abc_key' => 'abc_value' } + b = Hash.new + + a.value?('abc_value') and not b.value?('cba') +end + +assert('Hash#values', '15.2.13.4.28') do + a = { 'abc_key' => 'abc_value' } + + a.values == ['abc_value'] +end + diff --git a/test/t/range.rb b/test/t/range.rb new file mode 100644 index 000000000..42677e72e --- /dev/null +++ b/test/t/range.rb @@ -0,0 +1,65 @@ +## +# Range ISO Test + +assert('Range', '15.2.14') do + Range.class == Class +end + +assert('Range#==', '15.2.14.4.1') do + (1..10) == (1..10) and not (1..10) == (1..100) +end + +assert('Range#===', '15.2.14.4.2') do + a = (1..10) + + a === 5 and not a === 20 +end + +assert('Range#begin', '15.2.14.4.3') do + (1..10).begin == 1 +end + +assert('Range#each', '15.2.14.4.4') do + a = (1..3) + b = 0 + a.each {|i| b += i} + b == 6 +end + +assert('Range#end', '15.2.14.4.5') do + (1..10).end == 10 +end + +assert('Range#exclude_end?', '15.2.14.4.6') do + (1...10).exclude_end? and not (1..10).exclude_end? +end + +assert('Range#first', '15.2.14.4.7') do + (1..10).first == 1 +end + +assert('Range#include', '15.2.14.4.8') do + a = (1..10) + + a.include?(5) and not a.include?(20) +end + +# TODO SEGFAULT ATM +#assert('Range#initialize', '15.2.14.4.9') do +# a = Range.new(1, 10, true) +# b = Range.new(1, 10, false) +# +# a == (1..10) and a.exclude_end? and b == (1..10) and +# not b.exclude_end? +#end + +assert('Range#last', '15.2.14.4.10') do + (1..10).last == 10 +end + +assert('Range#member?', '15.2.14.4.11') do + a = (1..10) + + a.member?(5) and not a.member?(20) +end + diff --git a/test/t/string.rb b/test/t/string.rb new file mode 100644 index 000000000..34a834f50 --- /dev/null +++ b/test/t/string.rb @@ -0,0 +1,322 @@ +## +# String ISO Test + +assert('String', '15.2.10') do + String.class == Class +end + +assert('String#*', '15.2.10.5.1') do + 'a' * 5 == 'aaaaa' +end + +assert('String#+', '15.2.10.5.2') do + 'a' + 'b' == 'ab' +end + +assert('String#<=>', '15.2.10.5.3') do + a = '' <=> '' + b = '' <=> 'not empty' + c = 'not empty' <=> '' + d = 'abc' <=> 'cba' + e = 'cba' <=> 'abc' + + a == 0 and b == -1 and c == 1 and + d == -1 and e == 1 +end + +assert('String#==', '15.2.10.5.4') do + 'abc' == 'abc' and not 'abc' == 'cba' +end + +# TODO: SEGFAULT ATM assert('String#=~', '15.2.10.5.5') + +assert('String#[]', '15.2.10.5.6') do + # length of args is 1 + a = 'abc'[0] + b = 'abc'[-1] + c = 'abc'[10] + d = 'abc'[-10] + + # length of args is 2 + a1 = 'abc'[0, -1] + b1 = 'abc'[10, 0] + c1 = 'abc'[-10, 0] + d1 = 'abc'[0, 0] + e1 = 'abc'[1, 2] + + # args is RegExp + # TODO SEGFAULT ATM + + # args is String + a3 = 'abc'['bc'] + b3 = 'abc'['XX'] + + a == 'a' and b == 'c' and c == nil and d == nil and + a1 == nil and b1 == nil and c1 == nil and d1 == '' and + e1 == 'bc' and + a3 == 'bc' and b3 == nil +end + +assert('String#capitalize', '15.2.10.5.7') do + a = 'abc' + a.capitalize + + a == 'abc' and 'abc'.capitalize == 'Abc' +end + +assert('String#capitalize!', '15.2.10.5.8') do + a = 'abc' + a.capitalize! + + a == 'Abc' +end + +assert('String#chomp', '15.2.10.5.9') do + a = 'abc'.chomp + b = ''.chomp + c = "abc\n".chomp + d = "abc\n\n".chomp + e = "abc\t".chomp("\t") + f = "abc\n" + + f.chomp + + a == 'abc' and b == '' and c == 'abc' and + d == "abc\n" and e == 'abc' and f == "abc\n" +end + +assert('String#chomp', '15.2.10.5.10') do + a = 'abc' + b = '' + c = "abc\n" + d = "abc\n\n" + e = "abc\t" + + a.chomp! + b.chomp! + c.chomp! + d.chomp! + e.chomp!("\t") + + a == 'abc' and b == '' and c == 'abc' and + d == "abc\n" and e == 'abc' +end + +assert('String#chop', '15.2.10.5.11') do + a = ''.chop + b = 'abc'.chop + c = 'abc' + + c.chop + + a == '' and b == 'ab' and c == 'abc' +end + +assert('String#chop!', '15.2.10.5.12') do + a = '' + b = 'abc' + + a.chop! + b.chop! + + a == '' and b == 'ab' +end + +assert('String#downcase', '15.2.10.5.13') do + a = 'ABC'.downcase + b = 'ABC' + + b.downcase + + a == 'abc' and b == 'ABC' +end + +assert('String#downcase!', '15.2.10.5.14') do + a = 'ABC' + + a.downcase! + + a == 'abc' +end + +assert('String#each_line', '15.2.10.5.15') do + a = "first line\nsecond line\nthird line" + list = ["first line\n", "second line\n", "third line"] + n_list = [] + + a.each_line do |line| + n_list << line + end + + list == n_list +end + +assert('String#empty?', '15.2.10.5.16') do + a = '' + b = 'not empty' + + a.empty? and not b.empty? +end + +assert('String#eql?', '15.2.10.5.17') do + 'abc'.eql?('abc') and not 'abc'.eql?('cba') +end + +# TODO ATM broken assert('String#gsub', '15.2.10.5.18') do + +# TODO ATM broken assert('String#gsub!', '15.2.10.5.19') do + +assert('String#hash', '15.2.10.5.20') do + a = 'abc' + + a.hash == 'abc'.hash +end + +assert('String#include?', '15.2.10.5.21') do + 'abc'.include?(97) and not 'abc'.include?(100) and + 'abc'.include?('a') and not 'abc'.include?('d') +end + +assert('String#index', '15.2.10.5.22') do + 'abc'.index('a') == 0 and 'abc'.index('d') == nil and + 'abcabc'.index('a', 1) == 3 +end + +assert('String#initialize', '15.2.10.5.23') do + a = '' + a.initialize('abc') + + a == 'abc' +end + +assert('String#initialize_copy', '15.2.10.5.24') do + a = '' + a.initialize_copy('abc') + + a == 'abc' +end + +assert('String#intern', '15.2.10.5.25') do + 'abc'.intern == :abc +end + +assert('String#length', '15.2.10.5.26') do + 'abc'.length == 3 +end + +# TODO Broken ATM assert('String#match', '15.2.10.5.27') do + +assert('String#replace', '15.2.10.5.28') do + a = '' + a.replace('abc') + + a == 'abc' +end + +assert('String#reverse', '15.2.10.5.29') do + a = 'abc' + a.reverse + + a == 'abc' and 'abc'.reverse == 'cba' +end + +assert('String#reverse!', '15.2.10.5.30') do + a = 'abc' + a.reverse! + + a == 'cba' and 'abc'.reverse! == 'cba' +end + +assert('String#rindex', '15.2.10.5.31') do + 'abc'.rindex('a') == 0 and 'abc'.rindex('d') == nil and + 'abcabc'.rindex('a', 1) == 0 and 'abcabc'.rindex('a', 4) == 3 +end + +# TODO Broken ATM assert('String#scan', '15.2.10.5.32') do + +assert('String#size', '15.2.10.5.33') do + 'abc'.size == 3 +end + +assert('String#slice', '15.2.10.5.34') do + # length of args is 1 + a = 'abc'.slice(0) + b = 'abc'.slice(-1) + c = 'abc'.slice(10) + d = 'abc'.slice(-10) + + # length of args is 2 + a1 = 'abc'.slice(0, -1) + b1 = 'abc'.slice(10, 0) + c1 = 'abc'.slice(-10, 0) + d1 = 'abc'.slice(0, 0) + e1 = 'abc'.slice(1, 2) + + # args is RegExp + # TODO SEGFAULT ATM + + # args is String + a3 = 'abc'.slice('bc') + b3 = 'abc'.slice('XX') + + a == 'a' and b == 'c' and c == nil and d == nil and + a1 == nil and b1 == nil and c1 == nil and d1 == '' and + e1 == 'bc' and + a3 == 'bc' and b3 == nil +end + +# TODO Broken ATM +assert('String#split', '15.2.10.5.35') do + # without RegExp behavior is actually unspecified + a = 'abc abc abc'.split + + a == ['abc', 'abc', 'abc'] +end + +# TODO ATM broken assert('String#sub', '15.2.10.5.36') do + +# TODO ATM broken assert('String#sub!', '15.2.10.5.37') do + +assert('String#to_i', '15.2.10.5.38') do + a = ''.to_i + b = '123456789'.to_i + c = 'a'.to_i(16) + d = '100'.to_i(2) + + a == 0 and b == 123456789 and c == 10 and d == 4 +end + +assert('String#to_f', '15.2.10.5.39') do + a = ''.to_f + b = '123456789'.to_f + c = '12345.6789'.to_f + + check_float(a, 0.0) and check_float(b, 123456789.0) and + check_float(c, 12345.6789) +end + +assert('String#to_s', '15.2.10.5.40') do + 'abc'.to_s == 'abc' +end + +assert('String#to_sym', '15.2.10.5.41') do + 'abc'.to_sym == :abc +end + +assert('String#upcase', '15.2.10.5.42') do + a = 'abc'.upcase + b = 'abc' + + b.upcase + + a == 'ABC' and b == 'abc' +end + +assert('String#upcase!', '15.2.10.5.43') do + a = 'abc' + + a.upcase! + + a == 'ABC' +end + diff --git a/test/t/symbol.rb b/test/t/symbol.rb new file mode 100644 index 000000000..325c8d990 --- /dev/null +++ b/test/t/symbol.rb @@ -0,0 +1,23 @@ +## +# Symbol ISO Test + +assert('Symbol', '15.2.11') do + Symbol.class == Class +end + +assert('Symbol#===', '15.2.11.3.1') do + :abc === :abc and not :abc === :cba +end + +assert('Symbol#id2name', '15.2.11.3.2') do + :abc.id2name == 'abc' +end + +assert('Symbol#to_s', '15.2.11.3.3') do + :abc.to_s == 'abc' +end + +assert('Symbol#to_sym', '15.2.11.3.4') do + :abc.to_sym == :abc +end + |