This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
Committed, CRIS: Copy some MMIX testsuite tweaks. Tweak gcc.dg/20020415-1.c for both.
- From: Hans-Peter Nilsson <hans-peter dot nilsson at axis dot com>
- To: gcc-patches at gcc dot gnu dot org
- Date: Mon, 22 Apr 2002 03:19:30 +0200
- Subject: Committed, CRIS: Copy some MMIX testsuite tweaks. Tweak gcc.dg/20020415-1.c for both.
Will install corresponding bits on 3.1 too.
* gcc.dg/20020415-1.c: Expect warning for unsupported -fpic on
cris-*-elf* and mmix-*-*.
* g77.f-torture/execute/io0.x: xfail for cris-*-elf.
* g77.f-torture/execute/io1.x, g77.f-torture/execute/20001201.x,
g77.f-torture/execute/6367.x, g77.f-torture/execute/u77-test.x:
Ditto.
* gcc.dg/wint_t-1.c: Mark excess errors for cris-*-elf.
* gcc.dg/wchar_t-1.c: Ditto.
Index: g77.f-torture/execute/20001201.x
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/g77.f-torture/execute/20001201.x,v
retrieving revision 1.1
diff -p -c -r1.1 20001201.x
*** g77.f-torture/execute/20001201.x 3 Apr 2002 01:45:43 -0000 1.1
--- g77.f-torture/execute/20001201.x 22 Apr 2002 00:57:36 -0000
***************
*** 1,8 ****
# Scratch files aren't implemented for mmixware
# (_stat is a stub and files can't be deleted).
! if { [istarget "mmix-knuth-mmixware"] } {
! set torture_execute_xfail "mmix-knuth-mmixware"
}
return 0
--- 1,10 ----
# Scratch files aren't implemented for mmixware
# (_stat is a stub and files can't be deleted).
+ # Similar restrictions exist for most simulators.
! if { [istarget "mmix-knuth-mmixware"]
! || [istarget "cris-*-elf"] } {
! set torture_execute_xfail [istarget]
}
return 0
Index: g77.f-torture/execute/6367.x
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/g77.f-torture/execute/6367.x,v
retrieving revision 1.1
diff -p -c -r1.1 6367.x
*** g77.f-torture/execute/6367.x 19 Apr 2002 21:52:11 -0000 1.1
--- g77.f-torture/execute/6367.x 22 Apr 2002 00:57:36 -0000
***************
*** 1,8 ****
# Scratch files aren't implemented for mmixware
# (_stat is a stub and files can't be deleted).
! if { [istarget "mmix-knuth-mmixware"] } {
! set torture_execute_xfail "mmix-knuth-mmixware"
}
return 0
--- 1,10 ----
# Scratch files aren't implemented for mmixware
# (_stat is a stub and files can't be deleted).
+ # Similar restrictions exist for most simulators.
! if { [istarget "mmix-knuth-mmixware"]
! || [istarget "cris-*-elf"] } {
! set torture_execute_xfail [istarget]
}
return 0
Index: g77.f-torture/execute/io0.x
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/g77.f-torture/execute/io0.x,v
retrieving revision 1.1
diff -p -c -r1.1 io0.x
*** g77.f-torture/execute/io0.x 3 Apr 2002 01:45:43 -0000 1.1
--- g77.f-torture/execute/io0.x 22 Apr 2002 00:57:36 -0000
***************
*** 1,8 ****
# Scratch files aren't implemented for mmixware
# (_stat is a stub and files can't be deleted).
! if { [istarget "mmix-knuth-mmixware"] } {
! set torture_execute_xfail "mmix-knuth-mmixware"
}
return 0
--- 1,10 ----
# Scratch files aren't implemented for mmixware
# (_stat is a stub and files can't be deleted).
+ # Similar restrictions exist for most simulators.
! if { [istarget "mmix-knuth-mmixware"]
! || [istarget "cris-*-elf"] } {
! set torture_execute_xfail [istarget]
}
return 0
Index: g77.f-torture/execute/io1.x
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/g77.f-torture/execute/io1.x,v
retrieving revision 1.1
diff -p -c -r1.1 io1.x
*** g77.f-torture/execute/io1.x 3 Apr 2002 01:45:43 -0000 1.1
--- g77.f-torture/execute/io1.x 22 Apr 2002 00:57:36 -0000
***************
*** 1,8 ****
# Scratch files aren't implemented for mmixware
# (_stat is a stub and files can't be deleted).
! if { [istarget "mmix-knuth-mmixware"] } {
! set torture_execute_xfail "mmix-knuth-mmixware"
}
return 0
--- 1,10 ----
# Scratch files aren't implemented for mmixware
# (_stat is a stub and files can't be deleted).
+ # Similar restrictions exist for most simulators.
! if { [istarget "mmix-knuth-mmixware"]
! || [istarget "cris-*-elf"] } {
! set torture_execute_xfail [istarget]
}
return 0
Index: g77.f-torture/execute/u77-test.x
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/g77.f-torture/execute/u77-test.x,v
retrieving revision 1.1
diff -p -c -r1.1 u77-test.x
*** g77.f-torture/execute/u77-test.x 3 Apr 2002 01:45:43 -0000 1.1
--- g77.f-torture/execute/u77-test.x 22 Apr 2002 00:57:36 -0000
***************
*** 1,8 ****
# Various intrinsics not implemented and not implementable; will fail at
# link time.
! if { [istarget "mmix-knuth-mmixware"] } {
! set torture_compile_xfail "mmix-knuth-mmixware"
}
return 0
--- 1,9 ----
# Various intrinsics not implemented and not implementable; will fail at
# link time.
! if { [istarget "mmix-knuth-mmixware"]
! || [istarget "cris-*-elf"] } {
! set torture_compile_xfail [istarget]
}
return 0
Index: gcc.dg/20020415-1.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/gcc.dg/20020415-1.c,v
retrieving revision 1.1
diff -p -c -r1.1 20020415-1.c
*** gcc.dg/20020415-1.c 16 Apr 2002 06:18:47 -0000 1.1
--- gcc.dg/20020415-1.c 22 Apr 2002 00:57:36 -0000
***************
*** 3,8 ****
--- 3,9 ----
ASM_SIMPLIFY_DWARF_ADDR hook. */
/* { dg-do compile } */
/* { dg-options "-O2 -fpic -g" } */
+ /* { dg-warning "not supported" "PIC unsupported" { target cris-*-elf* mmix-*-* } 0 } */
static inline char *
bar (unsigned long x, char *y)
Index: gcc.dg/wchar_t-1.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/gcc.dg/wchar_t-1.c,v
retrieving revision 1.4
diff -p -c -r1.4 wchar_t-1.c
*** gcc.dg/wchar_t-1.c 3 Apr 2002 12:08:47 -0000 1.4
--- gcc.dg/wchar_t-1.c 22 Apr 2002 00:57:36 -0000
***************
*** 1,6 ****
/* { dg-do compile } */
/* { dg-options "-Wall" } */
! /* { dg-excess-errors "Newlib has no wchar.h" { target mmix-knuth-mmixware } } */
/* Compile with -Wall to get a warning if built-in and system wchar_t don't
match. */
--- 1,6 ----
/* { dg-do compile } */
/* { dg-options "-Wall" } */
! /* { dg-excess-errors "Newlib has no wchar.h" { target mmix-knuth-mmixware cris-*-elf } } */
/* Compile with -Wall to get a warning if built-in and system wchar_t don't
match. */
Index: gcc.dg/wint_t-1.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/testsuite/gcc.dg/wint_t-1.c,v
retrieving revision 1.4
diff -p -c -r1.4 wint_t-1.c
*** gcc.dg/wint_t-1.c 3 Apr 2002 12:08:47 -0000 1.4
--- gcc.dg/wint_t-1.c 22 Apr 2002 00:57:36 -0000
***************
*** 1,6 ****
/* { dg-do compile } */
/* { dg-options "-Wall" } */
! /* { dg-excess-errors "Newlib has no wchar.h" { target mmix-knuth-mmixware } } */
/* Compile with -Wall to get a warning if built-in and system wint_t don't
match. */
--- 1,6 ----
/* { dg-do compile } */
/* { dg-options "-Wall" } */
! /* { dg-excess-errors "Newlib has no wchar.h" { target mmix-knuth-mmixware cris-*-elf } } */
/* Compile with -Wall to get a warning if built-in and system wint_t don't
match. */
brgds, H-P