Commita2ff3f6

committed

Revert "plperl: Fix breakage ofc89f409 in back branches."

This reverts commitsd81cac4 et al. We shouldn't need thathack after the preceding commits.Discussion:https://postgr.es/m/20220131015130.shn6wr2fzuymerf6@alap3.anarazel.de

1 parent0a7ded1 commita2ff3f6Copy full SHA for a2ff3f6

File tree

-4

lines changed

-4

lines changed

Lines changed: 4 additions & 4 deletions

Original file line number	Diff line number	Diff line change
`@@ -299,11 +299,11 @@ static char strip_trailing_ws(const char msg);`
`299`	`299`	`staticOP*pp_require_safe(pTHX);`
`300`	`300`	`staticvoidactivate_interpreter(plperl_interp_desc*interp_desc);`
`301`	`301`
`302`		`-#if defined(WIN32)&&PERL_VERSION<28`
	`302`	`+#if defined(WIN32)&&PERL_VERSION_LT(5,28,0)`
`303`	`303`	`staticcharsetlocale_perl(intcategory,charlocale);`
`304`	`304`	`#else`
`305`	`305`	`#definesetlocale_perl(a,b) Perl_setlocale(a,b)`
`306`		`-#endif/* defined(WIN32) &&PERL_VERSION < 28 */`
	`306`	`+#endif/* defined(WIN32) &&PERL_VERSION_LT(5, 28, 0) */`
`307`	`307`
`308`	`308`	`/*`
`309`	`309`	`* Decrement the refcount of the given SV within the active Perl interpreter`
`@@ -4162,7 +4162,7 @@ plperl_inline_callback(void *arg)`
`4162`	`4162`	`*`
`4163`	`4163`	`* Starting in 5.28, perl exposes Perl_setlocale to do so.`
`4164`	`4164`	`*/`
`4165`		`-#if defined(WIN32)&&PERL_VERSION<28`
	`4165`	`+#if defined(WIN32)&&PERL_VERSION_LT(5,28,0)`
`4166`	`4166`	`staticchar*`
`4167`	`4167`	`setlocale_perl(intcategory,char*locale)`
`4168`	`4168`	`{`
`@@ -4230,4 +4230,4 @@ setlocale_perl(int category, char *locale)`
`4230`	`4230`
`4231`	`4231`	`returnRETVAL;`
`4232`	`4232`	`}`
`4233`		`-#endif/* defined(WIN32) &&PERL_VERSION < 28 */`
	`4233`	`+#endif/* defined(WIN32) &&PERL_VERSION_LT(5, 28, 0) */`

Comments

(0)