@@ -104,15 +104,20 @@ if ($^O eq 'VMS') {
104104 push (@cmd ," -L$lib " , ldopts());
105105 } else { # Not MSWin32 or OS/390 (z/OS) dynamic.
106106 my $ldopts = ldopts();
107- if ($^O eq ' openbsd' && !$Config {useshrplib }) {
107+ print STDERR " *** TEST OpenBSD specialness ***\n " ;
108+ print STDERR " \$ ^O '$^O'\n " ;
109+ print STDERR " Config $INC {'Config.pm'}\n " ;
110+ use Data::Dumper;
111+ print STDERR Dumper($Config {useshrplib });
108112 if ($^O eq ' openbsd' && $Config {useshrplib } eq " false" ) {
109113 # see github #22125
110114 # with OpenBSD, the packaged gcc (tries to) link
111115 # against the system libperl, this will be fine once
112116 # this perl gets installed, but that's not so good when
113117 # testing against the uninstalled perl.
114118 # This also matches how Makefile.SH links the perl executable
115- push @cmd , " $lib /libperl.a" ;
119+ print STDERR " *** OpenBSD specialness ***\n " ;
120+ push @cmd , " $lib /libperl.a" , " -Wl,--trace" ;
116121 $ldopts =~ s / -lperl\b // ;
117122 }
118123 else {
@@ -161,6 +166,8 @@ my @out = `$cmd`;
161166$status = $? ;
162167print " # $_ \n " foreach @out ;
163168
169+ print STDERR " Debugging\n " , @out ;
170+
164171if ($^O eq ' VMS' && !$status ) {
165172 print " # @cmd2 \n " ;
166173 $status = system (join (' ' ,@cmd2 ));
0 commit comments