> fun uncheck ctxt ts = > - if Config.get ctxt show_variants orelse exists (is_none o try > Term.type_of) ts then ts > + if Proof_Context.abbrev_mode ctxt orelse > + Config.get ctxt show_variants orelse > + exists (can Term.type_of) ts then ts > else map (insert_overloaded ctxt) ts;
Nb. is_none o try f <--> not o can f
This got swapped in this patch and is maybe the reason for failing to
solve the problem.
Cheers,
Florian
--
PGP available:
http://home.informatik.tu-muenchen.de/haftmann/pgp/florian_haftmann_at_informatik_tu_muenchen_de
signature.asc
Description: OpenPGP digital signature
_______________________________________________ isabelle-dev mailing list isabelle-...@in.tum.de https://mailmanbroy.informatik.tu-muenchen.de/mailman/listinfo/isabelle-dev
