2019-08-12 13:16:15 +03:00
|
|
|
require_relative "get_internal_byte"
|
|
|
|
require_relative "set_internal_byte"
|
|
|
|
require_relative "putstring"
|
|
|
|
|
2019-08-12 12:36:32 +03:00
|
|
|
module Mom
|
2015-07-01 21:45:41 +03:00
|
|
|
module Builtin
|
|
|
|
module Word
|
|
|
|
module ClassMethods
|
2016-12-15 19:31:39 +02:00
|
|
|
include CompileHelper
|
2015-11-19 10:08:41 +02:00
|
|
|
|
2018-08-14 11:23:19 +03: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 15:17:16 +03:00
|
|
|
def putstring( context)
|
2018-03-18 22:08:35 +05:30
|
|
|
compiler = compiler_for(:Word , :putstring ,{})
|
2019-08-12 10:45:07 +03:00
|
|
|
compiler.add_code Putstring.new("putstring")
|
|
|
|
return compiler
|
|
|
|
end
|
2015-11-19 10:08:41 +02:00
|
|
|
# self[index] basically. Index is the first arg > 0
|
2018-08-14 11:23:19 +03:00
|
|
|
# return a word sized new int, in return_value
|
2018-11-21 20:29:22 +02:00
|
|
|
#
|
|
|
|
# Note: no index (or type) checking. Method should be internal and check before.
|
|
|
|
# Which means the returned integer could be passed in, instead of allocated.
|
2018-04-01 15:17:16 +03:00
|
|
|
def get_internal_byte( context)
|
2018-03-18 22:08:35 +05:30
|
|
|
compiler = compiler_for(:Word , :get_internal_byte , {at: :Integer})
|
2019-08-12 10:45:07 +03:00
|
|
|
compiler.add_code GetInternalByte.new("get_internal_byte")
|
2018-06-30 23:16:17 +03:00
|
|
|
return compiler
|
2015-11-19 10:08:41 +02:00
|
|
|
end
|
2018-11-21 20:29:22 +02:00
|
|
|
# self[index] = val basically. Index is the first arg ( >0 , unchecked),
|
|
|
|
# value the second, which is also returned
|
2018-04-01 21:59:06 +03:00
|
|
|
def set_internal_byte( context )
|
2018-11-21 20:29:22 +02:00
|
|
|
compiler = compiler_for(:Word, :set_internal_byte , {at: :Integer , value: :Integer} )
|
2019-08-12 10:45:07 +03:00
|
|
|
compiler.add_code SetInternalByte.new("set_internal_byte")
|
2018-06-30 23:16:17 +03:00
|
|
|
return compiler
|
2015-11-19 10:08:41 +02:00
|
|
|
end
|
2015-07-01 21:45:41 +03:00
|
|
|
end
|
|
|
|
extend ClassMethods
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|