Add to global tests, fixup dependencies.

This commit is contained in:
Dominik Pantůček 2023-05-10 17:14:55 +02:00
parent f6a32e7ff6
commit ece84932d1
3 changed files with 19 additions and 5 deletions

View file

@ -50,7 +50,7 @@ HACKERBASE-OBJS=hackerbase.o testing.o listing.o cal-month.o \
util-string.o util-io.o util-list.o util-parser.o texts.o \ util-string.o util-io.o util-list.o util-parser.o texts.o \
tests.o util-proc.o util-mail.o notifications.o \ tests.o util-proc.o util-mail.o notifications.o \
util-format.o brmember-format.o logging.o specification.o \ util-format.o brmember-format.o logging.o specification.o \
util-git.o util-git.o cal-day.o
.PHONY: imports .PHONY: imports
imports: $(HACKERBASE-DEPS) imports: $(HACKERBASE-DEPS)
@ -300,7 +300,8 @@ TESTS-SOURCES=tests.scm listing.import.scm util-dict-list.import.scm \
util-list.import.scm ansi.import.scm command-line.import.scm \ util-list.import.scm ansi.import.scm command-line.import.scm \
mbase-dir.import.scm primes.import.scm brmember.import.scm \ mbase-dir.import.scm primes.import.scm brmember.import.scm \
table.import.scm util-csv.import.scm util-set-list.import.scm \ table.import.scm util-csv.import.scm util-set-list.import.scm \
util-parser.import.scm util-string.import.scm util-parser.import.scm util-string.import.scm \
cal-day.import.scm
tests.o: tests.import.scm tests.o: tests.import.scm
tests.import.scm: $(TESTS-SOURCES) tests.import.scm: $(TESTS-SOURCES)
@ -366,7 +367,8 @@ CAL-PERIOD-SOURCES=cal-period.scm cal-month.import.scm \
cal-period.o: cal-period.import.scm cal-period.o: cal-period.import.scm
cal-period.import.scm: $(CAL-PERIOD-SOURCES) cal-period.import.scm: $(CAL-PERIOD-SOURCES)
CAL-DAY-SOURCES=cal-day.scm util-tag.import.scm cal-month.import.scm CAL-DAY-SOURCES=cal-day.scm util-tag.import.scm cal-month.import.scm \
testing.import.scm
cal-day.o: cal-day.import.scm cal-day.o: cal-day.import.scm
cal-day.import.scm: $(CAL-DAY-SOURCES) cal-day.import.scm: $(CAL-DAY-SOURCES)

View file

@ -37,12 +37,16 @@
cal-day-month cal-day-month
cal-day-day cal-day-day
cal-day->cal-month cal-day->month
cal-day-tests!
) )
(import scheme (import scheme
(chicken base)
util-tag util-tag
cal-month) cal-month
testing)
;; Type tag ;; Type tag
(define TAG-CAL-DAY (make-tag CAL-DAY)) (define TAG-CAL-DAY (make-tag CAL-DAY))
@ -110,5 +114,11 @@
(cal-month-add M 1) (cal-month-add M 1)
M))) M)))
;; Module self-tests
(define (cal-day-tests!)
(run-tests
cal-day
))
) )

View file

@ -36,6 +36,7 @@
util-dict-list util-dict-list
cal-month cal-month
cal-period cal-period
cal-day
util-list util-list
ansi ansi
command-line command-line
@ -53,6 +54,7 @@
(ldict-tests!) (ldict-tests!)
(cal-month-tests!) (cal-month-tests!)
(cal-period-tests!) (cal-period-tests!)
(cal-day-tests!)
(util-list-tests!) (util-list-tests!)
(ansi-tests!) (ansi-tests!)
(command-line-tests!) (command-line-tests!)