Add tests for RT 126825

Raku · Dec 5, 2015 · c02bf4b · c02bf4b
1 parent 9828048
commit c02bf4b
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/S32-num/rounders.t b/S32-num/rounders.t
@@ -127,8 +127,13 @@ for %tests.keys.sort -> $t {
     is $num.round(1e-5),  123.45679, "($num).round(1e-5) == 123.45679";
 }
 
-
-
+{  # RT 126825
+    my $complex = 5.123456789+3.987654321i;
+    is $complex.round(1),             5+4i,  "complex round with argument";
+    is $complex.round(5),             5+5i,  "($complex).round(5) == 5+5i";
+    is $complex.round(1/100),   5.12+3.99i,  "($complex).round(1/100) == 5.12+3.99i";
+    is $complex.round(1e-3),  5.123+3.988i,  "($complex).round(1e-3) == 5.123+3.988i";
+}
 
 {
     my $big-int = 1234567890123456789012345678903;