From 965efa2fa52729837f3a7f234ed6f54ecde465c7 Mon Sep 17 00:00:00 2001 From: Paul Mure Date: Tue, 13 Aug 2024 17:24:44 -0700 Subject: [PATCH] fix(engine): expose type of local_ident.id --- engine/lib/local_ident.mli | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/engine/lib/local_ident.mli b/engine/lib/local_ident.mli index 2ad0db981..e2e2d5d4e 100644 --- a/engine/lib/local_ident.mli +++ b/engine/lib/local_ident.mli @@ -9,7 +9,7 @@ module T : sig | SideEffectHoistVar (** A variable generated by `Side_effect_utils` *) [@@deriving show, yojson, hash, compare, sexp, eq] - type id [@@deriving show, yojson, hash, compare, sexp, eq] + type id = kind * int [@@deriving show, yojson, hash, compare, sexp, eq] val mk_id : kind -> int -> id