diff options
| author | Daniel Silverstone <dsilvers@digital-scurf.org> | 2018-07-29 15:00:58 +0100 |
|---|---|---|
| committer | Daniel Silverstone <dsilvers@digital-scurf.org> | 2018-07-29 15:00:58 +0100 |
| commit | 14e6724ec71b08a88dca138c4de10ad695430dfd (patch) | |
| tree | a7109d12b0acdf4b6a4c7c76cb09e097f0c065cc | |
| parent | 2da4dab86544670377b108ada0d69445d1b09a51 (diff) | |
| download | libdom-14e6724ec71b08a88dca138c4de10ad695430dfd.tar.gz libdom-14e6724ec71b08a88dca138c4de10ad695430dfd.tar.bz2 | |
Cleanups in the DOMTS should be safe
| -rw-r--r-- | test/DOMTSHandler.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/DOMTSHandler.pm b/test/DOMTSHandler.pm index 5022db9..3cf0b7a 100644 --- a/test/DOMTSHandler.pm +++ b/test/DOMTSHandler.pm @@ -1605,7 +1605,7 @@ sub addto_cleanup { if (exists $unref_prefix{$type}) { $prefix = $unref_prefix{$type}; } - push(@{$self->{unref}}, $prefix."_unref(".$var.");\n"); + push(@{$self->{unref}}, "if (".$var." != NULL) { ".$prefix."_unref(".$var."); ".$var." = NULL; }\n"); } } |