hoc: print exact floating point output
diff --git a/src/cmd/hoc/code.c b/src/cmd/hoc/code.c
index 1b9c351..e2d4c5e 100644
--- a/src/cmd/hoc/code.c
+++ b/src/cmd/hoc/code.c
@@ -598,7 +598,7 @@
 	if (s == 0)
 		s = install("_", VAR, 0.0);
 	d = pop();
-	print("%.12g\n", d.val);
+	print("%.17g\n", d.val);
 	s->u.val = d.val;
 }
 
@@ -607,7 +607,7 @@
 {
 	Datum d;
 	d = pop();
-	print("%.12g ", d.val);
+	print("%.17g ", d.val);
 }
 
 void