模仿另一个Ruby类,所以对象通过===类型检查

我想创建一个充当特定类的对象,例如Fixnum,但不是该类的实例和它的子类.

有各种各样的用例.在Fixnum的情况下,我想定义一个更具体的整数类型,它本质上是一个Fixnum,但也实现了一些额外的逻辑.我不能子类Fixnum本身,因为立即类型如Fixnum和Symbol不能被子类化.@H_616_3@

另一个用例是在自动化测试中嘲笑：有时您想要创建一个像某个类(通常是一个模型实例)的对象,但是由于技术原因而不是该类的实例.@H_616_3@

以下是如何创建将所有方法委托给内部存储的fixnum的特定整数类型：@H_616_3@

require 'delegate'
require 'forWARDable'

# Integer represenTing a page number
class Pagenumber < DelegateClass(Integer)
  extend ForWARDable

  def initialize(value,Name)
    @name = name
    super(value)
  end

  def inspect
    "#{@namE} #{to_i}"
  end

  alias_method :to_i,:__getobj__
  def_delegators :to_i,:instance_of?,:kind_of?,:is_a?
end

这个对象可以通过is_a？和类似的检查：@H_616_3@

page = Pagenumber.new(1,"page")
page.is_a? Fixnum  #=> true

但是没有办法可以让它通过@L_489_0@型检查：@H_616_3@

# my problem:
Fixnum === page    #=> false

事实上,我的对象没有这个检查是非常不幸的,因为===方法在内部使用case语句：@H_616_3@

case page
when Fixnum
  # it will never get here
when String
  # ...
else
  # ...
end

我的问题是如何创建一个通过===检查而不增加内置类的===方法的模拟类型？@H_616_3@

VALUE
rb_obj_is_kind_of(VALUE obj,VALUE C)
{
    VALUE cl = CLASS_OF(obj);

    /* Type checking of `c' omitted */

    while (cl) {
    if (cl == c || RCLASS_M_TBL(cl) == RCLASS_M_TBL(C))
        return Qtrue;
    cl = RCLASS_SUPER(cl);
    }
    return Qfalse;
}

ruby-1.9.2-p136 :001 > Object.ancestors
 => [Object,Kernel,BasicObject] 
ruby-1.9.2-p136 :002 > Object.ancestors.map { |mod| Object.new.is_a? mod }
 => [true,true,true]