
  PROCEDURE [XREF] syp$ascii_to_binary (text : string ( * );
        default_base: 1 .. 16;
    VAR int: integer;
    VAR status: ost$status);

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