From 487a7da22df69432d471a80982c446ec2e7db649 Mon Sep 17 00:00:00 2001
From: ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 24 Aug 2007 15:51:33 +0000
Subject: [PATCH] * benchmark/bm_loop_generator.rb: added.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@13250 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog                      |  4 ++++
 benchmark/bm_loop_generator.rb | 14 ++++++++++++++
 2 files changed, 18 insertions(+)
 create mode 100644 benchmark/bm_loop_generator.rb

diff --git a/ChangeLog b/ChangeLog
index 0f0f1838cc..bfb3becc51 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Sat Aug 25 00:49:44 2007  Koichi Sasada  <ko1@atdot.net>
+
+	* benchmark/bm_loop_generator.rb: added.
+
 Sat Aug 25 00:22:31 2007  Koichi Sasada  <ko1@atdot.net>
 
 	* prelude.rb: added.  run this script on startup.
diff --git a/benchmark/bm_loop_generator.rb b/benchmark/bm_loop_generator.rb
new file mode 100644
index 0000000000..e9bf9afc24
--- /dev/null
+++ b/benchmark/bm_loop_generator.rb
@@ -0,0 +1,14 @@
+max = 600000
+
+if defined? Fiber
+  gen = (1..max).each
+  loop do
+    gen.next
+  end
+else
+  require 'generator'
+  gen = Generator.new((0..max))
+  while gen.next?
+    gen.next
+  end
+end