diff options
| author | Charles Lane <lane@DUPHY4.Physics.Drexel.Edu> | 2001-10-19 13:45:23 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-19 21:09:27 +0000 |
| commit | 96e176bf068724d05d4927c116d41d2f78a2560d (patch) | |
| tree | e18e87ee8dc36dca37fb10687567e52e5db9cd78 /pp_ctl.c | |
| parent | b8d190ff31df6d51464475a3b67820d11d6c9f06 (diff) | |
| download | perl-96e176bf068724d05d4927c116d41d2f78a2560d.tar.gz | |
vmsish fix, ieee rand() cleanup
Message-Id: <011019174427.d749b@DUPHY4.Physics.Drexel.Edu>
p4raw-id: //depot/perl@12513
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -2593,6 +2593,7 @@ PP(pp_exit) #ifdef VMS if (anum == 1 && (PL_op->op_private & OPpEXIT_VMSISH)) anum = 0; + VMSISH_HUSHED = VMSISH_HUSHED || (PL_op->op_private & OPpHUSH_VMSISH); #endif } PL_exit_flags |= PERL_EXIT_EXPECTED; |