1/* { dg-do compile } */
2/* { dg-options "-mgp64 -O" } */
3
4#define TEST(ID, TYPE1, TYPE2)					\
5  union u##ID {							\
6    TYPE1 m1[sizeof (TYPE2) / sizeof (TYPE1)];			\
7    TYPE2 m2;							\
8  };								\
9								\
10  /* The MIPS16 versions of the shifts we need are too		\
11     expensive.  */						\
12  TYPE1 __attribute__((nomips16))				\
13  f##ID (TYPE2 x, union u##ID *u)				\
14  {								\
15    u->m2 = x;							\
16    return (u->m1[0]						\
17	    + u->m1[sizeof (TYPE2) / sizeof (TYPE1) - 1]);	\
18  }								\
19								\
20  TYPE1 __attribute__((nomips16))				\
21  g##ID (union u##ID *u)					\
22  {								\
23    u->m2 = 0;							\
24    return (u->m1[0] | u->m1[1]);				\
25  }
26
27TEST (1, unsigned int, unsigned long long);
28TEST (2, int, long long);
29TEST (3, unsigned short, unsigned long long);
30TEST (4, short, long long);
31TEST (5, unsigned char, unsigned long long);
32TEST (6, signed char, long long);
33
34TEST (7, unsigned short, unsigned int);
35TEST (8, short, int);
36TEST (9, unsigned char, unsigned int);
37TEST (10, signed char, int);
38
39TEST (11, unsigned char, unsigned short);
40TEST (12, signed char, short);
41
42/* { dg-final { scan-assembler-not "\tlh\t" } } */
43/* { dg-final { scan-assembler-not "\tlhu\t" } } */
44/* { dg-final { scan-assembler-not "\tlw\t" } } */
45/* { dg-final { scan-assembler-not "\tlwu\t" } } */
46/* { dg-final { scan-assembler-not "\tlb\t" } } */
47/* { dg-final { scan-assembler-not "\tlbu\t" } } */
48