diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-01-20 15:51:21 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-01-20 15:51:21 (GMT) |
| commit | ecf01edf657e52175aa95e30cb70bc5c0d0ed59d (patch) | |
| tree | 6d2cf1531fd3d7217b15b9b2ca73768f3d186ad9 | |
| parent | f4aa49e767460d0bd03097e12ae9e88a0b898612 (diff) | |
| download | tk-ecf01edf657e52175aa95e30cb70bc5c0d0ed59d.zip tk-ecf01edf657e52175aa95e30cb70bc5c0d0ed59d.tar.gz tk-ecf01edf657e52175aa95e30cb70bc5c0d0ed59d.tar.bz2 | |
Fix place-14.1 testcase in --enable-symbols=mem mode, which broke as a result of TIP #518.
| -rw-r--r-- | tests/place.test | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/tests/place.test b/tests/place.test index b29abc0..f0dd513 100644 --- a/tests/place.test +++ b/tests/place.test @@ -507,16 +507,17 @@ test place-14.1 {memory leak testing} -constraints memory -setup { frame .f frame .f.f stress { - place .f.f -x [expr {1 + 1}] -y [expr {2 + 2}] - place forget .f.f + place .f.f -x [expr {1 + 1}] -y [expr {2 + 2}] + place forget .f.f } { - place .f.f -x [expr {1 + 1}] -y [expr {2 + 2}] - pack .f.f + place .f.f -x [expr {1 + 1}] -y [expr {2 + 2}] + pack .f.f + update; # Needed because of TIP #518, handle <<NoManagedChild>> event. } { - place .f.f -x [expr {1 + 1}] -y [expr {2 + 2}] - destroy .f - frame .f - frame .f.f + place .f.f -x [expr {1 + 1}] -y [expr {2 + 2}] + destroy .f + frame .f + frame .f.f } } -cleanup { destroy .f |