diff --git a/package.lisp b/package.lisp
index 7b8a4a4..1e4a3f1 100644
--- a/package.lisp
+++ b/package.lisp
@@ -72,8 +72,13 @@
            #:make-octet-stream-ystream
            #:make-rod-ystream
            #+rune-is-character #:make-character-stream-ystream
-           #+rune-is-integer #:make-string-ystream/utf8
-           #+rune-is-integer #:make-character-stream-ystream/utf8
+	   ;; These don't make too much sense on Unicode-enabled,
+	   ;; implementations but for those applications using them anyway,
+	   ;; I have commented out the reader conditionals now:
+           ;; #+rune-is-integer
+	   #:make-string-ystream/utf8
+           ;; #+rune-is-integer
+	   #:make-character-stream-ystream/utf8
 	   #:runes-to-utf8/adjustable-string))
 
 (defpackage :utf8-runes
diff --git a/ystream.lisp b/ystream.lisp
index a0641bd..a7ae87a 100644
--- a/ystream.lisp
+++ b/ystream.lisp
@@ -222,7 +222,7 @@
 
 ;;;; CHARACTER-STREAM-YSTREAM/UTF8
 
-#+rune-is-integer
+;; #+rune-is-integer
 (progn
   (defstruct (character-stream-ystream/utf8
 	      (:constructor make-character-stream-ystream/utf8 (os-stream))
@@ -239,7 +239,7 @@
 
 ;;;; STRING-YSTREAM/UTF8
 
-#+rune-is-integer
+;; #+rune-is-integer
 (progn
   (defstruct (string-ystream/utf8
 	      (:include character-stream-ystream/utf8