From 48ef7704c03e7e554c05de01bf8d1d70c16cb6f4 Mon Sep 17 00:00:00 2001
From: ProjectRevoTPP <projectrevotpp@hotmail.com>
Date: Wed, 20 Dec 2017 16:34:35 -0500
Subject: add libc building to agbcc.

---
 libc/stdlib/__exp10.c | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 libc/stdlib/__exp10.c

(limited to 'libc/stdlib/__exp10.c')

diff --git a/libc/stdlib/__exp10.c b/libc/stdlib/__exp10.c
new file mode 100644
index 0000000..9673623
--- /dev/null
+++ b/libc/stdlib/__exp10.c
@@ -0,0 +1,29 @@
+/*
+ * compute 10**x by successive squaring.
+ */
+
+#include <_ansi.h>
+
+double
+_DEFUN (__exp10, (x),
+	unsigned x)
+{
+  static _CONST double powtab[] =
+  {1.0,
+   10.0,
+   100.0,
+   1000.0,
+   10000.0};
+
+  if (x < (sizeof (powtab) / sizeof (double)))
+      return powtab[x];
+  else if (x & 1)
+    {
+      return 10.0 * __exp10 (x - 1);
+    }
+  else
+    {
+      double n = __exp10 (x / 2);
+      return n * n;
+    }
+}
-- 
cgit v1.2.3