OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gcc.dg/] [compat/] [fnptr-by-value-1_x.c] - Diff between revs 298 and 384

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

Rev 298 Rev 384 
#include "compat-common.h"
 
#include "compat-common.h"
 
 
 
 
 
#ifdef SKIP_VA
 
#ifdef SKIP_VA
 
const int test_va = 0;
 
const int test_va = 0;
 
#else
 
#else
 
const int test_va = 1;
 
const int test_va = 1;
 
#endif
 
#endif
 
 
 
 
 
typedef void (*fpi)(int);
 
typedef void (*fpi)(int);
 
typedef void (*fpd)(double);
 
typedef void (*fpd)(double);
 
 
 
 
 
extern void test1a (fpi);
 
extern void test1a (fpi);
 
extern void test1b (fpi, int);
 
extern void test1b (fpi, int);
 
extern void test1c (double, fpd);
 
extern void test1c (double, fpd);
 
extern void test2a (fpi, fpd);
 
extern void test2a (fpi, fpd);
 
extern void test2b (fpi, fpd, int);
 
extern void test2b (fpi, fpd, int);
 
extern void test2c (fpi, int, fpd);
 
extern void test2c (fpi, int, fpd);
 
extern void test2d (int, fpi, fpd);
 
extern void test2d (int, fpi, fpd);
 
extern void test2e (fpi, fpd, int, double);
 
extern void test2e (fpi, fpd, int, double);
 
extern void test2f (fpi, int, fpd, double);
 
extern void test2f (fpi, int, fpd, double);
 
extern void test2g (fpi, int, double, fpd);
 
extern void test2g (fpi, int, double, fpd);
 
extern void test2h (double, fpd, fpi, int);
 
extern void test2h (double, fpd, fpi, int);
 
extern void test2i (double, fpd, int, fpi);
 
extern void test2i (double, fpd, int, fpi);
 
extern void test2j (int, double, fpi, fpd);
 
extern void test2j (int, double, fpi, fpd);
 
extern void testva (int, ...);
 
extern void testva (int, ...);
 
 
 
 
 
int f1_val;
 
int f1_val;
 
double f2_val;
 
double f2_val;
 
 
 
 
 
void f1 (int i) { f1_val = i; }
 
void f1 (int i) { f1_val = i; }
 
void f2 (double x) { f2_val = x; }
 
void f2 (double x) { f2_val = x; }
 
 
 
 
 
void
 
void
 
checki (int x, int v)
 
checki (int x, int v)
 
{
 
{
 
  if (x != v)
 
  if (x != v)
 
    DEBUG_CHECK
 
    DEBUG_CHECK
 
}
 
}
 
 
 
 
 
void
 
void
 
checkd (double x, double v)
 
checkd (double x, double v)
 
{
 
{
 
  if (x != v)
 
  if (x != v)
 
    DEBUG_CHECK
 
    DEBUG_CHECK
 
}
 
}
 
 
 
 
 
void
 
void
 
testit (void)
 
testit (void)
 
