[perl #125226] Test module - nested subtest fails type check.

[via RT]

# New Ticket Created by   
# Please include the string:  [perl #125226]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=125226 >


--cut here--
subtest {
   lives_ok { $r.using-history }, 'using-history lives';
   subtest {
   }, 'Stifling';
}, 'History';
--cut here--

Throws this exception:

--cut here--
perl6 -Ilib t/02-base.t
1..1
     ok 1 - using-history lives
Type check failed in binding &subtests; expected 'Callable' but got 
'Hash'
   in sub subtest at lib/Test.pm:268
   in block <unit> at t/02-base.t:642
--cut here--