From 54ec1c4fe81672ca66f327ef6ae170f458cd79e5 Mon Sep 17 00:00:00 2001 From: shyouhei Date: Wed, 15 Aug 2007 20:57:30 +0000 Subject: sorry. I made wrong tags. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_8_5_54@13009 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ruby_1_8_5/test/ruby/test_pack.rb | 60 --------------------------------------- 1 file changed, 60 deletions(-) delete mode 100644 ruby_1_8_5/test/ruby/test_pack.rb (limited to 'ruby_1_8_5/test/ruby/test_pack.rb') diff --git a/ruby_1_8_5/test/ruby/test_pack.rb b/ruby_1_8_5/test/ruby/test_pack.rb deleted file mode 100644 index e67465b33a..0000000000 --- a/ruby_1_8_5/test/ruby/test_pack.rb +++ /dev/null @@ -1,60 +0,0 @@ -require 'test/unit' - -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_equal(ary.length, ary2.length) - assert_equal(ary.join(':'), ary2.join(':')) - assert_match(/def/, $x) - - $x = [-1073741825] - assert_equal($x, $x.pack("q").unpack("q")) - - $x = [-1] - assert_equal($x, $x.pack("l").unpack("l")) - end - - def test_pack_N - assert_equal "\000\000\000\000", [0].pack('N') - assert_equal "\000\000\000\001", [1].pack('N') - assert_equal "\000\000\000\002", [2].pack('N') - assert_equal "\000\000\000\003", [3].pack('N') - assert_equal "\377\377\377\376", [4294967294].pack('N') - assert_equal "\377\377\377\377", [4294967295].pack('N') - - assert_equal "\200\000\000\000", [2**31].pack('N') - assert_equal "\177\377\377\377", [-2**31-1].pack('N') - assert_equal "\377\377\377\377", [-1].pack('N') - - assert_equal "\000\000\000\001\000\000\000\001", [1,1].pack('N*') - assert_equal "\000\000\000\001\000\000\000\001\000\000\000\001", [1,1,1].pack('N*') - end - - def test_unpack_N - assert_equal 1, "\000\000\000\001".unpack('N')[0] - assert_equal 2, "\000\000\000\002".unpack('N')[0] - assert_equal 3, "\000\000\000\003".unpack('N')[0] - assert_equal 3, "\000\000\000\003".unpack('N')[0] - assert_equal 4294967295, "\377\377\377\377".unpack('N')[0] - assert_equal [1,1], "\000\000\000\001\000\000\000\001".unpack('N*') - assert_equal [1,1,1], "\000\000\000\001\000\000\000\001\000\000\000\001".unpack('N*') - end - - def test_pack_U - assert_raises(RangeError) { [-0x40000001].pack("U") } - assert_raises(RangeError) { [-0x40000000].pack("U") } - assert_raises(RangeError) { [-1].pack("U") } - assert_equal "\000", [0].pack("U") - assert_equal "\374\277\277\277\277\277", [0x3fffffff].pack("U") - assert_equal "\375\200\200\200\200\200", [0x40000000].pack("U") - assert_equal "\375\277\277\277\277\277", [0x7fffffff].pack("U") - assert_raises(RangeError) { [0x80000000].pack("U") } - assert_raises(RangeError) { [0x100000000].pack("U") } - end -end -- cgit v1.2.3