From d7b1e063ff799f8172916df6eb7feedea27d6f2a Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Tue, 30 Jun 1998 01:40:51 +0000
Subject: *** empty log message ***

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/v1_1r@257 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 sample/test.rb | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(limited to 'sample/test.rb')

diff --git a/sample/test.rb b/sample/test.rb
index 3bc00306f6..e3ca832e0f 100644
--- a/sample/test.rb
+++ b/sample/test.rb
@@ -453,6 +453,19 @@ end
 ok($x.size == 10)
 ok($x == [1, 2, 3, 1, 2, 3, 4, 5, 6, 7])
 
+# append method to built-in class
+class Array
+  def iter_test1
+    collect{|e| [e, yield(e)]}.sort{|a,b|a[1]<=>b[1]}
+  end
+  def iter_test2
+    a = collect{|e| [e, yield(e)]}
+    a.sort{|a,b|a[1]<=>b[1]}
+  end
+end
+$x = [[1,2],[3,4],[5,6]]
+ok($x.iter_test1{|x|x} == $x.iter_test2{|x|x})
+
 check "bignum"
 def fact(n)
   return 1 if n == 0
-- 
cgit v1.2.3