anchor.diff:      {$ENDIF}
     end;
   
  -  dmdproc := TProcess.Create(nil);
  +  dmdproc := TCEProcess.Create(nil);
     try
   
       fMsgs.message('compiling ' + shortenPath(fDoc.fileName, 25), fDoc, amcEdit, amkInf);
  
positive.code:     LibMan.getLibFiles(nil, dmdproc.Parameters);
      LibMan.getLibSources(nil, dmdproc.Parameters);
      dmdproc.Execute;
      while dmdproc.Running do;
      asyncprocOutput(dmdProc);
  
      if (dmdProc.ExitStatus = 0) then
      begin
  
negative.code: 
  procedure TCEMainForm.asyncprocTerminate(sender: TObject);
  var
    proc: TCEProcess;
    inph: TObject;
  begin
    proc := TCEProcess(sender);
    asyncprocOutput(sender);
    inph := EntitiesConnector.getSingleService('ICEProcInputHandler');
    if (inph <> nil) then
      (inph as ICEProcInputHandler).removeProcess(proc);
  