mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-04 06:31:13 -08:00
Code Issues Projects Releases Wiki Activity

Avoid fixnum round trip in prefix-numeric-value

Browse source 
* src/callint.c (Fprefix_numeric_value): Simplify.
This commit is contained in:
Paul Eggert 2019-10-20 17:40:43 -07:00
parent 30deac84c4
commit 9e15df208c
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/callint.c
View file

@ -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