From becd5ffe25afe3c39a964a0e8b582f8fc5ddb8d3 Mon Sep 17 00:00:00 2001
From: Gabriel Nordeborn <gabbe.nord@gmail.com>
Date: Sun, 2 Jul 2023 14:01:12 +0200
Subject: [PATCH] transfer attributes

---
 jscomp/ml/typedecl.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/jscomp/ml/typedecl.ml b/jscomp/ml/typedecl.ml
index 36e962fdcf..ac23be81f0 100644
--- a/jscomp/ml/typedecl.ml
+++ b/jscomp/ml/typedecl.ml
@@ -412,7 +412,7 @@ let transl_declaration ~typeRecordAsObject env sdecl id =
                       (args
                       |> List.map (fun texpr : Typedtree.core_type ->
                              {
-                               ctyp_attributes = [];
+                               ctyp_attributes = cstr.cd_attributes;
                                ctyp_loc = cstr.cd_loc;
                                ctyp_env = env;
                                ctyp_type = texpr;