HCoop / bpt / guile.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 1ea0803) | patch
Fix edge case in 'ash'.
authorMark H Weaver <mhw@netris.org>
Thu, 3 Oct 2013 18:25:51 +0000 (14:25 -0400)
committerMark H Weaver <mhw@netris.org>
Thu, 3 Oct 2013 23:08:24 +0000 (19:08 -0400)
commitd360671c1cca335600079f1c5714572d1c2e676d
treea9785d2d021691933c15018a48f9ea655ef5135atree | snapshot (tar.gz zip)
parent1ea0803e9ea1d5afede0eff8175d0cba12bab49ecommit | diff
Fix edge case in 'ash'.

* libguile/numbers.c (left_shift_exact_integer): Fix edge case where
  N is -1 and count is SCM_I_FIXNUM_BIT-1 to return the most negative
  fixnum.  Previously this result was returned as a bignum.

* test-suite/tests/numbers.test (ash): Add tests.
libguile/numbers.c diff | blob | blame | history
test-suite/tests/numbers.test diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.