Subversion Repositories or1k

// Test various -*- C++ -*- things.

// ====================== basic C++ types  =======================

bool            v_bool;

bool            v_bool_array[2];

typedef struct fleep fleep;

struct fleep { int a; } s;

// ====================== simple class structures  =======================

struct default_public_struct {

 // defaults to public:

  int a;

  int b;

};

struct explicit_public_struct {

 public:

  int a;

  int b;

};

struct protected_struct {

 protected:

  int a;

  int b;

};

struct private_struct {

 private:

  int a;

  int b;

};

struct mixed_protection_struct {

 public:

  int a;

  int b;

 private:

  int c;

  int d;

 protected:

  int e;

  int f;

 public:

  int g;

 private:

  int h;

 protected:

  int i;

};

class public_class {

 public:

  int a;

  int b;

};

class protected_class {

 protected:

  int a;

  int b;

};

class default_private_class {

 // defaults to private:

  int a;

  int b;

};

class explicit_private_class {

 private:

  int a;

  int b;

};

class mixed_protection_class {

 public:

  int a;

  int b;

 private:

  int c;

  int d;

 protected:

  int e;

  int f;

 public:

  int g;

 private:

  int h;

 protected:

  int i;

};

class const_vol_method_class {

public:

  int a;

  int b;

  int foo (int &) const;

  int bar (int &) volatile;

  int baz (int &) const volatile;

};

int const_vol_method_class::foo (int & ir) const

{

  return ir + 3;

}

int const_vol_method_class::bar (int & ir) volatile

{

  return ir + 4;

}

int const_vol_method_class::baz (int & ir) const volatile

{

  return ir + 5;

}

// ========================= simple inheritance ==========================

class A {

 public:

  int a;

  int x;

};

A g_A;

class B : public A {

 public:

  int b;

  int x;

};

B g_B;

class C : public A {

 public:

  int c;

  int x;

};

C g_C;

class D : public B, public C {

 public:

  int d;

  int x;

};

D g_D;

class E : public D {

 public:

  int e;

  int x;

};

E g_E;

class class_with_anon_union

{

 public:

  int one;

  union

  {

    int a;

    long b;

  };

};

class_with_anon_union g_anon_union;

void inheritance2 (void)

{

}

void inheritance1 (void)

{

  int ival;

  int *intp;

  // {A::a, A::x}

  g_A.A::a = 1;

  g_A.A::x = 2;

  // {{A::a,A::x},B::b,B::x}

  g_B.A::a = 3;

  g_B.A::x = 4;

  g_B.B::b = 5;

  g_B.B::x = 6;

  // {{A::a,A::x},C::c,C::x}

  g_C.A::a = 7;

  g_C.A::x = 8;

  g_C.C::c = 9;

  g_C.C::x = 10;

  // {{{A::a,A::x},B::b,B::x},{{A::a,A::x},C::c,C::x},D::d,D::x}

  // The following initialization code is non-portable, but allows us

  // to initialize all members of g_D until we can fill in the missing

  // initialization code with legal C++ code.

  for (intp = (int *) &g_D, ival = 11;

       intp < ((int *) &g_D + sizeof (g_D) / sizeof (int));

       intp++, ival++)

    {

      *intp = ival;

    }

  // Overlay the nonportable initialization with legal initialization.

  // ????? = 11;  (g_D.A::a = 11; is ambiguous)

  // ????? = 12;  (g_D.A::x = 12; is ambiguous)

/* djb 6-3-2000

        This should take care of it. Rather than try to initialize using an ambiguous

        construct, use 2 unambiguous ones for each. Since the ambiguous a/x member is

        coming from C, and B, initialize D's C::a, and B::a, and D's C::x and B::x.

 */

  g_D.C::a = 15;

  g_D.C::x = 12;

  g_D.B::a = 11;

  g_D.B::x = 12;

  g_D.B::b = 13;

  g_D.B::x = 14;

  // ????? = 15;

  // ????? = 16;

  g_D.C::c = 17;

  g_D.C::x = 18;

  g_D.D::d = 19;

  g_D.D::x = 20;

  // {{{{A::a,A::x},B::b,B::x},{{A::a,A::x},C::c,C::x},D::d,D::x}},E::e,E::x}

  // The following initialization code is non-portable, but allows us

  // to initialize all members of g_D until we can fill in the missing

  // initialization code with legal C++ code.

  for (intp = (int *) &g_E, ival = 21;

       intp < ((int *) &g_E + sizeof (g_E) / sizeof (int));

       intp++, ival++)

  {

    *intp = ival;

  }

  // Overlay the nonportable initialization with legal initialization.

  // ????? = 21;  (g_E.A::a = 21; is ambiguous)

  // ????? = 22;  (g_E.A::x = 22; is ambiguous)

  g_E.B::b = 23;

  g_E.B::x = 24;

  // ????? = 25;

  // ????? = 26;

  g_E.C::c = 27;

  g_E.C::x = 28;

  g_E.D::d = 29;

  g_E.D::x = 30;

  g_E.E::e = 31;

  g_E.E::x = 32;

  g_anon_union.one = 1;

  g_anon_union.a = 2;

  inheritance2 ();

}

