1  /* Test support of scalar_storage_order attribute */
       2  
       3  /* { dg-do compile } */
       4  
       5  struct S1
       6  {
       7    int i;
       8  } __attribute__((scalar_storage_order("big-endian")));
       9  
      10  struct S2
      11  {
      12    int i;
      13  } __attribute__((scalar_storage_order("little-endian")));
      14  
      15  struct S3 { int i; } __attribute__((scalar_storage_order("other"))); /* { dg-error "must be one of .big-endian. or .little-endian." } */
      16  
      17  void incompatible_assign (struct S1 *s1, struct S2 *s2)
      18  {
      19    *s1 = *s2; /* { dg-error "(incompatible types|no match)" } */
      20  }
      21  
      22  int *addr1 (int which, struct S1 *s1, struct S2 *s2)
      23  {
      24    return (which == 1 ? &s1->i : &s2->i); /* { dg-error "address of scalar with reverse storage order" } */
      25  }
      26  
      27  struct S4
      28  {
      29    int a[4];
      30    struct S2 s2;
      31  } __attribute__((scalar_storage_order("big-endian")));
      32  
      33  struct S5
      34  {
      35    int a[4];
      36    struct S1 s1;
      37  } __attribute__((scalar_storage_order("little-endian")));
      38  
      39  void *addr2 (int which, struct S4 *s4, struct S5 *s5)
      40  {
      41    return (which == 1 ? (void *)s4->a : (void *)s5->a); /* { dg-warning "address of array with reverse scalar storage order" } */
      42  }
      43  
      44  void *addr3 (int which, struct S4 *s4, struct S5 *s5)
      45  {
      46    return (which == 1 ? (void *)&s4->a : (void *)&s5->a); /* { dg-warning "address of array with reverse scalar storage order" } */
      47  }
      48  
      49  void *addr4 (int which, struct S4 *s4, struct S5 *s5)
      50  {
      51    return (which == 1 ? (void *)&s4->a[0] : (void *)&s5->a[0]); /* { dg-error "address of scalar with reverse storage order" } */
      52  }
      53  
      54  void *addr5 (int which, struct S4 *s4, struct S5 *s5)
      55  {
      56    return (which == 1 ? (void *)&s4->s2 : (void *) &s5->s1); /* ok */
      57  }
      58  
      59  struct S6
      60  {
      61    int a[4][2];
      62    struct S2 s2[2];
      63  }  __attribute__((scalar_storage_order("big-endian")));
      64  
      65  struct S7
      66  {
      67    int a[4][2];
      68    struct S1 s1[2];
      69  }  __attribute__((scalar_storage_order("little-endian")));
      70  
      71  void *addr6 (int which, struct S6 *s6, struct S7 *s7)
      72  {
      73    return (which == 1 ? (void *)s6->a : (void *)s7->a); /* { dg-warning "address of array with reverse scalar storage order" } */
      74  }
      75  
      76  void *addr7 (int which, struct S6 *s6, struct S7 *s7)
      77  {
      78    return (which == 1 ? (void *)&s6->a : (void *)&s7->a); /* { dg-warning "address of array with reverse scalar storage order" } */
      79  }
      80  
      81  void *addr8 (int which, struct S6 *s6, struct S7 *s7)
      82  {
      83    return (which == 1 ? (void *)&s6->a[0] : (void *)&s7->a[0]); /* { dg-warning "address of array with reverse scalar storage order" } */
      84  }
      85  
      86  void *addr9 (int which, struct S6 *s6, struct S7 *s7)
      87  {
      88    return (which == 1 ? (void *)&s6->a[0][0] : (void *)&s7->a[0][0]); /* { dg-error "address of scalar with reverse storage order" } */
      89  }
      90  
      91  void *addr10 (int which, struct S6 *s6, struct S7 *s7)
      92  {
      93    return (which == 1 ? (void *)&s6->s2 : (void *)&s7->s1); /* ok */
      94  }