From 6bb9c33f0e35a694ca253bc766f9a235d2073a4f Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Sun, 27 Aug 2017 21:33:55 +0200
Subject: Do not reuse the Val.t type in toplevel values.

---
 src/tac2expr.mli | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/tac2expr.mli')

diff --git a/src/tac2expr.mli b/src/tac2expr.mli
index 78611d51ca..0c9112d902 100644
--- a/src/tac2expr.mli
+++ b/src/tac2expr.mli
@@ -186,7 +186,7 @@ type valexpr =
   (** Closures *)
 | ValOpn of KerName.t * valexpr array
   (** Open constructors *)
-| ValExt of Geninterp.Val.t
+| ValExt : 'a Geninterp.Val.typ * 'a -> valexpr
   (** Arbitrary data *)
 
 and closure = {
-- 
cgit v1.2.3