diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2017-12-12 15:20:47 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2017-12-12 18:11:22 +0100 |
| commit | 3d19b7fbc2f9394ad7d957f1408fef9fc0589ce6 (patch) | |
| tree | 86f90991c67d9b652a8d0480730cb7aeb50f79ff /guix | |
| parent | 6c80641d54a95f2da95e480a4a746761d25161e9 (diff) | |
derivations: Use 'define-immutable-record-type' as appropriate.
This is a followup to dc673fa1131fb5d1e5ca29acb4a693cfb906986f.
* guix/derivations.scm (<derivation-output>, <derivation-input>): Use
'define-immutable-record-type'.
Diffstat (limited to 'guix')
| -rw-r--r-- | guix/derivations.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/derivations.scm b/guix/derivations.scm index 07803ca94f..b95849727b 100644 --- a/guix/derivations.scm +++ b/guix/derivations.scm @@ -136,7 +136,7 @@ (env-vars derivation-builder-environment-vars) ; list of name/value pairs (file-name derivation-file-name)) ; the .drv file name -(define-record-type <derivation-output> +(define-immutable-record-type <derivation-output> (make-derivation-output path hash-algo hash recursive?) derivation-output? (path derivation-output-path) ; store path @@ -144,7 +144,7 @@ (hash derivation-output-hash) ; bytevector | #f (recursive? derivation-output-recursive?)) ; Boolean -(define-record-type <derivation-input> +(define-immutable-record-type <derivation-input> (make-derivation-input path sub-derivations) derivation-input? (path derivation-input-path) ; store path |