@@ -137,7 +137,7 @@
;; functions in CLISP
#+clisp
(eval-when (:compile-toplevel :load-toplevel :execute)
- (when (find-symbol (string #:stream-read-sequence) #:gray)
+ (when (find-symbol (string '#:stream-read-sequence) '#:gray)
(pushnew :clisp-has-stream-read/write-sequence *features*)))