Add inlining tests for integer comparators

t/09-moar/12-inline-arithmetic.t

@@ -20,16 +20,11 @@ else {
     my $a = 42;
     my $b = 666;
     for ^100000 {
-        my $c := $a + $b;
-    }
-    for ^100000 {
-        my $c := $a - $b;
-    }
-    for ^100000 {
-        my $c := $a * $b;
-    }
-    for ^100000 {
-        my $c := $a / $b;
+        my $c;
+        $c := $a + $b;
+        $c := $a - $b;
+        $c := $a * $b;
+        $c := $a / $b;
     }
 }
 

t/09-moar/13-inline-comparators-int.t

@@ -0,0 +1,34 @@
+use Test;
+use MoarVM::SIL;
+
+# running the tests after the code has run
+if SIL() -> $SIL {
+    my @names =
+      'infix:<==>', 'infix:<!=>', 'infix:«>»', 'infix:«>=»',
+      'infix:«<»',  'infix:«<=»', 'infix:«<=>»',
+    ;
+
+    plan +@names;
+
+    for @names {
+        ok $SIL.inlined-by-name($_), "Was $_ inlined?";
+    }
+}
+
+# running the code
+else {
+    my $a = 42;
+    my $b = 666;
+    for ^100000 {
+        my $c;
+        $c := $a == $b;
+        $c := $a != $b;
+        $c := $a > $b;
+        $c := $a >= $b;
+        $c := $a < $b;
+        $c := $a <= $b;
+        $c := $a <=> $b;
+    }
+}
+
+# vim: expandtab shiftwidth=4