
  PROCEDURE [XREF] clp$process_when_cond_in_task
    (    condition_definition: clt$when_condition_definition;
         default_handler: ^procedure (VAR status: ost$status);
     VAR condition_processed: boolean;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc clt$when_condition_definition
*copyc ost$status
?? POP ??
