File tree Expand file tree Collapse file tree 1 file changed +13
-13
lines changed Expand file tree Collapse file tree 1 file changed +13
-13
lines changed Original file line number Diff line number Diff line change @@ -26,19 +26,6 @@ else {
2626 plan tests => 7;
2727}
2828
29- {
30- # GH #23146
31- my $fake_cc = File::Spec-> rel2abs(File::Spec-> catfile(qw( some directory what doesnt exist) , ' cc' ));
32- my $cb = ExtUtils::CBuilder-> new(
33- quiet => $quiet ,
34- config => {
35- cc => $fake_cc ,
36- },
37- );
38-
39- is $cb -> {config }{cxx }, $fake_cc , " did not search PATH for C++ compiler when given absolute path to C compiler" ;
40- }
41-
4229ok $b -> have_cplusplus, " have_cplusplus" ;
4330
4431$source_file = File::Spec-> catfile(' t' , ' cplust.cc' );
@@ -73,3 +60,16 @@ if ($^O eq 'VMS') {
7360 1 while unlink ' CPLUST.OPT' ;
7461}
7562
63+ {
64+ # GH #23146
65+ my $fake_cc = File::Spec-> rel2abs(File::Spec-> catfile(qw( some directory what doesnt exist) , ' cc' ));
66+ my $cb = ExtUtils::CBuilder-> new(
67+ quiet => $quiet ,
68+ config => {
69+ cc => $fake_cc ,
70+ },
71+ );
72+
73+ is $cb -> {config }{cxx }, $fake_cc , " did not search PATH for C++ compiler when given absolute path to C compiler" ;
74+ }
75+
You can’t perform that action at this time.
0 commit comments