diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 13:09:56 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 13:09:56 +0300 |
commit | bc70de7b3302d5a81515b901cae376b8b51d2004 (patch) | |
tree | d36d6743e65697f6923b79d0ea8f9f9bf4ef7398 /unsupported/tandem/isatty.c | |
parent | b9e4a1fd4c8c8753ab8a9887bab55f03efe1e3e2 (diff) | |
download | egawk-bc70de7b3302d5a81515b901cae376b8b51d2004.tar.gz egawk-bc70de7b3302d5a81515b901cae376b8b51d2004.tar.bz2 egawk-bc70de7b3302d5a81515b901cae376b8b51d2004.zip |
Move to gawk-3.1.0.
Diffstat (limited to 'unsupported/tandem/isatty.c')
-rw-r--r-- | unsupported/tandem/isatty.c | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/unsupported/tandem/isatty.c b/unsupported/tandem/isatty.c new file mode 100644 index 00000000..d73d7a34 --- /dev/null +++ b/unsupported/tandem/isatty.c @@ -0,0 +1,22 @@ +#include <cextdecs(FILE_GETINFO_)> +#include <stdioh> +#include <talh> + +int isatty(int fd) +{ + short cret,sfd,typ[5]; + sfd = (short) fd; + cret = FILE_GETINFO_(sfd,,,,,&typ[0]); + if(typ[0] == 6) + return (1); + else + return (0); +} +int dup(int fd) +{ + return (fd); +} +int dup2(int fd, int fd2) +{ + return (0); +} |