[fpc-pascal] problem with procedural types

[Dariusz Mazur]

Hi
I upgrade Lazarus and FPT to current snapshot an I have problem

I can compile this procedure

procedure tForm1.MouseCLick(sender:tObject);
begin

end;


procedure tForm1.onnn(var onc : tNotifyEvent);
begin
  onclick:={$IFDEF FPC}@{$ENDIF}onc;
end;

compiler claim:
Error: incompatible types: got "Pointer" expected "<procedure variable 
type of procedure(TObject) of object; Register>"


when I try
onclick:={$IFDEF FPC}@{$ENDIF}MouseClick;



till now everything were OK


Darek