benchmark/vm_thread_mutex1.rb

   1 # one thread, one mutex (no contention)
   2
   3 require 'thread'
   4 m = Thread::Mutex.new
   5 r = 0
   6 max = 2000
   7 lmax = max * max
   8 (1..1).map{
   9   Thread.new{
  10     i = 0
  11     while i<lmax
  12       i += 1
  13       m.synchronize{
  14         r += 1
  15       }
  16     end
  17   }
  18 }.each{|e|
  19   e.join
  20 }
  21 raise r.to_s if r != max * max