class SexpInfo

# File lib/sexp_info.rb, line 7
def initialize(sexp)
  @sexp = sexp
end

# File lib/sexp_info.rb, line 36
def [](name)
  (children).find{|m| m == name }
end

# File lib/sexp_info.rb, line 32
def children
  defined_classes + defined_methods + defined_modules
end

# File lib/sexp_info.rb, line 19
def defined_classes
  defined(:class)
end

# File lib/sexp_info.rb, line 15
def defined_methods
  defined(:def)
end

# File lib/sexp_info.rb, line 27
def defined_modules
  defined(:module)
end

# File lib/sexp_info.rb, line 23
def to_h
  Hash[children.map{|c| [c.name, c.to_h] }]
end

# File lib/sexp_info.rb, line 11
def type
  sexp[1][0][0]
end

# File lib/sexp_info.rb, line 43
def defined(type)
  sexp[1] ? sexp[1].find_all{|s| s[0] == type}.map{|c| "SexpThing::#{type.to_s.camelize}".constantize.new(c) } : []
end