  PROCEDURE [XREF] pmp$restore_program_state
    (    p_state_container: ^SEQ ( * );
         p_parameter: ^cell;
         parameter_length: 0 .. 0ffff(16);
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
*copyc pme$program_state_exceptions
?? POP ??
