diff --git a/src/ce_dastworx.pas b/src/ce_dastworx.pas
index 8227fe7e..9927c62b 100644
--- a/src/ce_dastworx.pas
+++ b/src/ce_dastworx.pas
@@ -34,7 +34,6 @@ end;
 
 procedure getModuleImports(source, imports: TStrings);
 var
-  err: TStringList;
   str: string;
   prc: TProcess;
 begin
diff --git a/src/ce_main.pas b/src/ce_main.pas
index 83bc57e4..bde0961f 100644
--- a/src/ce_main.pas
+++ b/src/ce_main.pas
@@ -2703,7 +2703,7 @@ var
   i: integer;
 begin
   asyncprocTerminate(sender);
-  if fCovModUt then
+  if fCovModUt and assigned(fRunProc) and (fRunProc.ExitStatus = 0) then
   begin
     fname   := stripFileExt(fDoc.fileName);
     fullcov := true;