Files
Digital-Research-Source-Code/CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v101/clib/ttyname.c
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

13 lines
263 B
C

/* ttyname - find name of a terminal */
/* returns "CON:" if isatty, NULL o.w., under CP/M */
#include <portab.h>
#include <cpm.h>
EXTERN BYTE __tname[]; /* CON: String */
BYTE *ttyname(fd)
WORD fd;
{
if( isatty(fd) )
return(__tname);
else return(NULL);
}