OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [20030903-1.c] - Diff between revs 297 and 338

Only display areas with differences | Details | Blame | View Log

Rev 297 Rev 338
/* Derived from PR optimization/11700.  */
/* Derived from PR optimization/11700.  */
/* The compiler used to ICE during reload for m68k targets.  */
/* The compiler used to ICE during reload for m68k targets.  */
 
 
void check_complex (__complex__ double, __complex__ double,
void check_complex (__complex__ double, __complex__ double,
                    __complex__ double, __complex__ int);
                    __complex__ double, __complex__ int);
void check_float (double, double, double, int);
void check_float (double, double, double, int);
extern double _Complex conj (double _Complex);
extern double _Complex conj (double _Complex);
extern double carg (double _Complex __z);
extern double carg (double _Complex __z);
 
 
static double minus_zero;
static double minus_zero;
 
 
void
void
conj_test (void)
conj_test (void)
{
{
  check_complex (conj (({ __complex__ double __retval;
  check_complex (conj (({ __complex__ double __retval;
                          __real__ __retval = (0.0);
                          __real__ __retval = (0.0);
                          __imag__ __retval = (0.0);
                          __imag__ __retval = (0.0);
                          __retval; })),
                          __retval; })),
                 ({ __complex__ double __retval;
                 ({ __complex__ double __retval;
                    __real__ __retval = (0.0);
                    __real__ __retval = (0.0);
                    __imag__ __retval = (minus_zero);
                    __imag__ __retval = (minus_zero);
                    __retval; }), 0, 0);
                    __retval; }), 0, 0);
}
}
 
 
void
void
carg_test (void)
carg_test (void)
{
{
  check_float (carg (({ __complex__ double __retval;
  check_float (carg (({ __complex__ double __retval;
                        __real__ __retval = (2.0);
                        __real__ __retval = (2.0);
                        __imag__ __retval = (0);
                        __imag__ __retval = (0);
                        __retval; })), 0, 0, 0);
                        __retval; })), 0, 0, 0);
}
}
 
 
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.