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 (476), Seg (564), Ofs (538), Ptr (546)

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.