[cl-typesetting-devel] peculiar behaviour

Bob Hutchison hutch at recursive.ca
Thu Sep 30 12:36:28 UTC 2004


On Sep 30, 2004, at 6:48 AM, Marc Battyani wrote:

> "Bob Hutchison" <hutch at recursive.ca> wrote:
>
>> I emailed this a couple of days ago and have not seen it come up yet 
>> on
>> the mailing list, so trying again.
>
> I got it but have not found the time to look at it until now.

I was afraid of that. Sorry to pester.

>
> A binding of pdf:*page* was missing so a fresh page was not enforced 
> at the
> beginning of a with-document.
>
> Try with this in pdf.lisp of cl-pdf:
>
> (defmacro with-document ((&rest args) &body body)
>   `(let* ((*document* (make-instance 'document , at args))
>    (*outlines-stack* (list (outline-root *document*)))
>    (*root-page* (root-page *document*))
>    (*page* nil)
>    (*page-number* 0))
>     , at body))
>
> This should fix it. Tell me if it's OK.
>

It is much better now. The sizes are not quite the same, but I cannot 
*see* anything different between them.

The creation dates are all different, of course.

The fonts?? are different (there is likely a counter not being reset, 
and this may not matter):

pprint1.pdf has:

/Font << /CLF104 10 0 R
/CLF103 9 0 R
/CLF102 8 0 R
/CLF101 7 0 R
  >>

pprint2.pdf has:

/Font << /CLF108 10 0 R
/CLF107 9 0 R
/CLF106 8 0 R
/CLF105 7 0 R
  >>

More interestingly the the compressed code has differing lengths:

pprint1.pdf has:

<< /Filter /FlateDecode
/Length 3028
  >>

pprint2.pdf has:

<< /Filter /FlateDecode
/Length 3027
  >>

I have no idea if this is significant, for all I know something 
insignificant like the creation date, or I suppose the different font 
numbers, may be in the compressed data and accounts for this 
difference.

Anyway, this is is *much* better. It is *so* much easier to see the 
results of my mucking about :-)

Thanks Marc.

Cheers,
Bob


9707 Sep 30 08:14 pprint1.pdf
8706 Sep 30 08:14 pprint2.pdf
8711 Sep 30 08:14 pprint3.pdf
8706 Sep 30 08:14 pprint4.pdf
8706 Sep 30 08:14 pprint5.pdf
8706 Sep 30 08:14 pprint6.pdf
8707 Sep 30 08:14 pprint7.pdf
8711 Sep 30 08:14 pprint8.pdf
8708 Sep 30 08:14 pprint9.pdf
8706 Sep 30 08:14 pprint10.pdf
8706 Sep 30 08:14 pprint11.pdf
8709 Sep 30 08:14 pprint12.pdf
8712 Sep 30 08:14 pprint13.pdf
8707 Sep 30 08:14 pprint14.pdf
8706 Sep 30 08:14 pprint15.pdf
8706 Sep 30 08:14 pprint16.pdf
8708 Sep 30 08:14 pprint17.pdf
8715 Sep 30 08:14 pprint18.pdf
8707 Sep 30 08:14 pprint19.pdf
8707 Sep 30 08:14 pprint20.pdf
8706 Sep 30 08:14 pprint21.pdf
8705 Sep 30 08:14 pprint22.pdf
8712 Sep 30 08:14 pprint23.pdf
8707 Sep 30 08:14 pprint24.pdf
8706 Sep 30 08:14 pprint25.pdf
8705 Sep 30 08:14 pprint26.pdf
8707 Sep 30 08:14 pprint27.pdf
8711 Sep 30 08:14 pprint28.pdf
8706 Sep 30 08:14 pprint29.pdf
8706 Sep 30 08:14 pprint30.pdf





More information about the cl-typesetting-devel mailing list