# HG changeset patch # User wenzelm # Date 1662460836 -7200 # Node ID 5fc4e1fc39b155f09aaa4903c0f3594400a13d91 # Parent 8e1b2e1a29b722efccc68c4120b6ce43d5d46c94 tuned --- avoid warnings; diff -r 8e1b2e1a29b7 -r 5fc4e1fc39b1 src/Pure/Isar/overloading.ML --- a/src/Pure/Isar/overloading.ML Tue Sep 06 12:25:57 2022 +0200 +++ b/src/Pure/Isar/overloading.ML Tue Sep 06 12:40:36 2022 +0200 @@ -53,7 +53,7 @@ Improvable_Syntax.map (fn {syntax, secondary_pass} => {syntax = f syntax, secondary_pass = secondary_pass}); val mark_passed = - Improvable_Syntax.map (fn {syntax, secondary_pass} => {syntax = syntax, secondary_pass = true}); + Improvable_Syntax.map (fn {syntax, secondary_pass = _} => {syntax = syntax, secondary_pass = true}); fun improve_term_check ts ctxt = let