diff options
| author | filliatr | 2001-04-03 08:04:19 +0000 |
|---|---|---|
| committer | filliatr | 2001-04-03 08:04:19 +0000 |
| commit | bb76b246d1396f788d18888abe8284befb7f44b9 (patch) | |
| tree | b7dd5667977ceae4f3944945a55cac6412681abb /library | |
| parent | 78811c7ecba58fc35a3441ac1d510c67e28b159e (diff) | |
utilisation de Options.if_verbose
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1519 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library')
| -rw-r--r-- | library/declare.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/declare.ml b/library/declare.ml index 9cd1041218..59828c3cc5 100644 --- a/library/declare.ml +++ b/library/declare.ml @@ -480,7 +480,7 @@ let declare_one_elimination mispec = let _ = declare_constant (id_of_string na) (ConstantEntry { const_entry_body = c; const_entry_type = None }, NeverDischarge,false) in - if Options.is_verbose() then pPNL [< 'sTR na; 'sTR " is defined" >] + Options.if_verbose pPNL [< 'sTR na; 'sTR " is defined" >] in let env = Global.env () in let sigma = Evd.empty in |