diff options
| author |  filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-01-29 16:09:36 +0000 |
|---|---|---|
| committer | filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-01-29 16:09:36 +0000 |
| commit | 3378c2cc6a403e78f3fd800dcaca67a82bfb9b4d (patch) | |
| tree | 58fde46a6129c237642cc587506976048b864a4a /toplevel | |
| parent | 743322461fab4a4fab2f05666066b5983542c76f (diff) | |
pas de warning avec Opaque quand is_silent
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1288 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/vernacentries.ml | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index e17490ddb..e204b6d92 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -547,8 +547,9 @@ let _ = id_list) let warning_opaque s = - warning ( - "This command turns the constants which depend on the definition/proof + if not(is_silent()) then + warning + ("This command turns the constants which depend on the definition/proof of "^s^" un-re-checkable until the next \"Transparent "^s^"\" command.") let _ = |