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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [dfp/] [operator-comma.c] - Diff between revs 149 and 154

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

Rev 149 Rev 154
/* { dg-options "-std=gnu99 -O0" } */
/* { dg-options "-std=gnu99 -O0" } */
 
 
/* C99 6.5.17: Comma operator.
/* C99 6.5.17: Comma operator.
   Test with decimal float operands.  */
   Test with decimal float operands.  */
 
 
extern void abort (void);
extern void abort (void);
static int failcnt = 0;
static int failcnt = 0;
 
 
/* Support compiling the test to report individual failures; default is
/* Support compiling the test to report individual failures; default is
   to abort as soon as a check fails.  */
   to abort as soon as a check fails.  */
#ifdef DBG
#ifdef DBG
#include <stdio.h>
#include <stdio.h>
#define FAILURE { printf ("failed at line %d\n", __LINE__); failcnt++; }
#define FAILURE { printf ("failed at line %d\n", __LINE__); failcnt++; }
#else
#else
#define FAILURE abort ();
#define FAILURE abort ();
#endif
#endif
 
 
volatile _Decimal32 d32a, d32b, d32c;
volatile _Decimal32 d32a, d32b, d32c;
volatile _Decimal64 d64a, d64b, d64c;
volatile _Decimal64 d64a, d64b, d64c;
volatile _Decimal128 d128a, d128b, d128c;
volatile _Decimal128 d128a, d128b, d128c;
 
 
void
void
init ()
init ()
{
{
  d32b = 123.456e94df;
  d32b = 123.456e94df;
  d64b = 12.3456789012345e383dd;
  d64b = 12.3456789012345e383dd;
  d128b = 12345.6789012345678901e4000dl;
  d128b = 12345.6789012345678901e4000dl;
 
 
  d32c = 1.3df;
  d32c = 1.3df;
  d64c = 1.2dd;
  d64c = 1.2dd;
  d128c = 1.1dl;
  d128c = 1.1dl;
}
}
 
 
int
int
main ()
main ()
{
{
  d32a = (d32b, d32c);
  d32a = (d32b, d32c);
  if (d32a != d32c)
  if (d32a != d32c)
    FAILURE
    FAILURE
  d64a = (d64b, 7.89dd, d64c);
  d64a = (d64b, 7.89dd, d64c);
  if (d64a != d64c)
  if (d64a != d64c)
    FAILURE
    FAILURE
  d128a = (45678.987654dl, d128c, d128b);
  d128a = (45678.987654dl, d128c, d128b);
  if (d128a != d128b)
  if (d128a != d128b)
    FAILURE
    FAILURE
  d128a = (d32b, d64b, d128b);
  d128a = (d32b, d64b, d128b);
  if (d128a != d128b)
  if (d128a != d128b)
    FAILURE
    FAILURE
  d32a = (d32b, 12, d64c);
  d32a = (d32b, 12, d64c);
  if (d32a != d64c)
  if (d32a != d64c)
    FAILURE;
    FAILURE;
  d64a = (d64b, d32b, 12);
  d64a = (d64b, d32b, 12);
  if (d64a != 12.0dd)
  if (d64a != 12.0dd)
    FAILURE;
    FAILURE;
 
 
  return 0;
  return 0;
}
}
 
 

powered by: WebSVN 2.1.0

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