diff options
| author | Marius Bakke <marius@gnu.org> | 2022-09-01 23:26:57 +0200 |
|---|---|---|
| committer | Marius Bakke <marius@gnu.org> | 2022-09-01 23:26:57 +0200 |
| commit | 58863b93b0d9a191d5cca695fe0a0dfbb067ebba (patch) | |
| tree | 1ee1aba5905862aaee952689e59dd2d8a9e2fce6 /tests | |
| parent | 2e559a358582fd8f56a035d0fac97be229752dfb (diff) | |
| parent | 0c518f974e64f23846ae51ea2c68b479202fdca9 (diff) | |
| download | guix-58863b93b0d9a191d5cca695fe0a0dfbb067ebba.tar.gz | |
Merge branch 'staging' into core-updates
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/read-print.scm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/read-print.scm b/tests/read-print.scm index 4dabcc1e64..1b0d865972 100644 --- a/tests/read-print.scm +++ b/tests/read-print.scm @@ -248,6 +248,14 @@ mnopqrstuvwxyz.\")" (list x y z))") (test-pretty-print "\ +(begin + (chmod \"foo\" #o750) + (chmod port + (logand #o644 + (lognot (umask)))) + (logand #x7f xyz))") + +(test-pretty-print "\ (substitute-keyword-arguments (package-arguments x) ((#:phases phases) `(modify-phases ,phases |