// ======================== static member functions =====================

class Static {

public:

  static void ii(int, int);

};

void Static::ii (int, int) { }

// ======================== virtual base classes=========================

class vA {

 public:

  int va;

  int vx;

};

vA g_vA;

class vB : public virtual vA {

 public:

  int vb;

  int vx;

};

vB g_vB;

class vC : public virtual vA {

 public:

  int vc;

  int vx;

};

vC g_vC;

class vD : public virtual vB, public virtual vC {

 public:

  int vd;

  int vx;

};

vD g_vD;

class vE : public virtual vD {

 public:

  int ve;

  int vx;

};

vE g_vE;

void inheritance4 (void)

{

}

void inheritance3 (void)

{

  int ival;

  int *intp;

  // {vA::va, vA::vx}

  g_vA.vA::va = 1;

  g_vA.vA::vx = 2;

  // {{vA::va, vA::vx}, vB::vb, vB::vx}

  g_vB.vA::va = 3;

  g_vB.vA::vx = 4;

  g_vB.vB::vb = 5;

  g_vB.vB::vx = 6;

  // {{vA::va, vA::vx}, vC::vc, vC::vx}

  g_vC.vA::va = 7;

  g_vC.vA::vx = 8;

  g_vC.vC::vc = 9;

  g_vC.vC::vx = 10;

  // {{{{vA::va, vA::vx}, vB::vb, vB::vx}, vC::vc, vC::vx}, vD::vd,vD::vx}

  g_vD.vA::va = 11;

  g_vD.vA::vx = 12;

  g_vD.vB::vb = 13;

  g_vD.vB::vx = 14;

  g_vD.vC::vc = 15;

  g_vD.vC::vx = 16;

  g_vD.vD::vd = 17;

  g_vD.vD::vx = 18;

  // {{{{{vA::va,vA::vx},vB::vb,vB::vx},vC::vc,vC::vx},vD::vd,vD::vx},vE::ve,vE::vx}

  g_vD.vA::va = 19;

  g_vD.vA::vx = 20;

  g_vD.vB::vb = 21;

  g_vD.vB::vx = 22;

  g_vD.vC::vc = 23;

  g_vD.vC::vx = 24;

  g_vD.vD::vd = 25;

  g_vD.vD::vx = 26;

  g_vE.vE::ve = 27;

  g_vE.vE::vx = 28;

  inheritance4 ();

}

// ======================================================================

class Base1 {

 public:

  int x;

  Base1(int i) { x = i; }

};

class Foo

{

 public:

  int x;

  int y;

  static int st;

  Foo (int i, int j) { x = i; y = j; }

  int operator! ();

  operator int ();

  int times (int y);

};

class Bar : public Base1, public Foo {

 public:

  int z;

  Bar (int i, int j, int k) : Base1 (10*k), Foo (i, j) { z = k; }

};

int Foo::operator! () { return !x; }

int Foo::times (int y) { return x * y; }

int Foo::st = 100;

Foo::operator int() { return x; }

Foo foo(10, 11);

Bar bar(20, 21, 22);

class ClassWithEnum {

public:

