diff options
| author | ppedrot | 2013-05-30 17:55:59 +0000 |
|---|---|---|
| committer | ppedrot | 2013-05-30 17:55:59 +0000 |
| commit | 1b2a6326876c67bf25657ecd7c0765cacd1cde75 (patch) | |
| tree | 5d6574d271497c3599e5b913ba803cb0c9a68ca1 /proofs | |
| parent | 0bbed104531e8fb34880e4dc0a903375364ee537 (diff) | |
Removing a useless location in ltac trace mechanism.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16547 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/proof_type.ml | 2 | ||||
| -rw-r--r-- | proofs/proof_type.mli | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/proofs/proof_type.ml b/proofs/proof_type.ml index f7f10272cf..609c7782d7 100644 --- a/proofs/proof_type.ml +++ b/proofs/proof_type.ml @@ -58,4 +58,4 @@ type ltac_call_kind = type ltac_trace = (int * Loc.t * ltac_call_kind) list -let (ltac_trace_info : (ltac_trace * Loc.t) Exninfo.t) = Exninfo.make () +let (ltac_trace_info : ltac_trace Exninfo.t) = Exninfo.make () diff --git a/proofs/proof_type.mli b/proofs/proof_type.mli index 74a12d42b2..33e1f29c59 100644 --- a/proofs/proof_type.mli +++ b/proofs/proof_type.mli @@ -85,4 +85,4 @@ type ltac_call_kind = type ltac_trace = (int * Loc.t * ltac_call_kind) list -val ltac_trace_info : (ltac_trace * Loc.t) Exninfo.t +val ltac_trace_info : ltac_trace Exninfo.t |