Move tests for is_approx to a separate file

It's deprecated so it's tested separately.
rakudo · Mar 28, 2017 · 42f34fb · 42f34fb
1 parent 5ca924d
commit 42f34fb
Show file tree

Hide file tree

Showing 2 changed files with 20 additions and 13 deletions.
diff --git a/t/01-sanity/98-test-deprecated.t b/t/01-sanity/98-test-deprecated.t
@@ -0,0 +1,20 @@
+use v6;
+
+use lib <lib>;
+use Test;
+
+my $approx1 = is_approx 1, 1, 'is_approx with description';
+ok $approx1, 'is_approx 1,1, returns True';
+my $approx2 = is_approx 1, 1;
+my $approx3 = is_approx 1, 1.000001, 'is_approx with small difference';
+ok $approx3, 'is_approx 1,1.000001, returns True';
+
+# NOT_TODO
+todo( 'failing is_approx 1,2;');
+my $approx4 = is_approx 1, 2, 'is_approx with small difference';
+nok $approx4, 'is_approx 1, 2; fails and returns False';
+
+ok Deprecation.report ~~ /is_approx/, 'is_approx is deprecated';
+done-testing;
+
+# vim: ft=perl6
diff --git a/t/01-sanity/99-test-basic.t b/t/01-sanity/99-test-basic.t
@@ -49,19 +49,6 @@ todo( 'testing isnt 1,1' );
 my $isnt3 = isnt 1, 1, 'isnt 1,1, with description';
 nok $isnt3, 'isnt 1, 1; returns False';
 
-
-my $approx1 = is_approx 1, 1, 'is_approx with description';
-ok $approx1, 'is_approx 1,1, returns True';
-my $approx2 = is_approx 1, 1;
-my $approx3 = is_approx 1, 1.000001, 'is_approx with small difference';
-ok $approx3, 'is_approx 1,1.000001, returns True';
-
-# NOT_TODO
-todo( 'failing is_approx 1,2;');
-my $approx4 = is_approx 1, 2, 'is_approx with small difference';
-nok $approx4, 'is_approx 1, 2; fails and returns False';
-
-
 todo( 'testing todo twice', 2 );
 ok 0, 'this should fail, to test todo()';
 ok 0, 'this should also fail, to test todo()';