summaryrefslogtreecommitdiff
path: root/compiler/Substitute.ml
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/Substitute.ml')
-rw-r--r--compiler/Substitute.ml3
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/Substitute.ml b/compiler/Substitute.ml
index 6d9b9e15..23f618e2 100644
--- a/compiler/Substitute.ml
+++ b/compiler/Substitute.ml
@@ -71,6 +71,9 @@ let erase_regions_subst : ('r, T.erased_region) subst =
(** Convert an {!T.rty} to an {!T.ety} by erasing the region variables *)
let erase_regions (ty : 'r T.ty) : T.ety = ty_substitute erase_regions_subst ty
+let trait_ref_erase_regions (tr : 'r T.trait_ref) : T.etrait_ref =
+ trait_ref_substitute erase_regions_subst tr
+
(** Generate fresh regions for region variables.
Return the list of new regions and appropriate substitutions from the