move soml tests out, small cleanup

stash/soml/parfait/test_integer.rb

@@ -0,0 +1,156 @@
+require_relative 'helper'
+
+class TestPutiRT < MiniTest::Test
+  include ParfaitTests
+
+  def test_mod4_2
+    @main = "return 2.mod4()"
+    check 2 % 4
+  end
+  def test_mod4_3
+    @main = "return 3.mod4()"
+    check 3 % 4
+  end
+  def test_mod4_4
+    @main = "return 4.mod4()"
+    check 4 % 4
+  end
+  def test_mod4_5
+    @main = "return 5.mod4()"
+    check 5 % 4
+  end
+  def test_mod4_12
+    @main = "return 12.mod4()"
+    check 12 % 4
+  end
+  def test_mod4_10
+    @main = "return 10.mod4()"
+    check 10 % 4
+  end
+
+
+  # finally settled on the long hackers delight version http://www.hackersdelight.org/divcMore.pdf
+  def test_div10_random
+    20.times do
+      i = rand 0xfffff
+      @main = "return #{i}.div10()"
+      check_local i / 10
+    end
+  end
+
+  def test_div10_2
+    @main = "return 2.div10()"
+    check 2 / 10
+  end
+  def test_div10_10
+    @main = "return 10.div10()"
+    check 10 / 10
+  end
+  def test_div10_12345
+    @main = "return 12345.div10()"
+    check 12345 / 10
+  end
+  def test_div10_234567
+    @main = "return 234567.div10()"
+    check 234567 / 10
+  end
+
+  def test_as_char1
+    @main = "return 5.as_char()"
+    check 53
+  end
+
+  def test_as_char2
+    @main = "return 10.as_char()"
+    check 32
+  end
+
+  def test_tos_one_digit
+    @main = "Word five = 5.to_s()
+five.putstring()"
+    @stdout = "5"
+    check
+  end
+
+  def test_tos_one_digit_length
+    @main = "Word five = 5.to_s()
+return five.char_length"
+    check 2
+  end
+
+  def test_tos_zero
+    @main = "Word five = 0.to_s()
+    five.putstring()"
+    @stdout = "0"
+    check
+  end
+
+  def test_tos_two_digit
+    @main = "Word five = 15.to_s()
+five.putstring()"
+    @stdout = "15"
+    check
+  end
+
+  def test_tos_two_digit_length
+    @main = "Word five = 15.to_s()
+    return five.char_length"
+    check 3
+  end
+
+  def test_tos_three_digit
+    @main = "Word five = 150.to_s()
+five.putstring()"
+    @stdout = "150"
+    check
+  end
+
+  def test_puti_four_digit
+    @main = "return 1234.puti()"
+    @stdout = "1234"
+    check 1234
+  end
+
+  def test_puti_seven_digit
+    @main = "int i = 301 * 4096
+      i = i + 1671
+      return i.puti()"
+    @stdout = "1234567"
+    check 1234567
+  end
+
+  def test_puti_seven_digit_length
+    @main = "int i = 301 * 4096
+      Word str = i.to_s()
+      return str.char_length"
+    check 8
+  end
+
+  def test_puti_eight_digit
+    @main = "int i = 3014 * 4096
+      i = i + 334
+      return i.puti()"
+    @stdout = "12345678"
+    check 12345678
+  end
+
+  def test_fibr8
+    @main = "int fib = 8.fibr( )
+             return fib.puti()"
+    @stdout = "21"
+    check 21
+  end
+
+  def test_fibw8
+    @main = "int fib = 8.fibw( )
+             return fib.puti()"
+    @stdout = "21"
+    check 21
+  end
+  def test_fibw20
+    @main = "int fib = 20.fibw( )
+             return fib.puti()"
+    @stdout = "6765"
+    check 6765
+  end
+end