Spec % behaviour with 6.d uninit nums

Covers R#2434 rakudo/rakudo#2434
Raku · Oct 27, 2018 · 1fae4fb · 1fae4fb
1 parent 2daefc0
commit 1fae4fb
Showing 1 changed file with 6 additions and 3 deletions.
diff --git a/S02-types/num.t b/S02-types/num.t
@@ -354,9 +354,12 @@ ok Num === Num, 'Num === Num should be truthy, and not die';
         my num $n5  = 5e0;
         my num $nn4 = -4e0;
 
-        cmp-ok $nu % $n5, '===', NaN, 'uninit % defined';
-        cmp-ok $n5 % $nu, '===', NaN, 'defined % uninit';
-        cmp-ok $nu % $nu, '===', NaN, 'uninit % uninit';
+        cmp-ok $nu % $n5, '===', 0e0, 'uninit % defined';
+        #?rakudo 2 todo 'we die https://github.com/rakudo/rakudo/issues/2434'
+        fails-like { $n5 % $nu }, X::Numeric::DivideByZero,
+            'defined % uninit';
+        fails-like { $nu % $nu }, X::Numeric::DivideByZero,
+            'uninit % uninit';
 
         is-deeply $nz  % $n4,  (my num $ =  0e0), '0 % 4';
         is-deeply $n4  % $n5,  (my num $ =  4e0), '4 % 5';