ruby-x/rubyx
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

add the ! syntax to create variables in builder, fix #8

Browse Source 
now a variable has to be created before being used
thus it is save to develop contracts where a certain name
must exist in the scope
Maybe the syntax starts getting a bit weird, but at least the ! is a common symbol in ruby
This commit is contained in:
Torsten Ruger
2018-08-14 19:39:46 +03:00
parent 0bf008b351
commit 37461a1727
9 changed files with 68 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lib/risc/builtin/integer.rb
View File

@ -14,9 +14,9 @@ module Risc
def div4(context)
compiler = compiler_for(:Integer,:div4 ,{})
compiler.compiler_builder(compiler.source).build do
integer << message[:receiver]
integer! << message[:receiver]
integer.reduce_int
integer_reg << 2
integer_reg! << 2
integer.op :>> , integer_reg
add_new_int("div4", integer , integer_reg)
message[:return_value] << integer_reg
@ -52,8 +52,8 @@ module Risc
compiler = compiler_for(:Integer, operator ,{other: :Integer})
builder = compiler.compiler_builder(compiler.source)
builder.build do
integer << message[:receiver]
integer_reg << message[:arguments]
integer! << message[:receiver]
integer_reg! << message[:arguments]
integer_reg << integer_reg[ 1]
integer.reduce_int
integer_reg.reduce_int
@ -61,7 +61,7 @@ module Risc
integer.op :- , integer_reg
if_minus false_label
if_zero( false_label ) if operator.to_s.length == 1
object << Parfait.object_space.true_object
object! << Parfait.object_space.true_object
branch merge_label
add_code false_label
object << Parfait.object_space.false_object
@ -89,8 +89,8 @@ module Risc
compiler = compiler_for(:Integer, op_sym ,{other: :Integer})
builder = compiler.compiler_builder(compiler.source)
builder.build do
integer << message[:receiver]
integer_reg << message[:arguments]
integer! << message[:receiver]
integer_reg! << message[:arguments]
integer_reg << integer_reg[ 1]
integer.reduce_int
integer_reg.reduce_int

20
lib/risc/builtin/object.rb
View File

@ -9,9 +9,9 @@ module Risc
def get_internal_word( context )
compiler = compiler_for(:Object , :get_internal_word ,{at: :Integer})
compiler.compiler_builder(compiler.source).build do
object << message[:receiver]
integer << message[:arguments]
integer << integer_reg[1]
object! << message[:receiver]
integer! << message[:arguments]
integer << integer[1]
integer.reduce_int
object << object[integer]
message[:return_value] << object
@ -25,10 +25,10 @@ module Risc
def set_internal_word( context )
compiler = compiler_for(:Object , :set_internal_word , {at: :Integer, :value => :Object} )
compiler.compiler_builder(compiler.source).build do
object << message[:receiver]
integer << message[:arguments]
object_reg << integer[ 2]
integer << integer[ 1]
object! << message[:receiver]
integer! << message[:arguments]
object_reg! << integer[ 2]
integer << integer[1]
integer.reduce_int
object[integer] << object_reg
message[:return_value] << object_reg
@ -56,9 +56,9 @@ module Risc
Parfait::NamedList.type_for({}) , Parfait::NamedList.type_for({}))
builder = compiler.compiler_builder(compiler.source)
builder.build do
space << Parfait.object_space
space! << Parfait.object_space
message << space[:next_message]
next_message << message[:next_message]
next_message! << message[:next_message]
space[:next_message] << next_message
end
@ -128,7 +128,7 @@ module Risc
r8 = RegisterValue.new( :r8 , :Message)
int = builder.compiler.use_reg(:Integer)
builder.build do
integer_reg << message
integer_reg! << message
message << r8
add_new_int( "_restore_message", integer_reg , int )
message[:return_value] << int

12
lib/risc/builtin/word.rb
View File

@ -28,8 +28,8 @@ module Risc
def get_internal_byte( context)
compiler = compiler_for(:Word , :get_internal_byte , {at: :Integer})
compiler.compiler_builder(compiler.source).build do
object << message[:receiver]
integer << message[:arguments]
object! << message[:receiver]
integer! << message[:arguments]
integer << integer[1]
integer.reduce_int
object <= object[integer]
@ -46,11 +46,11 @@ module Risc
def set_internal_byte( context )
compiler = compiler_for(:Word, :set_internal_byte , {at: :Integer , :value => :Integer} )
compiler.compiler_builder(compiler.source).build do
word << message[:receiver]
integer << message[:arguments]
word! << message[:receiver]
integer! << message[:arguments]
integer << integer[1]
integer_reg << message[:arguments]
integer_obj << integer_reg[2]
integer_reg! << message[:arguments]
integer_obj! << integer_reg[2]
integer_reg << integer_reg[2]
integer.reduce_int
integer_reg.reduce_int