Skip to content

Commit

Permalink
Fix .^parents
Browse files Browse the repository at this point in the history
it used to double arrays, which somehow got undone by HLLization (?)
  • Loading branch information
moritz committed Aug 22, 2015
1 parent 5b902d4 commit ed32f95
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion src/Perl6/Metamodel/MultipleInheritance.nqp
Expand Up @@ -55,8 +55,9 @@ role Perl6::Metamodel::MultipleInheritance {
my @pt := [$_];
my @recursive_parents := $_.HOW.parents($_, :tree(1));
@pt.push(@recursive_parents) if @recursive_parents;
@result.push(nqp::hllizefor(@pt, 'perl6').Array.item);
@result.push(nqp::hllizefor(@pt, 'perl6').Array);
}
@result := @result[0] if nqp::elems(@result) == 1;
return nqp::hllizefor(@result, 'perl6');
}
else {
Expand Down

0 comments on commit ed32f95

Please sign in to comment.