summaryrefslogtreecommitdiff
path: root/libraries/base/Data/Bits.hs
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/base/Data/Bits.hs')
-rw-r--r--libraries/base/Data/Bits.hs10
1 files changed, 7 insertions, 3 deletions
diff --git a/libraries/base/Data/Bits.hs b/libraries/base/Data/Bits.hs
index 95105a4b3f..73ebfbc03c 100644
--- a/libraries/base/Data/Bits.hs
+++ b/libraries/base/Data/Bits.hs
@@ -63,12 +63,16 @@ import GHC.Enum
import GHC.Read
import GHC.Show
+-- $setup
+-- >>> import Prelude
+-- >>> import Data.Word
+
-- | A more concise version of @complement zeroBits@.
--
--- >>> complement zeroBits :: Word == oneBits :: Word
+-- >>> complement (zeroBits :: Word) == (oneBits :: Word)
-- True
--
--- >>> complement oneBits :: Word == zeroBits :: Word
+-- >>> complement (oneBits :: Word) == (zeroBits :: Word)
-- True
--
-- = Note
@@ -142,7 +146,7 @@ instance (Bits a) => Monoid (Ior a) where
-- | Monoid under bitwise XOR.
--
--- >>> getXor (Xor 0xab <> 0x12) :: Word8
+-- >>> getXor (Xor 0xab <> Xor 0x12) :: Word8
-- 185
--
-- @since 4.16