diff --git a/S02-literals/radix.t b/S02-literals/radix.t
index ef059d052d..a97369e321 100644
--- a/S02-literals/radix.t
+++ b/S02-literals/radix.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 154;
+plan 155;
 
 # L<S02/General radices/":10<42>">
 is( :10<0>,   0, 'got the correct int value from decimal 0' );
@@ -287,4 +287,10 @@ for 2..36 {
     throws-like { EVAL ':2' }, X::Syntax::Malformed, ':2 is Malformed';
 }
 
+# RT #129279
+{
+    lives-ok
+        { :۳<12> },
+        'Unicode digit radix bases work';
+}
 # vim: ft=perl6
diff --git a/S05-match/capturing-contexts.t b/S05-match/capturing-contexts.t
index 67381b78c7..4348b3c2bf 100644
--- a/S05-match/capturing-contexts.t
+++ b/S05-match/capturing-contexts.t
@@ -5,7 +5,7 @@ use MONKEY-TYPING;
 
 use Test;
 use Test::Util;
-plan 59;
+plan 60;
 
 # old: L<S05/Return values from matches/"A match always returns a Match object" >
 # L<S05/Match objects/"A match always returns a " >
@@ -249,4 +249,10 @@ plan 59;
         'non-ascii token in a subcapture work';
 }
 
+# RT #129279
+{
+    lives-ok
+        { "a b" ~~ /(\w) \s (\w)/; my $a = $١ },
+        'Unicode digit match variables work';
+}
 # vim: ft=perl6
diff --git a/S06-signature/types.t b/S06-signature/types.t
index 42df5b23b8..5f1d37fa14 100644
--- a/S06-signature/types.t
+++ b/S06-signature/types.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 12;
+plan 13;
 
 sub f($x) returns Int { return $x };
 
@@ -46,4 +46,10 @@ dies-ok  { g('m') },    'type check forbids bad implicit return';
         'type shown in the exception message is the right one';
 }
 
+# RT #129279
+{
+    lives-ok
+        { sub f(-١) { 2 }; f(-1) },
+        'Unicode digit negative type constraints work';
+}
 # vim: ft=perl6