Fix spelling

Parse.hs

@@ -87,7 +87,7 @@ word terminators acceptEmpty = do
 -- this parser needs to be used everywhere where newline is needed, except
 -- 'lineConts'
 -- todo: more efficient string concatenation
--- fixme: if here-doc delimeter is not quoted, we also need to parse here-doc
+-- fixme: if here-doc delimiter is not quoted, we also need to parse here-doc
 -- for expansions
 newline = do
     char '\n'
@@ -288,7 +288,7 @@ redirection = do
     unquote1 (SQuoted s) = s
     unquote1 (DQuoted w) = unquote w
     unquote1 (Escaped c) = [c]
-    unquote1 x = error $ "Got unexpected thingy in here-doc delimeter: " ++ show x
+    unquote1 x = error $ "Got unexpected thingy in here-doc delimiter: " ++ show x
     hereDocDelim = token $ many1 $
                 escaped <|> singleQuoted <|> doubleQuoted <|> bareWord "'\"\\\n# "
     doubleQuoted :: Parser WordPart

Parsec.hs

@@ -20,7 +20,7 @@ data RS = RS
 -- When we meet here-doc, we put its delimiter into hereDocDelims list.
 -- After each newline we check whether we have unread here-docs, and if so,
 -- start reading them
--- After the here-doc is read, we remove its delimeter from hereDocDelims and put
+-- After the here-doc is read, we remove its delimiter from hereDocDelims and put
 -- the contents of heredoc into the hereDocs list.
 data SS = SS
     { hereDocHandles :: [HereDocHandle]
@@ -32,7 +32,7 @@ type HereDocHandle = (String, Int, HereDocQuoted)
 data HereDocQuoted = HereDocQuoted | HereDocNotQuoted
     deriving (Show,Read,Eq)
 
--- put here-docs delimeter into the queue
+-- put here-docs delimiter into the queue
 -- returns unique number by which the contents of here-doc may be accessed later
 enqueueHereDoc :: String -> HereDocQuoted -> Parser Int
 enqueueHereDoc delim quoted = do