diff options
| author | Craig A. Berry <craigberry@mac.com> | 2004-06-01 18:16:58 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2004-06-02 08:21:30 +0000 |
| commit | 69232efac4da91085d3445ce98427a2706e520f7 (patch) | |
| tree | 965ee563c1f29ec7755edff555031f3351c4348d /perl.c | |
| parent | 5735ebe06ddf67066a60d58a59c15526051d4cc9 (diff) | |
| download | perl-69232efac4da91085d3445ce98427a2706e520f7.tar.gz | |
on VMS, always exit with failure in my_failure_exit
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <40BD54BA.9040708@mac.com>
p4raw-id: //depot/perl@22893
Diffstat (limited to 'perl.c')
| -rw-r--r-- | perl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -4616,7 +4616,7 @@ Perl_my_failure_exit(pTHX) STATUS_NATIVE_SET(44); } else { - if (!vaxc$errno && errno) /* unlikely */ + if (!vaxc$errno) /* unlikely */ STATUS_NATIVE_SET(44); else STATUS_NATIVE_SET(vaxc$errno); |