use v6;
use lib <t/spec/packages/>;
use Test;
use Test::Util;

# Tests for slang interface that aren't yet spec

plan 1;

is_run ｢
        BEGIN $?LANG.refine_slang(
            'MAIN',
            role { token apostrophe { <[ - ' \\ ]> } },
            role {},
        );
        my $foo\bar = "pass"; say $foo\bar;
    ｣, {:out("pass\n"), :err(''), :0status},
    'no crash when giving an Actions class to .refine_slang';

Test .refine_slang accepts an action class
Test .refine_slang accepts an action class

Fix: https://github.com/perl6/nqp/commit/da267b0320
Bump: https://github.com/rakudo/rakudo/commit/0e30ae13df
Bug find: https://irclog.perlgeek.de/perl6/2017-07-11#i_14857056
