anchor.diff:    end;
   end;
   
  -function getLineFromDmdMessage(const aMessage: string): TPoint;
  +function getLineFromMessage(const aMessage: string): TPoint;
   var
     i, j: NativeInt;
     ident: string;
  
positive.code:   end;
  
    function guessMessageKind(const aMessg: string): TCEAppMessageKind;
    function getLineFromDmdMessage(const aMessage: string): TPoint;
    function openFileFromDmdMessage(const aMessage: string): boolean;
  
  implementation
  
negative.code:   if not openFileFromDmdMessage(msg) then
      exit;
    // from here, since a doc has the focus, List.Selected is nil
    pos := getLineFromMessage(msg);
    if fDoc = nil then
      exit;
    fDoc.CaretXY := pos;
  