epita-std/ACU
Archived
1
0
Fork 0
Code Releases Activity

Pass Ids by reference

Browse source
This commit is contained in:
Mercier Pierre-Olivier 2013-09-21 16:46:58 +02:00
commit 73e52f441d
2 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

6
ACU/Grading.pm
View file

@ -107,12 +107,12 @@ sub insert ($$$)
$self->{ids}{$_[0]} = $_[1]; $self->{ids}{$_[0]} = $_[1];
} }
sub fill ($%) sub fill ($$)
{ {
my $self = shift; my $self = shift;
my %ids = shift; my $ids = shift;
for my $k (keys %ids) { for my $k (keys %{ $ids }) {
$self->{ids}{$k} = $ids{$k}; $self->{ids}{$k} = $ids{$k};
} }
} }

2
ACU/Trace.pm
View file

@ -103,7 +103,7 @@ sub getValue ($$)
sub getIds ($) sub getIds ($)
{ {
my $self = shift; my $self = shift;
return %{ $self->{ids} }; return $self->{ids};
} }
sub addId($$;$) sub addId($$;$)