Explicitely complain about lazy lists in (s)printf.

rakudo · Mar 16, 2016 · ad19288 · ad19288
1 parent e8bc151
commit ad19288
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/src/core/Cool.pm b/src/core/Cool.pm
@@ -345,6 +345,14 @@ multi sub wordcase(Str:D $x) {$x.wordcase }
 multi sub wordcase(Cool $x)  {$x.Str.wordcase }
 
 sub sprintf(Cool $format, *@args) {
+    CATCH {
+        when X::Cannot::Lazy {
+            X::Cannot::Lazy.new(:action('(s)printf')).throw
+        }
+        default {
+            $_.throw
+        }
+    }
     Rakudo::Internals.initialize-sprintf-handler;
     @args.elems;
     nqp::p6box_s(