diff --git a/src/Ubc/Parse/Syntax/Enumeration.hs b/src/Ubc/Parse/Syntax/Enumeration.hs
index 1d70d1c..d891217 100644
--- a/src/Ubc/Parse/Syntax/Enumeration.hs
+++ b/src/Ubc/Parse/Syntax/Enumeration.hs
@@ -4,7 +4,7 @@ module Ubc.Parse.Syntax.Enumeration
 )
 where
 import qualified Ubc.Parse.Syntax.Language as UbcLanguage
-import Text.Parsec (ParsecT, many)
+import Text.Parsec (ParsecT, many, (<?>))
 
 type EnumerationMember = String
 data Enumeration = Enumeration 
@@ -16,7 +16,7 @@ data Enumeration = Enumeration
 parse :: Monad m => ParsecT String u m Enumeration
 parse = do
         UbcLanguage.reserved "enum"
-        identifier <- UbcLanguage.identifier
+        identifier <- UbcLanguage.identifier <?> "enum identifier"
         values <- UbcLanguage.braces $ many UbcLanguage.identifier
 
         return $ Enumeration identifier values