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_sys.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_sys.c')
| -rw-r--r-- | pp_sys.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -433,6 +433,9 @@ PP(pp_die) SV *tmpsv; STRLEN len; bool multiarg = 0; +#ifdef VMS + VMSISH_HUSHED = VMSISH_HUSHED || (PL_op->op_private & OPpHUSH_VMSISH); +#endif if (SP - MARK != 1) { dTARGET; do_join(TARG, &PL_sv_no, MARK, SP); |