From 6102d5cfb3ad5ab7c54b9fc1d19c68ed171f458a Mon Sep 17 00:00:00 2001
From: rms <rms@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Thu, 12 Sep 1991 22:23:09 +0000
Subject: [PATCH] Initial revision
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@40 138bc75d-0d04-0410-961f-82ee72b054a4
---
gcc/ginclude/va-sparc.h | 42 +++++++++++++++++++++++++++++++++++++++++
1 file changed, 42 insertions(+)
create mode 100644 gcc/ginclude/va-sparc.h
diff --git a/gcc/ginclude/va-sparc.h b/gcc/ginclude/va-sparc.h
new file mode 100644
index 000000000000..f60f1e522de5
--- /dev/null
+++ b/gcc/ginclude/va-sparc.h
@@ -0,0 +1,42 @@
+/* This is just like the default gvarargs.h
+ except for differences decribed below. */
+
+/* Make this a macro rather than a typedef, so we can undef any other defn. */
+#define va_list __va___list
+/* This has to be a char * to be compatible with Sun.
+ i.e., we have to pass a `va_list' to vsprintf. */
+typedef char * __va___list;
+
+/* 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
+
+#define va_alist __builtin_va_alist
+/* The ... causes current_function_varargs to be set in cc1. */
+#define va_dcl int __builtin_va_alist; __va_ellipsis
+
+/* The difference is to store the stack address in both components
+ instead of in AP itself. */
+#define va_start(AP) \
+ (__builtin_saveregs (), (AP) = ((char *) &__builtin_va_alist))
+#define va_end(pvar)
+
+#define __va_rounded_size(TYPE) \
+ (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
+
+/* RECORD_TYPE args passed using the C calling convention are
+ passed by invisible reference. ??? RECORD_TYPE args passed
+ in the stack are made to be word-aligned; for an aggregate that is
+ not word-aligned, we advance the pointer to the first non-reg slot. */
+#define va_arg(pvar,TYPE) \
+({ TYPE __va_temp; \
+ ((__builtin_classify_type (__va_temp) >= 12) \
+ ? ((pvar) += __va_rounded_size (TYPE *), \
+ **(TYPE **) (pvar) - __va_rounded_size (TYPE *)) \
+ : ((pvar) += __va_rounded_size (TYPE), \
+ *((TYPE *) ((pvar) - __va_rounded_size (TYPE)))));})
--
GitLab