31 lines
721 B
Ruby
31 lines
721 B
Ruby
require_relative "helper"
|
|
|
|
module RubyX
|
|
module Macro
|
|
class TestWordGet < MiniTest::Test
|
|
include MacroHelper
|
|
def source
|
|
<<GET
|
|
class Word < Data8
|
|
def get_internal_byte(at)
|
|
X.get_internal_byte
|
|
end
|
|
end
|
|
GET
|
|
end
|
|
def test_slot_meth
|
|
assert_equal :get_internal_byte , compiler.callable.name
|
|
end
|
|
def test_instr_len
|
|
assert_equal 7 , compiler.slot_instructions.length
|
|
end
|
|
def test_instr_get
|
|
assert_equal SlotMachine::GetInternalByte , compiler.slot_instructions.next.class
|
|
end
|
|
def test_risc
|
|
assert_equal 41 , compiler.to_risc.risc_instructions.length
|
|
end
|
|
end
|
|
end
|
|
end
|