1 dcl tedcloseup_     entry (             /* move all buffer data to lower     */
2                     ptr                 /* -> to buffer to convert           */
3                     );
4