#include #if IBM || HP cflush(iunit) #else cflush_(iunit) #endif int *iunit; { fflush(stdout); } #if IBM || HP pointqq(ichar) #else pointqq_(ichar) #endif int *ichar; { putchar((char)(*ichar)); }