freepascal.compiler/tests/webtbf/tw25769.pp

{ %fail }
unit tw25769;

{$mode objfpc}{$H+}

interface

type
  TDbgSymbolValue = class(TObject)
  protected
    function GetMemberCountEx(AIndex: array of Integer): Integer;
  public
    property MemberCountEx[AIndex: array of Integer]: Integer read GetMemberCountEx;
  end;


implementation

function TDbgSymbolValue.GetMemberCountEx(AIndex: Integer): Integer;
begin
end;

end.