Commit 0febb26e by Kyrylo Tkachov Committed by Kyrylo Tkachov

[testsuite] Mark tests unsupported when relocation truncation occurs on tiny memory targets

	* lib/gcc-defs.exp (${tool}_check_unsupported_p):
	Return memory full when we have a tiny target and relocation
	truncation occurs.
	* lib/gcc-dg.exp (gcc-dg-prune): Likewise.
	* lib/objc.exp (${tool}_check_unsupported_p): Likewise.
	* lib/target-supports.exp (check_effective_target_tiny): New function.

From-SVN: r214215
parent a9442c7a
2014-08-20 Kyrylo Tkachov <kyrylo.tkachov@arm.com>
* lib/gcc-defs.exp (${tool}_check_unsupported_p):
Return memory full when we have a tiny target and relocation
truncation occurs.
* lib/gcc-dg.exp (gcc-dg-prune): Likewise.
* lib/objc.exp (${tool}_check_unsupported_p): Likewise.
* lib/target-supports.exp (check_effective_target_tiny): New function.
2014-08-20 Joost VandeVondele <Joost.VandeVondele@mat.ethz.ch> 2014-08-20 Joost VandeVondele <Joost.VandeVondele@mat.ethz.ch>
* gfortran.dg/errnocheck_1.f90: New test. * gfortran.dg/errnocheck_1.f90: New test.
......
...@@ -157,6 +157,11 @@ proc ${tool}_check_unsupported_p { output } { ...@@ -157,6 +157,11 @@ proc ${tool}_check_unsupported_p { output } {
if [regexp "(^|\n)\[^\n\]*: region \[^\n\]* is full" $output] { if [regexp "(^|\n)\[^\n\]*: region \[^\n\]* is full" $output] {
return "memory full" return "memory full"
} }
if { [regexp "(^|\n)\[^\n\]*: relocation truncated to fit" $output]
&& [check_effective_target_tiny] } {
return "memory full"
}
if { [istarget spu-*-*] && \ if { [istarget spu-*-*] && \
[string match "*exceeds local store*" $output] } { [string match "*exceeds local store*" $output] } {
return "memory full" return "memory full"
......
...@@ -233,6 +233,11 @@ proc gcc-dg-prune { system text } { ...@@ -233,6 +233,11 @@ proc gcc-dg-prune { system text } {
return "::unsupported::memory full" return "::unsupported::memory full"
} }
if { [regexp "(^|\n)\[^\n\]*: relocation truncated to fit" $text]
&& [check_effective_target_tiny] } {
return "::unsupported::memory full"
}
# Likewise, if we see ".text exceeds local store range" or # Likewise, if we see ".text exceeds local store range" or
# similar. # similar.
if {[string match "spu-*" $system] && \ if {[string match "spu-*" $system] && \
......
...@@ -357,6 +357,10 @@ proc ${tool}_check_unsupported_p { output } { ...@@ -357,6 +357,10 @@ proc ${tool}_check_unsupported_p { output } {
if [regexp "(^|\n)\[^\n\]*: region \[^\n\]* is full" $output] { if [regexp "(^|\n)\[^\n\]*: region \[^\n\]* is full" $output] {
return "memory full" return "memory full"
} }
if { [regexp "(^|\n)\[^\n\]*: relocation truncated to fit" $output]
&& [check_effective_target_tiny] } {
return "memory full"
}
return "" return ""
} }
......
...@@ -5950,6 +5950,14 @@ proc check_effective_target_fenv_exceptions {} { ...@@ -5950,6 +5950,14 @@ proc check_effective_target_fenv_exceptions {} {
} [add_options_for_ieee "-std=gnu99"]] } [add_options_for_ieee "-std=gnu99"]]
} }
proc check_effective_target_tiny {} {
if { [istarget aarch64*-*-*]
&& [check_effective_target_aarch64_tiny] } {
return 1
}
return 0
}
# Return 1 if LOGICAL_OP_NON_SHORT_CIRCUIT is set to 0 for the current target. # Return 1 if LOGICAL_OP_NON_SHORT_CIRCUIT is set to 0 for the current target.
proc check_effective_target_logical_op_short_circuit {} { proc check_effective_target_logical_op_short_circuit {} {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment