[ID 20001124.001] B exports "walkoptree" but does not define it

Message-Id: <E13zLT8-0005FN-00@pembro4.pmb.ox.ac.uk>

p4raw-id: //depot/perl@7848

diff --git a/ext/B/B.pm b/ext/B/B.pm
index 70c424b..5a064d4 100644 (file)
--- a/ext/B/B.pm
+++ b/ext/B/B.pm
@@ -9,12 +9,13 @@ package B;
 use XSLoader ();
 require Exporter;
 @ISA = qw(Exporter);
-@EXPORT_OK = qw(minus_c ppname save_BEGINs
-               class peekop cast_I32 cstring cchar hash threadsv_names
-               main_root main_start main_cv svref_2object opnumber amagic_generation
-               walkoptree walkoptree_slow walkoptree_exec walksymtable
-               parents comppadlist sv_undef compile_stats timing_info
-               begin_av init_av end_av);
+@EXPORT_OK =
+    qw(minus_c ppname save_BEGINs
+       class peekop cast_I32 cstring cchar hash threadsv_names
+       main_root main_start main_cv svref_2object opnumber amagic_generation
+       walkoptree_slow walkoptree_exec walksymtable
+       parents comppadlist sv_undef compile_stats timing_info
+       begin_av init_av end_av);
 sub OPf_KIDS ();
 use strict;
 @B::SV::ISA = 'B::OBJECT';