anchor.diff:      FilesList   : TFPObjectList;
   
       fInfo       : TDbgInfo;
  +
  +    fReadDebugMode  : Boolean;
     protected
  -    procedure ReadSymbols(debugdump: Boolean = false);
  +    procedure DoReadSymbols;
  +    function AllocCallback: TStabsCallback;
     public
       constructor Create(ASource: TDbgDataSource); override;
       destructor Destroy; override;
  
positive.code: interface
  
  uses
    Classes, SysUtils, contnrs, dbgTypes, dbgInfoTypes, stabs, stabsProc, AVL_Tree;
  
  var
    DebugDumpStabs  : Boolean = False;
  
negative.code:   fCurrentFunc:=proc;
  end;
  
  procedure TStabsToDebugInfo.EndProc(const Name: AnsiString);
  begin
    fCurrentFunc:=nil;
  end;
  
  procedure TStabsToDebugInfo.AsmSymbol(const SymName: AnsiString; Addr: LongWord);
  begin
  end;
  
  { TDbgStabsInfo }
  
  procedure TDbgStabsInfo.DoReadSymbols;
  var
    sz        : Int64;
    buf       : array of byte;
  