diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2017-11-14 10:16:22 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2020-05-16 00:34:41 +0200 |
| commit | 644cb40cd83eff8a5bcdbd2d63887daa18228f41 (patch) | |
| tree | e470f35ad20a8ad6805d2a8e7b03897bc10f6098 /.dir-locals.el | |
| parent | d03001a31a6d460b712825640dba11e3f1a53a14 (diff) | |
gexp: Add 'let-system'.
* guix/gexp.scm (<system-binding>): New record type.
(let-system): New macro.
(system-binding-compiler): New procedure.
(default-expander): Add 'self-quoting?' case.
(self-quoting?): New procedure.
(lower-inputs): Add 'filterm'. Pass the result of
'mapm/accumulate-builds' through FILTERM.
(gexp->sexp)[self-quoting?]: Remove.
* tests/gexp.scm ("let-system", "let-system, target")
("let-system, ungexp-native, target")
("let-system, nested"): New tests.
* doc/guix.texi (G-Expressions): Document it.
Diffstat (limited to '.dir-locals.el')
| -rw-r--r-- | .dir-locals.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/.dir-locals.el b/.dir-locals.el index ce305602f23..fcde914e602 100644 --- a/.dir-locals.el +++ b/.dir-locals.el | |||
| @@ -85,6 +85,7 @@ | |||
| 85 | (eval . (put 'with-imported-modules 'scheme-indent-function 1)) | 85 | (eval . (put 'with-imported-modules 'scheme-indent-function 1)) |
| 86 | (eval . (put 'with-extensions 'scheme-indent-function 1)) | 86 | (eval . (put 'with-extensions 'scheme-indent-function 1)) |
| 87 | (eval . (put 'with-parameters 'scheme-indent-function 1)) | 87 | (eval . (put 'with-parameters 'scheme-indent-function 1)) |
| 88 | (eval . (put 'let-system 'scheme-indent-function 1)) | ||
| 88 | 89 | ||
| 89 | (eval . (put 'with-database 'scheme-indent-function 2)) | 90 | (eval . (put 'with-database 'scheme-indent-function 2)) |
| 90 | (eval . (put 'call-with-transaction 'scheme-indent-function 2)) | 91 | (eval . (put 'call-with-transaction 'scheme-indent-function 2)) |