summaryrefslogtreecommitdiff
path: root/src/callint.c
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1994-10-04 14:20:54 +0000
committerKarl Heuer <kwzh@gnu.org>1994-10-04 14:20:54 +0000
commit5e05a0bdaea24fec10f086e4360f18341d4cebe0 (patch)
treefe887394380bbe5abdfffc757b7f2a1c839d0523 /src/callint.c
parent98fb42a7679ce925c9dd75c8bb35c3a32950073f (diff)
downloademacs-5e05a0bdaea24fec10f086e4360f18341d4cebe0.tar.gz
(Fprefix_numeric_value): No longer necessary to set type separately.
Diffstat (limited to 'src/callint.c')
-rw-r--r--src/callint.c4
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))