brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Finish alignment.

Browse source
This commit is contained in:
Dominik Pantůček 2023-03-29 09:00:12 +02:00
parent 3f50d85412
commit 965b0432fa
4 changed files with 19 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

5
bbstool.scm
View file

@ -26,6 +26,7 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
")
(import testing
(chicken format)
listing
dictionary
month
@ -136,7 +137,9 @@ CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
(let* ((mc (member-calendar mr))
(fees (member-calendar->fees mc)))
(print-member-table mr)
(print (table->string (cons (list "" 1 2 3 4 5 6 7 8 9 10 11 12)
(print (table->string (cons (map (lambda (c)
(sprintf "\t~A\t" c))
(list "" 1 2 3 4 5 6 7 8 9 10 11 12))
(member-calendar->years-table mc))
#:table-border #t
#:row-border #t