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.target/] [x86_64/] [abi/] [test_varargs.c] - Diff between revs 149 and 154

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 149 Rev 154
/* Test variable number of arguments passed to functions. For now this is
/* Test variable number of arguments passed to functions. For now this is
   just a simple test to see if it's working.  */
   just a simple test to see if it's working.  */
 
 
#include <stdarg.h>
#include <stdarg.h>
#include "defines.h"
#include "defines.h"
 
 
 
 
#define ARG_INT     1
#define ARG_INT     1
#define ARG_DOUBLE  2
#define ARG_DOUBLE  2
#define ARG_POINTER 3
#define ARG_POINTER 3
 
 
union types
union types
{
{
  int ivalue;
  int ivalue;
  double dvalue;
  double dvalue;
  void *pvalue;
  void *pvalue;
};
};
 
 
struct arg
struct arg
{
{
  int type;
  int type;
  union types value;
  union types value;
};
};
 
 
struct arg *arglist;
struct arg *arglist;
 
 
/* This tests the argumentlist to see if it matches the format string which
/* This tests the argumentlist to see if it matches the format string which
   is printf-like. Nothing will be printed of course. It can handle ints,
   is printf-like. Nothing will be printed of course. It can handle ints,
   doubles and void pointers. The given value will be tested against the
   doubles and void pointers. The given value will be tested against the
   values given in arglist.
   values given in arglist.
   This test only assures that the variable argument passing is working.
   This test only assures that the variable argument passing is working.
   No attempt is made to see if argument passing is done the right way.
   No attempt is made to see if argument passing is done the right way.
   Since the ABI doesn't say how it's done, checking this is not really
   Since the ABI doesn't say how it's done, checking this is not really
   relevant.  */
   relevant.  */
void
void
my_noprintf (char *format, ...)
my_noprintf (char *format, ...)
{
{
  va_list va_arglist;
  va_list va_arglist;
  char *c;
  char *c;
 
 
  int ivalue;
  int ivalue;
  double dvalue;
  double dvalue;
  void *pvalue;
  void *pvalue;
  struct arg *argp = arglist;
  struct arg *argp = arglist;
 
 
  va_start (va_arglist, format);
  va_start (va_arglist, format);
  for (c = format; *c; c++)
  for (c = format; *c; c++)
    if (*c == '%')
    if (*c == '%')
      {
      {
        switch (*++c)
        switch (*++c)
          {
          {
          case 'd':
          case 'd':
            assert (argp->type == ARG_INT);
            assert (argp->type == ARG_INT);
            ivalue = va_arg (va_arglist, int);
            ivalue = va_arg (va_arglist, int);
            assert (argp->value.ivalue == ivalue);
            assert (argp->value.ivalue == ivalue);
            break;
            break;
          case 'f':
          case 'f':
            assert (argp->type == ARG_DOUBLE);
            assert (argp->type == ARG_DOUBLE);
            dvalue = va_arg (va_arglist, double);
            dvalue = va_arg (va_arglist, double);
            assert (argp->value.dvalue == dvalue);
            assert (argp->value.dvalue == dvalue);
            break;
            break;
          case 'p':
          case 'p':
            assert (argp->type == ARG_POINTER);
            assert (argp->type == ARG_POINTER);
            pvalue = va_arg (va_arglist, void *);
            pvalue = va_arg (va_arglist, void *);
            assert (argp->value.pvalue == pvalue);
            assert (argp->value.pvalue == pvalue);
            break;
            break;
          default:
          default:
            abort ();
            abort ();
          }
          }
 
 
        argp++;
        argp++;
      }
      }
}
}
 
 
int
int
main (void)
main (void)
{
{
#ifdef CHECK_VARARGS
#ifdef CHECK_VARARGS
  struct arg al[5];
  struct arg al[5];
 
 
  al[0].type = ARG_INT;
  al[0].type = ARG_INT;
  al[0].value.ivalue = 256;
  al[0].value.ivalue = 256;
  al[1].type = ARG_DOUBLE;
  al[1].type = ARG_DOUBLE;
  al[1].value.dvalue = 257.0;
  al[1].value.dvalue = 257.0;
  al[2].type = ARG_POINTER;
  al[2].type = ARG_POINTER;
  al[2].value.pvalue = al;
  al[2].value.pvalue = al;
  al[3].type = ARG_DOUBLE;
  al[3].type = ARG_DOUBLE;
  al[3].value.dvalue = 258.0;
  al[3].value.dvalue = 258.0;
  al[4].type = ARG_INT;
  al[4].type = ARG_INT;
  al[4].value.ivalue = 259;
  al[4].value.ivalue = 259;
 
 
  arglist = al;
  arglist = al;
  my_noprintf("%d%f%p%f%d", 256, 257.0, al, 258.0, 259);
  my_noprintf("%d%f%p%f%d", 256, 257.0, al, 258.0, 259);
#endif
#endif
 
 
  return 0;
  return 0;
}
}
 
 

powered by: WebSVN 2.1.0

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