[cl-typesetting-devel] Non-macro interface to building documents.

[Marc Battyani]

Marc Battyani <marc.battyani at fractalconcept.com> writes:


>       (loop for (name tel age) in '(("Erik Enge" "555-1234" "25")
>         ("Erik Enge" "555-1234" "25")
>         ("Erik Enge" "555-1234" "25")
>         ("Erik Enge" "555-1234" "25")
>         ("Erik Enge" "555-1234" "25"))
>      do
>                           (typeset:row ()
>                             (typeset:cell ()
>                               (typeset:paragraph ()
>                                 "Name"))
>                             (typeset:cell ()
>                               (typeset:paragraph ()
>                                 name)))
>                           (typeset:row ()
>                             (typeset:cell ()
>                               (typeset:paragraph ()
>                                 "Telephone"))
>                             (typeset:cell ()
>                               (typeset:paragraph ()
>                                 tel)))
>                           (typeset:row ()
>                             (typeset:cell ()
>                               (typeset:paragraph ()
>                                 "Age"))
>                             (typeset:cell ()
>                               (typeset:paragraph ()
>                                 age))))))))

Warning: the table are not multi-page so far. So you should use a table for
each row if you don't want to have problems when the table height exceed the
draw-block height.

Patches for multi-page tables are welcomed! (Dmitri ?)

Marc