diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/vmsish.pm')
| -rw-r--r-- | Master/tlpkg/tlperl/lib/vmsish.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Master/tlpkg/tlperl/lib/vmsish.pm b/Master/tlpkg/tlperl/lib/vmsish.pm index 653f840562d..d7686a2f388 100644 --- a/Master/tlpkg/tlperl/lib/vmsish.pm +++ b/Master/tlpkg/tlperl/lib/vmsish.pm @@ -1,6 +1,6 @@ package vmsish; -our $VERSION = '1.03'; +our $VERSION = '1.04'; =head1 NAME @@ -60,12 +60,12 @@ symbol $STATUS will still have the termination status, but with a high-order bit set: EXAMPLE: - $ perl -e"exit 44;" Non-hushed error exit - %SYSTEM-F-ABORT, abort DCL message + $ perl -e"exit 44;" Non-hushed error exit + %SYSTEM-F-ABORT, abort DCL message $ show sym $STATUS $STATUS == "%X0000002C" - $ perl -e"use vmsish qw(hushed); exit 44;" Hushed error exit + $ perl -e"use vmsish qw(hushed); exit 44;" Hushed error exit $ show sym $STATUS $STATUS == "%X1000002C" |