char id_isatty[] = "@(#)isatty_.c 1.1";
* determine if stream is associated with a tty (async port)
* val will be .TRUE. if lunit is associated with a 'tty'
#include "../libI77/fiodefs.h"
extern unit units
[]; /* logical units table from iolib */
if (*u
< 0 || *u
>= MXUNIT
)
return((long)(isatty(fileno(lu
->ufd
)) != 0));