webruby 0.1.0

data/modules/mruby/test/t/rangeerror.rb

@@ -0,0 +1,10 @@
+##
+# RangeError ISO Test
+
+assert('RangeError', '15.2.26') do
+  assert_equal RangeError.class, Class
+end
+
+assert('RangeError superclass', '15.2.26.2') do
+  assert_equal RangeError.superclass, StandardError
+end

data/modules/mruby/test/t/regexperror.rb

@@ -0,0 +1,4 @@
+##
+# RegexpError ISO Test
+
+# TODO broken ATM assert('RegexpError', '15.2.27') do

data/modules/mruby/test/t/runtimeerror.rb

@@ -0,0 +1,6 @@
+##
+# RuntimeError ISO Test
+
+assert('RuntimeError', '15.2.28') do
+  assert_equal RuntimeError.class, Class
+end

data/modules/mruby/test/t/standarderror.rb

@@ -0,0 +1,10 @@
+##
+# StandardError ISO Test
+
+assert('StandardError', '15.2.23') do
+  assert_equal StandardError.class, Class
+end
+
+assert('StandardError superclass', '15.2.23.2') do
+  assert_equal StandardError.superclass, Exception
+end

data/modules/mruby/test/t/string.rb

@@ -0,0 +1,483 @@
+##
+# String ISO Test
+
+assert('String', '15.2.10') do
+  assert_equal String.class, Class
+end
+
+assert('String superclass', '15.2.10.2') do
+  assert_equal String.superclass, Object
+end
+
+assert('String#*', '15.2.10.5.1') do
+  assert_equal 'a' * 5, 'aaaaa'
+end
+
+assert('String#+', '15.2.10.5.2') do
+  assert_equal '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'
+
+  assert_equal a, 0
+  assert_equal b, -1
+  assert_equal c, 1
+  assert_equal d, -1
+  assert_equal e, 1
+end
+
+assert('String#==', '15.2.10.5.4') do
+  assert_equal 'abc', 'abc'
+  assert_not_equal 'abc', 'cba'
+end
+
+# 'String#=~', '15.2.10.5.5' will be tested in mrbgems.
+
+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
+  # It will be tested in mrbgems.
+
+  # args is String
+  a3 = 'abc'['bc']
+  b3 = 'abc'['XX']
+
+  assert_equal a, 'a'
+  assert_equal b, 'c'
+  assert_nil c
+  assert_nil d
+  assert_nil a1
+  assert_nil b1
+  assert_nil c1
+  assert_equal d1, ''
+  assert_equal e1, 'bc'
+  assert_equal a3, 'bc'
+  assert_nil b3
+end
+
+assert('String#[] with Range') do
+  a1 = 'abc'[1..0]
+  b1 = 'abc'[1..1]
+  c1 = 'abc'[1..2]
+  d1 = 'abc'[1..3]
+  e1 = 'abc'[1..4]
+  f1 = 'abc'[0..-2]
+  g1 = 'abc'[-2..3]
+  h1 = 'abc'[3..4]
+  i1 = 'abc'[4..5]
+  a2 = 'abc'[1...0]
+  b2 = 'abc'[1...1]
+  c2 = 'abc'[1...2]
+  d2 = 'abc'[1...3]
+  e2 = 'abc'[1...4]
+  f2 = 'abc'[0...-2]
+  g2 = 'abc'[-2...3]
+  h2 = 'abc'[3...4]
+  i2 = 'abc'[4...5]
+
+  assert_equal a1, ''  
+  assert_equal b1, 'b' 
+  assert_equal c1, 'bc'
+  assert_equal d1, 'bc'
+  assert_equal e1, 'bc'
+  assert_equal f1, 'ab'
+  assert_equal g1, 'bc'
+  assert_equal h1, ''  
+  assert_nil i2
+  assert_equal a2, ''  
+  assert_equal b2, ''  
+  assert_equal c2, 'b' 
+  assert_equal d2, 'bc'
+  assert_equal e2, 'bc'
+  assert_equal f2, 'a' 
+  assert_equal g2, 'bc'
+  assert_equal h2, ''  
+  assert_nil i2
+end
+
+assert('String#capitalize', '15.2.10.5.7') do
+  a = 'abc'
+  a.capitalize
+
+  assert_equal a, 'abc'
+  assert_equal 'abc'.capitalize, 'Abc'
+end
+
+assert('String#capitalize!', '15.2.10.5.8') do
+  a = 'abc'
+  a.capitalize!
+
+  assert_equal 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
+
+  assert_equal a, 'abc'
+  assert_equal b, ''
+  assert_equal c, 'abc'
+  assert_equal d, "abc\n"
+  assert_equal e, 'abc'
+  assert_equal 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")
+
+  assert_equal a, 'abc'
+  assert_equal b, ''
+  assert_equal c, 'abc'
+  assert_equal d, "abc\n"
+  assert_equal e, 'abc'
+end
+
+assert('String#chop', '15.2.10.5.11') do
+  a = ''.chop
+  b = 'abc'.chop
+  c = 'abc'
+
+  c.chop
+
+  assert_equal a, ''
+  assert_equal b, 'ab'
+  assert_equal c, 'abc'
+end
+
+assert('String#chop!', '15.2.10.5.12') do
+  a = ''
+  b = 'abc'
+
+  a.chop!
+  b.chop!
+
+  assert_equal a, ''
+  assert_equal b, 'ab'
+end
+
+assert('String#downcase', '15.2.10.5.13') do
+  a = 'ABC'.downcase
+  b = 'ABC'
+
+  b.downcase
+
+  assert_equal a, 'abc'
+  assert_equal b, 'ABC'
+end
+
+assert('String#downcase!', '15.2.10.5.14') do
+  a = 'ABC'
+
+  a.downcase!
+
+  assert_equal 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
+
+  assert_equal list, n_list
+end
+
+assert('String#empty?', '15.2.10.5.16') do
+  a = ''
+  b = 'not empty'
+
+  assert_true a.empty?
+  assert_false b.empty?
+end
+
+assert('String#eql?', '15.2.10.5.17') do
+  assert_true 'abc'.eql?('abc')
+  assert_false 'abc'.eql?('cba')
+end
+
+assert('String#gsub', '15.2.10.5.18') do
+  assert_equal('aBcaBc', 'abcabc'.gsub('b', 'B'), 'gsub without block')
+  assert_equal('aBcaBc', 'abcabc'.gsub('b'){|w| w.capitalize }, 'gsub with block')
+  assert_equal('$a$a$',  '#a#a#'.gsub('#', '$'), 'mruby/mruby#847')
+  assert_equal('$a$a$',  '#a#a#'.gsub('#'){|w| '$' }, 'mruby/mruby#847 with block')
+  assert_equal('$$a$$',  '##a##'.gsub('##', '$$'), 'mruby/mruby#847 another case')
+  assert_equal('$$a$$',  '##a##'.gsub('##'){|w| '$$' }, 'mruby/mruby#847 another case with block')
+  assert_equal('A',      'a'.gsub('a', 'A'))
+  assert_equal('A',      'a'.gsub('a'){|w| w.capitalize })
+end
+
+assert('String#gsub!', '15.2.10.5.19') do
+  a = 'abcabc'
+  a.gsub!('b', 'B')
+
+  b = 'abcabc'
+  b.gsub!('b') { |w| w.capitalize }
+
+  assert_equal a, 'aBcaBc'
+  assert_equal b, 'aBcaBc'
+end
+
+assert('String#hash', '15.2.10.5.20') do
+  a = 'abc'
+
+  assert_equal a.hash, 'abc'.hash
+end
+
+assert('String#include?', '15.2.10.5.21') do
+  assert_true 'abc'.include?(97)
+  assert_false 'abc'.include?(100)
+  assert_true 'abc'.include?('a')
+  assert_false 'abc'.include?('d')
+end
+
+assert('String#index', '15.2.10.5.22') do
+  assert_equal 'abc'.index('a'), 0
+  assert_nil 'abc'.index('d')
+  assert_equal 'abcabc'.index('a', 1), 3
+end
+
+assert('String#initialize', '15.2.10.5.23') do
+  a = ''
+  a.initialize('abc')
+
+  assert_equal a, 'abc'
+end
+
+assert('String#initialize_copy', '15.2.10.5.24') do
+  a = ''
+  a.initialize_copy('abc')
+
+  assert_equal a, 'abc'
+end
+
+assert('String#intern', '15.2.10.5.25') do
+  assert_equal 'abc'.intern, :abc
+end
+
+assert('String#length', '15.2.10.5.26') do
+  assert_equal 'abc'.length, 3
+end
+
+# 'String#match', '15.2.10.5.27' will be tested in mrbgems.
+
+assert('String#replace', '15.2.10.5.28') do
+  a = ''
+  a.replace('abc')
+
+  assert_equal a, 'abc'
+end
+
+assert('String#reverse', '15.2.10.5.29') do
+  a = 'abc'
+  a.reverse
+
+  assert_equal a, 'abc'
+  assert_equal 'abc'.reverse, 'cba'
+end
+
+assert('String#reverse!', '15.2.10.5.30') do
+  a = 'abc'
+  a.reverse!
+
+  assert_equal a, 'cba'
+  assert_equal 'abc'.reverse!, 'cba'
+end
+
+assert('String#rindex', '15.2.10.5.31') do
+  assert_equal 'abc'.rindex('a'), 0
+  assert_nil 'abc'.rindex('d')
+  assert_equal 'abcabc'.rindex('a', 1), 0
+  assert_equal 'abcabc'.rindex('a', 4), 3
+end
+
+# 'String#scan', '15.2.10.5.32' will be tested in mrbgems.
+
+assert('String#size', '15.2.10.5.33') do
+  assert_equal '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)
+
+  # slice of shared string
+  e11 = e1.slice(0)
+
+  # args is RegExp
+  # It will be tested in mrbgems.
+
+  # args is String
+  a3 = 'abc'.slice('bc')
+  b3 = 'abc'.slice('XX')
+
+  assert_equal a, 'a'
+  assert_equal b, 'c'
+  assert_nil c
+  assert_nil d
+  assert_nil a1
+  assert_nil b1
+  assert_nil c1
+  assert_equal d1, ''
+  assert_equal e1, 'bc'
+  assert_equal e11, 'b'
+  assert_equal a3, 'bc'
+  assert_nil b3
+end
+
+# TODO Broken ATM
+assert('String#split', '15.2.10.5.35') do
+  # without RegExp behavior is actually unspecified
+  assert_equal 'abc abc abc'.split, ['abc', 'abc', 'abc']
+  assert_equal 'a,b,c,,d'.split(','), ["a", "b", "c", "", "d"]
+  assert_equal 'abc abc abc'.split(nil), ['abc', 'abc', 'abc']
+  assert_equal 'abc'.split(""), ['a', 'b', 'c']
+end
+
+assert('String#sub', '15.2.10.5.36') do
+  assert_equal 'abcabc'.sub('b', 'B'), 'aBcabc'
+  assert_equal 'abcabc'.sub('b') { |w| w.capitalize }, 'aBcabc'
+  assert_equal 'aa#'.sub('#', '$'), 'aa$'
+end
+
+assert('String#sub!', '15.2.10.5.37') do
+  a = 'abcabc'
+  a.sub!('b', 'B')
+
+  b = 'abcabc'
+  b.sub!('b') { |w| w.capitalize }
+
+  assert_equal a, 'aBcabc'
+  assert_equal b, 'aBcabc'
+end
+
+
+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)
+
+  assert_equal a, 0
+  assert_equal b, 123456789
+  assert_equal c, 10
+  assert_equal 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
+
+  assert_float(a, 0.0)
+  assert_float(b, 123456789.0)
+  assert_float(c, 12345.6789)
+end
+
+assert('String#to_s', '15.2.10.5.40') do
+  assert_equal 'abc'.to_s, 'abc'
+end
+
+assert('String#to_sym', '15.2.10.5.41') do
+  assert_equal 'abc'.to_sym, :abc
+end
+
+assert('String#upcase', '15.2.10.5.42') do
+  a = 'abc'.upcase
+  b = 'abc'
+
+  b.upcase
+
+  assert_equal a, 'ABC'
+  assert_equal b, 'abc'
+end
+
+assert('String#upcase!', '15.2.10.5.43') do
+  a = 'abc'
+
+  a.upcase!
+
+  assert_equal a, 'ABC'
+end
+
+# Not ISO specified
+
+assert('String interpolation (mrb_str_concat for shared strings)') do
+  a = "A" * 32
+  assert_equal "#{a}:", "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA:"
+end
+
+assert('Check the usage of a NUL character') do
+  "qqq\0ppp"
+end
+
+assert('String#bytes') do
+  str1 = "hello"
+  bytes1 = [104, 101, 108, 108, 111]
+
+  str2 = "\xFF"
+  bytes2 = [0xFF]
+
+  assert_equal str1.bytes, bytes1
+  assert_equal str2.bytes, bytes2
+end
+
+assert('String#each_byte') do
+  str1 = "hello"
+  bytes1 = [104, 101, 108, 108, 111]
+  bytes2 = []
+
+  str1.each_byte {|b| bytes2 << b }
+
+  assert_equal bytes1, bytes2
+end
+
+assert('String#inspect') do
+  ("\1" * 100).inspect  # should not raise an exception - regress #1210
+  assert_equal "\0".inspect, "\"\\000\""
+end

