This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
amigaos4: Configure: allow hinting d_procselfexe
authorAndy Broad <andy@broad.ology.org.uk>
Thu, 13 Aug 2015 23:09:25 +0000 (19:09 -0400)
committerJarkko Hietaniemi <jhi@iki.fi>
Sat, 5 Sep 2015 15:12:41 +0000 (11:12 -0400)
Trying to access /proc causes the system to try to mount such a thing.
(And there is no process file system in AmigaOS, anyway.)

Configure

index 6eb478d..d0ebb2e 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -17163,6 +17163,8 @@ eval $inlibc
 echo " "
 procselfexe=''
 val="$undef"
+case "$d_procselfexe" in
+'')
 case "$d_readlink" in
     "$define")
        : NetBSD first as /proc/self is a symlink to /proc/curproc, and it feels
@@ -17187,6 +17189,8 @@ esac
 $rm -f reflect
 set d_procselfexe
 eval $setvar
+;;
+esac
 
 : backward compatibility for d_hvfork
 if test X$d_hvfork != X; then