File: atom.rb

package info (click to toggle)
sonic-pi 3.2.2~repack-8
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 71,872 kB
  • sloc: ruby: 30,548; cpp: 8,490; sh: 957; ansic: 461; erlang: 360; lisp: 141; makefile: 44
file content (65 lines) | stat: -rw-r--r-- 1,737 bytes parent folder | download | duplicates (6)
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
#--
# This file is part of Sonic Pi: http://sonic-pi.net
# Full project source: https://github.com/samaaron/sonic-pi
# License: https://github.com/samaaron/sonic-pi/blob/master/LICENSE.md
#
# Copyright 2013, 2014, 2015, 2016 by Sam Aaron (http://sam.aaron.name).
# All rights reserved.
#
# Permission is granted for use, copying, modification, and
# distribution of modified versions of this work as long as this
# notice is included.
#++
require 'thread'

## Assumes Immutable values used as val...
module SonicPi
  class Atom
    def initialize(val)
      @val = val
      @sem = Mutex.new
    end

    def swap!(&block)
      Thread.current.thread_variable_set :sonic_pi_atom_last, @val
      Thread.current.thread_variable_set :sonic_pi_atom_new, block.call(@val)
      @sem.synchronize do
        last = Thread.current.thread_variable_get(:sonic_pi_atom_last)
        new = Thread.current.thread_variable_get(:sonic_pi_atom_new)
        if @val == last
          @val = new
          return new
        end
      end

      ## Didn't work, try again...
      swap!(&block)
    end

    def swap_returning_old!(&block)
      Thread.current.thread_variable_set :sonic_pi_atom_last, @val
      Thread.current.thread_variable_set :sonic_pi_atom_new, block.call(@val)
      @sem.synchronize do
        last = Thread.current.thread_variable_get(:sonic_pi_atom_last)
        new = Thread.current.thread_variable_get(:sonic_pi_atom_new)
        if @val == last
          @val = new
          return last
        end
      end

      ## Didn't work, try again...
      swap_returning_old!(&block)
    end

    def deref
      @val
    end

    def reset!(new_val)
      @sem.synchronize do
        @val = new_val
      end
    end
  end
end