@@ -26,6 +26,7 @@ import Control.Applicative hiding (many)
2626import Text.Parsec hiding ((<|>))
2727
2828import qualified Language.PureScript as P
29+import qualified Language.PureScript.Parser.Common as C (mark, same)
2930
3031-- |
3132-- PSCI version of @let@.
@@ -34,7 +35,7 @@ import qualified Language.PureScript as P
3435-- we actually want the normal @let@.
3536--
3637psciLet :: Parsec String P.ParseState Command
37−psciLet = Let <$> (P.Let <$> (P.reserved "let" *> P.indented *> many1 P.parseDeclaration))
38+psciLet = Let <$> (P.Let <$> (P.reserved "let" *> P.indented *> C.mark (many1 (C.same *> P.parseDeclaration))))
3839
3940-- |
4041-- Parses PSCI metacommands or expressions input from the user.