Add test for GH #2901

rakudo/rakudo#2901

Author: Altai-man

S05-metasyntax/regex.t

@@ -3,7 +3,7 @@ use Test;
 use lib $?FILE.IO.parent(2).add("packages/Test-Helpers");
 use Test::Util;
 
-plan 51;
+plan 52;
 
 throws-like 'qr/foo/', X::Obsolete, 'qr// is gone';
 
@@ -283,4 +283,7 @@ is ~("ddd" ~~ / [ x | d ] **? 2..3 /), "dd", 'frugal match with alternation';
 is_run ｢/a/; print "pass"｣, {:out<pass>, :err(''), :0status},
     '/a/ in sink context in in uppermost scope does not explode';
 
+# https://github.com/rakudo/rakudo/issues/2901
+is 'a' ~~ / a & a /, 'a', 'Unescaped & works as conjunction';
+
 # vim: ft=perl6