* guix/nar.scm (write-file): Add case for type `symlink'.
(restore-file): Likewise.
* tests/nar.scm (random-file-size, make-file-tree, delete-file-tree,
with-file-tree, file-tree-equal?, make-random-bytevector,
populate-file): New procedures.
(%test-dir): New variable.
("write-file + restore-file"): Use `%test-dir' and `file-tree-equal?'.
("write-file + restore-file with symlinks"): New test.
|
||
|---|---|---|
| .. | ||
| base32.scm | ||
| build-utils.scm | ||
| builders.scm | ||
| derivations.scm | ||
| guix-build.sh | ||
| guix-daemon.sh | ||
| guix-download.sh | ||
| guix-gc.sh | ||
| guix-package.sh | ||
| nar.scm | ||
| packages.scm | ||
| snix.scm | ||
| store.scm | ||
| test.drv | ||
| ui.scm | ||
| union.scm | ||
| utils.scm | ||