DSeg

Declaration:
Function DSeg : Word;
Description:
DSeg returns the data segment register. In Free Pascal, it returns always a zero, since Free Pascal is a 32 bit compiler.
Errors:
None.
See also:
CSeg (479), Seg (567), Ofs (541), Ptr (549)

Listing: refex/ex17.pp


Program Example17;

{ Program to demonstrate the DSeg function. }

Var
  W : Word;

begin
  W:=DSeg; {W:=0, This function is provided for compatibility,
                  FPC is a 32 bit comiler.}
end.