test/test_singleton.rb

   1 # frozen_string_literal: false
   2 require 'test/unit'
   3 require 'singleton'
   4
   5 class TestSingleton < Test::Unit::TestCase
   6   class SingletonTest
   7     include Singleton
   8   end
   9
  10   def test_marshal
  11     o1 = SingletonTest.instance
  12     m = Marshal.dump(o1)
  13     o2 = Marshal.load(m)
  14     assert_same(o1, o2)
  15   end
  16
  17   def test_instance_never_changes
  18     a = SingletonTest.instance
  19     b = SingletonTest.instance
  20     assert_same a, b
  21   end
  22
  23   def test_initialize_raises_exception
  24     assert_raise NoMethodError do
  25       SingletonTest.new
  26     end
  27   end
  28
  29   def test_allocate_raises_exception
  30     assert_raise NoMethodError do
  31       SingletonTest.allocate
  32     end
  33   end
  34
  35   def test_clone_raises_exception
  36     exception = assert_raise TypeError do
  37       SingletonTest.instance.clone
  38     end
  39
  40     expected = "can't clone instance of singleton TestSingleton::SingletonTest"
  41
  42     assert_equal expected, exception.message
  43   end
  44
  45   def test_dup_raises_exception
  46     exception = assert_raise TypeError do
  47       SingletonTest.instance.dup
  48     end
  49
  50     expected = "can't dup instance of singleton TestSingleton::SingletonTest"
  51
  52     assert_equal expected, exception.message
  53   end
  54
  55   def test_include_in_module_raises_exception
  56     mod = Module.new
  57
  58     exception = assert_raise TypeError do
  59       mod.class_eval do
  60         include Singleton
  61       end
  62     end
  63
  64     expected = "Inclusion of the OO-Singleton module in module #{mod}"
  65
  66     assert_equal expected, exception.message
  67   end
  68
  69   def test_extending_singleton_raises_exception
  70     assert_raise NoMethodError do
  71       'foo'.extend Singleton
  72     end
  73   end
  74
  75   def test_inheritance_works_with_overridden_inherited_method
  76     super_super_called = false
  77
  78     outer = Class.new do
  79       define_singleton_method :inherited do |sub|
  80         super_super_called = true
  81       end
  82     end
  83
  84     inner = Class.new(outer) do
  85       include Singleton
  86     end
  87
  88     tester = Class.new(inner)
  89
  90     assert super_super_called
  91
  92     a = tester.instance
  93     b = tester.instance
  94     assert_same a, b
  95   end
  96
  97   def test_class_level_cloning_preserves_singleton_behavior
  98     klass = SingletonTest.clone
  99
 100     a = klass.instance
 101     b = klass.instance
 102     assert_same a, b
 103   end
 104 end