data/modules/mruby/test/t/symbol.rb

@@ -0,0 +1,27 @@
+##
+# Symbol ISO Test
+
+assert('Symbol', '15.2.11') do
+  assert_equal Symbol.class, Class
+end
+
+assert('Symbol superclass', '15.2.11.2') do
+  assert_equal Symbol.superclass, Object
+end
+
+assert('Symbol#===', '15.2.11.3.1') do
+  assert_true :abc == :abc
+  assert_false :abc == :cba
+end
+
+assert('Symbol#id2name', '15.2.11.3.2') do
+  assert_equal :abc.id2name, 'abc'
+end
+
+assert('Symbol#to_s', '15.2.11.3.3') do
+  assert_equal :abc.to_s, 'abc'
+end
+
+assert('Symbol#to_sym', '15.2.11.3.4') do
+  assert_equal :abc.to_sym, :abc
+end

data/modules/mruby/test/t/syntax.rb

@@ -0,0 +1,67 @@
+assert('super', '11.3.4') do
+  assert_raise NoMethodError do
+    super
+  end
+
+  class SuperFoo
+    def foo
+      true
+    end
+    def bar(*a)
+      a
+    end
+  end
+  class SuperBar < SuperFoo
+    def foo
+      super
+    end
+    def bar(*a)
+      super(*a)
+    end
+  end
+  bar = SuperBar.new
+
+  assert_true bar.foo
+  assert_equal bar.bar(1,2,3), [1,2,3]
+end
+
+assert('yield', '11.3.5') do
+  assert_raise LocalJumpError do
+    yield
+  end
+end
+
+assert('Abbreviated variable assignment', '11.4.2.3.2') do
+  a ||= 1
+  b &&= 1
+  c = 1
+  c += 2
+
+  assert_equal a, 1
+  assert_nil b
+  assert_equal c, 3
+end
+
+assert('Nested const reference') do
+  module Syntax4Const
+    CONST1 = "hello world"
+    class Const2
+      def const1
+        CONST1
+      end
+    end
+  end
+  assert_equal Syntax4Const::CONST1, "hello world"
+  assert_equal Syntax4Const::Const2.new.const1, "hello world"
+end
+
+assert('Abbreviated variable assignment as returns') do
+  module Syntax4AbbrVarAsgnAsReturns
+    class A
+      def b
+        @c ||= 1
+      end
+    end
+  end
+  assert_equal Syntax4AbbrVarAsgnAsReturns::A.new.b, 1
+end

