Subversion Repositories openrisc_me

/* Sparc w/128-bit long double bombed on this because even though

/* Sparc w/128-bit long double bombed on this because even though

   the trunctfdf libcall passed the long double by reference, the

   the trunctfdf libcall passed the long double by reference, the

   libcall was still marked as LCT_CONST instead of LCT_PURE.  */

   libcall was still marked as LCT_CONST instead of LCT_PURE.  */

double *copy(long double *first, long double *last, double *result)

double *copy(long double *first, long double *last, double *result)

{

{

        int n;

        int n;

        for (n = last - first; n > 0; --n) {

        for (n = last - first; n > 0; --n) {

                *result = *first;

                *result = *first;

                ++first;

                ++first;

                ++result;

                ++result;

        }

        }

        return result;

        return result;

}

}