diff --git a/src/Data/CSV/Sip.hs b/src/Data/CSV/Sip.hs
index e9729e7..e5a362c 100644
--- a/src/Data/CSV/Sip.hs
+++ b/src/Data/CSV/Sip.hs
@@ -59,11 +59,19 @@ import Data.Text.Encoding (decodeUtf8')
 import Data.Word (Word8)
 
 -- | read an entire CSV file
-slurpCSV :: MonadResource m => FilePath -> m [[T.Text]]
+slurpCSV
+  :: MonadResource m
+  => FilePath
+  -- ^ the path to the file to read
+  -> m [[T.Text]]
 slurpCSV file = runConduit $ sourceFile file .| decodeRows .| consume
 
 -- | read an entire CSV file in raw mode
-slurpRawCSV :: MonadResource m => FilePath -> m [[BS.ByteString]]
+slurpRawCSV
+  :: MonadResource m
+  => FilePath
+  -- ^ the path to the file to read
+  -> m [[BS.ByteString]]
 slurpRawCSV file = runConduit $ sourceFile file .| decodeRawRows .| consume
 
 -- | read a CSV stream, using the first row as a header containing