    TYPE
    jmt$seg_attr = RECORD
       sfid_needed: BOOLEAN,
       seg_len: INTEGER,
       segnumber: ost$segment,
       sdt: mmt$segment_descriptor,
       sdtx: mmt$segment_descriptor_extended,
    RECEND;

?? PUSH (LISTEXT := ON) ??
*copyc MMT$ATTRIBUTE_KEYWORD
*copyc MMT$SEGMENT_DESCRIPTOR_TABLE
*copyc MMT$SEGMENT_DESCRIPTOR_TABLE_EX
?? POP ??
