require_relative "helper"

module Melon
  class TestMethod < MiniTest::Test
    include CompilerHelper

    def setup
      Register.machine.boot
    end

    def create_method
      Compiler.compile in_Space("def meth; @ivar;end")
      space = Parfait.object_space.get_class
      space.get_method(:meth)
    end
    
    def test_creates_method_in_class
      method = create_method
      assert method , "No method created"
    end

    def test_method_has_source
      method = create_method
      assert_equal "(ivar :@ivar)",  method.source.to_s
    end

    def test_method_has_no_args
      method = create_method
      assert_equal 1 , method.args_type.instance_length
    end

    def test_method_has_no_locals
      method = create_method
      assert_equal 1 , method.locals_type.instance_length
    end

  end
end