1 /* { dg-do compile } */
3 __extension__
typedef __UINTPTR_TYPE__
uintptr_t;
5 typedef struct TypHeader
{
6 struct TypHeader
* * ptr
;
9 extern TypHandle (* EvTab
[81]) ( TypHandle hd
);
10 TypHandle
FunApplyRel ( TypHandle hdCall
)
16 hdApp
= ((uintptr_t)(((TypHandle
*)((hdCall
)->ptr
))[1])&1 ?
17 (((TypHandle
*)((hdCall
)->ptr
))[1]) : (*
18 EvTab
[(((uintptr_t)(((TypHandle
*)((hdCall
)->ptr
))[1]) & 1) ? 1 :
19 ((((TypHandle
*)((hdCall
)->ptr
))[1])->type
))])((((TypHandle
*)((hdCall
)->ptr
))[1])));
20 ptApp
= ((TypHandle
*)((hdApp
)->ptr
));
21 ptApp
[1] = ((TypHandle
) (uintptr_t) (((long)(lp
) << 2) + 1));
22 ptApp
[2] = ((TypHandle
) (uintptr_t) (((long)(lc
) << 2) + 1));