--- a/src/HOL/Library/datatype_records.ML Wed Oct 20 17:11:46 2021 +0200
+++ b/src/HOL/Library/datatype_records.ML Wed Oct 20 18:13:17 2021 +0200
@@ -32,7 +32,6 @@
type T = data
val empty = Symtab.empty
val merge = Symtab.merge op =
- val extend = I
)
fun mk_eq_dummy (lhs, rhs) =