OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [g++.dg/] [other/] [s390-1.C] - Blame information for rev 316

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 301 jeremybenn
// { dg-do compile { target s390x-*-* } }
2
// { dg-options "-O3 -fPIC" }
3
 
4
class A
5
{
6
public:
7
  void f (void) { _M_a = 0; }
8
  void g (void) { _M_a = 1; }
9
  void h (void);
10
 
11
private:
12
  int _M_a;
13
};
14
 
15
class B : virtual public A
16
{
17
};
18
 
19
void
20
test (B& x)
21
{
22
  for (int i = 0; i < 17; i++)
23
   {
24
     x.f ();
25
     (x.*&A::g) ();
26
     x.h ();
27
   }
28
}
29
 
30
// Check that every call to A::g goes via the PLT.
31
// { dg-final { scan-assembler-not "brasl\[^@\]*\n" } }
32
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.