diff --git a/integration/weird-errors.t b/integration/weird-errors.t index a164aa2eda..2419bc8260 100644 --- a/integration/weird-errors.t +++ b/integration/weird-errors.t @@ -2,7 +2,7 @@ use Test; use lib $?FILE.IO.parent(2).add("packages/Test-Helpers"); use Test::Util; -plan 36; +plan 37; # this used to segfault in rakudo is_run( @@ -290,4 +290,16 @@ is_run 「class Foo {}; -> Foo() $x { $x.say }("42")」, {:out(''), :err(*), :1s is_run($lot-of-variables, { :42status }, "no segv or throw with lots of variables"); } +# https://github.com/rakudo/rakudo/issues/5599 +{ + enum E ; + role R { + has $.e = one; + method m() { + ok $!e === one, "default initialization of enums in roles works"; + } + } + R.new.m; +} + # vim: expandtab shiftwidth=4