From a357ae76d9af8d4de812c893680780de0dad2149 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Kim=20Nguy=E1=BB=85n?= <kn@lri.fr>
Date: Thu, 1 Mar 2012 14:27:59 +0100
Subject: [PATCH] Update to new caching infrastructure.

---
 src/l2JIT.mli | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/l2JIT.mli b/src/l2JIT.mli
index 9575f34..e6f3aa9 100644
--- a/src/l2JIT.mli
+++ b/src/l2JIT.mli
@@ -23,8 +23,8 @@ val print_jump : Format.formatter -> jump -> unit
 val jump_stat_summary : Format.formatter -> unit
 
 type opcode =
-    CACHE of unit
-  | RETURN of unit
+    CACHE
+  | RETURN
   | LEFT of Translist.t * jump
   | RIGHT of Translist.t * jump
   | BOTH of Translist.t * jump * jump
@@ -35,7 +35,7 @@ val dummy : opcode
 
 val create : unit -> t
 
-val stats : Format.formatter -> t -> unit
+(*val stats : Format.formatter -> t -> unit *)
 
 val find : t -> int -> StateSet.Node.t -> opcode
 
-- 
2.17.1