
  PROCEDURE [XREF] lop$reserve_storage (attributes: lot$segment_attributes;
        allocation_alignment: ost$segment_offset;
        allocation_offset: ost$segment_offset;
        predefined_segment: boolean;
        predefined_segment_number: ost$segment;
        shadow_pointer: ^cell;
        shadow_length: ost$segment_length;
    VAR allocation_length: ost$segment_length;
    VAR section_address: lot$address);
?? PUSH (LISTEXT := ON) ??
*copyc LOT$LOADER_TYPE_DEFINITIONS
?? POP ??
