test cse for emulated TLS targets.
* lib/target-supports.exp (check_effective_target_tls_emulated): New. * gcc.dg/tls/thr-cse-1.c: New. From-SVN: r163330
This commit is contained in:
parent
618d48304d
commit
63d90a9630
@ -1,3 +1,8 @@
|
||||
2010-08-18 Iain Sandoe <iains@gcc.gnu.org>
|
||||
|
||||
* lib/target-supports.exp (check_effective_target_tls_emulated): New.
|
||||
* gcc.dg/tls/thr-cse-1.c: New.
|
||||
|
||||
2010-08-18 Iain Sandoe <iains@gcc.gnu.org>
|
||||
|
||||
PR debug/42487
|
||||
|
21
gcc/testsuite/gcc.dg/tls/thr-cse-1.c
Normal file
21
gcc/testsuite/gcc.dg/tls/thr-cse-1.c
Normal file
@ -0,0 +1,21 @@
|
||||
/* { dg-do compile } */
|
||||
/* { dg-options "-O1" } */
|
||||
/* { dg-require-effective-target tls_emulated } */
|
||||
|
||||
/* Test that we only get one call to emutls_get_address when CSE is
|
||||
active. Note that the var _must_ be initialized for the scan asm
|
||||
to work, since otherwise there will be an initializer which will,
|
||||
correctly, call emutls_get_address. */
|
||||
int foo (int b, int c, int d)
|
||||
{
|
||||
static __thread int a=1;
|
||||
a += b;
|
||||
a -= c;
|
||||
a += d;
|
||||
return a;
|
||||
}
|
||||
|
||||
/* { dg-final { scan-assembler-not "emutls_get_address.*emutls_get_address.*" { target { { ! "*-wrs-vxworks" } && { ! "*-*-darwin8" } } } } } */
|
||||
/* { dg-final { scan-assembler-not "call\tL___emutls_get_address.stub.*call\tL___emutls_get_address.stub.*" { target "*-*-darwin8" } } } */
|
||||
/* { dg-final { scan-assembler-not "tls_lookup.*tls_lookup.*" { target *-wrs-vxworks } } } */
|
||||
|
@ -614,6 +614,23 @@ proc check_effective_target_tls_native {} {
|
||||
}]
|
||||
}
|
||||
|
||||
# Return 1 if *emulated* thread local storage (TLS) is supported, 0 otherwise.
|
||||
|
||||
proc check_effective_target_tls_emulated {} {
|
||||
# VxWorks uses emulated TLS machinery, but with non-standard helper
|
||||
# functions, so we fail to automatically detect it.
|
||||
global target_triplet
|
||||
if { [regexp ".*-.*-vxworks.*" $target_triplet] } {
|
||||
return 1
|
||||
}
|
||||
|
||||
return [check_no_messages_and_pattern tls_emulated "emutls" assembly {
|
||||
__thread int i;
|
||||
int f (void) { return i; }
|
||||
void g (int j) { i = j; }
|
||||
}]
|
||||
}
|
||||
|
||||
# Return 1 if TLS executables can run correctly, 0 otherwise.
|
||||
|
||||
proc check_effective_target_tls_runtime {} {
|
||||
|
Loading…
Reference in New Issue
Block a user