anchor.diff:    end;
     TDbgInfoReaderClass = class of TDbgInfoReader;
   
  -  { TDbgFileSymbol }
  +  TDbgSymbolVisiblity = (svGlobal, svExport, svLocal);
   
     { TDbgSymbol }
   
  
positive.code:     fParent : TDbgSymbol;
      subList : TFPObjectList;
      subHash : TFPObjectHashTable;
    protected
      function GetCount: Integer;
      function GetSymbol(index: Integer): TDbgSymbol;
    public
      constructor Create(const AName: AnsiString; AParentSym: TDbgSymbol); virtual;
      destructor Destroy; override;
      property Name: AnsiString read fName;
      property Parent: TDbgSymbol read fParent;
      property Count: integer read GetCount;
  
negative.code:     LineNum : Integer;
      Addr    : TDbgPtr;
    end;
  
    { TDbgFileInfo }
  
    TDbgFileInfo = class(TDbgSymbol)
    private
  