mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-29 19:30:36 +02:00
Fix bug in srfi-111 box printer
* module/srfi/srfi-111.scm: Add missing port. * test-suite/tests/srfi-111.test: Test.
This commit is contained in:
parent
8ac25f3fae
commit
bf3c632b82
2 changed files with 6 additions and 2 deletions
|
@ -32,6 +32,6 @@
|
|||
(lambda (box port)
|
||||
(display "#<box " port)
|
||||
(display (number->string (object-address box) 16) port)
|
||||
(display " value: ")
|
||||
(display " value: " port)
|
||||
(write (unbox box) port)
|
||||
(display ">" port)))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue