// Test for CSE of the wrapper function: we should only call it once | |
// for the two references to ir. | |
// { dg-options "-fopenmp -O -fno-inline" } | |
// { dg-require-effective-target tls } | |
// { dg-final { scan-assembler-times "call *_ZTW2ir" 1 { xfail *-*-* } } } | |
// XFAILed until the back end supports a way to mark a function as cseable | |
// though not pure. | |
int f() { return 42; } | |
int ir = f(); | |
#pragma omp threadprivate (ir) | |
int main() | |
{ | |
return ir + ir - 84; | |
} |