Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Fix LTA error on 'my &foo; multi foo() { }'.

  • Loading branch information...
commit 75678776e776ca06e9f57a65565188abfeeb969d 1 parent e20d626
@jnthn jnthn authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/Perl6/Actions.nqp
View
2  src/Perl6/Actions.nqp
@@ -2119,7 +2119,7 @@ class Perl6::Actions is HLL::Actions does STDActions {
}
# Ensure it's actually a dispatcher.
- unless $proto.is_dispatcher {
+ unless nqp::can($proto, 'is_dispatcher') && $proto.is_dispatcher {
$*W.throw($/, ['X', 'Redeclaration'],
what => 'routine',
symbol => ~$<deflongname>[0].ast,
Please sign in to comment.
Something went wrong with that request. Please try again.