[j-devel] trivial-gray-streams in ABCL

[Marko K. <mar...@gm...>]

Hi all,
I'm trying to fix trivial-gray-streams
(http://common-lisp.net/project/cl-plus-ssl/#trivial-gray-streams) to support ABCL. 
I see that ABCL has its own implementation of gray-streams in sb-gray.

trivial-gray-streams require implementation to implement these two methods:
(defgeneric stream-read-sequence
    (stream sequence start end &key &allow-other-keys))
(defgeneric stream-write-sequence
    (stream sequence start end &key &allow-other-keys)) 

I tried the following (in "mixins.lisp"), but am getting errors:
#+abcl
(progn
  (defmethod gray-streams:stream-read-sequence ((s trivial-gray-stream-mixin)
seq start end)
    (stream-read-sequence s seq (or start 0) (or end (length seq))))
  (defmethod gray-streams:stream-write-sequence ((s trivial-gray-stream-mixin)
seq start end)
    (stream-write-sequence s seq (or start 0) (or end (length seq))))) 

After doing this (asdf:oos 'asdf:load-op :trivial-gray-streams) is ok, but when
i try to asdf-load some other lib which require trivial-gray-streams (eg,
flexi-streams) I start getting errors.
Am I doing something wrong (since I am new to CLOS), or is this known issue
(method redefinition mentioned in ABCL home page)?


The ultimate goal would be make hunchentoot work with ABCL...

Thanks,
Marko