* src/pmc/scalar.pmc:
commit4945cf50c6edf4cc230b8942aa4c329dcf3cb2ef
authorrgrjr <rgrjr@d31e2699-5ff4-0310-a27c-f18f2fbe73fe>
Sat, 12 May 2007 15:37:58 +0000 (12 15:37 +0000)
committerrgrjr <rgrjr@d31e2699-5ff4-0310-a27c-f18f2fbe73fe>
Sat, 12 May 2007 15:37:58 +0000 (12 15:37 +0000)
tree62036eeec6be2c1ada34015434ef3aad1fc4f98c
parent8e74d3e1ee716cd10e3ec1ae9bcb990d8babbf20
* src/pmc/scalar.pmc:
   + (Parrot_BigInt_bitwise_shl_int):  Bug fix: Force overflow for
     "extreme" left shifts, and always underflow to zero for extreme
     right shifts.
* t/pmc/bigint.t:
   + Add a regression test to make sure a 64-bit shl really shifts.
     Tested on i686 and x86_64.

git-svn-id: https://svn.perl.org/parrot/trunk@18517 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
src/pmc/scalar.pmc
t/pmc/bigint.t