aboutsummaryrefslogtreecommitdiff
path: root/printing/proof_diffs.ml
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2020-02-20 13:56:23 -0500
committerEmilio Jesus Gallego Arias2020-02-20 13:56:23 -0500
commitf748ca04748ef00b85de7f31dc1dc7f0a985ec3f (patch)
tree60a101df6b546e33878a9ac0900d1009f666c7be /printing/proof_diffs.ml
parent935101ee1375ed930e993d0e76f2325ade562506 (diff)
parenta8307ceecc4347593e67cff2044a250b75060f5a (diff)
Merge PR #10832: Addressing #6082 and #7766: warning when overriding notation format + new notion of format associated to a given interpretation
Ack-by: maximedenes
Diffstat (limited to 'printing/proof_diffs.ml')
-rw-r--r--printing/proof_diffs.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/proof_diffs.ml b/printing/proof_diffs.ml
index d93dd15f91..c3ee5968dc 100644
--- a/printing/proof_diffs.ml
+++ b/printing/proof_diffs.ml
@@ -529,7 +529,7 @@ let match_goals ot nt =
constr_expr ogname a a2
| CastCoerce, CastCoerce -> ()
| _, _ -> raise (Diff_Failure "Unable to match goals between old and new proof states (4)"))
- | CNotation (ntn,args), CNotation (ntn2,args2) ->
+ | CNotation (_,ntn,args), CNotation (_,ntn2,args2) ->
constr_notation_substitution ogname args args2
| CGeneralization (b,a,c), CGeneralization (b2,a2,c2) ->
constr_expr ogname c c2