
  PROCEDURE [XREF] clp$process_command
    (    block_at_start_of_command: ^clt$block;
         interpreter_mode: clt$interpreter_modes;
         command_from_job_command_file: boolean;
         command_from_execute_command: boolean;
         log_the_command: boolean;
         command_can_be_echoed: boolean;
         parse: clt$parse_state;
     VAR cause_condition {input, output} : clt$when_condition;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc clt$block
*copyc clt$interpreter_modes
*copyc clt$parse_state
*copyc clt$when_condition
*copyc ost$status
?? POP ??