  enum PrivEnum { red, green, blue, yellow = 42 };

  PrivEnum priv_enum;

  int x;

};

void enums2 (void)

{

}

/* classes.exp relies on statement order in this function for testing

   enumeration fields.  */

void enums1 ()

{

  ClassWithEnum obj_with_enum;

  obj_with_enum.priv_enum = ClassWithEnum::red;

  obj_with_enum.x = 0;

  enums2 ();

  obj_with_enum.priv_enum = ClassWithEnum::green;

}

class ClassParam {

public:

  int Aptr_a (A *a) { return a->a; }

  int Aptr_x (A *a) { return a->x; }

  int Aref_a (A &a) { return a.a; }

  int Aref_x (A &a) { return a.x; }

  int Aval_a (A a) { return a.a; }

  int Aval_x (A a) { return a.x; }

};

ClassParam class_param;

class Contains_static_instance

{

 public:

  int x;

  int y;

  Contains_static_instance (int i, int j) { x = i; y = j; }

  static Contains_static_instance null;

};

Contains_static_instance Contains_static_instance::null(0,0);

Contains_static_instance csi(10,20);

class Contains_nested_static_instance

{

 public:

  class Nested

  {

   public:

    Nested(int i) : z(i) {}

    int z;

    static Contains_nested_static_instance xx;

  };

  Contains_nested_static_instance(int i, int j) : x(i), y(j) {}

  int x;

  int y;

  static Contains_nested_static_instance null;

  static Nested yy;

};

Contains_nested_static_instance Contains_nested_static_instance::null(0, 0);

Contains_nested_static_instance::Nested Contains_nested_static_instance::yy(5);

Contains_nested_static_instance

  Contains_nested_static_instance::Nested::xx(1,2);

Contains_nested_static_instance cnsi(30,40);

typedef struct {

  int one;

  int two;

} tagless_struct;

tagless_struct v_tagless;

/* Try to get the compiler to allocate a class in a register.  */

class small {

 public:

  int x;

  int method ();

};

int

small::method ()

{

  return x + 5;

}

void marker_reg1 () {}

int

register_class ()

{

  /* We don't call any methods for v, so gcc version cygnus-2.3.3-930220

     might put this variable in a register.  This is a lose, though, because

     it means that GDB can't call any methods for that variable.  */

  register small v;

  int i;

  /* Perform a computation sufficiently complicated that optimizing compilers

     won't optimized out the variable.  If some compiler constant-folds this

     whole loop, maybe using a parameter to this function here would help.  */

  v.x = 0;

  for (i = 0; i < 13; ++i)

    v.x += i;

  --v.x; /* v.x is now 77 */

  marker_reg1 ();

  return v.x + 5;

}

void dummy()

{

  v_bool = true;

  v_bool_array[0] = false;

  v_bool_array[1] = v_bool;

}

void use_methods ()

{

  /* Refer to methods so that they don't get optimized away. */

  int i;

  i = class_param.Aptr_a (&g_A);

  i = class_param.Aptr_x (&g_A);

  i = class_param.Aref_a (g_A);

  i = class_param.Aref_x (g_A);

  i = class_param.Aval_a (g_A);

  i = class_param.Aval_x (g_A);

}

int

main()

{

#ifdef usestubs

  set_debug_traps();

  breakpoint();

#endif

  dummy();

  inheritance1 ();

  inheritance3 ();

  enums1 ();

  register_class ();

  /* FIXME: pmi gets optimized out.  Need to do some more computation with

     it or something.  (No one notices, because the test is xfail'd anyway,

     but that probably won't always be true...).  */

  int Foo::* pmi = &Foo::y;

  /* Make sure the AIX linker doesn't remove the variable.  */

  v_tagless.one = 5;

  use_methods ();

  return foo.*pmi;

}

/* Create an instance for some classes, otherwise they get optimized away.  */

default_public_struct default_public_s;

explicit_public_struct explicit_public_s;

protected_struct protected_s;

private_struct private_s;

mixed_protection_struct mixed_protection_s;

public_class public_c;

protected_class protected_c;

default_private_class default_private_c;

explicit_private_class explicit_private_c;

mixed_protection_class mixed_protection_c;