summaryrefslogtreecommitdiff
path: root/src/floatfns.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/floatfns.c')
-rw-r--r--src/floatfns.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/floatfns.c b/src/floatfns.c
index 1232fc0afa1..345b3b94947 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -683,7 +683,7 @@ DEFUN ("abs", Fabs, Sabs, 1, 1, 0,
return arg;
}
-DEFUN ("float", Ffloat, Sfloat, 1, 1, 0,
+DEFUE ("float", Ffloat, Sfloat, 1, 1, 0,
doc: /* Return the floating point number equal to ARG. */)
(register Lisp_Object arg)
{
@@ -886,7 +886,7 @@ systems, but 2 on others. */)
return rounding_driver (arg, divisor, emacs_rint, round2, "round");
}
-DEFUN ("truncate", Ftruncate, Struncate, 1, 2, 0,
+DEFUE ("truncate", Ftruncate, Struncate, 1, 2, 0,
doc: /* Truncate a floating point number to an int.
Rounds ARG toward zero.
With optional DIVISOR, truncate ARG/DIVISOR. */)