* test/ruby: tests for ruby itself.

* test/ruby/test_*.rb: split sample/test.rb into 28 test/unit testcases.  some
  tests could not be translates...  search '!!' mark to see it.

* test/csv/test_csv.rb: should require 'csv', not '../lib/csv'.  test runner
  should set load path correctly.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4498 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 82 insertions, 0 deletions

diff --git a/test/ruby/test_whileuntil.rb b/test/ruby/test_whileuntil.rb
new file mode 100644
index 0000000000..89ae2b6d6b
--- /dev/null
+++ b/test/ruby/test_whileuntil.rb
@@ -0,0 +1,82 @@
+require 'test/unit'
+
+$KCODE = 'none'
+
+class TestWhileuntil < Test::Unit::TestCase
+  def test_while
+    tmp = open("while_tmp", "w")
+    tmp.print "tvi925\n";
+    tmp.print "tvi920\n";
+    tmp.print "vt100\n";
+    tmp.print "Amiga\n";
+    tmp.print "paper\n";
+    tmp.close
+
+    tmp = open("while_tmp", "r")
+    assert(tmp.kind_of?(File))
+    
+    while line = tmp.gets()
+      break if /vt100/ =~ line
+    end
+    
+    assert(!tmp.eof? && /vt100/ =~ line)
+    tmp.close
+
+    $bad = false
+    tmp = open("while_tmp", "r")
+    while line = tmp.gets()
+      next if /vt100/ =~ line
+      $bad = 1 if /vt100/ =~ line
+    end
+    assert(!(!tmp.eof? || /vt100/ =~ line || $bad))
+    tmp.close
+    
+    $bad = false
+    tmp = open("while_tmp", "r")
+    while tmp.gets()
+      line = $_
+      gsub(/vt100/, 'VT100')
+      if $_ != line
+        $_.gsub!('VT100', 'Vt100')
+        redo
+      end
+      $bad = 1 if /vt100/ =~ $_
+      $bad = 1 if /VT100/ =~ $_
+    end
+    assert(tmp.eof? && !$bad)
+    tmp.close
+    
+    sum=0
+    for i in 1..10
+      sum += i
+      i -= 1
+      if i > 0
+        redo
+      end
+    end
+    assert(sum == 220)
+    
+    $bad = false
+    tmp = open("while_tmp", "r")
+    while line = tmp.gets()
+      break if 3
+      case line
+      when /vt100/, /Amiga/, /paper/
+        $bad = true
+      end
+    end
+    assert(!$bad)
+    tmp.close
+    
+    File.unlink "while_tmp" or `/bin/rm -f "while_tmp"`
+    assert(!File.exist?("while_tmp"))
+  end
+
+  def test_until
+    i = 0
+    until i>4
+      i+=1
+    end
+    assert(i>4)
+  end
+end