(integrate-external "string")

diff --git a/src/runtime/genio.scm b/src/runtime/genio.scm
index 6a3b6cfa40fb3388565370be98d8d41958cbb871..9dde0748d206ecf5b38bb00e1b612cadff3726b6 100644 (file)
--- a/src/runtime/genio.scm
+++ b/src/runtime/genio.scm
@@ -28,7 +28,7 @@ USA.
 ;;; package: (runtime generic-i/o-port)
 
 (declare (usual-integrations)
-        (integrate-external "port"))
+        (integrate-external "port" "string"))
 \f
 (define (make-generic-i/o-port source sink #!optional type . extra-state)
   (if (not (or source sink))