This commit was manufactured by cvs2svn to create branch 'ruby_1_8'.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@6109 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 73 insertions, 0 deletions

diff --git a/test/ruby/test_time.rb b/test/ruby/test_time.rb
new file mode 100644
index 000000000..dc706653a
--- /dev/null
+++ b/test/ruby/test_time.rb
@@ -0,0 +1,73 @@
+require 'test/unit'
+
+class TestTime < Test::Unit::TestCase
+  def test_time_add()
+    assert_equal(Time.utc(2000, 3, 21, 3, 30) + 3 * 3600,
+                 Time.utc(2000, 3, 21, 6, 30))
+    assert_equal(Time.utc(2000, 3, 21, 3, 30) + (-3 * 3600),
+                 Time.utc(2000, 3, 21, 0, 30))
+    assert_equal(0, (Time.at(1.1) + 0.9).usec)
+  end
+
+  def test_time_subt()
+    assert_equal(Time.utc(2000, 3, 21, 3, 30) - 3 * 3600,
+                 Time.utc(2000, 3, 21, 0, 30))
+    assert_equal(Time.utc(2000, 3, 21, 3, 30) - (-3 * 3600),
+                 Time.utc(2000, 3, 21, 6, 30))
+    assert_equal(900000, (Time.at(1.1) - 0.2).usec)
+  end
+
+  def test_time_time()
+    assert_equal(Time.utc(2000, 3, 21, 3, 30)  \
+                -Time.utc(2000, 3, 21, 0, 30), 3*3600)
+    assert_equal(Time.utc(2000, 3, 21, 0, 30)  \
+                -Time.utc(2000, 3, 21, 3, 30), -3*3600)
+  end
+
+  def negative_time_t?
+    begin
+      Time.at(-1)
+      true
+    rescue ArgumentError
+      false
+    end
+  end
+
+  def test_timegm
+    if negative_time_t?
+      assert_equal(-0x80000000, Time.utc(1901, 12, 13, 20, 45, 52).tv_sec)
+      assert_equal(-2, Time.utc(1969, 12, 31, 23, 59, 58).tv_sec)
+      assert_equal(-1, Time.utc(1969, 12, 31, 23, 59, 59).tv_sec)
+    end
+
+    assert_equal(0, Time.utc(1970, 1, 1, 0, 0, 0).tv_sec) # the Epoch
+    assert_equal(1, Time.utc(1970, 1, 1, 0, 0, 1).tv_sec)
+    assert_equal(31535999, Time.utc(1970, 12, 31, 23, 59, 59).tv_sec)
+    assert_equal(31536000, Time.utc(1971, 1, 1, 0, 0, 0).tv_sec)
+    assert_equal(78796799, Time.utc(1972, 6, 30, 23, 59, 59).tv_sec)
+
+    # 1972-06-30T23:59:60Z is the first leap second.
+    if Time.utc(1972, 7, 1, 0, 0, 0) - Time.utc(1972, 6, 30, 23, 59, 59) == 1
+      # no leap second.
+      assert_equal(78796800, Time.utc(1972, 7, 1, 0, 0, 0).tv_sec)
+      assert_equal(78796801, Time.utc(1972, 7, 1, 0, 0, 1).tv_sec)
+      assert_equal(946684800, Time.utc(2000, 1, 1, 0, 0, 0).tv_sec)
+      assert_equal(0x7fffffff, Time.utc(2038, 1, 19, 3, 14, 7).tv_sec)
+    else
+      # leap seconds supported.
+      assert_equal(78796800, Time.utc(1972, 6, 30, 23, 59, 60).tv_sec)
+      assert_equal(78796801, Time.utc(1972, 7, 1, 0, 0, 0).tv_sec)
+      assert_equal(78796802, Time.utc(1972, 7, 1, 0, 0, 1).tv_sec)
+      assert_equal(946684822, Time.utc(2000, 1, 1, 0, 0, 0).tv_sec)
+    end
+  end
+
+  def test_huge_difference # [ruby-dev:22619]
+    if negative_time_t?
+      assert_equal(Time.at(-0x80000000), Time.at(0x7fffffff) - 0xffffffff)
+      assert_equal(Time.at(-0x80000000), Time.at(0x7fffffff) + (-0xffffffff))
+      assert_equal(Time.at(0x7fffffff), Time.at(-0x80000000) + 0xffffffff)
+      assert_equal(Time.at(0x7fffffff), Time.at(-0x80000000) - (-0xffffffff))
+    end
+  end
+end