From 515f297d71ce6eebb193025d7f6d54e214852f4f Mon Sep 17 00:00:00 2001
From: P. J. McDermott <pj@pehjota.net>
Date: Sat, 28 Jan 2017 15:54:15 -0500
Subject: dfmt(): New function

---
diff --git a/lib/decmath.js b/lib/decmath.js
index ad79ec5..98c33e5 100644
--- a/lib/decmath.js
+++ b/lib/decmath.js
@@ -112,9 +112,20 @@ function drhfz(a, p)
 	return as.substr(0, as.length - p) + "." + as.substr(as.length - p);
 }
 
+function dfmt(a, p)
+{
+	a = a.toString().split(".", 2);
+	if (a.length == 1) return null;
+	if (a[0] == "") a[0] = "0";
+	if (a[0] == "-") a[0] = "-0";
+	if (a[1].length < p) a[1] += Array(p - a[1].length + 1).join("0");
+	return a.join(".");
+}
+
 if (typeof global != "undefined") {
 	global.dadd = dadd;
 	global.dmul = dmul;
 	global.drhtz = drhtz;
 	global.drhfz = drhfz;
+	global.dfmt = dfmt;
 }
--
cgit v0.9.1