diff options
| author | Karl Heuer | 1994-10-06 22:38:08 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-10-06 22:38:08 +0000 |
| commit | db37cb37320e2d9682ec88f00f1bfa01f7a96f46 (patch) | |
| tree | 61f2b1bfdb89e1aa4d9daebc6eb2d89d7295949d /src | |
| parent | 865c050f41d2e4120b50544223b883787f03b7ba (diff) | |
| download | emacs-db37cb37320e2d9682ec88f00f1bfa01f7a96f46.tar.gz emacs-db37cb37320e2d9682ec88f00f1bfa01f7a96f46.zip | |
(Fabs): Don't use XFASTINT when negative.
Diffstat (limited to 'src')
| -rw-r--r-- | src/floatfns.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/floatfns.c b/src/floatfns.c index 3ea82d2b309..de3e811acfc 100644 --- a/src/floatfns.c +++ b/src/floatfns.c | |||
| @@ -648,7 +648,7 @@ DEFUN ("abs", Fabs, Sabs, 1, 1, 0, | |||
| 648 | if (FLOATP (arg)) | 648 | if (FLOATP (arg)) |
| 649 | IN_FLOAT (arg = make_float (fabs (XFLOAT (arg)->data)), "abs", arg); | 649 | IN_FLOAT (arg = make_float (fabs (XFLOAT (arg)->data)), "abs", arg); |
| 650 | else if (XINT (arg) < 0) | 650 | else if (XINT (arg) < 0) |
| 651 | XSETINT (arg, - XFASTINT (arg)); | 651 | XSETINT (arg, - XINT (arg)); |
| 652 | 652 | ||
| 653 | return arg; | 653 | return arg; |
| 654 | } | 654 | } |