This commit was manufactured by cvs2svn to create branch

'gcc-3_2-branch'.

From-SVN: r57578

diff --git a/gcc/testsuite/gcc.c-torture/compile/trunctfdf.c b/gcc/testsuite/gcc.c-torture/compile/trunctfdf.c
new file mode 100644 (file)
index 0000000..29d6ed0
--- /dev/null
+++ b/gcc/testsuite/gcc.c-torture/compile/trunctfdf.c
@@ -0,0 +1,14 @@
+/* Sparc w/128-bit long double bombed on this because even though
+   the trunctfdf libcall passed the long double by reference, the
+   libcall was still marked as LCT_CONST instead of LCT_PURE.  */
+
+double *copy(long double *first, long double *last, double *result)
+{
+       int n;
+       for (n = last - first; n > 0; --n) {
+               *result = *first;
+               ++first;
+               ++result;
+       }
+       return result;
+}