@@ -374,7 +374,7 @@ parseLet = do
374 return $ Let ds result
374 return $ Let ds result
376parseValueAtom :: TokenParser Expr
376parseValueAtom :: TokenParser Expr
377−parseValueAtom = withSourceSpan PositionedValue $ P.choice
377+parseValueAtom = P.choice
378 [ parseAnonymousArgument
378 [ parseAnonymousArgument
379 , parseNumericLiteral
379 , parseNumericLiteral
380 , parseCharLiteral
380 , parseCharLiteral