FreeBSD Bugzilla – Attachment 116733 Details for
Bug 158727
[PATCH] databases/p5-postgresql-plperl: fix build with Perl 5.14
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
Remember
[x]
|
Forgot Password
Login:
[x]
[patch]
p5-postgresql-plperl.patch
p5-postgresql-plperl.patch (text/plain), 5.69 KB, created by
Po-Chuan Hsieh
on 2011-07-08 11:20:00 UTC
(
hide
)
Description:
p5-postgresql-plperl.patch
Filename:
MIME Type:
Creator:
Po-Chuan Hsieh
Created:
2011-07-08 11:20:00 UTC
Size:
5.69 KB
patch
obsolete
>Index: ports/databases/postgresql82-server/files/patch-src-plperl-plperl >=================================================================== >RCS file: ports/databases/postgresql82-server/files/patch-src-plperl-plperl >diff -N ports/databases/postgresql82-server/files/patch-src-plperl-plperl >--- /dev/null 1 Jan 1970 00:00:00 -0000 >+++ ports/databases/postgresql82-server/files/patch-src-plperl-plperl 8 Jul 2011 07:23:06 -0000 >@@ -0,0 +1,28 @@ >+Obtained from: http://archives.postgresql.org/pgsql-hackers/2011-04/msg01283.php >+Reference: http://search.cpan.org/~jesse/perl-5.14.0/pod/perldelta.pod#GvCV()_and_GvGP()_are_no_longer_lvalues >+ >+--- src/pl/plperl/plperl.c.orig 2011-04-15 11:15:53.000000000 +0800 >++++ src/pl/plperl/plperl.c 2011-05-19 20:39:34.126713700 +0800 >+@@ -687,7 +687,7 @@ >+ if (!isGV_with_GP(sv) || !GvCV(sv)) >+ continue; >+ SvREFCNT_dec(GvCV(sv)); /* free the CV */ >+- GvCV(sv) = NULL; /* prevent call via GV */ >++ GvCV_set(sv, NULL); /* prevent call via GV */ >+ } >+ hv_clear(stash); >+ >+--- src/pl/plperl/plperl.h.orig 2011-04-15 11:15:53.000000000 +0800 >++++ src/pl/plperl/plperl.h 2011-05-19 20:39:34.127713548 +0800 >+@@ -43,6 +43,11 @@ >+ #undef bool >+ #endif >+ >++/* supply GvCV_set if it's missing - ppport.h doesn't supply it, unfortunately */ >++#ifndef GvCV_set >++#define GvCV_set(gv, cv) (GvCV(gv) = cv) >++#endif >++ >+ /* routines from spi_internal.c */ >+ int spi_DEBUG(void); >+ int spi_LOG(void); >Index: ports/databases/postgresql83-server/files/patch-src-plperl-plperl >=================================================================== >RCS file: ports/databases/postgresql83-server/files/patch-src-plperl-plperl >diff -N ports/databases/postgresql83-server/files/patch-src-plperl-plperl >--- /dev/null 1 Jan 1970 00:00:00 -0000 >+++ ports/databases/postgresql83-server/files/patch-src-plperl-plperl 8 Jul 2011 07:23:07 -0000 >@@ -0,0 +1,28 @@ >+Obtained from: http://archives.postgresql.org/pgsql-hackers/2011-04/msg01283.php >+Reference: http://search.cpan.org/~jesse/perl-5.14.0/pod/perldelta.pod#GvCV()_and_GvGP()_are_no_longer_lvalues >+ >+--- src/pl/plperl/plperl.c.orig 2011-04-15 11:15:53.000000000 +0800 >++++ src/pl/plperl/plperl.c 2011-05-19 20:39:34.126713700 +0800 >+@@ -685,7 +685,7 @@ >+ if (!isGV_with_GP(sv) || !GvCV(sv)) >+ continue; >+ SvREFCNT_dec(GvCV(sv)); /* free the CV */ >+- GvCV(sv) = NULL; /* prevent call via GV */ >++ GvCV_set(sv, NULL); /* prevent call via GV */ >+ } >+ hv_clear(stash); >+ >+--- src/pl/plperl/plperl.h.orig 2011-04-15 11:15:53.000000000 +0800 >++++ src/pl/plperl/plperl.h 2011-05-19 20:39:34.127713548 +0800 >+@@ -43,6 +43,11 @@ >+ #undef bool >+ #endif >+ >++/* supply GvCV_set if it's missing - ppport.h doesn't supply it, unfortunately */ >++#ifndef GvCV_set >++#define GvCV_set(gv, cv) (GvCV(gv) = cv) >++#endif >++ >+ /* routines from spi_internal.c */ >+ int spi_DEBUG(void); >+ int spi_LOG(void); >Index: ports/databases/postgresql84-server/files/patch-src-plperl-plperl >=================================================================== >RCS file: ports/databases/postgresql84-server/files/patch-src-plperl-plperl >diff -N ports/databases/postgresql84-server/files/patch-src-plperl-plperl >--- /dev/null 1 Jan 1970 00:00:00 -0000 >+++ ports/databases/postgresql84-server/files/patch-src-plperl-plperl 8 Jul 2011 07:23:09 -0000 >@@ -0,0 +1,28 @@ >+Obtained from: http://archives.postgresql.org/pgsql-hackers/2011-04/msg01283.php >+Reference: http://search.cpan.org/~jesse/perl-5.14.0/pod/perldelta.pod#GvCV()_and_GvGP()_are_no_longer_lvalues >+ >+--- src/pl/plperl/plperl.c.orig 2011-04-15 11:15:53.000000000 +0800 >++++ src/pl/plperl/plperl.c 2011-05-19 20:39:34.126713700 +0800 >+@@ -700,7 +700,7 @@ >+ if (!isGV_with_GP(sv) || !GvCV(sv)) >+ continue; >+ SvREFCNT_dec(GvCV(sv)); /* free the CV */ >+- GvCV(sv) = NULL; /* prevent call via GV */ >++ GvCV_set(sv, NULL); /* prevent call via GV */ >+ } >+ hv_clear(stash); >+ >+--- src/pl/plperl/plperl.h.orig 2011-04-15 11:15:53.000000000 +0800 >++++ src/pl/plperl/plperl.h 2011-05-19 20:39:34.127713548 +0800 >+@@ -43,6 +43,11 @@ >+ #undef bool >+ #endif >+ >++/* supply GvCV_set if it's missing - ppport.h doesn't supply it, unfortunately */ >++#ifndef GvCV_set >++#define GvCV_set(gv, cv) (GvCV(gv) = cv) >++#endif >++ >+ /* routines from spi_internal.c */ >+ int spi_DEBUG(void); >+ int spi_LOG(void); >Index: ports/databases/postgresql90-server/files/patch-src-plperl-plperl >=================================================================== >RCS file: ports/databases/postgresql90-server/files/patch-src-plperl-plperl >diff -N ports/databases/postgresql90-server/files/patch-src-plperl-plperl >--- /dev/null 1 Jan 1970 00:00:00 -0000 >+++ ports/databases/postgresql90-server/files/patch-src-plperl-plperl 8 Jul 2011 07:23:10 -0000 >@@ -0,0 +1,28 @@ >+Obtained from: http://archives.postgresql.org/pgsql-hackers/2011-04/msg01283.php >+Reference: http://search.cpan.org/~jesse/perl-5.14.0/pod/perldelta.pod#GvCV()_and_GvGP()_are_no_longer_lvalues >+ >+--- src/pl/plperl/plperl.c.orig 2011-04-15 11:15:53.000000000 +0800 >++++ src/pl/plperl/plperl.c 2011-05-19 20:39:34.126713700 +0800 >+@@ -874,7 +874,7 @@ >+ if (!isGV_with_GP(sv) || !GvCV(sv)) >+ continue; >+ SvREFCNT_dec(GvCV(sv)); /* free the CV */ >+- GvCV(sv) = NULL; /* prevent call via GV */ >++ GvCV_set(sv, NULL); /* prevent call via GV */ >+ } >+ hv_clear(stash); >+ >+--- src/pl/plperl/plperl.h.orig 2011-04-15 11:15:53.000000000 +0800 >++++ src/pl/plperl/plperl.h 2011-05-19 20:39:34.127713548 +0800 >+@@ -42,6 +42,11 @@ >+ #undef bool >+ #endif >+ >++/* supply GvCV_set if it's missing - ppport.h doesn't supply it, unfortunately */ >++#ifndef GvCV_set >++#define GvCV_set(gv, cv) (GvCV(gv) = cv) >++#endif >++ >+ /* declare routines from plperl.c for access by .xs files */ >+ HV *plperl_spi_exec(char *, int); >+ void plperl_return_next(SV *);
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
Attachments on
bug 158727
: 116733