Fix shadowing warning

ekmett · Aug 13, 2017 · 448eed4 · 448eed4
1 parent 818fe66
commit 448eed4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Text/Trifecta/Parser.hs b/src/Text/Trifecta/Parser.hs
@@ -351,7 +351,7 @@ stepParser (Parser p) d0 bs0 = go mempty $ p eo ee co ce d0 bs0 where
                                   ErrInfo (explain (renderingCaret d0 bs0) e) (d0 : _finalDeltas e)
                                 CO a _ _ _ -> Success a
                                 CE d       -> Failure d
-                              ) (\r -> go r (k r))
+                              ) (\s -> go s (k s))
 {-# INLINE stepParser #-}
 
 -- | @('parseFromFile' p filePath)@ runs a parser @p@ on the input read from