
  PROCEDURE [XREF] clp$push_function_proc_block
    (    caller_ring: ost$valid_ring;
         function_name: ost$name;
         function_source: clt$command_or_function_source;
         proc_can_be_echoed: boolean;
         file_name: fst$path_handle_name;
         file_id: amt$file_identifier;
         proc_data: ^clt$input_data;
         expected_result_type: ^clt$type_specification;
     VAR function_proc_block: ^clt$block);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_identifier
*copyc clt$block
*copyc clt$command_or_function_source
*copyc clt$input_data
*copyc clt$type_specification
*copyc fst$path_handle_name
*copyc osd$virtual_address
*copyc ost$name
*copyc rmt$device_class
?? POP ??
