Add more Haddock comments.

[hath.git] / src / Bit.hs

diff --git a/src/Bit.hs b/src/Bit.hs
index 128b6f6c76a787d4de6327636a885543428f4e98..5c8c5aa25903ba4332db63faaf55ccfd0e2e0f44 100644 (file)
--- a/src/Bit.hs
+++ b/src/Bit.hs
@@ -28,7 +28,7 @@ bit_to_int Zero =  0
 bit_to_int One  =  1
 
 -- | If we are passed a '0' or '1', convert it
---   appropriately. Otherwise, default to Nothing.
+--   appropriately. Otherwise, return Nothing.
 bit_from_char :: Char -> Maybe Bit
 bit_from_char '0' = Just Zero
 bit_from_char '1' = Just One