Skip to content

Commit fb6c1a1

Browse files
committed
Respond to review
1 parent 330f583 commit fb6c1a1

File tree

1 file changed

+4
-0
lines changed

1 file changed

+4
-0
lines changed

ocaml/typing/typecore.ml

+4
Original file line numberDiff line numberDiff line change
@@ -723,6 +723,10 @@ type type_pat_state =
723723
{ mutable tps_pattern_variables: pattern_variable list;
724724
mutable tps_pattern_force: (unit -> unit) list;
725725
mutable tps_module_variables: module_variables;
726+
(* Mutation will not change the constructor of [tps_module_variables], just
727+
the contained [module_variables] list. [module_variables] could be made
728+
mutable instead, but we felt this made the code more awkward.
729+
*)
726730
}
727731

728732
let create_type_pat_state allow_modules =

0 commit comments

Comments
 (0)