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