
  PROCEDURE [XREF] clp$push_input
    (    file: fst$file_reference;
         utility_name: clt$utility_name;
         prompt_string: clt$prompt_string;
         enable_echoing: boolean;
         read_only: boolean;
     VAR input_block_handle: clt$block_handle;
     VAR file_id: amt$file_identifier;
     VAR opened_executable_file: boolean;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_identifier
*copyc clt$block_handle
*copyc clt$prompt_string
*copyc clt$utility_name
*copyc fst$file_reference
*copyc ost$status
?? POP ??
