Re: module Data.Bits

9 Sep 2002


      Malcolm Wallace <Malcolm.Wallace@cs.york.ac.uk> writes:
...
x `shift`   i  | i<0  = x `shiftL` i
                   | i==0 = x
                   | i>0  = x `shiftR` i
Oops, of course that should be
...
x `shift`   i  | i<0  = x `shiftL` (-i)
                   | i==0 = x
                   | i>0  = x `shiftR` i
etc.