don't collect labels anymore

don’t need, use binary code as the methods jump point
This commit is contained in:
Torsten Ruger
2018-03-27 19:06:16 +03:00
parent 4253d7a6b9
commit 4069397fca
4 changed files with 21 additions and 11 deletions

View File

@ -12,10 +12,6 @@ module Risc
def self.keep( object , depth )
return if object.nil?
return unless add_object( object , depth )
# probably should make labels or even instructions derive from Parfait::Object, but . .
if object.is_a? Risc::Label
object.each { |l| self.add_object(l ,depth) if l.is_a? Risc::Label}
end
return unless object.respond_to? :has_type?
type = object.get_type
keep(type , depth + 1)
@ -36,9 +32,10 @@ module Risc
def self.add_object( objekt , depth)
return false if @objects[objekt.object_id]
return true if objekt.is_a? Fixnum
return true if objekt.is_a?( Risc::Label)
#puts message(objekt , depth)
#puts "ADD #{objekt.inspect}, #{objekt.name}" if objekt.is_a? Parfait::TypedMethod
unless objekt.is_a?( Parfait::Object) or objekt.is_a?( Symbol) or objekt.is_a?( Risc::Label)
unless objekt.is_a?( Parfait::Object) or objekt.is_a?( Symbol)
raise "adding non parfait #{objekt.class}:#{objekt}"
end
#raise "Method #{objekt.name}" if objekt.is_a? Parfait::TypedMethod

View File

@ -96,6 +96,7 @@ module Risc
def boot
initialize
@objects = nil
@translated = false
boot_parfait!
@risc_init = Branch.new( "__initial_branch__" , Parfait.object_space.get_init.risc_instructions )
@booted = true