X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xt%2Fglobal-destruct-jenga.t;fp=xt%2Fglobal-destruct-jenga.t;h=3954f9db44c1e70873e11734fbe9c07b76002160;hb=c944f84cc09cd1f9e644e8a08e62c27412dbe892;hp=0000000000000000000000000000000000000000;hpb=bf0f29b2841e5ca262ee4c5bee457816257d7bc5;p=gitmo%2FMoo.git

diff --git a/xt/global-destruct-jenga.t b/xt/global-destruct-jenga.t
new file mode 100644
index 0000000..3954f9d
--- /dev/null
+++ b/xt/global-destruct-jenga.t
@@ -0,0 +1,7 @@
+use strictures 1;
+use Test::More;
+
+my $out = `$^X xt/global-destruct-jenga-helper.pl 2>&1`;
+is $out, '', 'no errors from global destruct of jenga object';
+
+done_testing;