summaryrefslogtreecommitdiffstats
path: root/compiler-rt/lib/ppc/gcc_qdiv.c
diff options
context:
space:
mode:
authorAlexey Samsonov <samsonov@google.com>2014-02-14 09:20:33 +0000
committerAlexey Samsonov <samsonov@google.com>2014-02-14 09:20:33 +0000
commita6b264b51d4fa786d9df659621fc1ffad1fdc5d0 (patch)
tree416fdf341f03ee1f373907f65ce054afc40d7ab1 /compiler-rt/lib/ppc/gcc_qdiv.c
parent0b28ea9c471308faf04b4b6695c9f016aabea49a (diff)
downloadbcm5719-llvm-a6b264b51d4fa786d9df659621fc1ffad1fdc5d0.tar.gz
bcm5719-llvm-a6b264b51d4fa786d9df659621fc1ffad1fdc5d0.zip
Move original compiler-rt functions (libgcc replacement) to lib/builtins directory
llvm-svn: 201393
Diffstat (limited to 'compiler-rt/lib/ppc/gcc_qdiv.c')
-rw-r--r--compiler-rt/lib/ppc/gcc_qdiv.c55
1 files changed, 0 insertions, 55 deletions
diff --git a/compiler-rt/lib/ppc/gcc_qdiv.c b/compiler-rt/lib/ppc/gcc_qdiv.c
deleted file mode 100644
index 70aa00b6440..00000000000
--- a/compiler-rt/lib/ppc/gcc_qdiv.c
+++ /dev/null
@@ -1,55 +0,0 @@
-/* This file is distributed under the University of Illinois Open Source
- * License. See LICENSE.TXT for details.
- */
-
-/* long double __gcc_qdiv(long double x, long double y);
- * This file implements the PowerPC 128-bit double-double division operation.
- * This implementation is shamelessly cribbed from Apple's DDRT, circa 1993(!)
- */
-
-#include "DD.h"
-
-long double __gcc_qdiv(long double a, long double b)
-{
- static const uint32_t infinityHi = UINT32_C(0x7ff00000);
- DD dst = { .ld = a }, src = { .ld = b };
-
- register double x = dst.s.hi, x1 = dst.s.lo,
- y = src.s.hi, y1 = src.s.lo;
-
- double yHi, yLo, qHi, qLo;
- double yq, tmp, q;
-
- q = x / y;
-
- /* Detect special cases */
- if (q == 0.0) {
- dst.s.hi = q;
- dst.s.lo = 0.0;
- return dst.ld;
- }
-
- const doublebits qBits = { .d = q };
- if (((uint32_t)(qBits.x >> 32) & infinityHi) == infinityHi) {
- dst.s.hi = q;
- dst.s.lo = 0.0;
- return dst.ld;
- }
-
- yHi = high26bits(y);
- qHi = high26bits(q);
-
- yq = y * q;
- yLo = y - yHi;
- qLo = q - qHi;
-
- tmp = LOWORDER(yq, yHi, yLo, qHi, qLo);
- tmp = (x - yq) - tmp;
- tmp = ((tmp + x1) - y1 * q) / y;
- x = q + tmp;
-
- dst.s.lo = (q - x) + tmp;
- dst.s.hi = x;
-
- return dst.ld;
-}
OpenPOWER on IntegriCloud