Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
RT #74592, return value from package declarations
  • Loading branch information
moritz committed Jan 2, 2013
1 parent ee14752 commit c039739
Showing 1 changed file with 10 additions and 1 deletion.
11 changes: 10 additions & 1 deletion S10-packages/basic.t
Expand Up @@ -4,7 +4,7 @@ use v6;

use Test;

plan 57;
plan 59;

my regex fairly_conclusive_platform_error {:i ^\N* <<Null?>>}

Expand Down Expand Up @@ -243,5 +243,14 @@ eval_dies_ok q[
}
], 'Too late for semicolon form';

# RT #74592
{
my $p = my package My74592 { };
ok $p === My74592, 'return value of "my" package declaration';

$p = our package Our74592 { };
ok $p === Our74592, 'return value of "Our" package declaration';
}


# vim: ft=perl6

0 comments on commit c039739

Please sign in to comment.