diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-04-02 19:13:33 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-04-09 11:52:17 +0200 |
| commit | 8a35d93061c67dcdbb12337b78fcb35d72957f51 (patch) | |
| tree | 5599cebfa7bc710bb1981cd8b1152517d857c35d /vernac | |
| parent | 8d69323dff6e1afd17a13dfa8a980e76acb44cdc (diff) | |
Minor cosmetic commit.
Diffstat (limited to 'vernac')
| -rw-r--r-- | vernac/command.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/command.ml b/vernac/command.ml index 6eb7037f8..f31fce885 100644 --- a/vernac/command.ml +++ b/vernac/command.ml @@ -1155,7 +1155,7 @@ let interp_fixpoint l ntns = let interp_cofixpoint l ntns = let (env,_,pl,evd),fix,info = interp_recursive false l ntns in - check_recursive false env evd fix; + check_recursive false env evd fix; (fix,pl,Evd.evar_universe_context evd,info) let declare_fixpoint local poly ((fixnames,fixdefs,fixtypes),pl,ctx,fiximps) indexes ntns = |