You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@thrift.apache.org by je...@apache.org on 2017/12/03 01:02:36 UTC
[06/50] [abbrv] thrift git commit: THRIFT-4365: Replaced indirect
object syntax in perl compiler Client: perl Patch: Finn Isaac Norris Colman
THRIFT-4365: Replaced indirect object syntax in perl compiler
Client: perl
Patch: Finn Isaac Norris Colman
This closes #1393
Project: http://git-wip-us.apache.org/repos/asf/thrift/repo
Commit: http://git-wip-us.apache.org/repos/asf/thrift/commit/54ce558b
Tree: http://git-wip-us.apache.org/repos/asf/thrift/tree/54ce558b
Diff: http://git-wip-us.apache.org/repos/asf/thrift/diff/54ce558b
Branch: refs/heads/0.11.0
Commit: 54ce558ba80905d124b82727d196f6d58964b74c
Parents: 44701e8
Author: James E. King, III <jk...@apache.org>
Authored: Fri Oct 20 08:33:38 2017 -0400
Committer: James E. King, III <jk...@apache.org>
Committed: Fri Oct 20 08:33:38 2017 -0400
----------------------------------------------------------------------
compiler/cpp/src/thrift/generate/t_perl_generator.cc | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
----------------------------------------------------------------------
http://git-wip-us.apache.org/repos/asf/thrift/blob/54ce558b/compiler/cpp/src/thrift/generate/t_perl_generator.cc
----------------------------------------------------------------------
diff --git a/compiler/cpp/src/thrift/generate/t_perl_generator.cc b/compiler/cpp/src/thrift/generate/t_perl_generator.cc
index 0bdbb05..0c05cda 100644
--- a/compiler/cpp/src/thrift/generate/t_perl_generator.cc
+++ b/compiler/cpp/src/thrift/generate/t_perl_generator.cc
@@ -1259,8 +1259,8 @@ void t_perl_generator::generate_deserialize_field(ofstream& out,
void t_perl_generator::generate_deserialize_struct(ofstream& out,
t_struct* tstruct,
string prefix) {
- out << indent() << "$" << prefix << " = new " << perl_namespace(tstruct->get_program())
- << tstruct->get_name() << "();" << endl << indent() << "$xfer += $" << prefix
+ out << indent() << "$" << prefix << " = " << perl_namespace(tstruct->get_program())
+ << tstruct->get_name() << "->new();" << endl << indent() << "$xfer += $" << prefix
<< "->read($input);" << endl;
}