Subversion Repositories scarts

/* PR optimization/10467  */
/* { dg-do compile { target arm*-*-* xscale*-*-* strongarm*-*-* } } */
/* { dg-options "-O2 -mthumb" } */
 
typedef enum {Ident_1} Enumeration;
 
typedef struct record
{
    struct record *Ptr_Comp;
    Enumeration Discr;
    union {
	struct {
	    Enumeration Enum_Comp;
	    int Int_Comp;
	    char Str_Comp [31];
        } var_1;
    } variant;
} *Rec_Pointer;
 
Rec_Pointer Ptr_Glob;
 
Proc_1 (Ptr_Val_Par)
    Rec_Pointer Ptr_Val_Par;
{
    Rec_Pointer Next_Record = Ptr_Val_Par->Ptr_Comp;
 
    *Ptr_Val_Par->Ptr_Comp = *Ptr_Glob;
 
    if (Next_Record->Discr == Ident_1)
    {
	Proc_7 (Next_Record->variant.var_1.Int_Comp, 10,
		&Next_Record->variant.var_1.Int_Comp);
    }
}