diff options
| author | Pierre-Marie Pédrot | 2017-10-07 22:47:48 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2017-10-07 22:52:29 +0200 |
| commit | 533b5ee5a3c5dd4c2e54d85dba9485722bb21db1 (patch) | |
| tree | 94d53e9572b04200188252b71f59806ab49f97e7 /src/tac2intern.ml | |
| parent | f0fb8686377815978556e7d554f27de6406d1fed (diff) | |
Remove unused warnings.
Diffstat (limited to 'src/tac2intern.ml')
| -rw-r--r-- | src/tac2intern.ml | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/src/tac2intern.ml b/src/tac2intern.ml index 0efd9a3005..7b35cd55aa 100644 --- a/src/tac2intern.ml +++ b/src/tac2intern.ml @@ -8,7 +8,6 @@ open Pp open Util -open Genarg open CErrors open Names open Libnames @@ -23,13 +22,8 @@ let coq_type n = KerName.make2 Tac2env.coq_prefix (Label.make n) let t_int = coq_type "int" let t_string = coq_type "string" -let t_array = coq_type "array" -let t_list = coq_type "list" let t_constr = coq_type "constr" -let c_nil = GTacCst (Other t_list, 0, []) -let c_cons e el = GTacCst (Other t_list, 0, [e; el]) - (** Union find *) module UF : |