diff --git a/S09-typed-arrays/arrays.t b/S09-typed-arrays/arrays.t
index 5b1dd69ca0..8a914158a6 100644
--- a/S09-typed-arrays/arrays.t
+++ b/S09-typed-arrays/arrays.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 77;
+plan 79;
 
 # L<S09/Typed arrays/>
 
@@ -235,4 +235,11 @@ plan 77;
         'can bind element of typed array to scalar container of same type (but not explicitly typed)';
 }
 
+# RT #123769
+{
+    my Int @a;
+    dies-ok { @a[0] := "foo" }, 'Binding literal to typed array checks types';
+    dies-ok { my Str $x = "foo"; @a[0] := $x; }, 'Binding variablle to typed array checks type';
+}
+
 # vim: ft=perl6