view test/bug-53956/bug-53956.tst @ 31597:65157e496f5d

maint: Merge stable to default.
author Arun Giridhar <arungiridhar@gmail.com>
date Wed, 30 Nov 2022 08:03:06 -0500
parents 332a6ccac881
children
line wrap: on
line source

%!test <*53956>
%! global dtor2_called dtor4_called;
%!
%! dtor2_called = dtor4_called = 0;
%! x = bug53956_class_3 ();
%! clear x
%! assert (dtor2_called, 1);
%!
%! dtor2_called = dtor4_called = 0;
%! x = bug53956_class_4 ();
%! clear x
%! assert (dtor2_called, 1);
%! assert (dtor4_called, 1);
%!
%! clear -global dtor2_called dtor4_called;  # cleanup after test