aboutsummaryrefslogtreecommitdiff
path: root/kernel/mod_typing.ml
diff options
context:
space:
mode:
authorThéo Zimmermann2019-05-23 15:10:20 +0200
committerThéo Zimmermann2019-05-23 15:10:20 +0200
commite7628797fc241a4d7a5c1a5675cb679db282050d (patch)
tree8e8cc4348dfb9247713f45a7c43668ba98c708cf /kernel/mod_typing.ml
parentcf3b9eca0b3e81a7d56acded394a8b6843a4bb8d (diff)
parent467eb67bb960c15e1335f375af29b4121ac5262b (diff)
Merge PR #10221: Fixing typos - Part 2 (reopening of #10218)
Diffstat (limited to 'kernel/mod_typing.ml')
-rw-r--r--kernel/mod_typing.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/mod_typing.ml b/kernel/mod_typing.ml
index 2de5faa6df..72393d0081 100644
--- a/kernel/mod_typing.ml
+++ b/kernel/mod_typing.ml
@@ -188,7 +188,7 @@ let rec check_with_mod env struc (idl,mp1) mp equiv =
in
let new_equiv = add_delta_resolver equiv new_mb.mod_delta in
(* we propagate the new equality in the rest of the signature
- with the identity substitution accompagned by the new resolver*)
+ with the identity substitution accompanied by the new resolver*)
let id_subst = map_mp mp' mp' new_mb.mod_delta in
let new_after = subst_structure id_subst after in
before@(lab,SFBmodule new_mb')::new_after, new_equiv, cst