summaryrefslogtreecommitdiff
path: root/compiler/SymbolicToPure.ml
diff options
context:
space:
mode:
authorSon Ho2023-11-07 10:40:27 +0100
committerSon Ho2023-11-07 10:40:27 +0100
commited788eec1d8be1656c0ad7dab25975ad3f5497c2 (patch)
tree533c76df0bc65c5e39bc2398e9f0d51afe5a05fe /compiler/SymbolicToPure.ml
parentbcc3f4ae99ba5ff78d03c51c825659e1b67bb0b0 (diff)
Update the normalization of associated types
Diffstat (limited to 'compiler/SymbolicToPure.ml')
-rw-r--r--compiler/SymbolicToPure.ml3
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/SymbolicToPure.ml b/compiler/SymbolicToPure.ml
index 46aa3b83..2ce8c706 100644
--- a/compiler/SymbolicToPure.ml
+++ b/compiler/SymbolicToPure.ml
@@ -3140,6 +3140,7 @@ let translate_trait_impl (type_infos : TA.type_infos)
impl_trait;
generics;
preds;
+ parent_trait_refs;
consts;
types;
required_methods;
@@ -3152,6 +3153,7 @@ let translate_trait_impl (type_infos : TA.type_infos)
in
let generics = translate_generic_params generics in
let preds = translate_predicates preds in
+ let parent_trait_refs = List.map translate_strait_ref parent_trait_refs in
let consts =
List.map
(fun (name, (ty, id)) -> (name, (translate_fwd_ty type_infos ty, id)))
@@ -3171,6 +3173,7 @@ let translate_trait_impl (type_infos : TA.type_infos)
impl_trait;
generics;
preds;
+ parent_trait_refs;
consts;
types;
required_methods;