[ruby-dev:10935] Re: Meta-Level API

いがらしです。

At Sun, 17 Sep 2000 01:25:32 +0900,
in [ruby-dev:10933] Meta-Level API,
Hiroshi IGARASHI <[e-mail]> wrote:
> 
> Module#direct_included_modules
>     直接includeしているModuleだけ返す版。

無理矢理ですがこんな感じで計算できます。

class Module
  def included_modules_at
    ams = ancestors
    case ams.size # > 0
    when 1 # root modules
      []
    when 2 # 2nd gen. modules and class Object
      [ams[1]]
    else   # ams.size>2  other modules and classes
      ims = ams
      i = 1
      while i < ams.size
	m = ams[i]
	if m.type == Class
	  ims -= m.ancestors
	  break
	end
	ims -= m.included_modules_at
	i += 1
      end
      ims - [self]
    end
  end
end

計算量のorderがかなり大きそうですが、
普通はmoduleをincludeしても数個なので、
まあ許容できるかなと。

もっとまともなアルゴリズムがあると思いますが、
アルゴリズムの教科書を復習してから出直します。
実はものすごくスマートな方法があったりして^_^;;

--
五十嵐  宏  (Hiroshi IGARASHI)