{
 
{
 
  DEBUG_FPUTS ("test1a: ");
 
  DEBUG_FPUTS ("test1a: ");
 
  test1a (f1);
 
  test1a (f1);
 
  checki (f1_val, 1);
 
  checki (f1_val, 1);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test1b: ");
 
  DEBUG_FPUTS ("test1b: ");
 
  test1b (f1, 2);
 
  test1b (f1, 2);
 
  checki (f1_val, 2);
 
  checki (f1_val, 2);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test1c: ");
 
  DEBUG_FPUTS ("test1c: ");
 
  test1c (3.0, f2);
 
  test1c (3.0, f2);
 
  checkd (f2_val, 3.0);
 
  checkd (f2_val, 3.0);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2a: ");
 
  DEBUG_FPUTS ("test2a: ");
 
  test2a (f1, f2);
 
  test2a (f1, f2);
 
  checki (f1_val, 10);
 
  checki (f1_val, 10);
 
  checkd (f2_val, 10.0);
 
  checkd (f2_val, 10.0);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2b: ");
 
  DEBUG_FPUTS ("test2b: ");
 
  test2b (f1, f2, 11);
 
  test2b (f1, f2, 11);
 
  checki (f1_val, 11);
 
  checki (f1_val, 11);
 
  checkd (f2_val, 11.0);
 
  checkd (f2_val, 11.0);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2c: ");
 
  DEBUG_FPUTS ("test2c: ");
 
  test2c (f1, 12, f2);
 
  test2c (f1, 12, f2);
 
  checki (f1_val, 12);
 
  checki (f1_val, 12);
 
  checkd (f2_val, 12.0);
 
  checkd (f2_val, 12.0);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2d: ");
 
  DEBUG_FPUTS ("test2d: ");
 
  test2d (13, f1, f2);
 
  test2d (13, f1, f2);
 
  checki (f1_val, 13);
 
  checki (f1_val, 13);
 
  checkd (f2_val, 13.0);
 
  checkd (f2_val, 13.0);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2e: ");
 
  DEBUG_FPUTS ("test2e: ");
 
  test2e (f1, f2, 14, 15.0);
 
  test2e (f1, f2, 14, 15.0);
 
  checki (f1_val, 14);
 
  checki (f1_val, 14);
 
  checkd (f2_val, 15.0);
 
  checkd (f2_val, 15.0);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2f: ");
 
  DEBUG_FPUTS ("test2f: ");
 
  test2f (f1, 16, f2, 17.0);
 
  test2f (f1, 16, f2, 17.0);
 
  checki (f1_val, 16);
 
  checki (f1_val, 16);
 
  checkd (f2_val, 17.0);
 
  checkd (f2_val, 17.0);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2g: ");
 
  DEBUG_FPUTS ("test2g: ");
 
  test2g (f1, 18, 19.0, f2);
 
  test2g (f1, 18, 19.0, f2);
 
  checki (f1_val, 18);
 
  checki (f1_val, 18);
 
  checkd (f2_val, 19.0);
 
  checkd (f2_val, 19.0);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2h: ");
 
  DEBUG_FPUTS ("test2h: ");
 
  test2h (20.0, f2, f1, 21);
 
  test2h (20.0, f2, f1, 21);
 
  checkd (f2_val, 20.0);
 
  checkd (f2_val, 20.0);
 
  checki (f1_val, 21);
 
  checki (f1_val, 21);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2i: ");
 
  DEBUG_FPUTS ("test2i: ");
 
  test2i (22.0, f2, 23, f1);
 
  test2i (22.0, f2, 23, f1);
 
  checkd (f2_val, 22.0);
 
  checkd (f2_val, 22.0);
 
  checki (f1_val, 23);
 
  checki (f1_val, 23);
 
  DEBUG_NL;
 
  DEBUG_NL;
 
  DEBUG_FPUTS ("test2j: ");
 
  DEBUG_FPUTS ("test2j: ");
 
  test2j (24, 25.0, f1, f2);
 
  test2j (24, 25.0, f1, f2);
 
  checki (f1_val, 24);
 
  checki (f1_val, 24);
 
  checkd (f2_val, 25.0);
 
  checkd (f2_val, 25.0);
 
  if (test_va)
 
  if (test_va)
 
    {
 
    {
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("testva: ");
 
      DEBUG_FPUTS ("testva: ");
 
      testva (1, f1);
 
      testva (1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (2, f1, f1);
 
      testva (2, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (3, f1, f1, f1);
 
      testva (3, f1, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (4, f1, f1, f1, f1);
 
      testva (4, f1, f1, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (5, f1, f1, f1, f1, f1);
 
      testva (5, f1, f1, f1, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (6, f1, f1, f1, f1, f1, f1);
 
      testva (6, f1, f1, f1, f1, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (7, f1, f1, f1, f1, f1, f1, f1);
 
      testva (7, f1, f1, f1, f1, f1, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (8, f1, f1, f1, f1, f1, f1, f1, f1);
 
      testva (8, f1, f1, f1, f1, f1, f1, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (9, f1, f1, f1, f1, f1, f1, f1, f1, f1);
 
      testva (9, f1, f1, f1, f1, f1, f1, f1, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (10, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1);
 
      testva (10, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (11, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1);
 
      testva (11, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1);
 
      DEBUG_NL;
 
      DEBUG_NL;
 
      DEBUG_FPUTS ("        ");
 
      DEBUG_FPUTS ("        ");
 
      testva (12, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1);
 
      testva (12, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1, f1);
 
    }
 
    }
 
  DEBUG_NL;
 
  DEBUG_NL;
 
}
 
}
 
 
 
 
 
void
 
void
 
fnptr_by_value_1_x ()
 
fnptr_by_value_1_x ()
 
{
 
{
 
  DEBUG_INIT
 
  DEBUG_INIT
 
  testit ();
 
  testit ();
 
  DEBUG_FINI
 
  DEBUG_FINI
 
 
 
 
 
  if (fails != 0)
 
  if (fails != 0)
 
    abort ();
 
    abort ();
 
}
 
}
 
 
 
 

powered by: WebSVN 2.1.0

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