
  PROCEDURE [XREF] pmp$create_shared_stack  (
        segment_attributes: ^ARRAY [*] of mmt$attribute_descriptor;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc pmt$task_id
*copyc osd$virtual_address
*copyc pme$execution_exceptions
*copyc ost$status
?? POP ??
