summaryrefslogtreecommitdiff
path: root/tools/pm/Output.pm
diff options
context:
space:
mode:
authorJosé Alburquerque <jaalburquerque@gmail.com>2013-04-29 15:46:05 -0400
committerJosé Alburquerque <jaalburquerque@gmail.com>2013-04-29 15:46:05 -0400
commitac21511f5308e92277095cab923a00b2839b012e (patch)
treed6b9f8180d76c506c3383b964cf8f3d101c15a7c /tools/pm/Output.pm
parentdb52eb9ad6cd183b7e43e9d1647abba5eca66a68 (diff)
downloadglibmm-ac21511f5308e92277095cab923a00b2839b012e.tar.gz
gmmproc: Output.pm: Use a better name for the c param mappings hash.
* tools/pm/Output.pm (output_wrap_meth, convert_args_cpp_to_c, get_ctor_properties): Replace the 'cpp_param_mappings' variable name with 'c_param_name_mappings' which describes the function of the hash a little better.
Diffstat (limited to 'tools/pm/Output.pm')
-rw-r--r--tools/pm/Output.pm22
1 files changed, 11 insertions, 11 deletions
diff --git a/tools/pm/Output.pm b/tools/pm/Output.pm
index df7d9fff..2d093d53 100644
--- a/tools/pm/Output.pm
+++ b/tools/pm/Output.pm
@@ -327,17 +327,17 @@ sub output_wrap_meth($$$$$$$)
my $cpp_param_names = $$objCppfunc{param_names};
my $cpp_param_types = $$objCppfunc{param_types};
- my $cpp_param_mappings = $$objCppfunc{param_mappings};
+ my $c_param_name_mappings = $$objCppfunc{param_mappings};
my $num_args_list = $objCppfunc->get_num_possible_args_list();
my $output_var_name;
my $output_var_type;
- if(defined($$cpp_param_mappings{"OUT"}))
+ if(defined($$c_param_name_mappings{"OUT"}))
{
- $output_var_name = $$cpp_param_names[$$cpp_param_mappings{"OUT"}];
- $output_var_type = $$cpp_param_types[$$cpp_param_mappings{"OUT"}];
+ $output_var_name = $$cpp_param_names[$$c_param_name_mappings{"OUT"}];
+ $output_var_type = $$cpp_param_types[$$c_param_name_mappings{"OUT"}];
}
for(my $arg_list = 0; $arg_list < $num_args_list; $arg_list++)
@@ -926,7 +926,7 @@ sub convert_args_cpp_to_c($$$$$)
my $cpp_param_names = $$objCppfunc{param_names};
my $cpp_param_types = $$objCppfunc{param_types};
my $cpp_param_flags = $$objCppfunc{param_flags};
- my $cpp_param_mappings = $$objCppfunc{param_mappings};
+ my $c_param_name_mappings = $$objCppfunc{param_mappings};
my $c_param_types = $$objCDefsFunc{param_types};
my $c_param_names = $$objCDefsFunc{param_names};
@@ -945,11 +945,11 @@ sub convert_args_cpp_to_c($$$$$)
# See if there is an output parameter. If so, temporarily decrement the
# number of C++ arguments so that the possible GError addition works and
# note the existence.
- if(defined($$cpp_param_mappings{"OUT"}))
+ if(defined($$c_param_name_mappings{"OUT"}))
{
$num_cpp_args--;
$has_output_param = 1;
- $output_param_index = $$cpp_param_mappings{"OUT"};
+ $output_param_index = $$c_param_name_mappings{"OUT"};
}
else
{
@@ -979,7 +979,7 @@ sub convert_args_cpp_to_c($$$$$)
# is an output parameter since it will be readded.
my $cpp_index = $num_cpp_args - 1;
$cpp_index++ if($has_output_param);
- $$cpp_param_mappings{@$c_param_names[$num_c_args_expected]} = $cpp_index;
+ $$c_param_name_mappings{@$c_param_names[$num_c_args_expected]} = $cpp_index;
}
# If the method has a slot temporarily decrement the C arg count when
@@ -1031,7 +1031,7 @@ sub convert_args_cpp_to_c($$$$$)
my $c_param_name = @$c_param_names[$iCParam];
my $cpp_param_index = $i;
- $cpp_param_index = $$cpp_param_mappings{$c_param_name} if(defined($$cpp_param_mappings{$c_param_name}));
+ $cpp_param_index = $$c_param_name_mappings{$c_param_name} if(defined($$c_param_name_mappings{$c_param_name}));
my $cppParamType = $$cpp_param_types[$cpp_param_index];
$cppParamType =~ s/ &/&/g; #Remove space between type and &
@@ -1307,7 +1307,7 @@ sub get_ctor_properties($$$$$$)
my $cpp_param_names = $$objCppfunc{param_names};
my $cpp_param_types = $$objCppfunc{param_types};
my $cpp_param_flags = $$objCppfunc{param_flags};
- my $cpp_param_mappings = $$objCppfunc{param_mappings};
+ my $c_param_name_mappings = $$objCppfunc{param_mappings};
my $c_param_types = $$objCDefsFunc{param_types};
my $c_param_names = $$objCDefsFunc{param_names};
@@ -1338,7 +1338,7 @@ sub get_ctor_properties($$$$$$)
{
my $c_param_name = @$c_param_names[$i];
my $cpp_param_index = $i;
- $cpp_param_index = $$cpp_param_mappings{$c_param_name} if(defined($$cpp_param_mappings{$c_param_name}));
+ $cpp_param_index = $$c_param_name_mappings{$c_param_name} if(defined($$c_param_name_mappings{$c_param_name}));
my $cppParamType = $$cpp_param_types[$cpp_param_index];
$cppParamType =~ s/ &/&/g; #Remove space between type and &