improve label names a bit

lib/soml/compiler.rb

@@ -82,7 +82,7 @@ module Soml
     # message shuffle and FunctionReturn for the return
     # return self for chaining
     def init_method
-      source = "Complier.init_method"
+      source = "_init_method"
       @method.instructions = Register::Label.new(source, "#{method.for_class.name}.#{method.name}")
       @current = method.instructions
       add_code  enter = Register.save_return(source, :message , :return_address)

lib/soml/compiler/function_definition.rb

@@ -33,6 +33,7 @@ module Soml
         create_method_for(@clazz, name , args ).init_method
         @clazz.add_instance_method @method
       end
+      @method.source = statement
       #puts "compile method #{@method.name}"
 
       kids.to_a.each do |ex|