Fix case being ignored on multi-character backslash escapes; we now p…

…ass S05-mass/named-chars.t

src/niecza

@@ -26,6 +26,20 @@ use STD;
 # }
 
 augment class NieczaActions {
+method post_backslash($/) {
+    # XXX confine $/ resetting
+    sub _isupper { $_ ~~ /^<[ A .. Z ]>/ }
+    sub _islower { $_ ~~ /^<[ a .. z ]>/ }
+    if $/.ast.^isa(CClass) {
+        make self.cclass_cc($/.ast);
+    }
+    if _isupper($/) && _islower($<sym>) {
+        if $/.ast.^isa(Str) {
+            make self.string_cc($/.ast);
+        }
+        make self.negate_cc($/.ast);
+    }
+}
 }
 
 # remove run_dispatch

t/spectest.data

@@ -212,6 +212,7 @@ S05-grammar/methods.t
 S05-grammar/protoregex.t
 S05-grammar/signatures.t
 S05-interpolation/lexicals.t
+S05-mass/named-chars.t
 S05-mass/recursive.t
 S05-mass/rx.t
 S05-mass/stdrules.t