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

Finish splitting dir from base.

Browse source
This commit is contained in:
Dominik Pantůček 2023-03-29 20:22:32 +02:00
parent 3693b9860d
commit 3c1a75eb9d
4 changed files with 18 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

7
members-base.scm
View file

@ -41,16 +41,11 @@
get-free-members-ids
print-members-ids-stats
gen-member-id
members-base-tests!
)
(import scheme
(chicken base)
(chicken pathname)
(chicken file posix)
(chicken file)
(chicken format)
(chicken irregex)
(chicken sort)
(chicken string)
(chicken format)
@ -87,7 +82,7 @@
(car opts))))
(with-progress
progress? "Loading-members " " ok."
(let* ((fss (get-files+symlinks-dictionary dn))
(let* ((fss (load-members-dir dn))
(mb0 (dict-map
(lambda (symfn symlinks)
(when progress?