From b9b05378f5ea5acd9bbe78d475a4aaf0724ac034 Mon Sep 17 00:00:00 2001
From: Torsten Ruger <torsten@villataika.fi>
Date: Tue, 27 Dec 2016 20:32:38 +0200
Subject: [PATCH] split the if test into a plain and one with call

---
 .../{test_if.rb => test_called_if.rb}         |  0
 test/register/interpreter/test_simple_if.rb   | 39 +++++++++++++++++++
 2 files changed, 39 insertions(+)
 rename test/register/interpreter/{test_if.rb => test_called_if.rb} (100%)
 create mode 100644 test/register/interpreter/test_simple_if.rb

diff --git a/test/register/interpreter/test_if.rb b/test/register/interpreter/test_called_if.rb
similarity index 100%
rename from test/register/interpreter/test_if.rb
rename to test/register/interpreter/test_called_if.rb
diff --git a/test/register/interpreter/test_simple_if.rb b/test/register/interpreter/test_simple_if.rb
new file mode 100644
index 00000000..a589f0cc
--- /dev/null
+++ b/test/register/interpreter/test_simple_if.rb
@@ -0,0 +1,39 @@
+require_relative "helper"
+
+class IfSimpleTest < MiniTest::Test
+  include Ticker
+  include Compiling
+
+  def setup
+    @string_input = <<HERE
+class Space
+  int main()
+    if_zero( 10 - 12)
+      "then".putstring()
+    else
+      "else".putstring()
+    end
+  end
+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"))))))
+
+    super
+  end
+
+  def test_if
+      #show_ticks # get output of what is
+      check_chain ["Branch","Label","LoadConstant","SlotToReg","RegToSlot",
+     "LoadConstant","RegToSlot","FunctionCall","Label","LoadConstant",
+     "LoadConstant","OperatorInstruction","IsZero","SlotToReg","LoadConstant",
+     "RegToSlot","LoadConstant","RegToSlot","LoadConstant","SlotToReg",
+     "SlotToReg","RegToSlot","LoadConstant","RegToSlot","RegisterTransfer",
+     "FunctionCall","Label","SlotToReg","SlotToReg","RegisterTransfer",
+     "Syscall","RegisterTransfer","RegisterTransfer","RegToSlot","Label",
+     "FunctionReturn","RegisterTransfer","SlotToReg","SlotToReg","Branch",
+     "Label","Label","FunctionReturn","RegisterTransfer","Syscall",
+     "NilClass"]
+  end
+end