diff --git a/lib/register/boot.rb b/lib/register/boot.rb index f25894ff..dd5084d2 100644 --- a/lib/register/boot.rb +++ b/lib/register/boot.rb @@ -124,7 +124,7 @@ module Register :Kernel => {}, #fix, kernel is a class, but should be a module :BinaryCode => {:char_length => :Integer} , :Space => {:classes => :Dictionary , :types => :Dictionary , :first_message => :Message}, - :NamedList => {:next_list => :NamedList}, + :NamedList => {}, :Type => {:object_class => :Class, :instance_methods => :List , :indexed_length => :Integer} , :Class => {:instance_methods => :List, :instance_type => :Type, :name => :Word, :super_class_name => :Word , :instance_names => :List }, diff --git a/lib/typed/parfait/named_list.rb b/lib/typed/parfait/named_list.rb index 7e154111..e11a430f 100644 --- a/lib/typed/parfait/named_list.rb +++ b/lib/typed/parfait/named_list.rb @@ -1,5 +1,5 @@ -# A NamedList is for local variables arguments when calling methods. +# A NamedList is used to store local variables and arguments when calling methods. # Also temporary variables, which are local variables named by the system # The items are named (and typed) by the objects type instance. In effect the @@ -9,9 +9,10 @@ # A Message (see details there) is created by the caller and control is transferred # A NamedList is created by the receiver # PS: it turns out that both messages and named_lists are created at compile, not run-time, and -# just constantly reused. Each message has a named_list object ready and is also linked +# just constantly reused. Each message has two named_list object ready and is also linked # to the next message. -# The better way to say above is that a message is *used* by the caller, and a named_list by the callee. +# The better way to say above is that a message is *used* by the caller, and a named_list +# by the callee. # Also at runtime Messages and NamedLists remain completely "normal" objects. # Ie they have have type and instances and so on.* @@ -21,7 +22,6 @@ # module Parfait class NamedList < Object - attribute :next_list end end diff --git a/test/typed/parfait/test_named_list.rb b/test/typed/parfait/test_named_list.rb index 958e253a..cb591b17 100644 --- a/test/typed/parfait/test_named_list.rb +++ b/test/typed/parfait/test_named_list.rb @@ -13,11 +13,6 @@ class TestNamedLists < MiniTest::Test assert @named_list.get_instance_variables end - def test_named_list_next_set - @named_list.next_list = :next_list - assert_equal :next_list , @named_list.next_list - end - def test_new list = Parfait::NamedList.new assert list.get_type