Test to cover Cool.substr(WhateverCode) case.

Raku · Feb 28, 2013 · 87364c3 · 87364c3
1 parent 4609872
commit 87364c3
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/S32-str/substr.t b/S32-str/substr.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 91;
+plan 92;
 
 # L<S32::Str/Str/=item substr>
 
@@ -262,4 +262,9 @@ eval_dies_ok 'substr(Any, 0)', 'substr needs Cool as argument';
     is "abcd".substr(2, Inf), 'cd', 'substr to Inf'
 }
 
+{
+    is 123456789.substr(*-3), '789', 'substr with Int and WhateverCode arg';
+
+}
+
 # vim: ft=perl6