You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@lucy.apache.org by ma...@apache.org on 2013/07/19 23:11:43 UTC
[lucy-commits] [1/2] git commit: refs/heads/0.3 - LUCY-259 use `to_utf8_lower`.
Updated Branches:
refs/heads/0.3 226b15d77 -> 212a0444c
LUCY-259 use `to_utf8_lower`.
Perl 5.15.6 failed to export `to_utf8_lower`, resulting in LUCY-206.
However, 5.15.6 is a development version of Perl that we no longer need
to worry about.
The patch we used for LUCY-206 causes problems for Perl 5.18.0 when
compiled with -DNO_MATHOMS (which hides obsolete symbols).
To solve the issue for all supported versions of Perl except 5.15.6,
revert to using `to_utf8_lower`.
Project: http://git-wip-us.apache.org/repos/asf/lucy/repo
Commit: http://git-wip-us.apache.org/repos/asf/lucy/commit/74cd2c00
Tree: http://git-wip-us.apache.org/repos/asf/lucy/tree/74cd2c00
Diff: http://git-wip-us.apache.org/repos/asf/lucy/diff/74cd2c00
Branch: refs/heads/0.3
Commit: 74cd2c00a2c89181d35ab6548136ee95dd398862
Parents: 226b15d
Author: Marvin Humphrey <ma...@rectangular.com>
Authored: Fri Jul 19 14:00:03 2013 -0700
Committer: Marvin Humphrey <ma...@rectangular.com>
Committed: Fri Jul 19 14:00:03 2013 -0700
----------------------------------------------------------------------
perl/xs/Lucy/Analysis/CaseFolder.c | 7 +------
1 file changed, 1 insertion(+), 6 deletions(-)
----------------------------------------------------------------------
http://git-wip-us.apache.org/repos/asf/lucy/blob/74cd2c00/perl/xs/Lucy/Analysis/CaseFolder.c
----------------------------------------------------------------------
diff --git a/perl/xs/Lucy/Analysis/CaseFolder.c b/perl/xs/Lucy/Analysis/CaseFolder.c
index 1721826..938c8df 100644
--- a/perl/xs/Lucy/Analysis/CaseFolder.c
+++ b/perl/xs/Lucy/Analysis/CaseFolder.c
@@ -38,12 +38,7 @@ S_lc_to_work_buf(lucy_CaseFolder *self, uint8_t *source, size_t len,
while (source < end) {
STRLEN buf_utf8_len;
- #if (PERL_VERSION == 15 && PERL_SUBVERSION >= 6)
- Perl__to_utf8_lower_flags(aTHX_ source, utf8_buf, &buf_utf8_len,
- 0, NULL);
- #else
- Perl_to_utf8_lower(aTHX_ source, utf8_buf, &buf_utf8_len);
- #endif
+ to_utf8_lower(source, utf8_buf, &buf_utf8_len);
// Grow if necessary.
if (((STRLEN)(*limit - dest)) < buf_utf8_len) {
[lucy-commits] [2/2] git commit: refs/heads/0.3 - PL_sv_objcount will be deprecated
in Perl 5.18
Posted by ma...@apache.org.
PL_sv_objcount will be deprecated in Perl 5.18
Project: http://git-wip-us.apache.org/repos/asf/lucy/repo
Commit: http://git-wip-us.apache.org/repos/asf/lucy/commit/212a0444
Tree: http://git-wip-us.apache.org/repos/asf/lucy/tree/212a0444
Diff: http://git-wip-us.apache.org/repos/asf/lucy/diff/212a0444
Branch: refs/heads/0.3
Commit: 212a0444c38ea95d476a2d43db011ed7507fe32a
Parents: 74cd2c0
Author: Nick Wellnhofer <we...@aevum.de>
Authored: Tue Apr 16 00:01:38 2013 +0200
Committer: Marvin Humphrey <ma...@rectangular.com>
Committed: Fri Jul 19 14:07:46 2013 -0700
----------------------------------------------------------------------
perl/xs/Lucy/Object/Obj.c | 2 ++
1 file changed, 2 insertions(+)
----------------------------------------------------------------------
http://git-wip-us.apache.org/repos/asf/lucy/blob/212a0444/perl/xs/Lucy/Object/Obj.c
----------------------------------------------------------------------
diff --git a/perl/xs/Lucy/Object/Obj.c b/perl/xs/Lucy/Object/Obj.c
index bb5e92b..3dcc498 100644
--- a/perl/xs/Lucy/Object/Obj.c
+++ b/perl/xs/Lucy/Object/Obj.c
@@ -31,7 +31,9 @@ static void
S_lazy_init_host_obj(lucy_Obj *self) {
SV *inner_obj = newSV(0);
SvOBJECT_on(inner_obj);
+#if (PERL_VERSION <= 16)
PL_sv_objcount++;
+#endif
SvUPGRADE(inner_obj, SVt_PVMG);
sv_setiv(inner_obj, PTR2IV(self));