diff options
Diffstat (limited to 't/comp/our.t')
| -rw-r--r-- | t/comp/our.t | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/t/comp/our.t b/t/comp/our.t index c381c413ff..8029f613c5 100644 --- a/t/comp/our.t +++ b/t/comp/our.t @@ -33,17 +33,18 @@ tie %x, 'TieAll'; {our $x;} is(TieAll->calls, '', 'our $x has no runtime effect'); + {our ($x);} is(TieAll->calls, '', 'our ($x) has no runtime effect'); + {our %x;} is(TieAll->calls, '', 'our %x has no runtime effect'); -{ - local $TODO = 'perl #17376'; - {our (%x);} - is(TieAll->calls, '', 'our (%x) has no runtime effect'); - {our @x;} - is(TieAll->calls, '', 'our @x has no runtime effect'); - {our (@x);} - is(TieAll->calls, '', 'our (@x) has no runtime effect'); -} +{our (%x);} +is(TieAll->calls, '', 'our (%x) has no runtime effect'); + +{our @x;} +is(TieAll->calls, '', 'our @x has no runtime effect'); + +{our (@x);} +is(TieAll->calls, '', 'our (@x) has no runtime effect'); |