[Openmcl-devel] BUG: missing methods STREAM-WRITE-VECTOR and STREAM-READ-VECTOR

[Eric Marsden]

OpenMCL compiled from CVS on AMD64, from running pfdietz's ansi-test suite:

? (let ((s (vector nil nil nil))) (with-input-from-string (str "foo") (read-sequence s str)))
> Error: There is no next method for #<CCL::STANDARD-KERNEL-METHOD CCL:STREAM-READ-VECTOR (CCL::BASIC-CHARACTER-INPUT-STREAM T T T)>
>        args: (#<STRING-INPUT-STREAM  #x300043E786CD> #<SIMPLE-VECTOR 3> 0 3)
> While executing: #<CCL::STANDARD-KERNEL-METHOD NO-NEXT-METHOD (STANDARD-GENERIC-FUNCTION STANDARD-METHOD)>, in process
    listener(1).


? (LET ((S (COERCE "abcde" 'SIMPLE-VECTOR))) (WITH-OUTPUT-TO-STRING (OS) (ASSERT (EQ (WRITE-SEQUENCE S OS) S))))
> Error: There is no next method for #<CCL::STANDARD-KERNEL-METHOD CCL:STREAM-WRITE-VECTOR (CCL::BASIC-CHARACTER-OUTPUT-STREAM T T T)>
>        args: (#<STRING-OUTPUT-STREAM  #x300043EDFC8D> #<SIMPLE-VECTOR 5> 0 5)
> While executing: #<CCL::STANDARD-KERNEL-METHOD NO-NEXT-METHOD (STANDARD-GENERIC-FUNCTION STANDARD-METHOD)>, in process listener(1).

-- 
Eric Marsden