add while interpreter test

This commit is contained in:
Torsten Ruger
2018-04-19 19:23:12 +03:00
parent 1849522a54
commit 13d8a65e07
4 changed files with 102 additions and 1 deletions

View File

@ -33,16 +33,25 @@ module Vool
def ct_type
Parfait.object_space.get_class_by_name(:True).instance_type
end
def slot_definition(method)
return Mom::SlotDefinition.new(Parfait.object_space.true_object , [])
end
end
class FalseConstant < Constant
def ct_type
Parfait.object_space.get_class_by_name(:False).instance_type
end
def slot_definition(method)
return Mom::SlotDefinition.new(Parfait.object_space.false_object , [])
end
end
class NilConstant < Constant
def ct_type
Parfait.object_space.get_class_by_name(:Nil).instance_type
end
def slot_definition(method)
return Mom::SlotDefinition.new(Parfait.object_space.nil_object , [])
end
end
class SelfExpression < Expression
attr_reader :my_type