* 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, 21 insertions, 0 deletions

diff --git a/test/ruby/test_pack.rb b/test/ruby/test_pack.rb
new file mode 100644
index 0000000000..15b774f6ca
--- /dev/null
+++ b/test/ruby/test_pack.rb
@@ -0,0 +1,21 @@
+require 'test/unit'
+
+$KCODE = 'none'
+
+class TestPack < Test::Unit::TestCase
+  def test_pack
+    $format = "c2x5CCxsdils_l_a6";
+    # Need the expression in here to force ary[5] to be numeric.  This avoids
+    # test2 failing because ary2 goes str->numeric->str and ary does not.
+    ary = [1,-100,127,128,32767,987.654321098 / 100.0,12345,123456,-32767,-123456,"abcdef"]
+    $x = ary.pack($format)
+    ary2 = $x.unpack($format)
+    
+    assert(ary.length == ary2.length)
+    assert(ary.join(':') == ary2.join(':'))
+    assert($x =~ /def/)
+    
+    $x = [-1073741825]
+    assert($x.pack("q").unpack("q") == $x)
+  end
+end