covers 'facets/kernel/attr_singleton'

tests Kernel do

  c = Class.new do
    def initialize
      attr_singleton_reader :foo #=> "FOO"
      attr_singleton_writer :bar #=> "BAR"
      attr_singleton_accessor :baz #=> "BAZ"
      @foo = "FOO"
      self.bar = "BAR"
      self.baz = "BAZ"
    end
    def get_bar
      @bar
    end
  end

  unit :attr_singleton_reader do
    t = c.new
    t.foo.assert == "FOO"
  end

  unit :attr_singleton_writer do
    t = c.new
    t.get_bar.assert == "BAR"
    t.bar = "BAR2"
    t.get_bar.assert == "BAR2"
  end

  unit :attr_singleton_accessor do
    t = c.new
    t.baz.assert == "BAZ"
    t.baz = "BAZ2"
    t.baz.assert == "BAZ2"
  end

end