docs

diff --git a/Codec/Audio/WavPack/Metadata.hs b/Codec/Audio/WavPack/Metadata.hs
index 78a99fc5e232dd7e168c971d30d1209a80cd92de..35864b1b46bc0c9911a6b9d4a04fa2c2e87a038e 100644 (file)
--- a/Codec/Audio/WavPack/Metadata.hs
+++ b/Codec/Audio/WavPack/Metadata.hs
@@ -23,7 +23,8 @@ import Prelude.Unicode
 
 -- | Type class for every metadata sub-blocks.
 class (Binary α, Eq α, Show α, Typeable α) ⇒ Metadata α where
 
 -- | Type class for every metadata sub-blocks.
 class (Binary α, Eq α, Show α, Typeable α) ⇒ Metadata α where

-    -- | Get the metadata ID (mandatory).
+    -- | Get the metadata ID without odd-size bit nor large-block bit
+    -- (mandatory).

     metaID   ∷ α → Word8
     -- | Get the size of metadata (optional).
     metaSize ∷ α → Word32
     metaID   ∷ α → Word8
     -- | Get the size of metadata (optional).
     metaSize ∷ α → Word32