From dc980095ec093004dc6102252f1d255f64bbd7c6 Mon Sep 17 00:00:00 2001
From: akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 24 Dec 2007 09:53:08 +0000
Subject: [PATCH] add succ tests from the succ document.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@14598 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 test/ruby/test_string.rb | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/test/ruby/test_string.rb b/test/ruby/test_string.rb
index b2d8ab8a09..7af6dcd11c 100644
--- a/test/ruby/test_string.rb
+++ b/test/ruby/test_string.rb
@@ -1055,6 +1055,13 @@ class TestString < Test::Unit::TestCase
     assert_equal(S("2000aaa"),  S("1999zzz").succ)
     assert_equal(S("AAAAA000"), S("ZZZZ999").succ)
     assert_equal(S("*+"), S("**").succ)
+
+    assert_equal("abce", "abcd".succ)
+    assert_equal("THX1139", "THX1138".succ)
+    assert_equal("<<koalb>>", "<<koala>>".succ)
+    assert_equal("2000aaa", "1999zzz".succ)
+    assert_equal("AAAA0000", "ZZZ9999".succ)
+    assert_equal("**+", "***".succ)
   end
 
   def test_succ!