summaryrefslogtreecommitdiff
path: root/src/scheme/ao_scheme_float.c
diff options
context:
space:
mode:
authorBdale Garbee <bdale@gag.com>2017-12-11 10:16:24 -0700
committerBdale Garbee <bdale@gag.com>2017-12-11 10:16:24 -0700
commitd1d98e408311c5ba18138a18f4c88448e4254626 (patch)
treeccf9c77fdf355f51911cc77b0dcf5a241d39f77e /src/scheme/ao_scheme_float.c
parent2f8fce1cf6ce4bd12a836cc8ee15f4edbc95c95e (diff)
parentabb856cd66e00d739e4efb1930b5c168eaf48029 (diff)
Merge branch 'master' of ssh://git.gag.com/scm/git/fw/altos
Diffstat (limited to 'src/scheme/ao_scheme_float.c')
-rw-r--r--src/scheme/ao_scheme_float.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/scheme/ao_scheme_float.c b/src/scheme/ao_scheme_float.c
index 541f0264..99249030 100644
--- a/src/scheme/ao_scheme_float.c
+++ b/src/scheme/ao_scheme_float.c
@@ -39,6 +39,10 @@ const struct ao_scheme_type ao_scheme_float_type = {
.name = "float",
};
+#ifndef FLOAT_FORMAT
+#define FLOAT_FORMAT "%g"
+#endif
+
void
ao_scheme_float_write(ao_poly p)
{
@@ -54,7 +58,7 @@ ao_scheme_float_write(ao_poly p)
printf("+");
printf("inf.0");
} else
- printf ("%g", f->value);
+ printf (FLOAT_FORMAT, v);
}
float