SSEG                 Return Stack Segment of Variable                pp 205

 Syntax:  Sseg

 Type:    Integer

 Form:    Function

 Purpose: Return integer value of current Stack segment.


 ----------------------------------------------------------------------------


 Usage:
       VAR
          StakSegment :  Integer ;

       BEGIN
          StakSegment := Sseg    ;
       END.