a little more minimal elf tests

test/elf/test_hello.rb

@@ -6,7 +6,7 @@ class HelloTest < MiniTest::Test
   def check
     machine = Register.machine.boot
     Typed.compile( @input )
-    machine.collect
+    machine.collect_space
     machine.translate_arm
     writer = Elf::ObjectWriter.new
     writer.save "test/hello.o"
@@ -15,6 +15,6 @@ class HelloTest < MiniTest::Test
   def test_string_put
     @input = s(:statements, s(:return, s(:call, s(:name, :putstring), s(:arguments),
                   s(:receiver, s(:string, "Hello again\\n")))))
-#    check
+    check
   end
 end

test/elf/test_zero.rb

@@ -2,18 +2,32 @@ require_relative "../helper"
 
 class TestZeroCode < MiniTest::Test
 
-  def test_string_put
-    machine = Register.machine.boot
-    space = Parfait.object_space
-    space.each_type do | type |
+  def setup
+    @machine = Register.machine.boot
+    @space = Parfait.object_space
+    @space.each_type do | type |
       type.method_names.each do |method|
-        type.remove_method(method)
+        type.remove_method(method) unless keeper(method)
       end
     end
-    assert_equal 0 , space.collect_methods.length
-    machine.collect_space
-    machine.translate_arm
-#    writer = Elf::ObjectWriter.new
-#    writer.save "test/zero.o"
+    @machine.collect_space
+  end
+  def keeper name
+    name == :main or name == :__init__
+  end
+
+  def test_empty_translate
+    assert_equal 2 , @space.collect_methods.length
+    @machine.translate_arm
+    writer = Elf::ObjectWriter.new
+    writer.save "test/zero.o"
+  end
+
+  def test_methods_match_objects
+    assert_equal 2 , @space.collect_methods.length
+    @machine.objects.each do |id , objekt|
+      next unless objekt.is_a? Parfait::TypedMethod
+      assert keeper(objekt.name) ,  "CODE1 #{objekt.name}"
+    end
   end
 end