2017-08-31 15:11:06 +02:00
|
|
|
module Vool
|
2016-12-20 19:02:20 +01:00
|
|
|
|
2017-08-31 15:11:06 +02:00
|
|
|
class VoolMethod
|
2016-12-20 19:02:20 +01:00
|
|
|
|
2017-01-13 21:16:06 +01:00
|
|
|
attr_reader :name , :args_type , :locals_type , :source
|
2016-12-21 10:30:35 +01:00
|
|
|
|
2017-01-13 21:16:06 +01:00
|
|
|
def initialize(name , args_type , locals_type , source )
|
|
|
|
@name , @args_type , @locals_type , @source = name , args_type, locals_type , source
|
2017-01-16 16:44:34 +01:00
|
|
|
raise "Name must be symbol" unless name.is_a?(Symbol)
|
|
|
|
raise "args_type must be type" unless args_type.is_a?(Parfait::Type)
|
|
|
|
raise "locals_type must be type" unless locals_type.is_a?(Parfait::Type)
|
2016-12-20 19:02:20 +01:00
|
|
|
end
|
|
|
|
|
2017-01-14 19:30:19 +01:00
|
|
|
def normalize_source
|
|
|
|
@source = yield @source
|
|
|
|
end
|
2017-01-15 11:10:37 +01:00
|
|
|
|
|
|
|
def create_vm_method( type )
|
|
|
|
raise "create_method #{type.inspect} is not a Type" unless type.is_a? Parfait::Type
|
|
|
|
type.create_method( @name , @args_type )#FIXME, @locals_type)
|
|
|
|
end
|
|
|
|
|
2017-08-30 21:27:12 +02:00
|
|
|
def create_tmp
|
2017-08-30 21:54:03 +02:00
|
|
|
tmp_name = "tmp_#{@locals_type.instance_length}".to_sym
|
2017-08-30 21:27:12 +02:00
|
|
|
@locals_type = @locals_type.add_instance_variable( tmp_name , :Object )
|
|
|
|
tmp_name
|
|
|
|
end
|
2016-12-20 19:02:20 +01:00
|
|
|
end
|
|
|
|
end
|