This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[5.004_71] Patch: svr4 hints updates for Unixware
authorTom Hughes <tom@compton.nu>
Fri, 10 Jul 1998 10:25:18 +0000 (11:25 +0100)
committerGurusamy Sarathy <gsar@cpan.org>
Sat, 11 Jul 1998 02:20:32 +0000 (02:20 +0000)
Message-ID: <yekn2ai5a81.fsf@elva.cyberscience.com>

p4raw-id: //depot/perl@1419

hints/svr4.sh

index ed1640b..95dce32 100644 (file)
@@ -70,7 +70,8 @@ fi
 # is probably a reasonable way of detecting UnixWare.  
 # UnixWare has a broken csh.  (This might already be detected above).
 # In Unixware 2.1.1 the fields in FILE* got renamed!
-$ Unixware 1.1 can't cast large floats to 32-bit ints.
+# Unixware 1.1 can't cast large floats to 32-bit ints.
+# Configure can't detect memcpy or memset on Unixware 2 or 7
 #
 #    Leave leading tabs on the next two lines so Configure doesn't 
 #    propagate these variables to config.sh
@@ -88,9 +89,26 @@ if [ "$uw_isuw" = "Release = 4.2MP" ]; then
    case $uw_ver in
    2.1)
        d_csh='undef'
+       d_memcpy='define'
+       d_memset='define'
        ;;
    2.1.*)
        d_csh='undef'
+       d_memcpy='define'
+       d_memset='define'
+       stdio_cnt='((fp)->__cnt)'
+       d_stdio_cnt_lval='define'
+       stdio_ptr='((fp)->__ptr)'
+       d_stdio_ptr_lval='define'
+       ;;
+   esac
+fi
+if [ "$uw_isuw" = "Release = 5" ]; then
+   case $uw_ver in
+   7)
+       d_csh='undef'
+       d_memcpy='define'
+       d_memset='define'
        stdio_cnt='((fp)->__cnt)'
        d_stdio_cnt_lval='define'
        stdio_ptr='((fp)->__ptr)'