Skip to content
Snippets Groups Projects
Commit 94c0a947 authored by Daniel Kochmański's avatar Daniel Kochmański
Browse files

use trivial-gray-streams

parent 203442a0
No related branches found
No related tags found
No related merge requests found
......@@ -99,7 +99,7 @@
;;; based on `clim-utils'
(defsystem #:clim-tos/utils
:depends-on (#:closer-mop)
:depends-on (#:closer-mop #:trivial-gray-streams)
:components
((:module "utils"
:components ((:file "packages")
......
......@@ -13,13 +13,7 @@
#+allegro (:implementation-packages :clim-lisp :clim-utils)
;; 28Jan97 added allegro package for aclpc since mop stuff was moved
;; there in 3.0.1 -tjm
(:use common-lisp
#+allegro clos
#+(and allegro (version>= 9 0)) excl
#+(or (and MCL CCL-2) Clozure) gray
#+SBCL sb-gray
; #-(and allegro (version>= 9 0)) stream
#+aclpc allegro)
(:use common-lisp trivial-gray-streams)
;; Import these symbols so that we can define methods for them.
(:shadow pathname truename)
......@@ -1020,24 +1014,12 @@
zerop)
;; Stream Proposal -- Classes and class predicates.
#-clim-uses-lisp-stream-classes
(:shadow
;; NOTE disabled shadowing of Grey streams symbols - currently playing with sb-grey on SBCL. -- jacek.zlydach 2017-06-03
;; fundamental-binary-input-stream
;; fundamental-binary-output-stream
;; fundamental-binary-stream
;; fundamental-character-input-stream
;; fundamental-character-output-stream
;; fundamental-character-stream
;; fundamental-input-stream
;; fundamental-output-stream
;; fundamental-stream
input-stream-p
open-stream-p
output-stream-p
streamp)
#-(or clim-uses-lisp-stream-functions Lucid)
(:shadow
clear-input
clear-output
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment