1 files changed, 1 insertions, 1 deletions

diff --git a/src/callint.c b/src/callint.c
index 449b5048609..9d5767a21fe 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -798,7 +798,7 @@ Its numeric meaning is what you would get from `(interactive "p")'.  */)
   else if (EQ (raw, Qminus))
     XSETINT (val, -1);
   else if (CONSP (raw) && FIXNUMP (XCAR (raw)))
-    XSETINT (val, XFIXNUM (XCAR (raw)));
+    val = XCAR (raw);
   else if (FIXNUMP (raw))
     val = raw;
   else