binutils-gdb/gdb/testsuite/gdb.cp/m-static.cc
Tom Tromey fce632b6dc PR c++/9197:
* opencl-lang.c (evaluate_subexp_opencl) <STRUCTOP_STRUCT>: Use
	value_struct_elt, not lookup_struct_elt_type.
	* eval.c (evaluate_subexp_standard) <STRUCTOP_STRUCT,
	STRUCTOP_PTR>: Use value_struct_elt, not lookup_struct_elt_type.
	* expression.h (EVAL_AVOID_SIDE_EFFECTS): Update comment.
gdb/testsuite
	* gdb.cp/m-static.exp: Add constructor ptype tests.
	* gdb.cp/m-static.cc (single_constructor): New class.
	(main): Make instance of single_constructor.
2013-03-25 17:26:18 +00:00

101 lines
1.8 KiB
C++

// 2002-05-13
enum region { oriental, egyptian, greek, etruscan, roman };
void keepalive(bool *var) { }
void keepalive_int (int *var) { }
// Test one.
class gnu_obj_1
{
protected:
typedef region antiquities;
static const bool test = true;
static const int key1 = 5;
static long key2;
static antiquities value;
public:
gnu_obj_1(antiquities a, long l) {}
~gnu_obj_1() {}
long method ()
{
static int sintvar = 4;
static bool svar = true;
keepalive (&svar);
keepalive_int (&sintvar);
return key2;
}
};
// An object with a single constructor.
class single_constructor
{
public:
single_constructor () { }
~single_constructor () { }
};
const bool gnu_obj_1::test;
const int gnu_obj_1::key1;
long gnu_obj_1::key2 = 77;
gnu_obj_1::antiquities gnu_obj_1::value = oriental;
// Test two.
template<typename T>
class gnu_obj_2: public virtual gnu_obj_1
{
public:
static antiquities value_derived;
public:
gnu_obj_2(antiquities b): gnu_obj_1(oriental, 7) { }
};
template<typename T>
typename gnu_obj_2<T>::antiquities gnu_obj_2<T>::value_derived = etruscan;
// Test three.
template<typename T>
class gnu_obj_3
{
public:
typedef region antiquities;
static gnu_obj_2<int> data;
public:
gnu_obj_3(antiquities b) { }
};
template<typename T>
gnu_obj_2<int> gnu_obj_3<T>::data(etruscan);
// 2002-08-16
// Test four.
#include "m-static.h"
// instantiate templates explicitly so their static members will exist
template class gnu_obj_2<int>;
template class gnu_obj_2<long>;
template class gnu_obj_3<long>;
int main()
{
gnu_obj_1 test1(egyptian, 4589);
gnu_obj_2<long> test2(roman);
gnu_obj_3<long> test3(greek);
gnu_obj_4 test4;
single_constructor test5;
test4.dummy = test4.elsewhere;
test4.dummy = 0;
test1.method (); // breakpoint: constructs-done
return test4.dummy;
}