This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Tidy up the 64-bit (and socklen_t) type probing.
[metaconfig.git] / U / perl / d_socklen_t.U
index e480a3a..5005c1c 100644 (file)
@@ -8,7 +8,7 @@
 ?RCS: that same Artistic Licence; a copy of which may be found at the root
 ?RCS: of the source tree for dist 3.0.
 ?RCS:
-?MAKE:d_socklen_t: Inhdr echo n c cat rm Setvar Compile d_socket
+?MAKE:d_socklen_t: Inhdr cat rm Setvar Compile d_socket sizetype
 ?MAKE: -pick add $@ %<
 ?S:d_socklen_t:
 ?S:     This symbol will be defined if the C compiler supports socklen_t.
@@ -22,7 +22,7 @@
 ?LINT:set d_socklen_t
 : check for socklen_t
 echo " "
-$echo $n "Checking to see if your system supports socklen_t...$c" >&4
+echo "Checking to see if you have socklen_t..." >&4
 $cat >try.c <<EOCP
 #include <sys/types.h>
 #$d_socket HAS_SOCKET
@@ -34,12 +34,13 @@ EOCP
 set try
 if eval $compile; then
        val="$define"
-       echo " " >&4
        echo "You have socklen_t."
 else
        val="$undef"
-       echo " " >&4
        echo "You do not have socklen_t."
+       case "$sizetype" in
+       size_t) echo "(You do have size_t, that might work.)" ;;
+       esac
 fi
 $rm -f try try.*
 set d_socklen_t