aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.dg/sso/q13.c
blob: ee34bb2289d047ce3b5a66c43b6c194ac20b8cdc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
/* { dg-do run } */

#include <stdio.h>

#include "init13.h"
#include "dump.h"

#ifdef __cplusplus
extern "C"
#endif
void abort (void);

int main (void)
{
  struct R1 A1 = My_R1;
  struct R1 B1 = My_R1;

  struct R2 A2 = My_R2;
  struct R2 B2 = My_R2;

  put ("A1 :");
  dump (&A1, sizeof (struct R1));
  new_line ();
  /* { dg-output "A1 : db 0f 49 40 db 0f 49 c0\n" } */

  put ("B1 :");
  dump (&B1, sizeof (struct R1));
  new_line ();
  /* { dg-output "B1 : db 0f 49 40 db 0f 49 c0\n" } */

  put ("A2 :");
  dump (&A2, sizeof (struct R2));
  new_line ();
  /* { dg-output "A2 : 40 49 0f db c0 49 0f db\n" } */

  put ("B2 :");
  dump (&B2, sizeof (struct R2));
  new_line ();
  /* { dg-output "B2 : 40 49 0f db c0 49 0f db\n" } */

  if (A1.F != B1.F) abort ();

  if (A1.F != Pi - Pi * I) abort ();

  if (A2.F != B2.F) abort ();

  if (A2.F != Pi - Pi * I) abort ();

  return 0;
}