/* PL/I symbolic debugger routines for console output called by put_skip_list and put_list, through which all output goes so that log file can be implemented */ skip1: procedure; put skip; end/*skip1*/; put1: procedure(x); dcl x char(*); put list(x); end/*put1*/;