
  PROCEDURE [XREF] clp$substitute_delimited_text
    (    old_text: clt$command_line;
         delimiter: char;
     VAR new_text: clt$command_line;
     VAR new_text_size: clt$command_line_size;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc clt$command_line
*copyc clt$command_line_size
*copyc ost$status
?? POP ??


