diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-19 05:55:52 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-19 05:55:52 +0000 |
| commit | d98f61e7d51abbefcd3982d605d4bd09ed4ddd7f (patch) | |
| tree | 0fe4b7cb5a932e8e59433ecae8bcc077da072ed3 /perl.h | |
| parent | 71a29c3c6e68e84b4c2fa366c4878918712829a9 (diff) | |
| download | perl-d98f61e7d51abbefcd3982d605d4bd09ed4ddd7f.tar.gz | |
support for C<use vmsish 'hushed'>; move VMSISH_EXIT out of
op_private (from Charles Lane <lane@DUPHY4.Physics.Drexel.Edu>)
p4raw-id: //depot/perl@5816
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1652,7 +1652,7 @@ typedef pthread_key_t perl_key; #ifdef VMS # define STATUS_NATIVE PL_statusvalue_vms # define STATUS_NATIVE_EXPORT \ - ((I32)PL_statusvalue_vms == -1 ? 44 : PL_statusvalue_vms) + (((I32)PL_statusvalue_vms == -1 ? 44 : PL_statusvalue_vms) | (VMSISH_HUSHED ? 0x10000000 : 0)) # define STATUS_NATIVE_SET(n) \ STMT_START { \ PL_statusvalue_vms = (n); \ |