diff options
| author | Tom Lane <tgl@sss.pgh.pa.us> | 2022-01-31 15:07:39 -0500 |
|---|---|---|
| committer | Tom Lane <tgl@sss.pgh.pa.us> | 2022-01-31 15:07:39 -0500 |
| commit | 00fdfde6dc726dbbee7e7e3e25a6406e2c76c4f6 (patch) | |
| tree | 33d5562b58cf3fb06bc776a2d764a1ba94d2d0e4 /src | |
| parent | 2d44912cf79f1f174a83f587e1c4328315b8a0fa (diff) | |
| download | postgresql-00fdfde6dc726dbbee7e7e3e25a6406e2c76c4f6.tar.gz postgresql-00fdfde6dc726dbbee7e7e3e25a6406e2c76c4f6.zip | |
Revert "plperl: Fix breakage of c89f409749c in back branches."
This reverts commits d81cac47a et al. We shouldn't need that
hack after the preceding commits.
Discussion: https://postgr.es/m/20220131015130.shn6wr2fzuymerf6@alap3.anarazel.de
Diffstat (limited to 'src')
| -rw-r--r-- | src/pl/plperl/plperl.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/pl/plperl/plperl.c b/src/pl/plperl/plperl.c index 60d097070e5..676b772950b 100644 --- a/src/pl/plperl/plperl.c +++ b/src/pl/plperl/plperl.c @@ -298,11 +298,11 @@ static char *strip_trailing_ws(const char *msg); static OP *pp_require_safe(pTHX); static void activate_interpreter(plperl_interp_desc *interp_desc); -#if defined(WIN32) && PERL_VERSION < 28 +#if defined(WIN32) && PERL_VERSION_LT(5, 28, 0) static char *setlocale_perl(int category, char *locale); #else #define setlocale_perl(a,b) Perl_setlocale(a,b) -#endif /* defined(WIN32) && PERL_VERSION < 28 */ +#endif /* defined(WIN32) && PERL_VERSION_LT(5, 28, 0) */ /* * Decrement the refcount of the given SV within the active Perl interpreter @@ -4135,7 +4135,7 @@ plperl_inline_callback(void *arg) * * Starting in 5.28, perl exposes Perl_setlocale to do so. */ -#if defined(WIN32) && PERL_VERSION < 28 +#if defined(WIN32) && PERL_VERSION_LT(5, 28, 0) static char * setlocale_perl(int category, char *locale) { @@ -4203,4 +4203,4 @@ setlocale_perl(int category, char *locale) return RETVAL; } -#endif /* defined(WIN32) && PERL_VERSION < 28 */ +#endif /* defined(WIN32) && PERL_VERSION_LT(5, 28, 0) */ |