summaryrefslogtreecommitdiff
path: root/newlib/libc/stdlib/__adjust.c
diff options
context:
space:
mode:
authorPikalaxALT <pikalaxalt@gmail.com>2017-12-15 09:38:53 -0500
committerPikalaxALT <pikalaxalt@gmail.com>2017-12-15 09:39:34 -0500
commitf95a4a932476be2ba99e2fd081e8d2bc6ea12813 (patch)
tree75f67192cb2d7b7b575c94edda318e475239b63c /newlib/libc/stdlib/__adjust.c
parentf60aca96985e68c7d8a52eb7bc955fb80e132f73 (diff)
Import newlib and create makefile
Diffstat (limited to 'newlib/libc/stdlib/__adjust.c')
-rw-r--r--newlib/libc/stdlib/__adjust.c44
1 files changed, 44 insertions, 0 deletions
diff --git a/newlib/libc/stdlib/__adjust.c b/newlib/libc/stdlib/__adjust.c
new file mode 100644
index 0000000..d5c7075
--- /dev/null
+++ b/newlib/libc/stdlib/__adjust.c
@@ -0,0 +1,44 @@
+/*
+ * return (*acc) scaled by 10**dexp.
+ */
+
+#include <_ansi.h>
+#include <reent.h>
+#include "std.h"
+
+#define abs(x) (((x) < 0) ? -(x) : (x))
+
+double
+_DEFUN (__adjust, (ptr, acc, dexp, sign),
+ struct _reent *ptr _AND
+ double *acc _AND
+ int dexp _AND
+ int sign)
+ /* *acc the 64 bit accumulator */
+ /* dexp decimal exponent */
+ /* sign sign flag */
+{
+ double r;
+
+ if (dexp > MAXE)
+ {
+ ptr->_errno = ERANGE;
+ return (sign) ? -HUGE_VAL : HUGE_VAL;
+ }
+ else if (dexp < MINE)
+ {
+ ptr->_errno = ERANGE;
+ return 0.0;
+ }
+
+ r = *acc;
+ if (sign)
+ r = -r;
+ if (dexp == 0)
+ return r;
+
+ if (dexp < 0)
+ return r / __exp10 (abs (dexp));
+ else
+ return r * __exp10 (dexp);
+}