Subversion Repositories openrisc

/* Test AAPCS layout (VFP variant) */

/* { dg-do run { target arm*-*-*eabi* } } */

/* { dg-require-effective-target arm_hard_vfp_ok } */

/* { dg-require-effective-target arm32 } */

/* { dg-options "-O -mfpu=vfp -mfloat-abi=hard" } */

#ifndef IN_FRAMEWORK

#define VFP

#define TESTFILE "vfp10.c"

__complex__ x = 1.0+2.0i;

struct y

{

  int p;

  int q;

  int r;

  int s;

} v = { 1, 2, 3, 4 };

struct z

{

  double x[4];

};

struct z a = { 5.0, 6.0, 7.0, 8.0 };

struct z b = { 9.0, 10.0, 11.0, 12.0 };

#include "abitest.h"

#else

  /* A variadic function passes using the base ABI */

  ARG(double, 11.0, R0)

  DOTS

  ANON(struct z, a, R2)

  ANON(struct z, b, STACK+24)

  LAST_ANON(double, 0.5, STACK+56)

#endif