Merge pull request #45 from AeneasVerif/son_merge_types

Big cleanup

1 files changed, 3 insertions, 6 deletions

diff --git a/compiler/LlbcAst.ml b/compiler/LlbcAst.ml
index 2db859b2..9772671e 100644
--- a/compiler/LlbcAst.ml
+++ b/compiler/LlbcAst.ml
@@ -2,16 +2,13 @@ open Types
 open Values
 include Charon.LlbcAst
 
-type abs_region_group = (AbstractionId.id, RegionId.id) g_region_group
-[@@deriving show]
-
-type abs_region_groups = (AbstractionId.id, RegionId.id) g_region_groups
-[@@deriving show]
+type abs_region_group = AbstractionId.id g_region_group [@@deriving show]
+type abs_region_groups = abs_region_group list [@@deriving show]
 
 (** A function signature, after instantiation *)
 type inst_fun_sig = {
   regions_hierarchy : abs_region_groups;
-  trait_type_constraints : rtrait_type_constraint list;
+  trait_type_constraints : trait_type_constraint list;
   inputs : rty list;
   output : rty;
 }