* gcc.misc-tests/linkage.exp: Pass appropriate flags to
[official-gcc.git] / gcc / testsuite / gcc.misc-tests / linkage.exp
blob80d678a86ddf2505e91a6fd2cfc7d2fcf561b123
1 # Copyright (C) 1988, 90-96, 1997, 2000, 2001 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 2 of the License, or
6 # (at your option) any later version.
7 #
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 this program; if not, write to the Free Software
15 # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17 # This file used to be gcc.c-torture/special/special.exp, which
18 # was written by Rob Savoye. (rob@cygnus.com)
19 # All the other tests driven by that file have since been moved elsewhere.
21 if [isnative] then {
22 set lines [gcc_target_compile "$srcdir/$subdir/linkage-x.c" "linkage-x.o" object {additional_flags="-w"}]
23 if ![string match "" $lines] then {
24 fail "linkage.c"
25 } else {
26 # This is a completely bogus test. Sorry.
28 # Need to ensure ABI for native compiler matches gcc
29 set native_cflags ""
30 if [istarget "mips-sgi-irix6*"] {
31 if [ string match "*64*" [exec file "linkage-x.o"] ] {
32 set native_cflags "-64"
36 catch { exec rm -f linkage-y.o }
37 send_log "cc -c $srcdir/$subdir/linkage-y.c >&/dev/null\n"
38 catch { exec cc -c $native_cflags "$srcdir/$subdir/linkage-y.c" >&/dev/null }
39 if ![file exists "linkage-y.o"] then {
40 send_log "c89 -c $srcdir/$subdir/linkage-y.c >&/dev/null\n"
41 catch { exec c89 -c $native_cflags "$srcdir/$subdir/linkage-y.c" >&/dev/null }
43 if [file exists "linkage-y.o"] then {
44 set lines [gcc_target_compile "linkage-y.o linkage-x.o" "x" executable ""]
45 if [string match "" $lines] then {
46 pass "linkage.c"
47 } else {
48 fail "linkage.c"