[no subject]

[Patrice Dumas]

branch: master
commit 3deb3211e4a92cc5ef421ebc96267e02701ffda7
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Wed Oct 25 23:26:44 2023 +0200

    * tp/t/test_tree_copy.t: skip copy_tree call if with XS as there is no
    XS converter available and it triggers a debug message. Report from
    Gavin.
---
 ChangeLog             | 6 ++++++
 tp/t/test_tree_copy.t | 6 +++---
 2 files changed, 9 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 71ee03feb1..67f4c11d3f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2023-10-25  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/t/test_tree_copy.t: skip copy_tree call if with XS as there is no
+       XS converter available and it triggers a debug message. Report from
+       Gavin.
+
 2023-10-25  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/XS/main/translations.c: add missing includes.
diff --git a/tp/t/test_tree_copy.t b/tp/t/test_tree_copy.t
index ed6c5b9ae3..6bccdb05e3 100644
--- a/tp/t/test_tree_copy.t
+++ b/tp/t/test_tree_copy.t
@@ -56,6 +56,9 @@ 
$tref->{'contents'}->[1]->{'extra'}->{'thing'}->{'contents'}->[0]->{'extra'}->{'
 
 my $tref_texi = Texinfo::Convert::Texinfo::convert_to_texinfo($tref);
 
+SKIP:
+{
+  skip "test perl not XS", 1 if ($with_XS);
 my $tref_copy = Texinfo::Common::copy_tree($tref, undef);
 
 my $tref_copy_texi = Texinfo::Convert::Texinfo::convert_to_texinfo($tref_copy);
@@ -64,9 +67,6 @@ my $tref_copy_texi = 
Texinfo::Convert::Texinfo::convert_to_texinfo($tref_copy);
 # output.  Not a big deal, what is important it so see if there are error
 # messages.
 
-SKIP:
-{
-  skip "test perl not XS", 1 if ($with_XS);
 is ($tref_texi, $tref_copy_texi, "ref within extra tree");
 }