summaryrefslogtreecommitdiff
path: root/src/Substitute.ml
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--src/Substitute.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Substitute.ml b/src/Substitute.ml
index cad61595..452b125f 100644
--- a/src/Substitute.ml
+++ b/src/Substitute.ml
@@ -63,7 +63,7 @@ let type_def_get_instantiated_field_type (def : T.type_def)
(T.TypeVarId.vector_to_list def.T.type_params))
types
in
- let fields = type_def_get_fields def opt_variant_id in
+ let fields = T.type_def_get_fields def opt_variant_id in
T.FieldId.map
(fun f -> erase_regions_substitute_types ty_subst f.T.field_ty)
fields