Guile port example - print a message to show the error is expected

This commit is contained in:
Geert Janssens 2013-05-21 17:23:37 +02:00
commit 6e794da3f3

View file

@ -21,6 +21,8 @@
(lambda ()
(print-int (current-output-port) 314159))))
(lambda args
(display "Attempting to write to a string or soft port will result in this error:")
(newline)
(write args) (newline)))
;; Read from a file port. Note that it is a bad idea to mix Scheme and