1/* 2 Copyright (c) 1990-2000 Info-ZIP. All rights reserved. 3 4 See the accompanying file LICENSE, version 2000-Apr-09 or later 5 (the contents of which are also included in zip.h) for terms of use. 6 If, for some reason, all these files are missing, the Info-ZIP license 7 also may be found at: ftp://ftp.info-zip.org/pub/infozip/license.html 8*/ 9/* replace standard library function who needs a FILE* */ 10 11#pragma library 12 13#include <stdio.h> 14#include <fcntl.h> 15#include <sc.h> 16#include <lub.h> 17 18short _isatty(int fd) 19{ 20 register short lub; 21 22 lub = (int) _fcntl(&stdin[fd], 5, (size_t) 0); 23 return (lub >= CONIN && lub <= CONOUT) 24 || (lub >= COM1 && lub <= COM4) 25 || (lub >= COM5 && lub <= COM16); 26} 27