diff options
author | James E. King, III <jking@apache.org> | 2017-10-20 08:33:38 -0400 |
---|---|---|
committer | James E. King, III <jking@apache.org> | 2017-10-20 08:33:38 -0400 |
commit | 54ce558ba80905d124b82727d196f6d58964b74c (patch) | |
tree | 17b434cf7e9fe712226c1ada9a4792a23857fdd0 /compiler | |
parent | 44701e82ad351d7472101ad81aa13e775ffb7384 (diff) | |
download | thrift-54ce558ba80905d124b82727d196f6d58964b74c.tar.gz |
THRIFT-4365: Replaced indirect object syntax in perl compiler
Client: perl
Patch: Finn Isaac Norris Colman
This closes #1393
Diffstat (limited to 'compiler')
-rw-r--r-- | compiler/cpp/src/thrift/generate/t_perl_generator.cc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/cpp/src/thrift/generate/t_perl_generator.cc b/compiler/cpp/src/thrift/generate/t_perl_generator.cc index 0bdbb0578..0c05cda04 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; } |