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

Rename meta predicates.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-11 22:27:27 +02:00
parent 3ef6c0b628
commit bf2b8ef23a
4 changed files with 15 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/members-base.scm
View file

@ -158,7 +158,7 @@
;; Returns dictionary with statistics about the members base.
(define (members-base-info mb-arg)
(let* ((members (filter-members-by-predicate mb-arg member-record-usable?))
(let* ((members (filter-members-by-predicate mb-arg brmember-usable?))
(di0 (make-ldict))
(di1 (ldict-set di0 'invalid
(filter (compose not is-4digit-prime? member-id) members)))