2014-05-13 20:15:02 +02:00
|
|
|
module Ast
|
|
|
|
# assignment, like operators are really function calls
|
|
|
|
|
|
|
|
class CallSiteExpression < Expression
|
2014-06-04 21:03:45 +02:00
|
|
|
# attr_reader :name, :args , :receiver
|
2014-05-31 16:58:26 +02:00
|
|
|
|
2014-05-13 20:15:02 +02:00
|
|
|
def compile context , into
|
|
|
|
params = args.collect{ |a| a.compile(context, into) }
|
2014-06-03 13:49:02 +02:00
|
|
|
|
2014-06-03 21:16:57 +02:00
|
|
|
if receiver.name == :self
|
|
|
|
function = context.current_class.get_or_create_function(name)
|
|
|
|
elsif receiver.is_a? ModuleName
|
|
|
|
c_name = receiver.name
|
|
|
|
clazz = context.object_space.get_or_create_class c_name
|
|
|
|
raise "uups #{clazz}.#{c_name}" unless clazz
|
|
|
|
#class qualifier, means call from metaclass
|
|
|
|
clazz = clazz.meta_class
|
|
|
|
function = clazz.get_or_create_function(name)
|
|
|
|
elsif receiver.is_a? VariableExpression
|
|
|
|
raise "not implemented instance var:#{receiver}"
|
|
|
|
else
|
|
|
|
raise "not implemented case (dare i say system error):#{receiver}"
|
2014-06-03 13:49:02 +02:00
|
|
|
end
|
2014-06-03 21:16:57 +02:00
|
|
|
raise "No such method error #{clazz.to_s}:#{name}" if function == nil
|
2014-05-13 20:15:02 +02:00
|
|
|
call = Vm::CallSite.new( name , params , function)
|
2014-05-22 20:55:17 +02:00
|
|
|
current_function = context.function
|
|
|
|
current_function.save_locals(context , into) if current_function
|
2014-05-13 20:15:02 +02:00
|
|
|
call.load_args into
|
|
|
|
call.do_call into
|
2014-05-22 20:55:17 +02:00
|
|
|
current_function.restore_locals(context , into) if current_function
|
2014-05-25 10:35:45 +02:00
|
|
|
puts "compile call #{function.return_type}"
|
2014-05-19 20:28:18 +02:00
|
|
|
function.return_type
|
2014-05-13 20:15:02 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
2014-06-01 13:24:54 +02:00
|
|
|
class VariableExpression < CallSiteExpression
|
2014-06-04 21:03:45 +02:00
|
|
|
# super( :_get_instance_variable , [StringExpression.new(name)] )
|
2014-06-01 13:24:54 +02:00
|
|
|
end
|
|
|
|
|
2014-05-13 20:15:02 +02:00
|
|
|
end
|