Skip to content
Permalink
Browse files

Make sure we decont before adding the attribute

Fixes R#2607
  • Loading branch information...
lizmat committed Jan 13, 2019
1 parent 0d9e9f3 commit bf0dbbe6d24ebbb9a78b4b2b6275479e53681b35
Showing with 2 additions and 1 deletion.
  1. +2 −1 src/Perl6/Metamodel/AttributeContainer.nqp
@@ -7,7 +7,8 @@ role Perl6::Metamodel::AttributeContainer {
has $!attr_rw_by_default;

# Adds an attribute.
method add_attribute($obj, $meta_attr) {
method add_attribute($obj, $attr) {
my $meta_attr := nqp::decont($attr);
my $name := $meta_attr.name;
if nqp::isnull(%!attribute_lookup) {
@!attributes := nqp::list();

0 comments on commit bf0dbbe

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