57 lines
1.6 KiB
Ruby
57 lines
1.6 KiB
Ruby
module Soml
|
|
# collection of the simple ones, int and strings and such
|
|
|
|
Compiler.class_eval do
|
|
|
|
# Constant expressions can by definition be evaluated at compile time.
|
|
# But that does not solve their storage, ie they need to be accessible at runtime from _somewhere_
|
|
# So expressions move the data into a Register.
|
|
# All expressions return registers
|
|
|
|
# But in the future (in the one that holds great things) we optimize those unneccesay moves away
|
|
|
|
def on_int expression
|
|
int = expression.first
|
|
reg = use_reg :Integer , int
|
|
add_code Register::LoadConstant.new( expression, int , reg )
|
|
return reg
|
|
end
|
|
|
|
def on_true expression
|
|
reg = use_reg :Boolean
|
|
add_code Register::LoadConstant.new( expression, true , reg )
|
|
return reg
|
|
end
|
|
|
|
def on_false expression
|
|
reg = use_reg :Boolean
|
|
add_code Register::LoadConstant.new( expression, false , reg )
|
|
return reg
|
|
end
|
|
|
|
def on_nil expression
|
|
reg = use_reg :NilClass
|
|
add_code Register::LoadConstant.new( expression, nil , reg )
|
|
return reg
|
|
end
|
|
|
|
def on_string expression
|
|
value = expression.first.to_sym
|
|
reg = use_reg :Word
|
|
Register.machine.constants << value
|
|
add_code Register::LoadConstant.new( expression, value , reg )
|
|
return reg
|
|
end
|
|
|
|
def on_class_name expression
|
|
name = expression.first
|
|
clazz = Parfait::Space.object_space.get_class_by_name! name
|
|
raise "No such class #{name}" unless clazz
|
|
reg = use_reg :MetaClass , clazz
|
|
add_code Register::LoadConstant.new( expression, clazz , reg )
|
|
return reg
|
|
end
|
|
|
|
end
|
|
end
|