Remove unnecessary XS-APItest test boilerplate
[perl.git] / ext / XS-APItest / t / svsetsv.t
index ae4e3a6..ea845e0 100644 (file)
@@ -1,11 +1,3 @@
-BEGIN {
-    require Config; import Config;
-    if ($Config{'extensions'} !~ /\bXS\/APItest\b/) {
-        print "1..0 # Skip: XS::APItest was not built\n";
-        exit 0;
-    }
-}
-
 use strict;
 use warnings;
 
@@ -15,13 +7,8 @@ BEGIN { use_ok('XS::APItest') };
 
 # I can't see a good way to easily get back perl-space diagnostics for these
 # I hope that this isn't a problem.
-if ($] > 5.009) {
-  ok(sv_setsv_cow_hashkey_core,
-     "With PERL_CORE sv_setsv does COW for shared hash key scalars");
-} else {
-  ok(!sv_setsv_cow_hashkey_core,
-     "With PERL_CORE on 5.8.x sv_setsv doesn't COW for shared hash key scalars");
-}
+ok(sv_setsv_cow_hashkey_core,
+   "With PERL_CORE sv_setsv does COW for shared hash key scalars");
 
 ok(!sv_setsv_cow_hashkey_notcore,
    "Without PERL_CORE sv_setsv doesn't COW for shared hash key scalars");