data/modules/mruby/test/t/true.rb

@@ -0,0 +1,33 @@
+##
+# TrueClass ISO Test
+
+assert('TrueClass', '15.2.5') do
+  assert_equal TrueClass.class, Class
+end
+
+assert('TrueClass superclass', '15.2.5.2') do
+  assert_equal TrueClass.superclass, Object
+end
+
+assert('TrueClass true', '15.2.5.1') do
+  assert_true true
+end
+
+assert('TrueClass#&', '15.2.5.3.1') do
+  assert_true true.&(true)
+  assert_false true.&(false)
+end
+
+assert('TrueClass#^', '15.2.5.3.2') do
+  assert_false true.^(true)
+  assert_true true.^(false)
+end
+
+assert('TrueClass#to_s', '15.2.5.3.3') do
+  assert_equal true.to_s, 'true'
+end
+
+assert('TrueClass#|', '15.2.5.3.4') do
+  assert_true true.|(true)
+  assert_true true.|(false)
+end

data/modules/mruby/test/t/typeerror.rb

@@ -0,0 +1,11 @@
+##
+# TypeError ISO Test
+
+assert('TypeError', '15.2.29') do
+  assert_equal TypeError.class, Class
+end
+
+assert('TypeError superclass', '15.2.29.2') do
+  assert_equal TypeError.superclass, StandardError
+end
+