
  PROCEDURE [XREF] clp$set_current_prompt_string
    (    prompt_string: ift$prompt_string);

?? PUSH (LISTEXT := ON) ??
*copyc ift$terminal_connection_types
?? POP ??
