Problem mit automatischem freigeben von Interfaces

[Elvis]

Wenn eine Interface-Referenz per const übergeben wird, wird keine autom. Referenzzählung gemacht.

Delphi-Quellcode:

procedure TOtherClass.Test(const AFoo: IFoo);
begin
  AFoo.DoSomething();
end;

Natürlich kann die Implementierung von DoSomething wiederum zu Referenzzählungsproblemen führen.
Aber nicht weil es auf eien Interface-Referenz ausgeführt wird, sondern weil dort vllt AFoo als Interface irgendwo reingestopft wird...