diff options
Diffstat (limited to 'kernel')
-rw-r--r-- | kernel/safe_typing.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/kernel/safe_typing.ml b/kernel/safe_typing.ml index 368879713..28e6fb8c7 100644 --- a/kernel/safe_typing.ml +++ b/kernel/safe_typing.ml @@ -363,7 +363,7 @@ let end_module l restype senv = List.fold_left (fun env (mp,mb) -> full_add_module mp mb env) newenv - senv.loads + (List.rev senv.loads) in let newenv = full_add_module mp mb newenv @@ -534,7 +534,7 @@ let end_modtype l senv = List.fold_left (fun env (mp,mb) -> full_add_module mp mb env) newenv - senv.loads + (List.rev senv.loads) in let newenv = add_modtype_constraints newenv mtb |