From fd7e4afb2f2104287c406c6234d96f67fa08e259 Mon Sep 17 00:00:00 2001
From: Torsten Ruger <torsten@villataika.fi>
Date: Sat, 7 Nov 2015 00:14:10 +0200
Subject: [PATCH] small meta related changes

---
 lib/soml/compiler/call_site.rb           | 4 ++--
 lib/soml/compiler/function_definition.rb | 3 ---
 2 files changed, 2 insertions(+), 5 deletions(-)

diff --git a/lib/soml/compiler/call_site.rb b/lib/soml/compiler/call_site.rb
index 9a16ee5f..0aef3c13 100644
--- a/lib/soml/compiler/call_site.rb
+++ b/lib/soml/compiler/call_site.rb
@@ -38,10 +38,10 @@ module Soml
     def do_call clazz , statement
       name = statement.first.first
       #puts "clazz #{clazz.name}"
-      raise "No such class #{me.type}" unless clazz
+      raise "No such class" unless clazz
       method = clazz.get_instance_method(name)
       #puts Register.machine.space.get_class_by_name(:Integer).method_names.to_a
-      raise "Method not implemented #{me.type}.#{name}" unless method
+      raise "Method not implemented #{clazz.name}.#{name}" unless method
       Register.issue_call( self , method )
     end
     def set_message_details name_s , arguments
diff --git a/lib/soml/compiler/function_definition.rb b/lib/soml/compiler/function_definition.rb
index 05cbeb10..4251393c 100644
--- a/lib/soml/compiler/function_definition.rb
+++ b/lib/soml/compiler/function_definition.rb
@@ -21,8 +21,6 @@ module Soml
           raise "Not covered #{receiver}"
         end
       end
-      r = @clazz
-      class_name = @clazz.name
 
       @method = @clazz.get_instance_method( name )
       if(@method)
@@ -31,7 +29,6 @@ module Soml
         init_method
       else
         create_method_for(@clazz, name , args ).init_method
-        @clazz.add_instance_method @method
       end
       @method.source = statement
       #puts "compile method #{@method.name}"