(Fabs): Don't use XFASTINT when negative.
This commit is contained in:
parent
865c050f41
commit
db37cb3732
1 changed files with 1 additions and 1 deletions
|
@ -648,7 +648,7 @@ DEFUN ("abs", Fabs, Sabs, 1, 1, 0,
|
|||
if (FLOATP (arg))
|
||||
IN_FLOAT (arg = make_float (fabs (XFLOAT (arg)->data)), "abs", arg);
|
||||
else if (XINT (arg) < 0)
|
||||
XSETINT (arg, - XFASTINT (arg));
|
||||
XSETINT (arg, - XINT (arg));
|
||||
|
||||
return arg;
|
||||
}
|
||||
|
|
Loading…
Add table
Reference in a new issue