Skip to content
This repository
Browse code

Make printf work. (How had we missed this one?!)

  • Loading branch information...
commit 442e075bb062dcb8b2299b56983841f6b6f5a9dc 1 parent f36d743
colomon colomon authored

Showing 1 changed file with 1 addition and 1 deletion. Show diff stats Hide diff stats

  1. +1 1  lib/CORE.setting
2  lib/CORE.setting
@@ -1275,7 +1275,7 @@ sub print(*@items) { $PROCESS::OUTPUT_USED := True; Q:CgOp { (rnull (print (obj_
1275 1275 sub note(|c) { $PROCESS::OUTPUT_USED := True; Q:CgOp { (rnull (note (obj_getstr {Niecza::gistcat(|c)}))) }; True }
1276 1276
1277 1277 sub sprintf(\|$args) { Q:CgOp { (sprintf (unbox fvarlist (@ {$args}))) } }
1278   -sub printf(Cool $format, *@args) { print sprintf $format, @args };
  1278 +sub printf(Cool $format, *@args) { print sprintf $format, |@args };
1279 1279
1280 1280 sub exit($status = 0) { Q:CgOp {
1281 1281 (rnull [exit (cast int (obj_getnum {$status}))])

0 comments on commit 442e075

Please sign in to comment.
Something went wrong with that request. Please try again.