Finish stdout util and bump dev version.

This commit is contained in:
Dominik Pantůček 2023-05-10 20:21:41 +02:00
parent 7a19204242
commit 5fed8899a4
4 changed files with 14 additions and 8 deletions

View file

@ -31,6 +31,7 @@
*stdout-quiet*
stdout-print
stdout-printf
stdout-newline
)
(import scheme
@ -50,4 +51,9 @@
(when (not (*stdout-quiet*))
(print (apply format fmt args))))
;; Prints newline if not quiet
(define (stdout-newline)
(when (not (*stdout-quiet*))
(newline)))
)