File: chameneos.jruby-2.jruby

package info (click to toggle)
jruby 9.4.8.0%2Bds-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 89,244 kB
  • sloc: ruby: 548,574; java: 276,189; yacc: 25,873; ansic: 6,178; xml: 6,111; sh: 1,855; sed: 94; makefile: 78; jsp: 48; tcl: 40; exp: 12
file content (71 lines) | stat: -rw-r--r-- 1,801 bytes parent folder | download | duplicates (18)
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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
#########################################
#     The Computer Language Shootout    #
#   http://shootout.alioth.debian.org/  #
#                                       #
#      Contributed by Jesse Millikan    #
#    Based on version by Gordon Innes   #
#########################################

require 'thread'

creature_meetings = Queue.new
meeting_point = Mutex.new
wait_signal = ConditionVariable.new
meetings_left = ARGV[0].to_i
waiting_colour, incoming_colour = nil, nil

# Each chameneo is represented here by a thread
# and its colour variable, rather than explicitly
# by an object
#
# This is all packed into one place for speed and
# clarity (It's clear to *me* :)
[:blue, :red, :yellow, :blue].each { |colour|
  Thread.new {
    met = 0
    while true
      # The form meeting_point.synchronize { } is slow
      meeting_point.lock

      if meetings_left <= 0
        meeting_point.unlock
	# colour = :faded
	break 
      end

      # Both threads emerge with variable other_colour set
      if waiting_colour
        other_colour = waiting_colour
        incoming_colour = colour
        wait_signal.signal
        meetings_left-=1
        waiting_colour = nil
      else
        waiting_colour = colour
        wait_signal.wait(meeting_point)
        other_colour = incoming_colour
      end
      meeting_point.unlock

      met += 1

      # Take the complement colour
      colour = 
        case other_colour
          when :blue
           colour == :red ? :yellow : :red
          when :red
           colour == :blue ? :yellow : :blue
          when :yellow
           colour == :blue ? :red : :blue
        end
    end

    # Leave the total on the queue for the main thread
    creature_meetings.push(met)
  }
}

total = 0
4.times { total += creature_meetings.pop }
puts total