Mercurial > hg > CbC > CbC_gcc

view gcc/testsuite/gcc.dg/compat/struct-complex-2_x.c @ 131:84e7813d76e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children
line wrap: on
line source

/* { dg-options "-O -Wno-psabi" } */


#ifdef __x86_64__
#include "struct-complex-2.h"

struct st st1;
struct stc st2;

extern void foo ();
extern void bar ();

int
struct_complex_2_x ()
{
  st1.s1 = 1;
  __real__ st1.x = 2;
  __imag__ st1.x = 4;
  st2.s1 = 1;
  st2.x.r = 2;
  st2.x.i = 4;
  foo (st1);
  foo (st2);
  bar (st1);
  bar (st2);
  return 0;
}
#else
int dummy_x;
#endif