mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 13:58:15 -05:00
packages: Work around compiler bug in Guile 2.0.5.
* guix/packages.scm (package-field-location): Work around compiler bug in 2.0.5. Reported by Andreas Enge <andreas@enge.fr>.
This commit is contained in:
parent
89be37a5a3
commit
8e77f41ede
1 changed files with 6 additions and 3 deletions
|
@ -181,9 +181,12 @@ (define (goto port line column)
|
|||
(let ((field (assoc field inits)))
|
||||
(match field
|
||||
((_ value)
|
||||
(and=> (or (source-properties value)
|
||||
(source-properties field))
|
||||
source-properties->location))
|
||||
;; Put the `or' here, and not in the first argument of
|
||||
;; `and=>', to work around a compiler bug in 2.0.5.
|
||||
(or (and=> (source-properties value)
|
||||
source-properties->location)
|
||||
(and=> (source-properties field)
|
||||
source-properties->location)))
|
||||
(_
|
||||
#f))))
|
||||
(_
|
||||
|
|
Loading…
Reference in a new issue