diff --git a/S32-num/complex.t b/S32-num/complex.t index 2b417f8ce9..44c1bff363 100644 --- a/S32-num/complex.t +++ b/S32-num/complex.t @@ -17,7 +17,7 @@ isa_ok(3\i, Complex, '$n\i form creates a Complex number'); is_approx((2i)i, -2, 'postfix: works on an imaginary number'); is_approx((2i + 3)i, -2 + 3i, 'postfix: works on a Complex number'); -dies_ok { (2 + 3i) > (2 + 2i) }, '> comparison of complex numbers dies'; +eval_dies_ok '(2 + 3i) > (2 + 2i)', '> comparison of complex numbers dies'; #?rakudo 3 skip 'i' is_approx(i, 1i, 'standalone i works to generate a Complex number'); @@ -141,8 +141,8 @@ is_approx e.log(1i), -2i / pi, "log e base i == -2i / pi"; is (5-4i).conj, 5+4i, 'conj 5-4i -> 5+4i'; } -dies_ok { (1 + 2i) < (2 + 4i) }, - 'Cannot arithmetically compare Complex numbers'; +eval_dies_ok "(1 + 2i) < (2 + 4i)", 'Cannot arithmetically compare Complex numbers'; + done; # vim: ft=perl6