From 2b467fc55526ad21407c1faf8ead595774aeddf1 Mon Sep 17 00:00:00 2001
From: Torsten <torsten@rubydesign.fi>
Date: Sat, 28 Mar 2020 09:36:16 +0200
Subject: [PATCH] make class method tests arm tests

---
 test/mains/test_class.rb                      | 37 +++++++++++++++++++
 .../risc/interpreter/class/test_class_inst.rb | 29 ---------------
 .../interpreter/class/test_class_inst_set.rb  | 33 -----------------
 .../risc/interpreter/class/test_class_send.rb | 29 ---------------
 4 files changed, 37 insertions(+), 91 deletions(-)
 create mode 100644 test/mains/test_class.rb
 delete mode 100644 test/risc/interpreter/class/test_class_inst.rb
 delete mode 100644 test/risc/interpreter/class/test_class_inst_set.rb
 delete mode 100644 test/risc/interpreter/class/test_class_send.rb

diff --git a/test/mains/test_class.rb b/test/mains/test_class.rb
new file mode 100644
index 00000000..9d14a3ca
--- /dev/null
+++ b/test/mains/test_class.rb
@@ -0,0 +1,37 @@
+require_relative "helper"
+
+module Mains
+  class ClassTester < MiniTest::Test
+    include MainsHelper
+
+    def test_simple_call
+      @input = code("return Space.get")
+      assert_result 5 , ""
+    end
+
+    def test_inst_get
+      @input = code("return Space.get" , "@inst = 5;return @inst")
+      assert_result 5 , ""
+    end
+
+    def test_inst_set
+      setter = "def self.set(num); @inst = num;end ;"
+      @input = code("Space.set(6);return Space.get" , "return @inst" , setter)
+      assert_result 6 , ""
+    end
+
+    def code( main , get = "return 5" , extra = "")
+      @input = <<MAIN
+      class Space
+        #{extra}
+        def self.get
+          #{get}
+        end
+        def main(arg)
+          #{main}
+        end
+      end
+MAIN
+    end
+  end
+end
diff --git a/test/risc/interpreter/class/test_class_inst.rb b/test/risc/interpreter/class/test_class_inst.rb
deleted file mode 100644
index baa7cf64..00000000
--- a/test/risc/interpreter/class/test_class_inst.rb
+++ /dev/null
@@ -1,29 +0,0 @@
-require_relative "../helper"
-
-module Risc
-  class InterpreterGetters < MiniTest::Test
-    include Ticker
-
-    def setup
-      @preload = "Integer.div4"
-      @string_input = <<MAIN
-      class Space
-        def self.get
-          @inst = 5
-          return @inst
-        end
-        def main(arg)
-          return Space.get
-        end
-      end
-MAIN
-      super
-    end
-    def test_chain
-      #show_main_ticks # get output of what is
-      run_input @string_input
-      assert_equal 5 , get_return
-    end
-
-  end
-end
diff --git a/test/risc/interpreter/class/test_class_inst_set.rb b/test/risc/interpreter/class/test_class_inst_set.rb
deleted file mode 100644
index a50b7ef9..00000000
--- a/test/risc/interpreter/class/test_class_inst_set.rb
+++ /dev/null
@@ -1,33 +0,0 @@
-require_relative "../helper"
-
-module Risc
-  class InterpreterSetters < MiniTest::Test
-    include Ticker
-
-    def setup
-      @preload = "Integer.div4"
-      @string_input = <<MAIN
-      class Space
-        def self.set(num)
-          @inst = num
-        end
-        def self.get
-          return @inst
-        end
-        def main(arg)
-          Space.set(5)
-          return Space.get
-        end
-      end
-MAIN
-      super
-    end
-
-    def test_chain
-      #show_main_ticks # get output of what is
-      run_input @string_input
-      assert_equal 5 , get_return
-    end
-
-  end
-end
diff --git a/test/risc/interpreter/class/test_class_send.rb b/test/risc/interpreter/class/test_class_send.rb
deleted file mode 100644
index 08e00076..00000000
--- a/test/risc/interpreter/class/test_class_send.rb
+++ /dev/null
@@ -1,29 +0,0 @@
-require_relative "../helper"
-
-module Risc
-  class InterpreterClassSend < MiniTest::Test
-    include Ticker
-
-    def setup
-      @preload = "Integer.div4"
-      @string_input = <<MAIN
-      class Space
-        def self.get
-          return 5
-        end
-        def main(arg)
-          return Space.get
-        end
-      end
-MAIN
-      super
-    end
-
-    def test_chain
-      #show_main_ticks # get output of what is
-      run_input @string_input
-      assert_equal 5 , get_return
-    end
-
-  end
-end