diff options
| author | Enrico Tassi | 2014-11-03 19:06:28 +0100 |
|---|---|---|
| committer | Enrico Tassi | 2014-11-03 19:06:28 +0100 |
| commit | 06b6a53bbc16ac2fd53213d693910c73105564c5 (patch) | |
| tree | a16da139f78ffdd9e356a971a3e8fbac3907482b | |
| parent | a30448fe3b82283e749e009a37bfd4dacb0eaaeb (diff) | |
vernac_classifier: VernacDeclareTacticDefinition does not alter the parser
| -rw-r--r-- | stm/vernac_classifier.ml | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/stm/vernac_classifier.ml b/stm/vernac_classifier.ml index 63b9e2e7f5..53eb1a3f29 100644 --- a/stm/vernac_classifier.ml +++ b/stm/vernac_classifier.ml @@ -168,6 +168,7 @@ let rec classify_vernac e = | VernacDeclareReduction _ | VernacDeclareClass _ | VernacDeclareInstances _ | VernacRegister _ + | VernacDeclareTacticDefinition _ | VernacComments _ -> VtSideff [], VtLater (* Who knows *) | VernacLoad _ -> VtSideff [], VtNow @@ -181,9 +182,10 @@ let rec classify_vernac e = VtSideff [id], if bl = [] then VtLater else VtNow (* These commands alter the parser *) | VernacOpenCloseScope _ | VernacDelimiters _ | VernacBindScope _ - | VernacInfix _ | VernacNotation _ | VernacNotationAddFormat _ | VernacSyntaxExtension _ + | VernacInfix _ | VernacNotation _ | VernacNotationAddFormat _ + | VernacSyntaxExtension _ | VernacSyntacticDefinition _ - | VernacDeclareTacticDefinition _ | VernacTacticNotation _ + | VernacTacticNotation _ | VernacRequire _ | VernacImport _ | VernacInclude _ | VernacDeclareMLModule _ | VernacContext _ (* TASSI: unsure *) |
