BSD 4_4_Lite1 release

[unix-history] / usr / src / sys / sparc / include / stdarg.h

diff --git a/usr/src/sys/sparc/include/stdarg.h b/usr/src/sys/sparc/include/stdarg.h
index 7b4474f..9f0e1f4 100644 (file)
--- a/usr/src/sys/sparc/include/stdarg.h
+++ b/usr/src/sys/sparc/include/stdarg.h
@@ -1,6 +1,6 @@
 /*
 /*

- * Copyright (c) 1992 The Regents of the University of California.
- * All rights reserved.
+ * Copyright (c) 1992, 1993
+ *     The Regents of the University of California.  All rights reserved.

  *
  * This software was developed by the Computer Systems Engineering group
  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
  *
  * This software was developed by the Computer Systems Engineering group
  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and


@@ -9,13 +9,39 @@
  * All advertising materials mentioning features or use of this software
  * must display the following acknowledgement:
  *     This product includes software developed by the University of
  * All advertising materials mentioning features or use of this software
  * must display the following acknowledgement:
  *     This product includes software developed by the University of

- *     California, Lawrence Berkeley Laboratories.
+ *     California, Lawrence Berkeley Laboratory.

  *
  *

- * %sccs.include.redist.c%
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.

  *
  *

- *     @(#)stdarg.h    7.2 (Berkeley) %G%
+ *     @(#)stdarg.h    8.2 (Berkeley) 9/27/93

  *
  *

- * from: $Header: stdarg.h,v 1.5 92/06/17 06:10:29 torek Exp $
+ * from: $Header: stdarg.h,v 1.9 93/09/27 21:12:38 torek Exp $

  */
 
 /*
  */
 
 /*


@@ -34,17 +60,57 @@ typedef char *va_list;
  *
  * va_end cleans up after va_start.  There is nothing to do there.
  */
  *
  * va_end cleans up after va_start.  There is nothing to do there.
  */

+#ifdef __GCC_NEW_VARARGS__     /* gcc 2.4.5 */
+#define va_start(ap, l)        ((ap) = (char *)__builtin_saveregs())
+#else                          /* gcc 2.3.3 */

 #define va_start(ap, l)        (__builtin_saveregs(), \
 #define va_start(ap, l)        (__builtin_saveregs(), \

-                        ap = (char *)__builtin_next_arg())
+                        (ap) = (char *)__builtin_next_arg())
+#endif

 #define va_end(ap)     /* empty */
 
 #define va_end(ap)     /* empty */
 

+#if __GNUC__ == 1
+#define __extension__  /* hack for bootstrapping via gcc 1.x */
+#endif
+

 /*
 /*

- * va_arg picks up the next argument of type `t'.  Appending an
- * asterisk to t must produce a pointer to t (i.e., t may not be,
- * e.g., `int (*)()').  In addition, t must not be any type which
+ * va_arg picks up the next argument of type `ty'.  Appending an
+ * asterisk to ty must produce a pointer to ty (i.e., ty may not be,
+ * e.g., `int (*)()').  In addition, ty must not be any type which

  * undergoes promotion to some other type (e.g., char): it must
  * be the promoted type instead.
  * undergoes promotion to some other type (e.g., char): it must
  * be the promoted type instead.

+ *
+ * Gcc-2.x tries to use ldd/std for double and quad_t values, but Sun's
+ * brain-damaged calling convention does not quad-align these.  Thus,
+ * for 8-byte arguments, we have to pick up the actual value four bytes
+ * at a time, and use type punning (i.e., a union) to produce the result.
+ * (We could also do this with a libc function, actually, by returning
+ * 8 byte integers in %o0+%o1 and the same 8 bytes as a double in %f0+%f1.)
+ *
+ * Note: we cannot use the union trick (which generates better code) for
+ * C++, since `ty' might be a type with a constructor (these may not appear
+ * in a union).
+ *
+ * The extraneous casts through `void *' avoid gcc alignment warnings.

  */
  */

-#define va_arg(ap, t)  (((t *)(ap += sizeof(t)))[-1])
+#ifdef __cplusplus
+#define        __va_8byte(ap, ty) ({ \
+       int __va_i[2]; \
+       __va_i[0] = ((int *)(void *)(ap))[0]; \
+       __va_i[1] = ((int *)(void *)(ap))[1]; \
+       (ap) += 8; *(ty *)(void *)__va_i; })
+#else
+#define        __va_8byte(ap, ty) ({ \
+       union { ty __d; int __i[2]; } __va_u; \
+       __va_u.__i[0] = ((int *)(void *)(ap))[0]; \
+       __va_u.__i[1] = ((int *)(void *)(ap))[1]; \
+       (ap) += 8; __va_u.__d; })
+#endif /* __cplusplus */
+
+#define va_arg(ap, ty) __extension__ ({ \
+    ty __va_temp; /* to check for invisible-ptr struct-valued args */ \
+    __builtin_classify_type(__va_temp) >= 12 ? \
+       ((ty **)(void *)((ap) += sizeof(ty *)))[-1][0] : \
+    sizeof(ty) == 8 ? __va_8byte(ap, ty) : \
+       ((ty *)(void *)(ap += sizeof(ty)))[-1]; })

 
 #endif /* _MACHINE_STDARG_H */
 
 #endif /* _MACHINE_STDARG_H */