diff --git a/src/ce_tools.pas b/src/ce_tools.pas
index 55c71f39..ecf4379e 100644
--- a/src/ce_tools.pas
+++ b/src/ce_tools.pas
@@ -199,8 +199,10 @@ var
 begin
   ce_processes.killProcess(fProcess);
   //
+  if fMsgs = nil then
+    fMsgs := getMessageDisplay;
   if fClearMessages then
-    getMessageDisplay(fMsgs).clearByContext(amcMisc);
+    fMsgs.clearByContext(amcMisc);
   if fSymStringExpander = nil then
     fSymStringExpander:= getSymStringExpander;
   //