[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
04/05: derivations: Use 'define-immutable-record-type' as appropriate.
From: |
Ludovic Courtès |
Subject: |
04/05: derivations: Use 'define-immutable-record-type' as appropriate. |
Date: |
Tue, 12 Dec 2017 12:11:40 -0500 (EST) |
civodul pushed a commit to branch master
in repository guix.
commit 3d19b7fbc2f9394ad7d957f1408fef9fc0589ce6
Author: Ludovic Courtès <address@hidden>
Date: Tue Dec 12 15:20:47 2017 +0100
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'.
---
guix/derivations.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/guix/derivations.scm b/guix/derivations.scm
index 07803ca..b958497 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