314 lines
6.6 KiB
C
314 lines
6.6 KiB
C
|
/*
|
||
|
* Test file with lots of different types, for testing the
|
||
|
* "ptype" command.
|
||
|
*/
|
||
|
|
||
|
/*
|
||
|
* First the basic C types.
|
||
|
*/
|
||
|
|
||
|
#if !defined (__STDC__) && !defined (_AIX)
|
||
|
#define signed /**/
|
||
|
#endif
|
||
|
|
||
|
char v_char;
|
||
|
signed char v_signed_char;
|
||
|
unsigned char v_unsigned_char;
|
||
|
|
||
|
short v_short;
|
||
|
signed short v_signed_short;
|
||
|
unsigned short v_unsigned_short;
|
||
|
|
||
|
int v_int;
|
||
|
signed int v_signed_int;
|
||
|
unsigned int v_unsigned_int;
|
||
|
|
||
|
long v_long;
|
||
|
signed long v_signed_long;
|
||
|
unsigned long v_unsigned_long;
|
||
|
|
||
|
float v_float;
|
||
|
double v_double;
|
||
|
|
||
|
/*
|
||
|
* Now some derived types, which are arrays, functions-returning,
|
||
|
* pointers, structures, unions, and enumerations.
|
||
|
*/
|
||
|
|
||
|
/**** arrays *******/
|
||
|
|
||
|
char v_char_array[2];
|
||
|
signed char v_signed_char_array[2];
|
||
|
unsigned char v_unsigned_char_array[2];
|
||
|
|
||
|
short v_short_array[2];
|
||
|
signed short v_signed_short_array[2];
|
||
|
unsigned short v_unsigned_short_array[2];
|
||
|
|
||
|
int v_int_array[2];
|
||
|
signed int v_signed_int_array[2];
|
||
|
unsigned int v_unsigned_int_array[2];
|
||
|
|
||
|
long v_long_array[2];
|
||
|
signed long v_signed_long_array[2];
|
||
|
unsigned long v_unsigned_long_array[2];
|
||
|
|
||
|
float v_float_array[2];
|
||
|
double v_double_array[2];
|
||
|
|
||
|
/* PR 3742 */
|
||
|
typedef char t_char_array[];
|
||
|
|
||
|
/**** pointers *******/
|
||
|
|
||
|
char *v_char_pointer;
|
||
|
signed char *v_signed_char_pointer;
|
||
|
unsigned char *v_unsigned_char_pointer;
|
||
|
|
||
|
short *v_short_pointer;
|
||
|
signed short *v_signed_short_pointer;
|
||
|
unsigned short *v_unsigned_short_pointer;
|
||
|
|
||
|
int *v_int_pointer;
|
||
|
signed int *v_signed_int_pointer;
|
||
|
unsigned int *v_unsigned_int_pointer;
|
||
|
|
||
|
long *v_long_pointer;
|
||
|
signed long *v_signed_long_pointer;
|
||
|
unsigned long *v_unsigned_long_pointer;
|
||
|
|
||
|
float *v_float_pointer;
|
||
|
double *v_double_pointer;
|
||
|
|
||
|
/**** structs *******/
|
||
|
|
||
|
struct t_struct {
|
||
|
char v_char_member;
|
||
|
short v_short_member;
|
||
|
int v_int_member;
|
||
|
long v_long_member;
|
||
|
float v_float_member;
|
||
|
double v_double_member;
|
||
|
} v_struct1;
|
||
|
|
||
|
struct t_struct *v_t_struct_p;
|
||
|
|
||
|
struct {
|
||
|
char v_char_member;
|
||
|
short v_short_member;
|
||
|
int v_int_member;
|
||
|
long v_long_member;
|
||
|
float v_float_member;
|
||
|
double v_double_member;
|
||
|
} v_struct2;
|
||
|
|
||
|
/* typedef'd struct without a tag. */
|
||
|
typedef struct {
|
||
|
double v_double_member;
|
||
|
int v_int_member;
|
||
|
} t_struct3;
|
||
|
/* GCC seems to want a variable of this type, or else it won't put out
|
||
|
a symbol. */
|
||
|
t_struct3 v_struct3;
|
||
|
|
||
|
/**** unions *******/
|
||
|
|
||
|
union t_union {
|
||
|
char v_char_member;
|
||
|
short v_short_member;
|
||
|
int v_int_member;
|
||
|
long v_long_member;
|
||
|
float v_float_member;
|
||
|
double v_double_member;
|
||
|
} v_union;
|
||
|
|
||
|
union {
|
||
|
char v_char_member;
|
||
|
short v_short_member;
|
||
|
int v_int_member;
|
||
|
long v_long_member;
|
||
|
float v_float_member;
|
||
|
double v_double_member;
|
||
|
} v_union2;
|
||
|
|
||
|
/* typedef'd union without a tag. */
|
||
|
typedef union {
|
||
|
double v_double_member;
|
||
|
int v_int_member;
|
||
|
} t_union3;
|
||
|
/* GCC seems to want a variable of this type, or else it won't put out
|
||
|
a symbol. */
|
||
|
t_union3 v_union3;
|
||
|
|
||
|
/*** Functions returning type ********/
|
||
|
|
||
|
char v_char_func () { return(0); }
|
||
|
signed char v_signed_char_func () { return (0); }
|
||
|
unsigned char v_unsigned_char_func () { return (0); }
|
||
|
|
||
|
short v_short_func () { return (0); }
|
||
|
signed short v_signed_short_func () { return (0); }
|
||
|
unsigned short v_unsigned_short_func () { return (0); }
|
||
|
|
||
|
int v_int_func () { return (0); }
|
||
|
signed int v_signed_int_func () { return (0); }
|
||
|
unsigned int v_unsigned_int_func () { return (0); }
|
||
|
|
||
|
long v_long_func () { return (0); }
|
||
|
signed long v_signed_long_func () { return (0); }
|
||
|
unsigned long v_unsigned_long_func () { return (0); }
|
||
|
|
||
|
float v_float_func () { return (0.0); }
|
||
|
double v_double_func () { return (0.0); }
|
||
|
|
||
|
/**** Some misc more complicated things *******/
|
||
|
|
||
|
struct link {
|
||
|
struct link *next;
|
||
|
#ifdef __STDC__
|
||
|
struct link *(*linkfunc) (struct link *this, int flags);
|
||
|
#else
|
||
|
struct link *(*linkfunc) ();
|
||
|
#endif
|
||
|
struct t_struct stuff[1][2][3];
|
||
|
} *s_link;
|
||
|
|
||
|
union tu_link {
|
||
|
struct link *next;
|
||
|
#ifdef __STDC__
|
||
|
struct link *(*linkfunc) (struct link *this, int flags);
|
||
|
#else
|
||
|
struct link *(*linkfunc) ();
|
||
|
#endif
|
||
|
struct t_struct stuff[1][2][3];
|
||
|
} u_link;
|
||
|
|
||
|
struct outer_struct {
|
||
|
int outer_int;
|
||
|
struct inner_struct {
|
||
|
int inner_int;
|
||
|
long inner_long;
|
||
|
}inner_struct_instance;
|
||
|
union inner_union {
|
||
|
int inner_union_int;
|
||
|
long inner_union_long;
|
||
|
}inner_union_instance;
|
||
|
long outer_long;
|
||
|
} nested_su;
|
||
|
|
||
|
/**** Enumerations *******/
|
||
|
|
||
|
enum
|
||
|
/* Work around the bug for compilers which don't put out the right stabs. */
|
||
|
#if __GNUC__ < 2 && !defined (_AIX)
|
||
|
primary1_tag
|
||
|
#endif
|
||
|
{red1, green1, blue1} primary1;
|
||
|
|
||
|
enum {red, green, blue} primary;
|
||
|
enum colors {yellow, purple, pink} nonprimary;
|
||
|
|
||
|
enum {chevy, ford} clunker;
|
||
|
enum cars {bmw, porsche} sportscar;
|
||
|
|
||
|
typedef enum {FALSE, TRUE} boolean;
|
||
|
boolean v_boolean;
|
||
|
typedef enum bvals {false, true} boolean2;
|
||
|
boolean2 v_boolean2;
|
||
|
|
||
|
enum misordered {two = 2, one = 1, zero = 0, three = 3};
|
||
|
|
||
|
/***********/
|
||
|
|
||
|
main ()
|
||
|
{
|
||
|
/* Ensure that malloc is a pointer type; avoid use of "void" and any include files. */
|
||
|
extern char *malloc();
|
||
|
|
||
|
/* Seems like we need a variable of this type to get the type to be put
|
||
|
in the executable, at least for AIX xlc. */
|
||
|
enum misordered v_misordered = three;
|
||
|
|
||
|
/* Some of the tests in ptype.exp require invoking malloc, so make
|
||
|
sure it is linked in to this program. */
|
||
|
v_char_pointer = (char *) malloc (1);
|
||
|
|
||
|
#ifdef usestubs
|
||
|
set_debug_traps();
|
||
|
breakpoint();
|
||
|
#endif
|
||
|
/* Some linkers (e.g. on AIX) remove unreferenced variables,
|
||
|
so make sure to reference them. */
|
||
|
primary = blue;
|
||
|
primary1 = blue1;
|
||
|
nonprimary = pink;
|
||
|
sportscar = porsche;
|
||
|
clunker = ford;
|
||
|
v_struct1.v_int_member = 5;
|
||
|
v_struct2.v_int_member = 6;
|
||
|
v_struct3.v_int_member = 7;
|
||
|
|
||
|
v_char = 0;
|
||
|
v_signed_char = 0;
|
||
|
v_unsigned_char = 0;
|
||
|
|
||
|
v_short = 0;
|
||
|
v_signed_short = 0;
|
||
|
v_unsigned_short = 0;
|
||
|
|
||
|
v_int = 0;
|
||
|
v_signed_int = 0;
|
||
|
v_unsigned_int = 0;
|
||
|
|
||
|
v_long = 0;
|
||
|
v_signed_long = 0;
|
||
|
v_unsigned_long = 0;
|
||
|
|
||
|
v_float = 0;
|
||
|
v_double = 0;
|
||
|
|
||
|
v_char_array[0] = 0;
|
||
|
v_signed_char_array[0] = 0;
|
||
|
v_unsigned_char_array[0] = 0;
|
||
|
|
||
|
v_short_array[0] = 0;
|
||
|
v_signed_short_array[0] = 0;
|
||
|
v_unsigned_short_array[0] = 0;
|
||
|
|
||
|
v_int_array[0] = 0;
|
||
|
v_signed_int_array[0] = 0;
|
||
|
v_unsigned_int_array[0] = 0;
|
||
|
|
||
|
v_long_array[0] = 0;
|
||
|
v_signed_long_array[0] = 0;
|
||
|
v_unsigned_long_array[0] = 0;
|
||
|
|
||
|
v_float_array[0] = 0;
|
||
|
v_double_array[0] = 0;
|
||
|
|
||
|
v_char_pointer = 0;
|
||
|
v_signed_char_pointer = 0;
|
||
|
v_unsigned_char_pointer = 0;
|
||
|
|
||
|
v_short_pointer = 0;
|
||
|
v_signed_short_pointer = 0;
|
||
|
v_unsigned_short_pointer = 0;
|
||
|
|
||
|
v_int_pointer = 0;
|
||
|
v_signed_int_pointer = 0;
|
||
|
v_unsigned_int_pointer = 0;
|
||
|
|
||
|
v_long_pointer = 0;
|
||
|
v_signed_long_pointer = 0;
|
||
|
v_unsigned_long_pointer = 0;
|
||
|
|
||
|
v_float_pointer = 0;
|
||
|
v_double_pointer = 0;
|
||
|
|
||
|
nested_su.outer_int = 0;
|
||
|
v_t_struct_p = 0;
|
||
|
|
||
|
v_boolean = FALSE;
|
||
|
v_boolean2 = false;
|
||
|
}
|