# HG changeset patch # User wenzelm # Date 1358111364 -3600 # Node ID a9f07af30d6433101b6a608e239ce41a708ce815 # Parent 2ea3c90ff0bb70c8c7efcc46e3e32a39e4a287c8# Parent 4b30d461b3a6ff955981735b9538461a026c0ad8 merged diff -r 2ea3c90ff0bb -r a9f07af30d64 src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML --- a/src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML Sun Jan 13 22:07:00 2013 +0100 +++ b/src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML Sun Jan 13 22:09:24 2013 +0100 @@ -479,6 +479,7 @@ Sledgehammer_Fact.no_fact_override hyp_ts concl_t |> map (apfst (apfst (fn name => name ()))) |> tap (fn facts => + "Line " ^ str0 (Position.line_of pos) ^ ": " ^ (if null facts then "Found no relevant facts." else