use factory to generte intergers in space
start with just integer factory in space change all the hand-out code still #14
This commit is contained in:
@ -131,10 +131,10 @@ module Risc
|
||||
to.set_builder( self ) # esecially div10 comes in without having used builder
|
||||
from.set_builder( self ) # not named regs, different regs ==> silent errors
|
||||
build do
|
||||
space? << Parfait.object_space
|
||||
to << space[:next_integer]
|
||||
factory! << Parfait.object_space.get_factory_for(:Integer)
|
||||
to << factory[:next_object]
|
||||
integer_2! << to[:next_integer]
|
||||
space[:next_integer] << integer_2
|
||||
factory[:next_object] << integer_2
|
||||
to[Parfait::Integer.integer_index] << from
|
||||
end
|
||||
end
|
||||
|
@ -163,9 +163,8 @@ module Parfait
|
||||
Factory: { for_type: :Type , next_object: :Object , last_object: :Object ,
|
||||
reserve: :Object , attribute_name: :Word },
|
||||
ReturnAddress: {next_integer: :ReturnAddress},
|
||||
Space: {classes: :Dictionary , types: :Dictionary ,
|
||||
Space: {classes: :Dictionary , types: :Dictionary , factories: :Dictionary,
|
||||
next_message: :Message , messages: :Message ,
|
||||
next_integer: :Integer, integers: :Integer ,
|
||||
next_address: :ReturnAddress ,addresses: :ReturnAddress ,
|
||||
true_object: :TrueClass, false_object: :FalseClass , nil_object: :NilClass},
|
||||
TrueClass: {},
|
||||
|
Reference in New Issue
Block a user