diff options
author | Mattias EngdegÄrd <mattiase@acm.org> | 2020-10-09 11:12:53 +0200 |
---|---|---|
committer | Mattias EngdegÄrd <mattiase@acm.org> | 2020-10-09 11:24:15 +0200 |
commit | 35478f3f76d55f640372028889c570647432859c (patch) | |
tree | 3744cb3c1b0f9c159214a24f24ae4551386a852b /lisp/emacs-lisp | |
parent | c69c17d573860ebe74320cee2a1850baa865183d (diff) | |
download | emacs-35478f3f76d55f640372028889c570647432859c.tar.gz emacs-35478f3f76d55f640372028889c570647432859c.tar.bz2 emacs-35478f3f76d55f640372028889c570647432859c.zip |
Calc: fix arithmetic right shift sign bit detection
Arithmetic right shift didn't compute the bit to shift in correctly.
For example, #x600000000 right-shifted 8 steps (with 32 bit word size)
resulted in #xff000000 rather than 0. (Bug#43764)
* lisp/calc/calc-bin.el (calcFunc-ash): Fix condition.
* test/lisp/calc/calc-tests.el (calc-tests--clip, calc-tests--lsh)
(calc-tests--rsh, calc-tests--ash, calc-tests--rash, calc-tests--rot):
New.
(calc-shift-binary): New test.
Diffstat (limited to 'lisp/emacs-lisp')
0 files changed, 0 insertions, 0 deletions