equal
deleted
inserted
replaced
83 (someN, |
83 (someN, |
84 state |> |
84 state |> |
85 (if mode = Auto_Try then |
85 (if mode = Auto_Try then |
86 Proof.goal_message |
86 Proof.goal_message |
87 (fn () => |
87 (fn () => |
88 Pretty.chunks |
88 Pretty.markup Markup.information (message results)) |
89 [Pretty.str "", Pretty.markup Markup.intensify (message results)]) |
|
90 else |
89 else |
91 tap (fn _ => |
90 tap (fn _ => |
92 Output.urgent_message (Pretty.string_of (Pretty.chunks (message results)))))) |
91 Output.urgent_message (Pretty.string_of (Pretty.chunks (message results)))))) |
93 | SOME NONE => |
92 | SOME NONE => |
94 (if mode = Normal then Output.urgent_message "No proof found." |
93 (if mode = Normal then Output.urgent_message "No proof found." |