Fix -Wincomplete-uni-patterns error in stream decoding

Function decodeValue in stream decogin was written using
two functions in a way that it provided temporary value
that had a incomplete match. While it's on two have such
matching because we build only well formed value, but it
can't be proven by the compiler. In this commit we inline
those functions removing a error.

src/Database/Redis/ManualCommands.hs

@@ -1080,9 +1080,8 @@ instance RedisResult StreamsRecord where
         return StreamsRecord{..}
         where
             decodeKeyValues :: [ByteString] -> [(ByteString, ByteString)]
-            decodeKeyValues bs = map (\[x,y] -> (x,y)) $ chunksOfTwo bs
-            chunksOfTwo (x:y:rest) = [x,y]:chunksOfTwo rest
-            chunksOfTwo _ = []
+            decodeKeyValues (x:y:rest) = (x,y):decodeKeyValues rest
+            decodeKeyValues _ = []
     decode a = Left a
 
 data XReadOpts = XReadOpts