extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2024-12-25 07:38:57 +01:00
Code Issues Packages Projects Releases Wiki Activity

Assert correctness in decrement_reference_count()

Browse Source
This commit is contained in:
Tom Eastep 2011-02-16 13:16:42 -08:00
parent fa8c8f5850
commit 300d931922
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Shorewall/Perl/Shorewall/Chains.pm
View File

@ -762,7 +762,8 @@ sub increment_reference_count( $$ ) {
sub decrement_reference_count( $$ ) { sub decrement_reference_count( $$ ) {
my ($toref, $chain) = @_; my ($toref, $chain) = @_;
if ( $toref && $toref->{referenced} && $toref->{references}{$chain} ) { if ( $toref && $toref->{referenced} ) {
assert($toref->{references}{$chain} > 0 );
delete $toref->{references}{$chain} unless --$toref->{references}{$chain}; delete $toref->{references}{$chain} unless --$toref->{references}{$chain};
delete_chain( $toref ) unless ( keys %{$toref->{references}} ); delete_chain( $toref ) unless ( keys %{$toref->{references}} );
} }