(Fprefix_numeric_value): No longer necessary to set type separately.

1 files changed, 0 insertions, 4 deletions

diff --git a/src/callint.c b/src/callint.c
index e36b6c147d8..337ea0e0242 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -599,10 +599,6 @@ Its numeric meaning is what you would get from `(interactive \"p\")'.")
 {
   Lisp_Object val;
   
-  /* Tag val as an integer, so the rest of the assignments
-     may use XSETINT.  */
-  XFASTINT (val) = 0;
-
   if (NILP (raw))
     XFASTINT (val) = 1;
   else if (EQ (raw, Qminus))