X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fop%2Fnumconvert.t;h=f71fd6c141ec7ebdf3759ae6e94074ff48c845d0;hb=45c0de28763808112fd2f46ea311b6bb0c6050b3;hp=405f721d200ae3a439e3703d8e85d1b0881b0f17;hpb=aa854799af20b80973df4e295167b2fda1fc7a9c;p=p5sagit%2Fp5-mst-13.2.git diff --git a/t/op/numconvert.t b/t/op/numconvert.t index 405f721..f71fd6c 100755 --- a/t/op/numconvert.t +++ b/t/op/numconvert.t @@ -42,15 +42,7 @@ BEGIN { use strict 'vars'; -my $max_chain = $ENV{PERL_TEST_NUMCONVERTS}; -unless (defined $max_chain) { - my $is_debug; - eval <<'EOE'; - use Config; - $is_debug = 1 if $Config{ccflags} =~ /-DDEBUGGING\b/; -EOE - $max_chain = $is_debug ? 3 : 2; -} +my $max_chain = $ENV{PERL_TEST_NUMCONVERTS} || 2; # Bulk out if unsigned type is hopelessly wrong: my $max_uv1 = ~0;