From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from esa1.mentor.iphmx.com (esa1.mentor.iphmx.com [68.232.129.153]) by sourceware.org (Postfix) with ESMTPS id 1066E3891C26; Mon, 9 Aug 2021 10:50:24 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org 1066E3891C26 Authentication-Results: sourceware.org; dmarc=none (p=none dis=none) header.from=codesourcery.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=mentor.com IronPort-SDR: L8czdEtdZ9QvwIbudU30LEA89KZ1ClOIke3ZsUJoaOGAo4KhiXb6TKVi8b1C14LzOzlno9S+K3 ZFNACDJKM6koWXQVm/gh17H5yB8tnUgOu7KL5aAEVEYXEsGCdkDLBIaiS7JbStTu5rxhGGSs9G opy3I0DGEoKR4gDwwJ1eMtYfOF75k+mGCh8RgZGMsXM57Yg6I2jjWog1izNlnYin4AsGxofMBk 00TYBZMeij2NZdTnPgDLxrYuMVFhwnRL+/fxR4InEoCUn+MUPnBOn28RVR4DtFuBQZCTjuCIhh D2iHXSinvwDj3T+4UGrATlLe X-IronPort-AV: E=Sophos;i="5.84,307,1620720000"; d="diff'?scan'208";a="66909104" Received: from orw-gwy-02-in.mentorg.com ([192.94.38.167]) by esa1.mentor.iphmx.com with ESMTP; 09 Aug 2021 02:50:24 -0800 IronPort-SDR: InebKirHOryeYlA0AX8wTkyv6IJN8PgvTYWjz6Jtp98d3+OvJV6nz304VMnOhvOcM6lJMJ/6fF /k5YcADTofhzKKx3gGPIz5WKHv3FLsZuHZbo8ptzqDvamQ2QnqDL1GrclIWmoihWML2WFC0TmT DJ0gWe5fuR5N8a58Twj2C0r8J33gLAyic3chEMvwpBO0cdVWEvM8NgAsRuP2h/0/ys/KE0Q199 /y9yvrBjWoPonajNY4n4wJrJhwl9mbOxlzH1ueX3ES6L7VB9F91DiJpUBuFv+6kwvsOCgTYjZY 9+0= Subject: =?UTF-8?Q?committed_=e2=80=93_Re=3a_=5bPatch=5d_testsuite/lib/gfort?= =?UTF-8?Q?ran=2eexp=3a_Add_-I_for_ISO*=2eh_=5bPR101305=2c_PR101660=5d_=28wa?= =?UTF-8?Q?s=3a_Re=3a_=5bPatch=5d_gfortran=2edg/dg=2eexp=3a_Add_libgfortran_?= =?UTF-8?Q?as_-I_flag_for_ISO*=2eh_=5bPR101305=5d_=28was=3a_=5bPATCH_3/3=5d_?= =?UTF-8?Q?=5bPR_libfortran/101305=5d_Fix_ISO=5fFortran=5fbinding=2eh_paths_?= =?UTF-8?Q?in_gfortran_testsuite=29=29?= From: Tobias Burnus To: , CC: Sandra Loosemore , Mike Stump , Rainer Orth , Jakub Jelinek References: <20210713212859.1532449-1-sandra@codesourcery.com> <20210713212859.1532449-4-sandra@codesourcery.com> <09689f06-0ef6-b669-1de8-a064ff0f4b5e@codesourcery.com> <1d543137-1b00-ef37-c131-341b4ac57765@codesourcery.com> <72f86537-70c3-60d7-0ea5-9746f0524492@codesourcery.com> <382f4838-bc85-8986-21ca-3cee5b5905df@codesourcery.com> <20210728225630.GW2380545@tucnak> <20210729070904.GF2380439@tucnak> Message-ID: <86b8acfb-6d60-aad9-2b47-a313fbe4cfaf@codesourcery.com> Date: Mon, 9 Aug 2021 12:50:15 +0200 User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101 Thunderbird/78.12.0 MIME-Version: 1.0 In-Reply-To: Content-Type: multipart/mixed; boundary="------------85BE75569215AACE76FB8CF1" Content-Language: en-US X-Originating-IP: [137.202.0.90] X-ClientProxiedBy: svr-ies-mbx-05.mgc.mentorg.com (139.181.222.5) To svr-ies-mbx-01.mgc.mentorg.com (139.181.222.1) X-Spam-Status: No, score=-11.6 required=5.0 tests=BAYES_00, GIT_PATCH_0, HEADER_FROM_DIFFERENT_DOMAINS, KAM_DMARC_STATUS, KAM_SHORT, SPF_HELO_PASS, SPF_PASS, TXREP autolearn=ham autolearn_force=no version=3.4.4 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on server2.sourceware.org X-BeenThere: fortran@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Fortran mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Mon, 09 Aug 2021 10:50:27 -0000 --------------85BE75569215AACE76FB8CF1 Content-Type: text/plain; charset="utf-8"; format=flowed Content-Transfer-Encoding: quoted-printable Now committed as obvious as https://gcc.gnu.org/r12-2808-g527a1cf32c27a3fbe= af6be7596241570d864cc4c Follow-up suggestions are welcome. To recap, it changes three things: * In the testcases, update "..." to "<...>" for the include * -I $specpath/libgfortran - to find the .h file in the build dir (for in-b= uild-tree testing) * Update GFORTRAN_UNDER_TEST The first two are very obvious, the latter applies, when running DejaGNU wi= th, e.g., --target_board=3Dunix\{-m32,-m64\}". Those two multilib configs use different libgfortran build dirs and, hence, the $specpath/libgfortran differs (e.g. x86.../libgfortran + x86.../32/libg= fortran). That's fine, except that when gfortran_init sets GFORTRAN_UNDER_TEST. That = only happend when it was unset. That's fine, except for multilib test runs, it i= s not updated when gfortran_init is called for the next multilib run. Thus, in th= at case the previous settings are used. =E2=80=93 For the discussion in this thread= , this means the wrong ISO_Fortran_binding.h is read. Or in previous wording: On 29.07.21 11:51, Tobias Burnus wrote: > On 29.07.21 09:09, Jakub Jelinek wrote: >> On Thu, Jul 29, 2021 at 12:56:32AM +0200, Jakub Jelinek wrote: >>> On Wed, Jul 28, 2021 at 01:22:53PM +0200, Tobias Burnus wrote: >>>> gfortran.dg/dg.exp: Add libgfortran as -I flag for ISO*.h [PR101305] >>> Wouldn't it be better to do that in gcc/testsuite/lib/gfortran.exp >>> to GFORTRAN_UNDER_TEST there next to >>> -B$specpath/libgfortran/ ? > > I guess so =E2=80=93 and that's what I did. However, I had to ensure that= it > gets reset otherwise it picks up the wrong header in multilib runs; > this also affects the -B$specpath/libgfortran bit, but I think that > makes sense. > >> Though, I guess we need that mostly for the C FE, so perhaps it needs >> to go >> at the start of additional_flags=3D, whether TEST_ALWAYS_FLAGS is empty = or >> not. > > For the main testsuite (gcc/testsuite/*fortran*/), I believe the patch > above is sufficient as everything runs through GFORTRAN_UNDER_TEST. > > I am also inclined not to add flags to TEST_ALWAYS_FLAGS which then > might get applied to other/pure C/C++ tests. > > Regarding libgomp: that one uses xgcc for the compilation. I don't > really see a need to use the Fortran array descriptor from a C program > in libgomp's testsuite. Thus, I am inclined to ignore libgomp. > Otherwise, as libgomp does not gfortran_init and handles libraries > separately, I think the code needs to be put into > libgomp.*fortran/fortran.exp. > > Thoughts? Okay? Tobias ----------------- Siemens Electronic Design Automation GmbH; Anschrift: Arnulfstra=C3=9Fe 201= , 80634 M=C3=BCnchen; Gesellschaft mit beschr=C3=A4nkter Haftung; Gesch=C3= =A4ftsf=C3=BChrer: Thomas Heurung, Frank Th=C3=BCrauf; Sitz der Gesellschaf= t: M=C3=BCnchen; Registergericht M=C3=BCnchen, HRB 106955 --------------85BE75569215AACE76FB8CF1 Content-Type: text/x-patch; charset="UTF-8"; name="committed.diff" Content-Transfer-Encoding: 7bit Content-Disposition: attachment; filename="committed.diff" commit 527a1cf32c27a3fbeaf6be7596241570d864cc4c Author: Tobias Burnus Date: Mon Aug 9 12:35:23 2021 +0200 testsuite/lib/gfortran.exp: Add -I for ISO*.h [PR101305, PR101660] This patch adds -I$specdir/libgfortran to GFORTRAN_UNDER_TEST, when set by proc gfortran_init. As the $specdir depends on the multilib setting, it has to be re-set for a different multilib; hence, we track whether a previous call to gfortran_init set that var or whether it was set differently. gcc/testsuite/ PR libfortran/101305 PR fortran/101660 * lib/gfortran.exp (gfortran_init): Add -I $specdir/libgfortran to GFORTRAN_UNDER_TEST; update it when set by previous gfortran_init call. * gfortran.dg/ISO_Fortran_binding_1.c: Use <...> not "..." for ISO_Fortran_binding.h's #include. * gfortran.dg/ISO_Fortran_binding_10.c: Likewise. * gfortran.dg/ISO_Fortran_binding_11.c: Likewise. * gfortran.dg/ISO_Fortran_binding_12.c: Likewise. * gfortran.dg/ISO_Fortran_binding_15.c: Likewise. * gfortran.dg/ISO_Fortran_binding_16.c: Likewise. * gfortran.dg/ISO_Fortran_binding_17.c: Likewise. * gfortran.dg/ISO_Fortran_binding_18.c: Likewise. * gfortran.dg/ISO_Fortran_binding_3.c: Likewise. * gfortran.dg/ISO_Fortran_binding_5.c: Likewise. * gfortran.dg/ISO_Fortran_binding_6.c: Likewise. * gfortran.dg/ISO_Fortran_binding_7.c: Likewise. * gfortran.dg/ISO_Fortran_binding_8.c: Likewise. * gfortran.dg/ISO_Fortran_binding_9.c: Likewise. * gfortran.dg/PR94327.c: Likewise. * gfortran.dg/PR94331.c: Likewise. * gfortran.dg/bind_c_array_params_3_aux.c: Likewise. * gfortran.dg/iso_fortran_binding_uint8_array_driver.c: Likewise. * gfortran.dg/pr93524.c: Likewise. --- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_1.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_10.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_11.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_12.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_15.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_16.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_17.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_18.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_3.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_5.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_6.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_7.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_8.c | 2 +- gcc/testsuite/gfortran.dg/ISO_Fortran_binding_9.c | 2 +- gcc/testsuite/gfortran.dg/PR94327.c | 2 +- gcc/testsuite/gfortran.dg/PR94331.c | 2 +- gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c | 2 +- .../gfortran.dg/iso_fortran_binding_uint8_array_driver.c | 2 +- gcc/testsuite/gfortran.dg/pr93524.c | 2 +- gcc/testsuite/lib/gfortran.exp | 10 ++++++++-- 20 files changed, 27 insertions(+), 21 deletions(-) diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_1.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_1.c index bb56ca0e04b..d0d036ae779 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_1.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_1.c @@ -1,6 +1,6 @@ /* Test F2008 18.5: ISO_Fortran_binding.h functions. */ -#include "ISO_Fortran_binding.h" +#include #include #include #include diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_10.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_10.c index c3954e4e782..91222fff481 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_10.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_10.c @@ -2,7 +2,7 @@ /* Contributed by Reinhold Bader */ -#include "ISO_Fortran_binding.h" +#include #include #include #include diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_11.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_11.c index c2d4e11c9d3..e013011a380 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_11.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_11.c @@ -5,7 +5,7 @@ Contributed by Reinhold Bader #include */ #include #include #include -#include "ISO_Fortran_binding.h" +#include typedef struct { diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_12.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_12.c index 078c5de87d0..0a41576aa5e 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_12.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_12.c @@ -2,7 +2,7 @@ #include #include -#include "ISO_Fortran_binding.h" +#include /* Contributed by Reinhold Bader */ diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_15.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_15.c index 622f2de6ff3..fc70da4d133 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_15.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_15.c @@ -4,7 +4,7 @@ #include #include -#include "ISO_Fortran_binding.h" +#include // Prototype for Fortran functions extern void Fsub(CFI_cdesc_t *); diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_16.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_16.c index 50b92ec069c..915b6e7d568 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_16.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_16.c @@ -1,6 +1,6 @@ /* Test the fix for PR92142. */ -#include "ISO_Fortran_binding.h" +#include #include diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_17.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_17.c index b0893cc15e8..fa75268cd26 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_17.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_17.c @@ -2,7 +2,7 @@ #include #include -#include "ISO_Fortran_binding.h" +#include void Csub(const CFI_cdesc_t *, size_t, CFI_index_t invalid); diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_18.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_18.c index ef40134fa3c..5a3952ca92e 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_18.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_18.c @@ -1,6 +1,6 @@ #include #include -#include "ISO_Fortran_binding.h" +#include extern int do_loop(CFI_cdesc_t* array); diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_3.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_3.c index 9f35b0dcb80..33d1bc3c7e3 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_3.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_3.c @@ -1,4 +1,4 @@ -#include "ISO_Fortran_binding.h" +#include #include #include diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_5.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_5.c index 116f548ad99..b18a899ba26 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_5.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_5.c @@ -4,7 +4,7 @@ #include #include -#include "ISO_Fortran_binding.h" +#include typedef struct { int i; diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_6.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_6.c index 704b27cb28a..c7981c5847a 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_6.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_6.c @@ -4,7 +4,7 @@ #include #include -#include "ISO_Fortran_binding.h" +#include #define DEBUG 0 diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_7.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_7.c index 26b4ab5a015..8162451ca99 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_7.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_7.c @@ -2,7 +2,7 @@ /* Contributed by Reinhold Bader */ -#include "ISO_Fortran_binding.h" +#include #include #include #include diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_8.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_8.c index a0d1bdc8e83..d3dce3a3472 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_8.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_8.c @@ -2,7 +2,7 @@ /* Contributed by Reinhold Bader */ -#include "ISO_Fortran_binding.h" +#include #include float Cxgl[] = { 1.1, 2.3, 5.1, 4.2 }; diff --git a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_9.c b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_9.c index 632604f5ee8..cb170778642 100644 --- a/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_9.c +++ b/gcc/testsuite/gfortran.dg/ISO_Fortran_binding_9.c @@ -2,7 +2,7 @@ /* Contributed by Gilles Gouaillardet */ -#include "ISO_Fortran_binding.h" +#include #include int cdesc_c(CFI_cdesc_t* x, long *expected) diff --git a/gcc/testsuite/gfortran.dg/PR94327.c b/gcc/testsuite/gfortran.dg/PR94327.c index 4ce408dbc39..9d226811f58 100644 --- a/gcc/testsuite/gfortran.dg/PR94327.c +++ b/gcc/testsuite/gfortran.dg/PR94327.c @@ -4,7 +4,7 @@ #include #include -#include "ISO_Fortran_binding.h" +#include bool c_vrfy (const CFI_cdesc_t *restrict); diff --git a/gcc/testsuite/gfortran.dg/PR94331.c b/gcc/testsuite/gfortran.dg/PR94331.c index 2fbfe0e7144..df571c7583c 100644 --- a/gcc/testsuite/gfortran.dg/PR94331.c +++ b/gcc/testsuite/gfortran.dg/PR94331.c @@ -4,7 +4,7 @@ #include #include -#include "ISO_Fortran_binding.h" +#include bool c_vrfy (const CFI_cdesc_t *restrict); diff --git a/gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c b/gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c index 5176d8b5741..45941853928 100644 --- a/gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c +++ b/gcc/testsuite/gfortran.dg/bind_c_array_params_3_aux.c @@ -5,7 +5,7 @@ #include #include -#include "ISO_Fortran_binding.h" +#include void arr_set_c(CFI_cdesc_t*); diff --git a/gcc/testsuite/gfortran.dg/iso_fortran_binding_uint8_array_driver.c b/gcc/testsuite/gfortran.dg/iso_fortran_binding_uint8_array_driver.c index bfd567bba95..9c2b5fb721b 100644 --- a/gcc/testsuite/gfortran.dg/iso_fortran_binding_uint8_array_driver.c +++ b/gcc/testsuite/gfortran.dg/iso_fortran_binding_uint8_array_driver.c @@ -1,7 +1,7 @@ #include #include #include -#include "ISO_Fortran_binding.h" +#include extern void fsub(CFI_cdesc_t *); diff --git a/gcc/testsuite/gfortran.dg/pr93524.c b/gcc/testsuite/gfortran.dg/pr93524.c index ba40d007bfb..8a6c06677f2 100644 --- a/gcc/testsuite/gfortran.dg/pr93524.c +++ b/gcc/testsuite/gfortran.dg/pr93524.c @@ -2,7 +2,7 @@ sm incorrectly for dimensions > 2. */ #include // For size_t -#include "ISO_Fortran_binding.h" +#include void my_fortran_sub_1 (CFI_cdesc_t *dv); void my_fortran_sub_2 (CFI_cdesc_t *dv); diff --git a/gcc/testsuite/lib/gfortran.exp b/gcc/testsuite/lib/gfortran.exp index 1e7da1110bc..cae6738b4b8 100644 --- a/gcc/testsuite/lib/gfortran.exp +++ b/gcc/testsuite/lib/gfortran.exp @@ -151,6 +151,7 @@ proc gfortran_init { args } { global gcc_warning_prefix global gcc_error_prefix global TEST_ALWAYS_FLAGS + global gfortran_init_set_GFORTRAN_UNDER_TEST # We set LC_ALL and LANG to C so that we get the same error messages as expected. setenv LC_ALL C @@ -166,7 +167,11 @@ proc gfortran_init { args } { setenv LANG C.ASCII } - if ![info exists GFORTRAN_UNDER_TEST] then { + # GFORTRAN_UNDER_TEST as set below contains $specpath, which depends on + # the used multilib config. Thus, its value may need to be reset; + # that's tracked via gfortran_init_set_GFORTRAN_UNDER_TEST. + if { ![info exists GFORTRAN_UNDER_TEST] + || [info exists gfortran_init_set_GFORTRAN_UNDER_TEST] } then { if [info exists TOOL_EXECUTABLE] { set GFORTRAN_UNDER_TEST $TOOL_EXECUTABLE } else { @@ -178,7 +183,8 @@ proc gfortran_init { args } { } else { set specpath [get_multilibs] } - set GFORTRAN_UNDER_TEST [findfile $base_dir/../../gfortran "$base_dir/../../gfortran -B$base_dir/../../ -B$specpath/libgfortran/" [findfile $base_dir/gfortran "$base_dir/gfortran -B$base_dir/" [transform gfortran]]] + set gfortran_init_set_GFORTRAN_UNDER_TEST 1 + set GFORTRAN_UNDER_TEST [findfile $base_dir/../../gfortran "$base_dir/../../gfortran -B$base_dir/../../ -B$specpath/libgfortran/ -I$specpath/libgfortran" [findfile $base_dir/gfortran "$base_dir/gfortran -B$base_dir/" [transform gfortran]]] } } } --------------85BE75569215AACE76FB8CF1--