diff options
author | Daniel Silverstone <dsilvers@digital-scurf.org> | 2018-07-29 14:02:55 +0100 |
---|---|---|
committer | Daniel Silverstone <dsilvers@digital-scurf.org> | 2018-07-29 14:02:55 +0100 |
commit | 2da4dab86544670377b108ada0d69445d1b09a51 (patch) | |
tree | 9d6aec0cb7f1ad872e25c70992656192aa1556f7 /test/DOMTSHandler.pm | |
parent | ca9930d02e9534d83542a188011ac9c8b6171965 (diff) | |
download | libdom-2da4dab86544670377b108ada0d69445d1b09a51.tar.gz libdom-2da4dab86544670377b108ada0d69445d1b09a51.tar.bz2 |
More cleanup for iterating in test suite
Diffstat (limited to 'test/DOMTSHandler.pm')
-rw-r--r-- | test/DOMTSHandler.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/test/DOMTSHandler.pm b/test/DOMTSHandler.pm index 0cf3a56..5022db9 100644 --- a/test/DOMTSHandler.pm +++ b/test/DOMTSHandler.pm @@ -1314,6 +1314,7 @@ sub generate_control_statement { print "unsigned int iterator$iterator_index = 0;"; print "foreach_initialise_domnamednodemap($coll, \&iterator$iterator_index);\n"; print "while(get_next_domnamednodemap($coll, \&iterator$iterator_index, \&$member)) {\n"; + $self->addto_cleanup($member); } if ($self->{"var"}->{$coll} eq "HTMLCollection") { @@ -1321,6 +1322,7 @@ sub generate_control_statement { print "unsigned int iterator$iterator_index = 0;"; print "foreach_initialise_domhtmlcollection($coll, \&iterator$iterator_index);\n"; print "while(get_next_domhtmlcollection($coll, \&iterator$iterator_index, \&$member)) {\n"; + $self->addto_cleanup($member); } } } |