24 lines
539 B
Ruby
24 lines
539 B
Ruby
|
require_relative "class_view"
|
||
|
|
|
||
|
|
class ClassesView < ListView
|
||
|
|
|
||
|
|
def initialize interpreter
|
||
|
|
@interpreter = interpreter
|
||
|
|
classes = []
|
||
|
|
Virtual.machine.space.classes.each do |name , claz|
|
||
|
|
next if [:Kernel,:Module,:MetaClass,:BinaryCode].index name
|
||
|
|
classes << claz
|
||
|
|
end
|
||
|
|
classes.sort! {|a,b| a.name <=> b.name }
|
||
|
|
super( classes.collect{|c| ClassView.new(c)})
|
||
|
|
end
|
||
|
|
|
||
|
|
def draw
|
||
|
|
super()
|
||
|
|
wrap_element div("ul.nav!")
|
||
|
|
wrap_element( div(".classes") << div("h4" , "Classes") )
|
||
|
|
return @element
|
||
|
|
end
|
||
|
|
|
||
|
|
end
|