From 2ce4ea267c249b6bb6610dcb9e979e5cc7d12c54 Mon Sep 17 00:00:00 2001
From: Dmitry Zakharov <dzakh.dev@gmail.com>
Date: Fri, 22 Sep 2023 22:09:02 +0300
Subject: [PATCH] Fix ci error

---
 jscomp/gentype/TranslateStructure.ml | 1 +
 1 file changed, 1 insertion(+)

diff --git a/jscomp/gentype/TranslateStructure.ml b/jscomp/gentype/TranslateStructure.ml
index f20c518bf3..899c5cc03d 100644
--- a/jscomp/gentype/TranslateStructure.ml
+++ b/jscomp/gentype/TranslateStructure.ml
@@ -56,6 +56,7 @@ and addAnnotationsToFields ~config (expr : Typedtree.expression)
     ({field with nameJS = name} :: nextFields1, types1)
   | _ -> (fields, argTypes)
 
+[@@live]
 (** Recover from expr the renaming annotations on named arguments. *)
 let addAnnotationsToFunctionType ~config (expr : Typedtree.expression)
     (type_ : type_) =