comment typo

diff --git a/Utility/Exception.hs b/Utility/Exception.hs
index 273f8446d70197ed327987d53759935c1302dc50..4c60eac5977662e69bcb2232497a911b31dc158e 100644 (file)
--- a/Utility/Exception.hs
+++ b/Utility/Exception.hs
@@ -39,7 +39,7 @@ import Utility.Data
 
 {- Like error, this throws an exception. Unlike error, if this exception
  - is not caught, it won't generate a backtrace. So use this for situations
- - where there's a problem that the user is expeected to see in some
+ - where there's a problem that the user is expected to see in some
  - circumstances. -}
 giveup :: [Char] -> a
 giveup = errorWithoutStackTrace