[fpc-pascal] Procedure types

[leledumbo]

FPC treats procedural types "a little" different from Delphi / TP, see 
http://www.freepascal.org/docs-html/ref/refse17.html this . You can
therefore write your AddressOf function as:
FUNCTION AddressOf(VAR x): POINTER; 
... // variables (if you ever need)
begin
{$ifdef fpc}
AddressOf:=@x;
{$else}
... // for other compilers
{$endif}
end;
-- 
View this message in context: http://www.nabble.com/Procedure-types-tp21096634p21102287.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.