Skip to content

R
riscv-gcc-1
Commit 8411a903 by Richard Henderson Committed by Richard Henderson
Options

stdarg.h, varargs.h: Implement in terms of builtin functions and types. 

        * ginclude/stdarg.h, ginclude/varargs.h: Implement in
        terms of builtin functions and types.

From-SVN: r29416
parent 514066a1
Showing with 34 additions and 245 deletions
gcc/ChangeLog
Tue Sep 14 16:30:16 1999 Richard Henderson <rth@cygnus.com>
* ginclude/stdarg.h, ginclude/varargs.h: Implement in
terms of builtin functions and types.
* mips.c (mips_build_va_list): New.
(mips_va_start, mips_va_arg): New.
* mips.h (BUILD_VA_LIST_TYPE): New.
(EXPAND_BUILTIN_VA_START, EXPAND_BUILTIN_VA_ARG): New.
* sh.c (sh_builtin_saveregs): Use get_varargs_alias_set.
(sh_build_va_list, sh_va_start, sh_va_arg): New.
* sh.h (BUILD_VA_LIST_TYPE): New.
(EXPAND_BUILTIN_VA_START, EXPAND_BUILTIN_VA_ARG): New.
Tue Sep 14 16:20:24 1999 Richard Henderson <rth@cygnus.com> Tue Sep 14 16:20:24 1999 Richard Henderson <rth@cygnus.com>
* recog.h (struct recog_data): Make dup_num, operand_address_p, * recog.h (struct recog_data): Make dup_num, operand_address_p,
......
gcc/ginclude/stdarg.h
/* stdarg.h for GNU. /* stdarg.h for GNU.
Note that the type used in va_arg is supposed to match the Note that the type used in va_arg is supposed to match the
actual type **after default promotions**. actual type **after default promotions**.
Thus, va_arg (..., short) is not valid. */ Thus, va_arg (..., short) is not valid. */
...@@ -11,135 +12,23 @@ ...@@ -11,135 +12,23 @@
#endif /* not __need___va_list */ #endif /* not __need___va_list */
#undef __need___va_list #undef __need___va_list
#ifdef __clipper__
#include "va-clipper.h"
#else
#ifdef __m88k__
#include "va-m88k.h"
#else
#ifdef __i860__
#include "va-i860.h"
#else
#ifdef __hppa__
#include "va-pa.h"
#else
#ifdef __mips__
#include "va-mips.h"
#else
#ifdef __sparc__
#include "va-sparc.h"
#else
#ifdef __i960__
#include "va-i960.h"
#else
#ifdef __alpha__
#include "va-alpha.h"
#else
#if defined (__H8300__) || defined (__H8300H__) || defined (__H8300S__)
#include "va-h8300.h"
#else
#if defined (__PPC__) && (defined (_CALL_SYSV) || defined (_WIN32))
#include "va-ppc.h"
#else
#ifdef __arc__
#include "va-arc.h"
#else
#ifdef __M32R__
#include "va-m32r.h"
#else
#ifdef __sh__
#include "va-sh.h"
#else
#ifdef __mn10300__
#include "va-mn10300.h"
#else
#ifdef __mn10200__
#include "va-mn10200.h"
#else
#ifdef __v850__
#include "va-v850.h"
#else
#if defined (_TMS320C4x) || defined (_TMS320C3x)
#include <va-c4x.h>
#else
/* Define __gnuc_va_list. */ /* Define __gnuc_va_list. */
#ifndef __GNUC_VA_LIST #ifndef __GNUC_VA_LIST
#define __GNUC_VA_LIST #define __GNUC_VA_LIST
#if defined(__svr4__) || defined(_AIX) || defined(_M_UNIX) || defined(__NetBSD__) typedef __builtin_va_list __gnuc_va_list;
typedef char *__gnuc_va_list;
#else
typedef void *__gnuc_va_list;
#endif
#endif #endif
/* Define the standard macros for the user, /* Define the standard macros for the user,
if this invocation was from the user program. */ if this invocation was from the user program. */
#ifdef _STDARG_H #ifdef _STDARG_H
/* Amount of space required in an argument list for an arg of type TYPE. #define va_start(v,l) __builtin_stdarg_start(&(v),l)
TYPE may alternatively be an expression whose type is used. */ #define va_end __builtin_va_end
#define va_arg __builtin_va_arg
#if defined(sysV68) #define va_copy(d,s) __builtin_va_copy(&(d),(s))
#define __va_rounded_size(TYPE) \
(((sizeof (TYPE) + sizeof (short) - 1) / sizeof (short)) * sizeof (short))
#elif defined(_AIX)
#define __va_rounded_size(TYPE) \
(((sizeof (TYPE) + sizeof (long) - 1) / sizeof (long)) * sizeof (long))
#else
#define __va_rounded_size(TYPE) \
(((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
#endif
#define va_start(AP, LASTARG) \
(AP = ((__gnuc_va_list) __builtin_next_arg (LASTARG)))
#undef va_end
void va_end (__gnuc_va_list); /* Defined in libgcc.a */
#define va_end(AP) ((void)0)
/* We cast to void * and then to TYPE * because this avoids
a warning about increasing the alignment requirement. */
#if (defined (__arm__) && ! defined (__ARMEB__)) || defined (__i386__) || defined (__i860__) || defined (__ns32000__) || defined (__vax__)
/* This is for little-endian machines; small args are padded upward. */
#define va_arg(AP, TYPE) \
(AP = (__gnuc_va_list) ((char *) (AP) + __va_rounded_size (TYPE)), \
*((TYPE *) (void *) ((char *) (AP) - __va_rounded_size (TYPE))))
#else /* big-endian */
/* This is for big-endian machines; small args are padded downward. */
#define va_arg(AP, TYPE) \
(AP = (__gnuc_va_list) ((char *) (AP) + __va_rounded_size (TYPE)), \
*((TYPE *) (void *) ((char *) (AP) \
- ((sizeof (TYPE) < __va_rounded_size (char) \
? sizeof (TYPE) : __va_rounded_size (TYPE))))))
#endif /* big-endian */
/* Copy __gnuc_va_list into another variable of this type. */
#define __va_copy(dest, src) (dest) = (src)
#endif /* _STDARG_H */
#endif /* not TMS320C3x or TMS320C4x */
#endif /* not v850 */
#endif /* not mn10200 */
#endif /* not mn10300 */
#endif /* not sh */
#endif /* not m32r */
#endif /* not arc */
#endif /* not powerpc with V.4 calling sequence */
#endif /* not h8300 */
#endif /* not alpha */
#endif /* not i960 */
#endif /* not sparc */
#endif /* not mips */
#endif /* not hppa */
#endif /* not i860 */
#endif /* not m88k */
#endif /* not clipper */
#ifdef _STDARG_H
/* Define va_list, if desired, from __gnuc_va_list. */ /* Define va_list, if desired, from __gnuc_va_list. */
/* We deliberately do not define va_list when called from /* We deliberately do not define va_list when called from
stdio.h, because ANSI C says that stdio.h is not supposed to define stdio.h, because ANSI C says that stdio.h is not supposed to define
......
gcc/ginclude/varargs.h
...@@ -3,64 +3,6 @@ ...@@ -3,64 +3,6 @@
#ifndef _VARARGS_H #ifndef _VARARGS_H
#define _VARARGS_H #define _VARARGS_H
#ifdef __sparc__
#include "va-sparc.h"
#else
#ifdef __spur__
#include "va-spur.h"
#else
#ifdef __mips__
#include "va-mips.h"
#else
#ifdef __i860__
#include "va-i860.h"
#else
#ifdef __pyr__
#include "va-pyr.h"
#else
#ifdef __clipper__
#include "va-clipper.h"
#else
#ifdef __m88k__
#include "va-m88k.h"
#else
#if defined(__hppa__) || defined(hp800)
#include "va-pa.h"
#else
#ifdef __i960__
#include "va-i960.h"
#else
#ifdef __alpha__
#include "va-alpha.h"
#else
#if defined (__H8300__) || defined (__H8300H__) || defined (__H8300S__)
#include "va-h8300.h"
#else
#if defined (__PPC__) && (defined (_CALL_SYSV) || defined (_WIN32))
#include "va-ppc.h"
#else
#ifdef __arc__
#include "va-arc.h"
#else
#ifdef __M32R__
#include "va-m32r.h"
#else
#ifdef __sh__
#include "va-sh.h"
#else
#ifdef __mn10300__
#include "va-mn10300.h"
#else
#ifdef __mn10200__
#include "va-mn10200.h"
#else
#ifdef __v850__
#include "va-v850.h"
#else
#if defined (_TMS320C4x) || defined (_TMS320C3x)
#include <va-c4x.h>
#else
#ifdef __NeXT__ #ifdef __NeXT__
/* On Next, erase any vestiges of stdarg.h. */ /* On Next, erase any vestiges of stdarg.h. */
...@@ -75,91 +17,32 @@ ...@@ -75,91 +17,32 @@
#undef va_list #undef va_list
#undef va_start #undef va_start
#undef va_end #undef va_end
#undef __va_rounded_size
#undef va_arg #undef va_arg
#endif /* __NeXT__ */ #endif /* __NeXT__ */
/* In GCC version 2, we want an ellipsis at the end of the declaration
of the argument list. GCC version 1 can't parse it. */
#if __GNUC__ > 1
#define __va_ellipsis ...
#else
#define __va_ellipsis
#endif
/* These macros implement traditional (non-ANSI) varargs /* These macros implement traditional (non-ANSI) varargs
for GNU C. */ for GNU C. */
#define va_alist __builtin_va_alist #define va_alist __builtin_va_alist
/* The ... causes current_function_varargs to be set in cc1. */
/* ??? We don't process attributes correctly in K&R argument context. */ /* ??? We don't process attributes correctly in K&R argument context. */
typedef int __builtin_va_alist_t __attribute__((__mode__(__word__))); typedef int __builtin_va_alist_t __attribute__((__mode__(__word__)));
#define va_dcl __builtin_va_alist_t __builtin_va_alist; __va_ellipsis
/* Define __gnuc_va_list, just as in gstdarg.h. */ /* ??? It would be nice to get rid of the ellipsis here. It causes
current_function_varargs to be set in cc1. */
#define va_dcl __builtin_va_alist_t __builtin_va_alist; ...
/* Define __gnuc_va_list, just as in stdarg.h. */
#ifndef __GNUC_VA_LIST #ifndef __GNUC_VA_LIST
#define __GNUC_VA_LIST #define __GNUC_VA_LIST
#if defined(__svr4__) || defined(_AIX) || defined(_M_UNIX) typedef __builtin_va_list __gnuc_va_list;
typedef char *__gnuc_va_list;
#else
typedef void *__gnuc_va_list;
#endif #endif
#endif
#define va_start(AP) AP=(char *) &__builtin_va_alist
#define va_end(AP) ((void)0)
#if defined(sysV68) #define va_start(v) __builtin_varargs_start(&(v))
#define __va_rounded_size(TYPE) \ #define va_end __builtin_va_end
(((sizeof (TYPE) + sizeof (short) - 1) / sizeof (short)) * sizeof (short)) #define va_arg __builtin_va_arg
#elif defined(_AIX) #define __va_copy(d,s) __builtin_va_copy(&(d),(s))
#define __va_rounded_size(TYPE) \
(((sizeof (TYPE) + sizeof (long) - 1) / sizeof (long)) * sizeof (long))
#else
#define __va_rounded_size(TYPE) \
(((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
#endif
#if (defined (__arm__) && ! defined (__ARMEB__)) || defined (__i386__) || defined (__i860__) || defined (__ns32000__) || defined (__vax__)
/* This is for little-endian machines; small args are padded upward. */
#define va_arg(AP, TYPE) \
(AP = (__gnuc_va_list) ((char *) (AP) + __va_rounded_size (TYPE)), \
*((TYPE *) (void *) ((char *) (AP) - __va_rounded_size (TYPE))))
#else /* big-endian */
/* This is for big-endian machines; small args are padded downward. */
#define va_arg(AP, TYPE) \
(AP = (__gnuc_va_list) ((char *) (AP) + __va_rounded_size (TYPE)), \
*((TYPE *) (void *) ((char *) (AP) \
- ((sizeof (TYPE) < __va_rounded_size (char) \
? sizeof (TYPE) : __va_rounded_size (TYPE))))))
#endif /* big-endian */
/* Copy __gnuc_va_list into another variable of this type. */
#define __va_copy(dest, src) (dest) = (src)
#endif /* not TMS320C3x or TMS320C4x */
#endif /* not v850 */
#endif /* not mn10200 */
#endif /* not mn10300 */
#endif /* not sh */
#endif /* not m32r */
#endif /* not arc */
#endif /* not powerpc with V.4 calling sequence */
#endif /* not h8300 */
#endif /* not alpha */
#endif /* not i960 */
#endif /* not hppa */
#endif /* not m88k */
#endif /* not clipper */
#endif /* not pyr */
#endif /* not i860 */
#endif /* not mips */
#endif /* not spur */
#endif /* not sparc */
#endif /* not _VARARGS_H */
/* Define va_list from __gnuc_va_list. */ /* Define va_list from __gnuc_va_list. */
...@@ -227,3 +110,5 @@ typedef __gnuc_va_list va_list; ...@@ -227,3 +110,5 @@ typedef __gnuc_va_list va_list;
#ifdef _BSD_VA_LIST #ifdef _BSD_VA_LIST
#undef _BSD_VA_LIST #undef _BSD_VA_LIST
#endif #endif
#endif /* _VARARGS_H */
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment