On 06/05/2013 23:08, Martin wrote:
Did you close the asm window before you tested?



Anyway. It has the right filename.

* Please recompile the IDE with the following define  CTDEBUG

* Please open the file   \ide\debugmanager.pas
line 1265
insert the TWO  debugln


  if (SrcLine > 0) and (CurrentSourceUnitInfo <> nil) and
     GetFullFilename(CurrentSourceUnitInfo, SrcFullName, True)
  then begin
debugln('### A');
    // Load the file
    NewSource := CodeToolBoss.LoadFile(SrcFullName, true, false);
    if NewSource = nil
    then begin
debugln('### B');
      if not (dlfLoadError in CurrentSourceUnitInfo.Flags) then begin
        MessageDlg(lisDebugUnableToLoadFile,
Format(lisDebugUnableToLoadFile2, ['"', SrcFullName, '"']),
                   mtError,[mbCancel],0);
CurrentSourceUnitInfo.Flags := CurrentSourceUnitInfo.Flags + [dlfLoadError];
      end;
      SrcLine := -1;
    end;
  end
  else
    SrcLine := -1;

--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to