Göran Weinholt <[email protected]> writes: > bitwise-arithmetic-shift-right from (rnrs) is wrong for ridiculously > large shift amounts: > > scheme@(guile-user)> (import (rnrs)) > scheme@(guile-user)> (bitwise-arithmetic-shift-right -2 (+ (greatest-fixnum) > 1)) > $1 = -2 > > The correct result is -1.
Thanks for the report. Now fixed in stable-2.0. http://git.savannah.gnu.org/gitweb/?p=guile.git;a=commitdiff;h=7e8166f5bdb526c021c826943aaf050134cccc83 Mark
