Silence regexp warning on older libxmxl versions

libxml-raku · May 31, 2024 · 486de5f · 486de5f
1 parent 2a64756
commit 486de5f
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/t/00errors.t b/t/00errors.t
@@ -1,7 +1,13 @@
 use v6;
 use Test;
+use LibXML::XPath::Context;
+use LibXML::Config;
 plan 4;
 
+# Silence warnings
+LibXML::XPath::Context.SetGenericErrorFunc(-> |c { })
+   unless LibXML::Config.version >= v2.13.00;
+
 {
     use LibXML::Pattern;
     my LibXML::Pattern $patt;
@@ -17,3 +23,4 @@ plan 4;
     lives-ok {$regexp.new(:regexp('a'))};
     throws-like { $regexp.new(:regexp('a[zz')) }, X::LibXML::OpFail, :message('XML RegExp Compile operation failed');
 }
+