1 # Copyright
(C
) 2002-2018 Free Software Foundation
, Inc.
3 # This
program is free software
; you can redistribute it and
/or modify
4 # it under the terms of the GNU General Public License as published by
5 # the Free Software Foundation
; either version
3 of the License
, or
6 #
(at your option
) any later version.
8 # This
program is distributed in the hope that it will be useful
,
9 # but WITHOUT
ANY WARRANTY
; without even the implied warranty of
10 # MERCHANTABILITY or FITNESS
FOR A PARTICULAR PURPOSE. See the
11 # GNU General Public License
for more details.
13 # You should have received a copy of the GNU General Public License
14 # along with GCC
; see the file COPYING3.
If not see
15 #
<http
://www.gnu.org
/licenses
/>.
17 # This file was written by Jakub Jelinek
, <jakub@redhat.com
>
18 # Based
on compat.exp writte by Janis Johnson
, <janis187@us.ibm.com
>
21 # Test interoperability of two compilers that follow the same ABI.
23 #
Break simple tests into two pieces and see that they work when linked
24 # together.
If an alternate compiler is specified
then the two main
25 # pieces of each test are compiled with different compilers. The
26 # alternate compiler must be installed
, and is specified by defining
27 # ALT_CXX_UNDER_TEST in the environment.
29 # struct
-layout
-1 are generated structure layout interoperability tests
,
30 # so a generator first needs to be compiled
on host
, run there and the
31 # generated tests
then compiled
on build and executed
on target.
38 global ld_library_path
40 #
Load procedures from common libraries.
43 load_lib target
-libpath.exp
46 # compat
-use
-alt
-compiler
-- make the alternate compiler the default
48 proc compat
-use
-alt
-compiler
{ } {
49 global GXX_UNDER_TEST ALT_CXX_UNDER_TEST
51 global ALWAYS_CXXFLAGS
52 global ld_library_path alt_ld_library_path
55 # We don
't need to do this if the alternate compiler is actually
56 # the same as the compiler under test.
57 if { $same_alt == 0 } then {
58 set GXX_UNDER_TEST $ALT_CXX_UNDER_TEST
60 set ALWAYS_CXXFLAGS ""
61 set ld_library_path $alt_ld_library_path
62 set_ld_library_path_env_vars
63 restore_gcc_exec_prefix_env_var
64 clear_effective_target_cache
69 # compat-use-tst-compiler -- make compiler under test the default
71 proc compat-use-tst-compiler { } {
72 global GXX_UNDER_TEST save_gxx_under_test
73 global CXXFLAGS save_cxxflags
74 global ALWAYS_CXXFLAGS save_always_cxxflags
75 global ld_library_path save_ld_library_path
78 # We don't need to
do this
if the alternate compiler is actually
79 # the same as the compiler under test.
81 if { $same_alt
== 0 } then {
82 set GXX_UNDER_TEST $save_gxx_under_test
83 set CXXFLAGS $save_cxxflags
84 set ALWAYS_CXXFLAGS $save_always_cxxflags
85 set ld_library_path $save_ld_library_path
86 set_ld_library_path_env_vars
90 #
Load the language
-independent compabibility support procedures.
91 # This must be done after the compat
-use
-*-compiler definitions.
94 # Provide the g
++-dg
-prune routine
(gcc
-dp.exp is loaded by compat.exp
)
99 # Save variables
for the C
++ compiler under test
, which each test will
100 # change a couple of times. This must be done after calling g
++-init.
101 set save_gxx_under_test $GXX_UNDER_TEST
102 set save_cxxflags $CXXFLAGS
103 set save_always_cxxflags $ALWAYS_CXXFLAGS
104 set save_ld_library_path $ld_library_path
106 #
Define an identifier
for use with this suite to avoid
name conflicts
107 # with other compat tests running at the same time.
110 # Find out whether there is an alternate compiler to test.
If the
111 #
variable is defined but is
set to
"same", that means we use the same
112 # compiler twice
, which is meaningful
if the two parts of COMPAT_OPTIONS
116 set alt_ld_library_path
"."
117 if [info exists ALT_CXX_UNDER_TEST
] then {
119 if [string match
"same" $ALT_CXX_UNDER_TEST] then {
122 if [info exists ALT_LD_LIBRARY_PATH
] then {
123 append alt_ld_library_path
":${ALT_LD_LIBRARY_PATH}"
128 set tstobjdir
"$tmpdir/g++.dg-struct-layout-1"
129 set generator
"$tmpdir/g++.dg-struct-layout-1_generate.exe"
131 set generator_src
"$srcdir/$subdir/struct-layout-1_generate.c"
132 set generator_src
"$generator_src $srcdir/$subdir/../../gcc.dg/compat/generate-random.c"
133 set generator_src
"$generator_src $srcdir/$subdir/../../gcc.dg/compat/generate-random_r.c"
134 set generator_cmd
"-o $generator $generator_src"
136 # Temporarily
switch to the environment of the host compiler.
137 restore_ld_library_path_env_vars
138 set status [remote_exec build
"$HOSTCC $HOSTCFLAGS $generator_cmd"]
139 set status [lindex $
status 0]
140 set_ld_library_path_env_vars
141 if { $
status == 0 } then {
142 file
delete -force $tstobjdir
143 file
mkdir $tstobjdir
144 set generator_args
"-s $srcdir/$subdir -d $tstobjdir"
145 if [info exists env
(RUN_ALL_COMPAT_TESTS
) ] then {
146 set generator_args
"$generator_args -n 15000"
148 if [check_effective_target_short_enums
] then {
149 set generator_args
"-e $generator_args"
151 set status [remote_exec host
"$generator $generator_args"]
152 set status [lindex $
status 0]
153 if { $
status == 0 } then {
154 foreach src
[lsort
[find $tstobjdir
*_main.C
]] {
155 #
If we
're only testing specific files and this isn't one
157 if ![runtest_file_p $runtests $src
] then {
161 compat
-execute $src $sid $use_alt
164 warning
"Could not execute g++.dg/compat/struct-layout-1 generator"
167 warning
"Could not compile g++.dg/compat/struct-layout-1 generator"
170 # Restore the original compiler under test.
171 compat
-use
-tst
-compiler