@@ -68,12 +68,12 @@ var =
69lowVar :: IParser String
69lowVar :: IParser String
71− makeVar lower <?> "a lower case variable"
71+ makeVar lower <?> "a lower case name"
74capVar :: IParser String
74capVar :: IParser String
76− makeVar upper <?> "an upper case variable"
76+ makeVar upper <?> "an upper case name"
79qualifiedVar :: IParser String
79qualifiedVar :: IParser String
@@ -88,7 +88,7 @@ rLabel = lowVar
89innerVarChar :: IParser Char
89innerVarChar :: IParser Char
90innerVarChar =
90innerVarChar =
91− alphaNum <|> char '_' <|> char '\'' <?> "more letters in this variable"
91+ alphaNum <|> char '_' <|> char '\'' <?> "more letters in this name"
94makeVar :: IParser Char -> IParser String
94makeVar :: IParser Char -> IParser String