[cl-typesetting-devel] Page n of m?

[Marc Battyani]

> Peter Seibel <peter at javamonkey.com> writes:

> Okay, more diggging around and I got it to work. The problem was my
> call to mark-ref-point was clobbering the old ref. So I changed my
> call:
>
>   (typeset:mark-ref-point :the-end)
>
> to:
>
>   (unless (typeset::find-ref-point :the-end)
>     (typeset:mark-ref-point :the-end))
>
> It seems, at the very least, that perhaps this check in mark-ref-point
>
>   (when (gethash id *reference-table*)
>     (error "Reference ~s redefined" id))
>
> should be written:
>
>   (when (find-ref-point id)
>     (error "Reference ~s redefined" id))
>
> so it'll look in *previous-reference-table* as well as
> *reference-table*. That at least would have given me an error.

No, it's an error to define twice a ref in the same pass, it's not an error
to redefine the ref for each pass.
It could have been changed between the 2 passes.

Marc