puck/zilch
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(zilch lang go vfs): actually handle empty directories

Browse source 
In cases where a directory only contains files which are filtered out,
the VFS would break on importing the directory. This fixes that.
This commit is contained in:
puck 2024-11-27 14:10:22 +00:00
parent 5380ac9307
commit 2f069f2cdd
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lang/go/src/vfs.sld
View file

@ -109,7 +109,7 @@
(set! dirmap (mapping-update!/default dirmap dir (lambda (v) (cons (cons fname (zsymlink contents)) v)) '())))) (set! dirmap (mapping-update!/default dirmap dir (lambda (v) (cons (cons fname (zsymlink contents)) v)) '()))))
(vfs-contents vfs)) (vfs-contents vfs))
(define (read-dir dirname) (define (read-dir dirname)
(define contents (mapping-ref dirmap dirname)) (define contents (mapping-ref/default dirmap dirname '()))
(for-each (for-each
(lambda (pair) (lambda (pair)
(when (eq? (cdr pair) 'directory) (when (eq? (cdr pair) 'directory)