From b0e9d691d6c48fb09b20bb9d98626143eb8b92df Mon Sep 17 00:00:00 2001 From: Hugo Herbelin Date: Tue, 31 Oct 2017 17:34:31 +0100 Subject: Exporting ValTMap for use in Genintern. --- engine/geninterp.ml | 2 ++ 1 file changed, 2 insertions(+) (limited to 'engine/geninterp.ml') diff --git a/engine/geninterp.ml b/engine/geninterp.ml index e79e258fbc..2a1addcd3f 100644 --- a/engine/geninterp.ml +++ b/engine/geninterp.ml @@ -47,6 +47,8 @@ struct end +module ValTMap = ValT.Map + module ValReprObj = struct type ('raw, 'glb, 'top) obj = 'top Val.tag -- cgit v1.2.3