Torsten Rüger
d1f8733623
Simple is really the descriptive name for the layer Sure, it is "virtual" but that is not as important as the fact that it is simple (or simplified) Also objct (based really) is better, since orientated implies it is a little like that, but only orientated, not really it. Sol only has objects, nothing else Just cause i was renaming anyway
65 lines
1.5 KiB
Ruby
65 lines
1.5 KiB
Ruby
require_relative "helper"
|
|
|
|
module Sol
|
|
class TestLocalSlotMachine < MiniTest::Test
|
|
include SolCompile
|
|
|
|
def setup
|
|
@compiler = compile_main( "a = 5")
|
|
@ins = @compiler.slot_instructions.next
|
|
end
|
|
|
|
def test_compiles_not_array
|
|
assert Array != @ins.class , @ins
|
|
end
|
|
def test_class_compiles
|
|
assert_equal SlotMachine::SlotLoad , @ins.class , @ins
|
|
end
|
|
def test_slot_is_set
|
|
assert @ins.left
|
|
end
|
|
def test_slot_starts_at_message
|
|
assert_equal :message , @ins.left.known_object
|
|
end
|
|
def test_slot_gets_local
|
|
assert_equal :local1 , @ins.left.slots[0]
|
|
end
|
|
def test_slot_assigns_something
|
|
assert @ins.right
|
|
end
|
|
def test_slot_assigns_int
|
|
assert_equal SlotMachine::IntegerConstant , @ins.right.known_object.class
|
|
end
|
|
end
|
|
|
|
class TestArgSlotMachine < MiniTest::Test
|
|
include SolCompile
|
|
|
|
def setup
|
|
Parfait.boot!(Parfait.default_test_options)
|
|
@compiler = compile_main( "arg = 5")
|
|
@ins = @compiler.slot_instructions.next
|
|
end
|
|
|
|
def test_class_compiles
|
|
assert_equal SlotMachine::SlotLoad , @ins.class , @ins
|
|
end
|
|
def test_slot_is_set
|
|
assert @ins.left
|
|
end
|
|
def test_slot_starts_at_message
|
|
assert_equal :message , @ins.left.known_object
|
|
end
|
|
def test_slot_gets_arg
|
|
assert_equal :arg1 , @ins.left.slots[0]
|
|
end
|
|
def test_slot_assigns_something
|
|
assert @ins.right
|
|
end
|
|
def test_slot_assigns_int
|
|
assert_equal SlotMachine::IntegerConstant , @ins.right.known_object.class
|
|
end
|
|
end
|
|
|
|
end
|