
  PROCEDURE [XREF] osp$append_status_real
    (    delimiter: char;
         real_number: longreal;
         number_of_digits: clt$real_number_digit_count;
     VAR status {input, output} : ost$status);

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