diff options
Diffstat (limited to 'proofs/proof_type.ml')
-rw-r--r-- | proofs/proof_type.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/proofs/proof_type.ml b/proofs/proof_type.ml index dabc84ca3..5bd8060ae 100644 --- a/proofs/proof_type.ml +++ b/proofs/proof_type.ml @@ -102,8 +102,8 @@ type ltac_call_kind = | LtacConstrInterp of rawconstr * ((identifier * constr) list * (identifier * identifier option) list) -type ltac_trace = (loc * ltac_call_kind) list +type ltac_trace = (int * loc * ltac_call_kind) list -exception LtacLocated of (ltac_call_kind * ltac_trace * loc) * exn +exception LtacLocated of (int * ltac_call_kind * ltac_trace * loc) * exn let abstract_tactic_box = ref (ref None) |