Add test for RT #111734

Raku · Oct 14, 2014 · c855d94 · c855d94
1 parent 7396503
commit c855d94
Showing 1 changed file with 10 additions and 1 deletion.
diff --git a/S04-declarations/constant.t b/S04-declarations/constant.t
@@ -1,7 +1,7 @@
 use v6;
 
 use Test;
-plan 52;
+plan 54;
 
 # L<S04/The Relationship of Blocks and Declarations/"The new constant declarator">
 
@@ -320,4 +320,13 @@ plan 52;
     lives_ok {lots[100_000]}, "can index an infinite constant list at 100K";
 }
 
+# RT #111734
+{
+    constant True = 42;
+    is True, 42, 'can locally redefine True';
+    constant True = "Yeah, well, you know, that's just, like, your opinion, man.";
+    is True, "Yeah, well, you know, that's just, like, your opinion, man.",
+        'can even locally redefine True to something a bit vague';
+}
+
 # vim: ft=perl6