diff options
author | Karl Williamson <khw@cpan.org> | 2020-02-20 16:51:31 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2020-03-11 09:52:11 -0600 |
commit | 2bc5f86adf5f1c0feb76d83e1a627e5649e6beab (patch) | |
tree | 77b9b2120fd2d2a0173cfb978f2f20df5afa41e3 /vms | |
parent | b6d9446cecd87d16450d8743a2f0b0079e12567b (diff) | |
download | perl-2bc5f86adf5f1c0feb76d83e1a627e5649e6beab.tar.gz |
Add mutex for accessing ENV
Diffstat (limited to 'vms')
-rw-r--r-- | vms/vmsish.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/vms/vmsish.h b/vms/vmsish.h index 8dca211b5a..3fae5d781e 100644 --- a/vms/vmsish.h +++ b/vms/vmsish.h @@ -310,7 +310,8 @@ struct interp_intern { #define BIT_BUCKET "/dev/null" #define PERL_SYS_INIT_BODY(c,v) MALLOC_CHECK_TAINT2(*c,*v) vms_image_init((c),(v)); PERLIO_INIT; MALLOC_INIT #define PERL_SYS_TERM_BODY() HINTS_REFCNT_TERM; OP_REFCNT_TERM; \ - PERLIO_TERM; MALLOC_TERM; LOCALE_TERM + PERLIO_TERM; MALLOC_TERM; LOCALE_TERM \ + ENV_TERM; #define dXSUB_SYS dNOOP #define HAS_KILL #define HAS_WAIT |