/* provide proper entry declaration for PL/I symbolic debugger: */ dcl prologname entry(fixed bin(15)/*addr of prolog*/) returns(char(6) varying/*first 6 chars of procedure name*/);