Missing keys are problem.

This commit is contained in:
Dominik Pantůček 2023-05-10 21:32:50 +02:00
parent c700619aca
commit f25a4f924e

View file

@ -262,6 +262,7 @@
;; True if member record is OK
(define (brmember-has-problems? mr)
(or (member-has-errors? mr)
(not (null? (brmember-missing-keys mr)))
(not (brmember-usable? mr))
(not (is-4digit-prime? (brmember-id mr)))))