  PROCEDURE [XREF] pmp$post_current_environment
    (    environment {input, output} : ^pmt$condition_environment);

?? PUSH (LISTEXT := ON) ??
*copyc pmt$condition_environment
?? POP ??
