derivations: Use 'define-immutable-record-type' as appropriate.
This is a followup to dc673fa113
.
* guix/derivations.scm (<derivation-output>, <derivation-input>): Use
'define-immutable-record-type'.
This commit is contained in:
parent
6c80641d54
commit
3d19b7fbc2
|
@ -136,7 +136,7 @@
|
||||||
(env-vars derivation-builder-environment-vars) ; list of name/value pairs
|
(env-vars derivation-builder-environment-vars) ; list of name/value pairs
|
||||||
(file-name derivation-file-name)) ; the .drv file name
|
(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?)
|
(make-derivation-output path hash-algo hash recursive?)
|
||||||
derivation-output?
|
derivation-output?
|
||||||
(path derivation-output-path) ; store path
|
(path derivation-output-path) ; store path
|
||||||
|
@ -144,7 +144,7 @@
|
||||||
(hash derivation-output-hash) ; bytevector | #f
|
(hash derivation-output-hash) ; bytevector | #f
|
||||||
(recursive? derivation-output-recursive?)) ; Boolean
|
(recursive? derivation-output-recursive?)) ; Boolean
|
||||||
|
|
||||||
(define-record-type <derivation-input>
|
(define-immutable-record-type <derivation-input>
|
||||||
(make-derivation-input path sub-derivations)
|
(make-derivation-input path sub-derivations)
|
||||||
derivation-input?
|
derivation-input?
|
||||||
(path derivation-input-path) ; store path
|
(path derivation-input-path) ; store path
|
||||||
|
|
Loading…
Reference in New Issue