summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/lib/fprintreal.c
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/lib/fprintreal.c')
-rw-r--r--Build/source/texk/web2c/lib/fprintreal.c15
1 files changed, 0 insertions, 15 deletions
diff --git a/Build/source/texk/web2c/lib/fprintreal.c b/Build/source/texk/web2c/lib/fprintreal.c
deleted file mode 100644
index c65e4b277ff..00000000000
--- a/Build/source/texk/web2c/lib/fprintreal.c
+++ /dev/null
@@ -1,15 +0,0 @@
-/* fprintreal.c: print the real number R in the Pascal format N:M on the
- file F. Public domain. */
-
-#include <w2c/config.h>
-#include "lib.h"
-
-void
-fprintreal (FILE *f, double r, int n, int m)
-{
- char fmt[50]; /* Surely enough, since N and M won't be more than 25
- digits each! */
-
- sprintf (fmt, "%%%d.%dlf", n, m);
- fprintf (f, fmt, r);
-}