From b758b2eefdb0f612bdf6020652819232dff8fa91 Mon Sep 17 00:00:00 2001
From: Romain Calascibetta <romain.calascibetta@gmail.com>
Date: Fri, 14 Jul 2017 10:16:48 -0700
Subject: [PATCH] Fixed something

I don't remember why I do this but it seems that I used an old state and
I changed the code to use the most newer state instead the old. So, push
and merge.
---
 lib/decompress.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/decompress.ml b/lib/decompress.ml
index 3914990..ed4949a 100644
--- a/lib/decompress.ml
+++ b/lib/decompress.ml
@@ -2644,7 +2644,7 @@ struct
 
           KDictionary.get_bits 3 aux src dst t
         | 18 ->
-          let aux n src dst t =
+          let aux state n src dst t =
             if state.idx + n + 11 > state.max
             then error t Invalid_dictionary
             else begin
@@ -2655,7 +2655,7 @@ struct
             end
           in
 
-          KDictionary.get_bits 7 aux src dst t
+          KDictionary.get_bits 7 (aux state) src dst t
         | _ -> error t Invalid_dictionary
       in