* benchmark/bm_vm4_pipe.rb: Add two new benchmark for GVL

  performance. They was written by Koichi Sasada.
* benchmark/bm_vm4_thread_pass.rb: ditto.



git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@31379 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

2 files changed, 32 insertions, 0 deletions

diff --git a/benchmark/bm_vm4_pipe.rb b/benchmark/bm_vm4_pipe.rb
new file mode 100644
index 0000000000..d33c5223a9
--- /dev/null
+++ b/benchmark/bm_vm4_pipe.rb
@@ -0,0 +1,17 @@
+# Mesure small and plenty pipe read/write.
+# A performance may depend on GVL implementation.
+
+lmax = 1_000_000
+r, w = IO.pipe
+[Thread.new{
+  lmax.times{
+    w.write('a')
+  }
+  p "w:exit"
+}, Thread.new{
+  lmax.times{
+    r.read(1)
+  }
+  p "r:exit"
+}].each{|t| t.join}
+
diff --git a/benchmark/bm_vm4_thread_pass.rb b/benchmark/bm_vm4_thread_pass.rb
new file mode 100644
index 0000000000..171bfecbfe
--- /dev/null
+++ b/benchmark/bm_vm4_thread_pass.rb
@@ -0,0 +1,15 @@
+# Plenty Thtread.pass
+# A performance may depend on GVL implementation.
+
+tmax = (ARGV.shift || 2).to_i
+lmax = 2_000_000 / tmax
+
+(1..tmax).map{
+  Thread.new{
+    lmax.times{
+      Thread.pass
+    }
+  }
+}.each{|t| t.join}
+
+