Movatterモバイル変換

[0]ホーム
URL:

Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

 Sign up
Appearance settings

Commitbb82e8a

Browse files
committed
plperl: Fix breakage ofc89f409 in back branches.
ppport.h was only updated in05798c9 (master). Unfortunately my commitc89f409 uses PERL_VERSION_LT which came in with that update. Breaking mostbuildfarm animals.I should have noticed that...We might want to backpatch the ppport update instead, but for now lets get thebuildfarm green again.Discussion:https://postgr.es/m/20220131015130.shn6wr2fzuymerf6@alap3.anarazel.deBackpatch: 10-14, master doesn't need it
1 parentf173738 commitbb82e8a

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

‎src/pl/plperl/plperl.c

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -299,11 +299,11 @@ static char *strip_trailing_ws(const char *msg);
299299
staticOP*pp_require_safe(pTHX);
300300
staticvoidactivate_interpreter(plperl_interp_desc*interp_desc);
301301

302-
#if defined(WIN32)&&PERL_VERSION_LT(5,28,0)
302+
#if defined(WIN32)&&PERL_VERSION<28
303303
staticchar*setlocale_perl(intcategory,char*locale);
304304
#else
305305
#definesetlocale_perl(a,b) Perl_setlocale(a,b)
306-
#endif/* defined(WIN32) &&PERL_VERSION_LT(5, 28, 0) */
306+
#endif/* defined(WIN32) &&PERL_VERSION < 28 */
307307

308308
/*
309309
* Decrement the refcount of the given SV within the active Perl interpreter
@@ -4162,7 +4162,7 @@ plperl_inline_callback(void *arg)
41624162
*
41634163
* Starting in 5.28, perl exposes Perl_setlocale to do so.
41644164
*/
4165-
#if defined(WIN32)&&PERL_VERSION_LT(5,28,0)
4165+
#if defined(WIN32)&&PERL_VERSION<28
41664166
staticchar*
41674167
setlocale_perl(intcategory,char*locale)
41684168
{
@@ -4230,4 +4230,4 @@ setlocale_perl(int category, char *locale)
42304230

42314231
returnRETVAL;
42324232
}
4233-
#endif/* defined(WIN32) &&PERL_VERSION_LT(5, 28, 0) */
4233+
#endif/* defined(WIN32) &&PERL_VERSION < 28 */

0 commit comments

Comments
 (0)
[8]ページ先頭
©2009-2025 Movatter.jp