diff options
| -rw-r--r-- | ext/B/t/optree_constants.t | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/ext/B/t/optree_constants.t b/ext/B/t/optree_constants.t index d927f66ef2..c7f4cd1d0f 100644 --- a/ext/B/t/optree_constants.t +++ b/ext/B/t/optree_constants.t @@ -58,12 +58,11 @@ my $want = { # expected types, how value renders in-line, todos (maybe) myhref => [ 'RV', '\\\\HASH'], myundef => [ 'NULL', ], pi => [ 'NV', pi ], - # these have todos, since they render as a bare backslash - myaref => [ 'RV', '\\\\', ' - should render as \\ARRAY' ], - myglob => [ 'RV', '\\\\', ' - should render as \\GV' ], - myrex => [ 'RV', '\\\\', ' - should render as ??' ], - mysub => [ 'RV', '\\\\', ' - should render as \\CV' ], - myunsub => [ 'RV', '\\\\', ' - should render as \\CV' ], + myaref => [ 'RV', '\\\\' ], + myglob => [ 'RV', '\\\\' ], + myrex => [ 'RV', '\\\\' ], + mysub => [ 'RV', '\\\\' ], + myunsub => [ 'RV', '\\\\' ], # these are not inlined, at least not per BC::Concise #myyes => [ 'RV', ], #myno => [ 'RV', ], |