diff options
Diffstat (limited to '')
-rw-r--r-- | src/Substitute.ml | 2 |
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 |