OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

arm-g2.c: Use effective-target arm32.

Browse Source 
2005-05-05  Paul Brook  <paul@codesourcery.com>

	* gcc.dg/arm-g2.c: Use effective-target arm32.
	* gcc.dg/arm-mmx-1.c: Ditto.
	* gcc.dg/arm-scd42-2.c: Ditto.
	* gcc.dg/arm-vfp1.c: Ditto.
	* lib/target-supports.exp (check_effective_target_arm32): New
	function.

From-SVN: r99269
This commit is contained in:
Paul Brook 2005-05-05 15:12:01 +00:00 committed by Paul Brook
parent c9392a2bf8
commit 0d341a6ae1
6 changed files with 57 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,12 @@
2005-05-05 Paul Brook <paul@codesourcery.com>
* gcc.dg/arm-g2.c: Use effective-target arm32.
* gcc.dg/arm-mmx-1.c: Ditto.
* gcc.dg/arm-scd42-2.c: Ditto.
* gcc.dg/arm-vfp1.c: Ditto.
* lib/target-supports.exp (check_effective_target_arm32): New
function.
2005-05-04 Thomas Koenig <Thomas.Koenig@online.de>
PR libfortran/21354

6
gcc/testsuite/gcc.dg/arm-g2.c
View File

@ -1,6 +1,7 @@
/* Verify that hardware multiply is preferred on XScale. */
/* { dg-do compile { target xscale*-*-* } } */
/* { dg-do compile } */
/* { dg-options "-mcpu=xscale -O2" } */
/* { dg-require-effective-target arm32 } */
/* Brett Gaines' test case. */
unsigned BCPL(unsigned) __attribute__ ((naked));
@ -15,5 +16,4 @@ unsigned BCPL(unsigned seed)
return seed * 2147001325U + 715136305U;
}
/* We want to suppress running for -mthumb but not for -mthumb-interwork. */
/* { dg-final { global compiler_flags; if ![string match "*-mthumb *" $compiler_flags] { scan-assembler "mla\[ ].*" } } } */
/* { dg-final { scan-assembler "mla\[ ].*" } } */

5
gcc/testsuite/gcc.dg/arm-mmx-1.c
View File

@ -1,8 +1,9 @@
/* Verify that if IP is saved to ensure stack alignment, we don't load
it into sp. */
/* { dg-do compile { target arm*-*-* strongarm*-*-* xscale*-*-*} } */
/* { dg-do compile } */
/* { dg-options "-O -mno-apcs-frame -mcpu=iwmmxt -mabi=iwmmxt" } */
/* { dg-final { global compiler_flags; if ![string match "*-mthumb *" $compiler_flags] { scan-assembler "ldmfd\[ ]sp!.*ip,\[ ]*pc" } } } */
/* { dg-require-effective-target arm32 } */
/* { dg-final { scan-assembler "ldmfd\[ ]sp!.*ip,\[ ]*pc" } } */
/* This function uses all the call-saved registers, namely r4, r5, r6,
r7, r8, r9, sl, fp. Since we also save lr, that leaves an odd

6
gcc/testsuite/gcc.dg/arm-scd42-2.c
View File

@ -1,6 +1,7 @@
/* Verify that mov is preferred on XScale for loading a 2 byte constant. */
/* { dg-do compile { target xscale-*-* } } */
/* { dg-do compile } */
/* { dg-options "-mcpu=xscale -O" } */
/* { dg-require-effective-target arm32 } */
unsigned load2(void) __attribute__ ((naked));
unsigned load2(void)
@ -13,5 +14,4 @@ unsigned load2(void)
return 273;
}
/* We want to suppress running for -mthumb but not for -mthumb-interwork. */
/* { dg-final { global compiler_flags; if ![string match "*-mthumb *" $compiler_flags] { scan-assembler "mov\[ ].*272" } } } */
/* { dg-final { scan-assembler "mov\[ ].*272" } } */

3
gcc/testsuite/gcc.dg/arm-vfp1.c
View File

@ -1,5 +1,6 @@
/* { dg-do compile { target arm*-*-* } } */
/* { dg-do compile } */
/* { dg-options "-O2 -mfpu=vfp -mfloat-abi=softfp" } */
/* { dg-require-effective-target arm32 } */
extern float fabsf (float);
extern float sqrtf (float);

37
gcc/testsuite/lib/target-supports.exp
View File

@ -698,6 +698,43 @@ proc check_effective_target_vect_int { } {
return $et_vect_int_saved
}
# Return 1 is this is an arm target using 32-bit instructions
proc check_effective_target_arm32 { } {
global et_arm32_saved
global et_arm32_target_name
global compiler_flags
if { ![info exists et_arm32_target_name] } {
set et_arm32_target_name ""
}
# If the target has changed since we set the cached value, clear it.
set current_target [current_target_name]
if { $current_target != $et_arm32_target_name } {
verbose "check_effective_target_arm32: `$et_arm32_target_name' `$current_target'" 2
set et_arm32_target_name $current_target
if { [info exists et_arm32_saved] } {
verbose "check_effective_target_arm32: removing cached result" 2
unset et_arm32_saved
}
}
if [info exists et_arm32_saved] {
verbose "check-effective_target_arm32: using cached result" 2
} else {
set et_arm32_saved 0
if { [istarget arm-*-*]
|| [istarget strongarm*-*-*]
|| [istarget xscale-*-*] } {
if ![string match "*-mthumb *" $compiler_flags] {
set et_arm32_saved 1
}
}
}
verbose "check_effective_target_arm32: returning $et_arm32_saved" 2
return $et_arm32_saved
}
# Return 1 if the target supports hardware vector shift operation.
proc check_effective_target_vect_shift { } {