diff --git a/src/Data/Binary/FloatCast.hs b/src/Data/Binary/FloatCast.hs
index 2eb86f0aa987143b21c0cd93346ff56ac915479a..49c5434d553d66c998cb81458817286ce2694224 100644
--- a/src/Data/Binary/FloatCast.hs
+++ b/src/Data/Binary/FloatCast.hs
@@ -5,7 +5,7 @@
 -- | This module was written based on
 --   <http://hackage.haskell.org/package/reinterpret-cast-0.1.0/docs/src/Data-ReinterpretCast-Internal-ImplArray.html>.
 --
---   Implements casting via a 1-elemnt STUArray, as described in
+--   Implements casting via a 1-element STUArray, as described in
 --   <http://stackoverflow.com/a/7002812/263061>.
 module Data.Binary.FloatCast
   ( floatToWord