1 files changed, 40 insertions, 0 deletions
diff --git a/libc/misc/internals/ltoa.c b/libc/misc/internals/ltoa.c
new file mode 100644
index 000000000..da8b6d3df
--- /dev/null
+++ b/libc/misc/internals/ltoa.c
@@ -0,0 +1,40 @@
+/* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk>
+ * This file is part of the Linux-8086 C library and is distributed
+ * under the GNU Library General Public License.
+ */
+
+static char buf[12];
+
+extern char *ultoa();
+
+char *ltoa(val)
+long val;
+{
+	char *p;
+	int flg = 0;
+
+	if (val < 0) {
+		flg++;
+		val = -val;
+	}
+	p = ultoa(val);
+	if (flg)
+		*--p = '-';
+	return p;
+}
+
+char *ultoa(val)
+unsigned long val;
+{
+	char *p;
+
+	p = buf + sizeof(buf);
+	*--p = '\0';
+
+	do {
+		*--p = '0' + val % 10;
+		val /= 10;
+	}
+	while (val);
+	return p;
+}