| Paste number 23954: | is it complaining about the length? |
| Pasted by: | tritchey |
| When: | 2 years, 10 months ago |
| Share: | Tweet this! | http://paste.lisp.org/+IHE |
| Channel: | #lisp |
| Paste contents: |
The value #(40 116 101 115 116 41 10) is not of type (VECTOR (UNSIGNED-BYTE 8))Annotations for this paste:
| Annotation number 1: | this is the code in ? |
| Pasted by: | tritchey |
| When: | 2 years, 10 months ago |
| Share: | Tweet this! | http://paste.lisp.org/+IHE#1 |
| Paste contents: |
(let ((result (make-array num-read :element-type 'unsigned-byte))
(buffer (client-read-buffer client)))
(dotimes (i num-read)
(setf (svref result i) (sb-alien:deref buffer i)))
(format t "~S~%" (octets-to-string result
:encoding :iso-8859-1
:end num-read))))