diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2011-05-01 19:40:15 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2011-05-01 19:40:15 +0300 |
commit | b5c796b43307c74a21ebcd1b95303ff79f48819f (patch) | |
tree | beb29f08d5f493ae7897e86c8261e49727f39d61 | |
parent | 526e360640bb3beddc963d3a4b2982081d548753 (diff) | |
download | egawk-b5c796b43307c74a21ebcd1b95303ff79f48819f.tar.gz egawk-b5c796b43307c74a21ebcd1b95303ff79f48819f.tar.bz2 egawk-b5c796b43307c74a21ebcd1b95303ff79f48819f.zip |
Compile fix for VMS.
-rw-r--r-- | vms/ChangeLog | 4 | ||||
-rw-r--r-- | vms/gawkmisc.vms | 6 |
2 files changed, 10 insertions, 0 deletions
diff --git a/vms/ChangeLog b/vms/ChangeLog index 3a3b74a1..39381a81 100644 --- a/vms/ChangeLog +++ b/vms/ChangeLog @@ -1,3 +1,7 @@ +Fri Apr 29 18:10:49 2011 Pat Rankin <rankin@pactechdata.com> + + * gawkmisc.vms (os_isatty): New routine. + Sat Feb 26 18:35:01 2011 Pat Rankin <rankin@pactechdata.com> * vms_gawk.c, gawk.cld: Add support for new command qualifiers: diff --git a/vms/gawkmisc.vms b/vms/gawkmisc.vms index afff3b8c..346a1e88 100644 --- a/vms/gawkmisc.vms +++ b/vms/gawkmisc.vms @@ -188,3 +188,9 @@ files_are_same(char *newfile, SRCFILE *oldfile) && f1->st_ino[1] == f2->st_ino[1] && f1->st_ino[2] == f2->st_ino[2]); } + +int +os_isatty(int fd) +{ + return (isatty(fd) > 0); +} |