rubyx/lib/risc/builtin/word.rb

68 lines
2.3 KiB
Ruby
Raw Normal View History

module Risc
module Builtin
module Word
module ClassMethods
include CompileHelper
2015-11-19 09:08:41 +01:00
2018-08-14 10:23:19 +02:00
# wrapper for the syscall
# io/file currently hardcoded to stdout
# set up registers for syscall, ie
# - pointer in r1
# - length in r2
# - emit_syscall (which does the return of an integer, see there)
2018-04-01 14:17:16 +02:00
def putstring( context)
compiler = compiler_for(:Word , :putstring ,{})
builder = compiler.compiler_builder(compiler.source)
2018-08-15 16:52:21 +02:00
builder.build do
word! << message[:receiver]
integer! << word[Parfait::Word.get_length_index]
end
Risc::Builtin::Object.emit_syscall( builder , :putstring )
2018-04-01 14:17:16 +02:00
compiler.add_mom( Mom::ReturnSequence.new)
compiler
end
2015-11-19 09:08:41 +01:00
# self[index] basically. Index is the first arg > 0
2018-08-14 10:23:19 +02:00
# return a word sized new int, in return_value
2018-04-01 14:17:16 +02:00
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]
integer << integer[1]
integer.reduce_int
object <= object[integer]
add_new_int("get_internal_byte", object , integer)
message[:return_value] << integer
end
2018-04-01 14:17:16 +02:00
compiler.add_mom( Mom::ReturnSequence.new)
return compiler
2015-11-19 09:08:41 +01:00
end
# self[index] = val basically. Index is the first arg ( >0),
# value the second
2018-08-14 10:23:19 +02:00
# return value
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]
integer << integer[1]
integer_reg! << message[:arguments]
integer_obj! << integer_reg[2]
integer_reg << integer_reg[2]
integer.reduce_int
integer_reg.reduce_int
word[integer] <= integer_reg
message[:return_value] << integer_obj
end
2018-04-01 14:17:16 +02:00
compiler.add_mom( Mom::ReturnSequence.new)
return compiler
2015-11-19 09:08:41 +01:00
end
end
extend ClassMethods
end
end
end