diff options
| author |  delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-12-29 19:23:25 +0000 |
|---|---|---|
| committer | delahaye <delahaye@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-12-29 19:23:25 +0000 |
| commit | b20e1be71f9b5c5585b214e30b5042676fa6cd46 (patch) | |
| tree | 6e9b6b6078d69420ee90751377d2f015fd8f1323 /contrib | |
| parent | 50457d3bf6aee2a49dd9c0acf7389b885178ea3f (diff) | |
Ajout du Let pour le langage de tactiques
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1231 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/xml/xmlcommand.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/contrib/xml/xmlcommand.ml b/contrib/xml/xmlcommand.ml index 4aa22a71b..a653b1c04 100644 --- a/contrib/xml/xmlcommand.ml +++ b/contrib/xml/xmlcommand.ml @@ -77,7 +77,8 @@ let could_have_namesakes o sp = (* namesake = omonimo in italian *) match tag with "CONSTANT" -> (match D.constant_strength sp with - D.DischargeAt _ -> false (* a local definition *) + | D.DischargeAt _ -> false (* a local definition *) + | D.NotDeclare -> false (* not a definition *) | D.NeverDischarge -> true (* a non-local one *) ) | "PARAMETER" (* axioms and *) |