2017-01-14 18:28:44 +01:00
|
|
|
module Vm
|
2016-12-09 13:04:06 +01:00
|
|
|
module FieldAccess
|
2015-09-27 10:28:06 +02:00
|
|
|
|
2016-03-07 10:55:28 +01:00
|
|
|
def on_FieldAccess statement
|
|
|
|
# receiver_ast , field_ast = *statement
|
|
|
|
receiver = process(statement.receiver)
|
2016-02-25 21:03:11 +01:00
|
|
|
|
2016-12-14 12:24:42 +01:00
|
|
|
type = receiver.type
|
|
|
|
if(type.is_a?(Symbol))
|
2016-12-30 13:10:49 +01:00
|
|
|
type = Parfait.object_space.get_class_by_name(type).instance_type
|
2016-12-14 12:24:42 +01:00
|
|
|
end
|
2016-03-07 10:55:28 +01:00
|
|
|
field_name = statement.field.name
|
2016-12-14 12:24:42 +01:00
|
|
|
|
|
|
|
index = type.variable_index(field_name)
|
|
|
|
raise "no such field:#{field_name} for class #{type.inspect}" unless index
|
|
|
|
value = use_reg(type.type_at(index))
|
2015-11-09 22:26:37 +01:00
|
|
|
|
2016-12-28 19:37:54 +01:00
|
|
|
add_slot_to_reg(statement , receiver , index, value)
|
2015-09-27 10:28:06 +02:00
|
|
|
|
2015-09-27 11:59:50 +02:00
|
|
|
value
|
2015-09-27 10:28:06 +02:00
|
|
|
end
|
2015-11-09 22:26:37 +01:00
|
|
|
|
|
|
|
def on_receiver expression
|
|
|
|
process expression.first
|
|
|
|
end
|
2015-09-27 10:28:06 +02:00
|
|
|
end
|
|
|
|
end
|