concise-xs.t needs to know about B::safename

[perl5.git] / ext / B / t / concise-xs.t

diff --git a/ext/B/t/concise-xs.t b/ext/B/t/concise-xs.t
index 2f1737a..c2258f7 100644 (file)
--- a/ext/B/t/concise-xs.t
+++ b/ext/B/t/concise-xs.t
@@ -138,7 +138,7 @@ my $testpkgs = {
        perl => [qw(
                    walksymtable walkoptree_slow walkoptree_exec
                    timing_info savesym peekop parents objsym debug
-                   compile_stats clearsym class
+                   compile_stats clearsym class safename
                    )],
        XS => [qw(
                  warnhook walkoptree_debug walkoptree threadsv_names