
  PROCEDURE [XREF] clp$push_input_$command_block
    (    inherited_input_block_offset: ost$segment_offset;
         utility_name: clt$utility_name;
         prompt_string: clt$prompt_string;
         file_id: amt$file_identifier;
         data: ^clt$input_data;
         input_can_be_echoed: boolean;
         inherited_input_in_current_task: boolean;
     VAR input_block: ^clt$block);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_identifier
*copyc clt$block
*copyc clt$input_data
*copyc clt$prompt_string
*copyc clt$utility_name
*copyc osd$virtual_address
?? POP ??
