Skip to content

Commit 5cbea73

Browse files
committed
trace output to be removed later
1 parent ec37078 commit 5cbea73

File tree

1 file changed

+9
-2
lines changed

1 file changed

+9
-2
lines changed

lib/ExtUtils/t/Embed.t

Lines changed: 9 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -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 = $?;
162167
print "# $_\n" foreach @out;
163168

169+
print STDERR "Debugging\n", @out;
170+
164171
if ($^O eq 'VMS' && !$status) {
165172
print "# @cmd2\n";
166173
$status = system(join(' ',@cmd2));

0 commit comments

Comments
 (0)