;;;----- Licensing notice ---------------------------------------------------
;;;
-;;; This file is part of the Sensble Object Design, an object system for C.
+;;; This file is part of the Sensible Object Design, an object system for C.
;;;
;;; SOD is free software; you can redistribute it and/or modify
;;; it under the terms of the GNU General Public License as published by
;; Try to find Gray streams support from somewhere. ECL tucks them
;; somewhere unhelpful.
- #+sbcl #:sb-gray
- #+cmu #:extensions
- #+ecl #.(if (find-package '#:gray) '#:gray '#:si)
- #+clisp #:gray
- #-(or sbcl cmu ecl clisp) ...))
+ #.(or (car '(#+sbcl #:sb-gray
+ #+cmu #:extensions
+ #+ecl #.(if (find-package '#:gray) '#:gray '#:si)
+ #+clisp #:gray))
+ (error "Unsupported Lisp (can't find Gray streams).")))
+
+ ;; CMUCL's `extensions' package has lots of cruft. Use our cruft instead.
+ #+cmu (:shadowing-import-from #:sod-utilities #:symbolicate #:once-only))
;;;----- That's all, folks --------------------------------------------------