anchor.diff:      function    Count: integer;
       function    FindByName(const MacroName: TfpgString): TIDEMacro;
       function    StrHasMacros(const s: TfpgString): boolean;
  -    function    SubstituteStr(var s: TfpgString): boolean;
  +    function    ExpandMacro(const s: TfpgString): TfpgString;
       procedure   Add(NewMacro: TIDEMacro);
       procedure   Clear;
       procedure   Delete(AIndex: integer);
  
positive.code:   end;
  end;
  
  function TIDEMacroList.SubstituteStr(var s: TfpgString): boolean;
  begin
  
  end;
  
  procedure TIDEMacroList.Add(NewMacro: TIDEMacro);
  
negative.code: 
  
  implementation
  
  uses
    ideconst
    ,fpg_iniutils;
  
  var
    uIDEMacroList: TIDEMacroList;
  