diff options
| author | Karl Williamson <khw@cpan.org> | 2020-01-03 22:16:42 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2020-02-19 22:09:48 -0700 |
| commit | d2c9cb5392e8c58c3bb1935fc3c098737224567c (patch) | |
| tree | 647a4398f465b3b0751440c59747aea104c989ac /embedvar.h | |
| parent | 4829f32decd128e6a122bd8ce35fe944bd87f104 (diff) | |
| download | perl-d2c9cb5392e8c58c3bb1935fc3c098737224567c.tar.gz | |
POSIX::mblen() Make thread-safe; allow shift state control
This commit changes the behavior so that it takes a scalar parameter
instead of a char *, and thus might not be forceable into a valid PV.
When not a PV, the shift state is reinitialized, like calling mblen with
a NULL first parameter. Previously the shift state was always
reinitialized with every call, which meant this could not work on
locales with shift states.
This commit also changes to use mbrlen() on threaded perls transparently
(mostly), when available, to achieve thread-safe operation. It is not
completely transparent because mbrlen (under the very rare stateful
locales) returns a different value when it's resetting the shift state.
It also may set errno differently upon errors, and no effort is made to
hide that difference. Also mbrlen on some platforms can handle partial
characters.
[perl #133928] showed that someone was having trouble with shift states.
Diffstat (limited to 'embedvar.h')
| -rw-r--r-- | embedvar.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/embedvar.h b/embedvar.h index 63a741edb6..3970f5a42b 100644 --- a/embedvar.h +++ b/embedvar.h @@ -203,6 +203,7 @@ #define PL_markstack_ptr (vTHX->Imarkstack_ptr) #define PL_max_intro_pending (vTHX->Imax_intro_pending) #define PL_maxsysfd (vTHX->Imaxsysfd) +#define PL_mbrlen_ps (vTHX->Imbrlen_ps) #define PL_memory_debug_header (vTHX->Imemory_debug_header) #define PL_mess_sv (vTHX->Imess_sv) #define PL_min_intro_pending (vTHX->Imin_intro_pending) |