summaryrefslogtreecommitdiff
path: root/compiler/cpp/src/generate/t_perl_generator.cc
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/cpp/src/generate/t_perl_generator.cc')
-rw-r--r--compiler/cpp/src/generate/t_perl_generator.cc10
1 files changed, 8 insertions, 2 deletions
diff --git a/compiler/cpp/src/generate/t_perl_generator.cc b/compiler/cpp/src/generate/t_perl_generator.cc
index 33589c213..e1796dc6f 100644
--- a/compiler/cpp/src/generate/t_perl_generator.cc
+++ b/compiler/cpp/src/generate/t_perl_generator.cc
@@ -43,6 +43,8 @@ class t_perl_generator : public t_oop_generator {
const std::string& option_string)
: t_oop_generator(program)
{
+ (void) parsed_options;
+ (void) option_string;
out_dir_base_ = "gen-perl";
escape_['$'] = "\\$";
escape_['@'] = "\\@";
@@ -291,7 +293,9 @@ void t_perl_generator::close_generator() {
*
* @param ttypedef The type definition
*/
-void t_perl_generator::generate_typedef(t_typedef* ttypedef) {}
+void t_perl_generator::generate_typedef(t_typedef* ttypedef) {
+ (void) ttypedef;
+}
/**
* Generates code for an enumerated type. Since define is expensive to lookup
@@ -1254,6 +1258,7 @@ void t_perl_generator::generate_deserialize_field(ofstream &out,
t_field* tfield,
string prefix,
bool inclass) {
+ (void) inclass;
t_type* type = get_true_type(tfield->get_type());
if (type->is_void()) {
@@ -1556,7 +1561,8 @@ void t_perl_generator::generate_serialize_field(ofstream &out,
void t_perl_generator::generate_serialize_struct(ofstream &out,
t_struct* tstruct,
string prefix) {
- indent(out) <<
+ (void) tstruct;
+ indent(out) <<
"$xfer += $" << prefix << "->write($output);" << endl;
}