Node:Addr, Next:AlignOf, Previous:abstract, Up:Reference
function Addr (const Foo): Pointer;
Addr returns the address of its argument. It is equivalent to the
address operator and provided for compatibility with Borland Pascal
which in turn implements it for backward-compatibility with Turbo
Pascal.
Addr is a Borland Pascal extension.
program AddrDemo;
var
Foo: ^Integer;
Bar: Integer;
begin
Foo := Addr (Bar); { Let `Foo' point to `Bar'. }
Bar := 17;
Foo^ := 42; { Change the value of `Bar' to 42 }
WriteLn (Bar)
end.