Skip to content

CSeg

Return code segment

Declaration

Source position: systemh.inc line 1229

  function CSeg : Word;

Description

CSeg returns the Code segment register. In Free Pascal, it returns always a zero, since Free Pascal is a 32/64 bit compiler.

Errors

None.

See also

Name Description
DSeg Return data segment
Ofs Return offset of a variable.
Ptr Combine segment and offset to pointer
Seg Return segment

Example

Program Example13;
{ Program to demonstrate the CSeg function. }
var W : word;
begin
  W:=CSeg; {W:=0, provided for compatibility,
                  FPC is 32 bit.}
end.