Reverse the result of parsing a leftover bytestring

I don't know if this is the most efficient way to do it, or if there's a
way to accumulate the list in the correct order in the first place

attoparsec-conduit/Data/Conduit/Attoparsec.hs

@@ -108,7 +108,7 @@ conduitParser p0 = C.conduitState
     push parser c = {-# SCC "push" #-} do
         case doParse parser c [] of
             Left pErr -> lift $ C.resourceThrow pErr
-            Right (cont, results) -> return (cont, C.Producing results)
+            Right (cont, results) -> return (cont, C.Producing $ reverse results)
 
     -- doParse :: (A.Parser a b) -> a -> [b]
     --            -> Either ParseError ((a -> A.IResult a b), [b])