fix tests for NameExpression split
also necessitates giving method name without the wrapping expression which is simpler anyway
This commit is contained in:
@ -13,7 +13,7 @@ module Register
|
||||
end
|
||||
HERE
|
||||
@input = s(:statements, s(:call,
|
||||
s(:name, :set_internal_byte),
|
||||
:set_internal_byte ,
|
||||
s(:arguments, s(:int, 1), s(:int, 104)),
|
||||
s(:receiver, s(:string, "Hello"))))
|
||||
super
|
||||
|
@ -21,16 +21,16 @@ module Register
|
||||
end
|
||||
end
|
||||
HERE
|
||||
@input = s(:statements, s(:call, s(:name, :itest), s(:arguments, s(:int, 20))))
|
||||
@input = s(:statements, s(:call, :itest , s(:arguments, s(:int, 20))))
|
||||
super
|
||||
end
|
||||
|
||||
# must be after boot, but before main compile, to define method
|
||||
def do_clean_compile
|
||||
clean_compile :Space , :itest , {:n => :Integer} ,
|
||||
s(:statements, s(:if_statement, :zero, s(:condition, s(:operator_value, :-, s(:name, :n), s(:int, 12))),
|
||||
s(:true_statements, s(:call, s(:name, :putstring), s(:arguments), s(:receiver, s(:string, "then")))),
|
||||
s(:false_statements, s(:call, s(:name, :putstring), s(:arguments), s(:receiver, s(:string, "else"))))))
|
||||
s(:statements, s(:if_statement, :zero, s(:condition, s(:operator_value, :-, s(:arg, :n), s(:int, 12))),
|
||||
s(:true_statements, s(:call, :putstring , s(:arguments), s(:receiver, s(:string, "then")))),
|
||||
s(:false_statements, s(:call, :putstring , s(:arguments), s(:receiver, s(:string, "else"))))))
|
||||
end
|
||||
def test_if
|
||||
#show_ticks # get output of what is
|
||||
|
@ -12,7 +12,7 @@ module Register
|
||||
end
|
||||
end
|
||||
HERE
|
||||
@input = s(:statements, s(:call, s(:name, :putstring), s(:arguments), s(:receiver, s(:string, "Hello again"))))
|
||||
@input = s(:statements, s(:call, :putstring, s(:arguments), s(:receiver, s(:string, "Hello again"))))
|
||||
super
|
||||
end
|
||||
|
||||
|
@ -13,7 +13,7 @@ module Register
|
||||
end
|
||||
HERE
|
||||
@input = s(:statements, s(:call,
|
||||
s(:name, :get_internal_byte),
|
||||
:get_internal_byte,
|
||||
s(:arguments, s(:int, 1)),
|
||||
s(:receiver, s(:string, "Hello"))))
|
||||
super
|
||||
|
@ -18,8 +18,8 @@ module Register
|
||||
end
|
||||
HERE
|
||||
@input = s(:statements, s(:if_statement, :zero, s(:condition, s(:operator_value, :-, s(:int, 10), s(:int, 12))),
|
||||
s(:true_statements, s(:call, s(:name, :putstring), s(:arguments), s(:receiver, s(:string, "then")))),
|
||||
s(:false_statements, s(:call, s(:name, :putstring), s(:arguments), s(:receiver, s(:string, "else"))))))
|
||||
s(:true_statements, s(:call, :putstring, s(:arguments), s(:receiver, s(:string, "then")))),
|
||||
s(:false_statements, s(:call, :putstring, s(:arguments), s(:receiver, s(:string, "else"))))))
|
||||
|
||||
super
|
||||
end
|
||||
|
Reference in New Issue
Block a user