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

Missing keys are problem.

Browse source
This commit is contained in:
Dominik Pantůček 2023-05-10 21:32:50 +02:00
parent c700619aca
commit f25a4f924e
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/brmember.scm
View file

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