From fa57d8d9d51c93ccefefb0951c67475970e97879 Mon Sep 17 00:00:00 2001
From: Nadrieril
Date: Mon, 8 Apr 2024 15:18:58 +0200
Subject: item_meta

---
 compiler/RegionsHierarchy.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'compiler/RegionsHierarchy.ml')

diff --git a/compiler/RegionsHierarchy.ml b/compiler/RegionsHierarchy.ml
index 713cdef9..c05e9f24 100644
--- a/compiler/RegionsHierarchy.ml
+++ b/compiler/RegionsHierarchy.ml
@@ -323,7 +323,7 @@ let compute_regions_hierarchies (type_decls : type_decl TypeDeclId.Map.t)
     List.map
       (fun ((fid, d) : FunDeclId.id * fun_decl) ->
         ( FRegular fid,
-          (Types.name_to_string env d.name, d.signature, Some d.meta) ))
+          (Types.name_to_string env d.name, d.signature, Some d.item_meta.meta) ))
       (FunDeclId.Map.bindings fun_decls)
   in
   let assumed =
-- 
cgit v1.2.3


From 4deb6ac44c615bbe3594c18ddbf880bf89f07d9e Mon Sep 17 00:00:00 2001
From: Son Ho
Date: Mon, 22 Apr 2024 10:47:26 +0200
Subject: Reformat some files

---
 compiler/RegionsHierarchy.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'compiler/RegionsHierarchy.ml')

diff --git a/compiler/RegionsHierarchy.ml b/compiler/RegionsHierarchy.ml
index c05e9f24..21be89ee 100644
--- a/compiler/RegionsHierarchy.ml
+++ b/compiler/RegionsHierarchy.ml
@@ -323,7 +323,8 @@ let compute_regions_hierarchies (type_decls : type_decl TypeDeclId.Map.t)
     List.map
       (fun ((fid, d) : FunDeclId.id * fun_decl) ->
         ( FRegular fid,
-          (Types.name_to_string env d.name, d.signature, Some d.item_meta.meta) ))
+          (Types.name_to_string env d.name, d.signature, Some d.item_meta.meta)
+        ))
       (FunDeclId.Map.bindings fun_decls)
   in
   let assumed =
-- 
cgit v1.2.3