[fpc-devel] Suggestion for change: Overly strict check

[Ales Katona]

Here's the better example:

  TTest = class
   protected
    FField: Integer;
   public
    procedure Helper(Field: Integer);
    property Field: Integer read FField write FField;
  end;

{ TTest }

procedure TTest.Helper(Field: Integer);
begin
  with Self do
    Field:=Field;

  Writeln(Self.Field);
  Writeln(Field);
end; 

It's rather idiotic but there are implications..

Ales

P.S: the result is:
0
5