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

diff --git a/src/callint.c b/src/callint.c
index e36b6c147d844adb506854bf28a23c460986dd5d..337ea0e0242f9c8b4c00272d6192c4ee4afd33cd 100644 (file)
--- 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))