diff options
| author | Craig A. Berry <craigberry@mac.com> | 2003-08-01 18:34:31 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-02 05:06:43 +0000 |
| commit | 670137c257a6256f68b1db438a3e2732ae609263 (patch) | |
| tree | 1fe181046d3ee7788dddc65bc1a5098f23504436 /vms | |
| parent | 0e4142c9ef66ed123e5cb4a3557464b3ba4f2314 (diff) | |
| download | perl-670137c257a6256f68b1db438a3e2732ae609263.tar.gz | |
ioctl for VMS
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <3F2B3F57.4050609@mac.com>
p4raw-id: //depot/perl@20439
Diffstat (limited to 'vms')
| -rw-r--r-- | vms/vmsish.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/vms/vmsish.h b/vms/vmsish.h index 076a6967f6..af30293659 100644 --- a/vms/vmsish.h +++ b/vms/vmsish.h @@ -355,7 +355,11 @@ struct interp_intern { * This symbol, if defined, indicates that the ioctl() routine is * available to set I/O characteristics */ +#if defined(__CRTL_VER) && __CRTL_VER >= 70000000 +#define HAS_IOCTL /**/ +#else #undef HAS_IOCTL /**/ +#endif /* HAS_UTIME: * This symbol, if defined, indicates that the routine utime() is |