Malcolm Wallace <[EMAIL PROTECTED]> 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. _______________________________________________ FFI mailing list [EMAIL PROTECTED] http://www.haskell.org/mailman/listinfo/ffi
