summaryrefslogtreecommitdiff
path: root/benchmark/vm_thread_condvar1.rb
blob: cf5706b23e2e3ba8482e51001dd6144ebe3e7c57 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
# two threads, two mutex, two condvar ping-pong
require 'thread'
m1 = Mutex.new
m2 = Mutex.new
cv1 = ConditionVariable.new
cv2 = ConditionVariable.new
max = 100000
i = 0
wait = nil
m2.synchronize do
  wait = Thread.new do
    m1.synchronize do
      m2.synchronize { cv2.signal }
      while (i += 1) < max
        cv1.wait(m1)
        cv2.signal
      end
    end
  end
  cv2.wait(m2)
end
m1.synchronize do
  while i < max
    cv1.signal
    cv2.wait(m1)
  end
end
wait.join