Fixup for compiling new table module.

This commit is contained in:
Dominik Pantůček 2023-06-15 14:35:11 +02:00
parent 3f7f1356a4
commit 3e4e8c4672
4 changed files with 7 additions and 4 deletions

View file

@ -173,7 +173,7 @@
(define (table-prepare tbl width-arg widths-spec)
(if (or (null? tbl)
(null? (car tbl)))
'()
(values '() '())
(let* ((ptbl (table-prepare-cells tbl))
;;(_ (print ptbl))
(num-columns (length (car ptbl)))