Re: [GENERAL] PL/Perl compilation error

I can not apply this. Seems it has changed in the current tree. Here
is the current plperl.c file.

> Bruce Momjian wrote:
>
> > Can you send me a patch?
> >
> > > Hi,
> > >
> > > I have take a look to the source code concerning PL/Perl, it seems that 2 variables
> > > have a bad call : errgv and na.
> > >
> > > If you replace them by their normal call (in 5.6.0) PL_errgv and PL_na you will get
> > > success to compile the lib plperl.so.
> > >
>
> This patch (simple diff) applies to postgresql-7.0.2.
> See attachment...
>
> Regards
>
> Gilles DAROLD
>
>
>

> 328c328
> < if (SvTRUE(GvSV(PL_errgv)))
> ---
> > if (SvTRUE(GvSV(errgv)))
> 334c334
> < elog(ERROR, "creation of function failed : %s", SvPV(GvSV(PL_errgv), PL_na));
> ---
> > elog(ERROR, "creation of function failed : %s", SvPV(GvSV(errgv), na));
> 444c444
> < if (SvTRUE(GvSV(PL_errgv)))
> ---
> > if (SvTRUE(GvSV(errgv)))
> 450c450
> < elog(ERROR, "plperl : error from function : %s", SvPV(GvSV(PL_errgv), PL_na));
> ---
> > elog(ERROR, "plperl : error from function : %s", SvPV(GvSV(errgv), na));
> 654c654
> < (SvPV(perlret, PL_na),
> ---
> > (SvPV(perlret, na),
> 2192c2192
> < output = perl_eval_pv(SvPV(output, PL_na), TRUE);
> ---
> > output = perl_eval_pv(SvPV(output, na), TRUE);

--
Bruce Momjian | http://candle.pha.pa.us
pgman(at)candle(dot)pha(dot)pa(dot)us | (610) 853-3000
+ If your life is a hard drive, | 830 Blythe Avenue
+ Christ can be your backup. | Drexel Hill, Pennsylvania 19026