diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/perl5db.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/perl5db.t b/lib/perl5db.t index 3d432ad52e..6e9c6f3f43 100644 --- a/lib/perl5db.t +++ b/lib/perl5db.t @@ -904,6 +904,7 @@ sub _calc_trace_wrapper ['.', 'main::foo', 6], ) ); + printf "c=[%s]\n", $wrapper->_contents(); $wrapper->contents_like( # qr/^0\s+HASH\([^\)]+\)\n\s+500 => 600\n/, qr/^$re_text/ms, |