Adjust 31e62fa1f35be3aceacc7fa62ce72d7131299a9av5.21.2

It seems that 'sqrt' is not always called as a system call, in particular,
when compiling with -Dusemorebits

1 files changed, 2 insertions, 2 deletions

diff --git a/t/porting/libperl.t b/t/porting/libperl.t
index 18c180112a..8f1dc05b2f 100644
--- a/t/porting/libperl.t
+++ b/t/porting/libperl.t
@@ -416,10 +416,10 @@ ok(keys %{$symbols{undef}}, "has undefined symbols");
 
 # memchr, memcmp, memcpy should be used all over the place.
 #
-# chmod, socket, getenv, sigaction, sqrt, time are system/library
+# chmod, socket, getenv, sigaction, time are system/library
 # calls that should each see at least one use.
 my @good = qw(memchr memcmp memcpy
-              chmod socket getenv sigaction sqrt time);
+              chmod socket getenv sigaction time);
 if ($Config{usedl}) {
     push @good, 'dlopen';
 }