You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@lucy.apache.org by nw...@apache.org on 2013/09/02 21:16:45 UTC
[lucy-commits] [14/15] git commit: refs/heads/cfish-string-prep1 - Eliminate
Str_Cat_Trusted_Str in Clownfish::String bindings
Eliminate Str_Cat_Trusted_Str in Clownfish::String bindings
Project: http://git-wip-us.apache.org/repos/asf/lucy/repo
Commit: http://git-wip-us.apache.org/repos/asf/lucy/commit/f8385c9d
Tree: http://git-wip-us.apache.org/repos/asf/lucy/tree/f8385c9d
Diff: http://git-wip-us.apache.org/repos/asf/lucy/diff/f8385c9d
Branch: refs/heads/cfish-string-prep1
Commit: f8385c9d9a596e8286342a662bfef796a4d434e8
Parents: 3e924ab
Author: Nick Wellnhofer <we...@aevum.de>
Authored: Mon Sep 2 20:29:11 2013 +0200
Committer: Nick Wellnhofer <we...@aevum.de>
Committed: Mon Sep 2 21:12:30 2013 +0200
----------------------------------------------------------------------
clownfish/runtime/perl/buildlib/Clownfish/Build/Binding.pm | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
----------------------------------------------------------------------
http://git-wip-us.apache.org/repos/asf/lucy/blob/f8385c9d/clownfish/runtime/perl/buildlib/Clownfish/Build/Binding.pm
----------------------------------------------------------------------
diff --git a/clownfish/runtime/perl/buildlib/Clownfish/Build/Binding.pm b/clownfish/runtime/perl/buildlib/Clownfish/Build/Binding.pm
index 6bed856..5edf4c0 100644
--- a/clownfish/runtime/perl/buildlib/Clownfish/Build/Binding.pm
+++ b/clownfish/runtime/perl/buildlib/Clownfish/Build/Binding.pm
@@ -158,8 +158,7 @@ CODE:
STRLEN size;
char *ptr = SvPVutf8(sv, size);
cfish_String *self = (cfish_String*)XSBind_new_blank_obj(either_sv);
- cfish_Str_init(self, size);
- CFISH_Str_Cat_Trusted_Str(self, ptr, size);
+ cfish_Str_init_from_trusted_utf8(self, ptr, size);
RETVAL = CFISH_OBJ_TO_SV_NOINC(self);
}
OUTPUT: RETVAL