mirror/freebsd-ports
1
0
Fork 0
mirror of https://git.FreeBSD.org/ports.git synced 2025-01-02 06:03:50 +00:00
Code Issues Releases Activity

Unbreak build of threaded perl.

Browse Source 
PR:		ports/130529
Submitted by:	Shin-ichi Yoshimoto <yosimoto xx waishi.jp>
This commit is contained in:
Sergey Skvortsov 2009-01-14 08:16:24 +00:00
parent 3a30a94cbf
commit b1b787bb65
Notes: svn2git 2021-03-31 03:12:20 +00:00 
svn path=/head/; revision=226051
5 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lang/perl5.10/files/patch-sv.c
View File

@ -6,7 +6,7 @@
case SVt_PVAV:
- if (AvARRAY((AV*)sstr)) {
+ /* avoid cloning an empty array */
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr >= 0) {
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr) >= 0) {
SV **dst_ary, **src_ary;
SSize_t items = AvFILLp((AV*)sstr) + 1;

2
lang/perl5.12/files/patch-sv.c
View File

@ -6,7 +6,7 @@
case SVt_PVAV:
- if (AvARRAY((AV*)sstr)) {
+ /* avoid cloning an empty array */
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr >= 0) {
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr) >= 0) {
SV **dst_ary, **src_ary;
SSize_t items = AvFILLp((AV*)sstr) + 1;

2
lang/perl5.14/files/patch-sv.c
View File

@ -6,7 +6,7 @@
case SVt_PVAV:
- if (AvARRAY((AV*)sstr)) {
+ /* avoid cloning an empty array */
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr >= 0) {
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr) >= 0) {
SV **dst_ary, **src_ary;
SSize_t items = AvFILLp((AV*)sstr) + 1;

2
lang/perl5.16/files/patch-sv.c
View File

@ -6,7 +6,7 @@
case SVt_PVAV:
- if (AvARRAY((AV*)sstr)) {
+ /* avoid cloning an empty array */
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr >= 0) {
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr) >= 0) {
SV **dst_ary, **src_ary;
SSize_t items = AvFILLp((AV*)sstr) + 1;

2
lang/perl5.8/files/patch-sv.c
View File

@ -6,7 +6,7 @@
case SVt_PVAV:
- if (AvARRAY((AV*)sstr)) {
+ /* avoid cloning an empty array */
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr >= 0) {
+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr) >= 0) {
SV **dst_ary, **src_ary;
SSize_t items = AvFILLp((AV*)sstr) + 1;