Skip to content
Permalink
Browse files

Mark our-decls in `our ($a, $b)` form too

So they won't be mangled by the optimizer.
  • Loading branch information...
jnthn committed Oct 30, 2018
1 parent e73853a commit c28a092424f7078e16cf9169adbcaeef850b3edc
Showing with 1 addition and 0 deletions.
  1. +1 −0 src/Perl6/World.nqp
@@ -1616,6 +1616,7 @@ class Perl6::World is HLL::World {
if nqp::istype($_, QAST::Var) && $_.name eq $name {
$var := $_;
$var.returns(%cont_info<bind_constraint>);
$var.annotate('our_decl', 1) if $scope eq 'our';
last;
}
}

0 comments on commit c28a092

Please sign in to comment.
You can’t perform that action at this time.