use strict;
use warnings;
-use Test::More tests => 67;
+use Test::More tests => 68;
use Sub::Nary;
[ sub { do { do { return if $x }, 3 }, 4 }, { 0 => 0.5, 3 => 0.5 } ],
[ sub { do { return if $x; 2, 3 }, do { return 1 if $y; 4, 5, 6 } },
{ 0 => 0.5, 1 => 0.25, 5 => 0.25 } ],
+ [ sub { my $x = do { return 2, 3; 4 } }, 2 ],
[ sub { return $x }, 1 ],
[ sub { return $x, $y }, 2 ],