Fix typo.

diff --git a/src/runtime/stringio.scm b/src/runtime/stringio.scm
index a06ac45daf9c8540ab0d9119a4a7fca53d48e32e..dec3849039adea885c14ece1fb1cfd13018a82a8 100644 (file)
--- a/src/runtime/stringio.scm
+++ b/src/runtime/stringio.scm
@@ -232,7 +232,7 @@ USA.
 (define (string-out/write-self port output-port)
   port
   (write-string " to string" output-port))
-\f\f
+\f
 (define (maybe-grow-buffer os n)
   (let ((buffer (ostate-buffer os))
        (n (fix:+ (ostate-index os) n)))