diff options
Diffstat (limited to 'checker/mod_checking.ml')
| -rw-r--r-- | checker/mod_checking.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/checker/mod_checking.ml b/checker/mod_checking.ml index 3128e125dd..44b7089fd0 100644 --- a/checker/mod_checking.ml +++ b/checker/mod_checking.ml @@ -163,6 +163,6 @@ and check_signature env sign mp_mse res = match sign with MoreFunctor(arg_id,mtb,body) | NoFunctor struc -> let (_:env) = List.fold_left (fun env (lab,mb) -> - check_structure_field env mp_mse lab res mb) env struc + check_structure_field env mp_mse lab res mb) env struc in NoFunctor struc |