[cl-pdf-devel] Binary streams
Marc Battyani
marc.battyani at fractalconcept.com
Wed Jan 31 20:54:31 UTC 2007
"Jonathon McKitrick" <jmckitrick at reedlarkeygroup.com> wrote:
>This fixes my issue, I think. 'obj' needed to be replaced with 'content'
>in the write-sequence call.
>
>(defmethod write-stream-content ((content string))
> ;; Args: content Base string, may include
> ;; - either one-byte codes (already converted to external format if
>needed)
> ;; - or Unicode two-byte character codes (big-endian CIDs)
> #+pdf-binary
> (loop for char across content
> do (write-byte (ldb (byte 8 0) (char-code char)) *pdf-stream*))
> #-pdf-binary
> (write-sequence content *pdf-stream*))
Good catch! :)
I fixed it in the repository (rev 131). Is it ok for SBCL now?
Marc
More information about the cl-pdf-devel
mailing list