diff options
Diffstat (limited to 'dev')
| -rw-r--r-- | dev/top_printers.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/dev/top_printers.ml b/dev/top_printers.ml index ff592ed944..467ba78d72 100644 --- a/dev/top_printers.ml +++ b/dev/top_printers.ml @@ -9,7 +9,7 @@ open Sign open Univ open Proof_trees open Environ -(*i open Generic i*) +(* open Generic *) open Printer open Refiner open Tacmach @@ -101,7 +101,6 @@ let constr_display csr = | Lambda -> "Lambda" | AppL -> "AppL" | Const sp -> "Const("^(string_of_path sp)^")" - | Abst sp -> "Abst("^(string_of_path sp)^")" | MutInd(sp,i) -> "MutInd("^(string_of_path sp)^","^(string_of_int i)^")" | MutConstruct((sp,i),j) -> "MutConstruct(("^(string_of_path sp)^","^(string_of_int i)^"),"^ |