1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 21:40:33 +02:00

Fix missing port in `pretty-print'

* module/ice-9/pretty-print.scm (pretty-print): We were defaulting to
the current output port.
This commit is contained in:
Andy Wingo 2023-09-06 16:28:45 +02:00
parent a80ccec207
commit b5bedf74ad

View file

@ -302,7 +302,7 @@ port directly after OBJ, like (pretty-print OBJ PORT)."
(put-string port per-line-prefix)
(pr obj pp-expr)
(newline)
(newline port)
;; Return `unspecified'
(if #f #f))