diff options
| author | Pierre-Marie Pédrot | 2016-04-11 11:02:27 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2016-04-11 11:02:27 +0200 |
| commit | 907db7ee1c9824aeedad7ce2d0f4f85225c36aba (patch) | |
| tree | 801a44dde07b604fcf5fa9d1e28270fe7319d4c6 /printing/ppannotation.ml | |
| parent | c6a8c4b5fa590f2beecd73817497bd7773a87522 (diff) | |
| parent | 2da7bf6327e1f35321f121de9560604b758f0472 (diff) | |
Removing the typed-level tactic_expr type.
Diffstat (limited to 'printing/ppannotation.ml')
| -rw-r--r-- | printing/ppannotation.ml | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/printing/ppannotation.ml b/printing/ppannotation.ml index df7f925b73..511f93569c 100644 --- a/printing/ppannotation.ml +++ b/printing/ppannotation.ml @@ -20,7 +20,6 @@ type t = | AGlobAtomicTacticExpr of glob_atomic_tactic_expr | ARawTacticExpr of raw_tactic_expr | ARawAtomicTacticExpr of raw_atomic_tactic_expr - | ATacticExpr of tactic_expr | AAtomicTacticExpr of atomic_tactic_expr let tag_of_annotation = function @@ -32,7 +31,6 @@ let tag_of_annotation = function | AGlobAtomicTacticExpr _ -> "glob_atomic_tactic_expr" | ARawTacticExpr _ -> "raw_tactic_expr" | ARawAtomicTacticExpr _ -> "raw_atomic_tactic_expr" - | ATacticExpr _ -> "tactic_expr" | AAtomicTacticExpr _ -> "atomic_tactic_expr" let attributes_of_annotation a = |
