Testcases for sibcall unwind info problems.
PR target/13158 * gcc.target/ia64/sibcall-unwind-1.c: New test. PR target/18987 * gcc.target/ia64/sibcall-unwind-2.c: New test. From-SVN: r93660
This commit is contained in:
parent
05075d4e46
commit
66f9a6de4c
@ -1,3 +1,10 @@
|
||||
2005-01-14 James E. Wilson <wilson@specifixinc.com>
|
||||
|
||||
PR target/13158
|
||||
* gcc.target/ia64/sibcall-unwind-1.c: New test.
|
||||
PR target/18987
|
||||
* gcc.target/ia64/sibcall-unwind-2.c: New test.
|
||||
|
||||
2005-01-14 Steven G. Kargl <kargls@comcast.net>
|
||||
|
||||
* gfortran.dg/select_1.f90: New test.
|
||||
|
41
gcc/testsuite/gcc.target/ia64/ia64.exp
Normal file
41
gcc/testsuite/gcc.target/ia64/ia64.exp
Normal file
@ -0,0 +1,41 @@
|
||||
# Copyright (C) 1997 Free Software Foundation, Inc.
|
||||
|
||||
# This program is free software; you can redistribute it and/or modify
|
||||
# it under the terms of the GNU General Public License as published by
|
||||
# the Free Software Foundation; either version 2 of the License, or
|
||||
# (at your option) any later version.
|
||||
#
|
||||
# This program is distributed in the hope that it will be useful,
|
||||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
# GNU General Public License for more details.
|
||||
#
|
||||
# You should have received a copy of the GNU General Public License
|
||||
# along with this program; if not, write to the Free Software
|
||||
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||
|
||||
# GCC testsuite that uses the `dg.exp' driver.
|
||||
|
||||
# Exit immediately if this isn't an IA-64 target.
|
||||
if ![istarget ia64*-*-*] then {
|
||||
return
|
||||
}
|
||||
|
||||
# Load support procs.
|
||||
load_lib gcc-dg.exp
|
||||
|
||||
# If a testcase doesn't have special options, use these.
|
||||
global DEFAULT_CFLAGS
|
||||
if ![info exists DEFAULT_CFLAGS] then {
|
||||
set DEFAULT_CFLAGS " -ansi -pedantic-errors"
|
||||
}
|
||||
|
||||
# Initialize `dg'.
|
||||
dg-init
|
||||
|
||||
# Main loop.
|
||||
dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/*.\[cS\]]] \
|
||||
"" $DEFAULT_CFLAGS
|
||||
|
||||
# All done.
|
||||
dg-finish
|
10
gcc/testsuite/gcc.target/ia64/sibcall-unwind-1.c
Normal file
10
gcc/testsuite/gcc.target/ia64/sibcall-unwind-1.c
Normal file
@ -0,0 +1,10 @@
|
||||
/* PR 13158. Emit ".restore sp" for a sibcall. */
|
||||
/* { dg-do compile } */
|
||||
/* { dg-options "-O2 -w" } */
|
||||
/* { dg-final { scan-assembler-times "\\.restore sp" 1 } } */
|
||||
|
||||
static void do_date (char *);
|
||||
void rfc822_date (char *date)
|
||||
{
|
||||
do_date (date);
|
||||
}
|
11
gcc/testsuite/gcc.target/ia64/sibcall-unwind-2.c
Normal file
11
gcc/testsuite/gcc.target/ia64/sibcall-unwind-2.c
Normal file
@ -0,0 +1,11 @@
|
||||
/* PR 18987. This caused an assembler error because we emitted ".restore sp"
|
||||
twice. */
|
||||
/* { dg-do compile } */
|
||||
/* { dg-options "-O2 -fno-omit-frame-pointer -w" } */
|
||||
/* { dg-final { scan-assembler-times "\\.restore sp" 1 } } */
|
||||
|
||||
static void do_date (char *);
|
||||
void rfc822_date (char *date)
|
||||
{
|
||||
do_date (date);
|
||||
}
|
Loading…
Reference in New Issue
Block a user