diff options
| author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2023-03-28 22:40:32 -0400 |
|---|---|---|
| committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2023-03-28 22:40:32 -0400 |
| commit | 438a0de332fc09d9ba14d7c989af9c17ca9c6be2 (patch) | |
| tree | 869ee142cd19a803ce4d1e33d69d0d85f3be5a44 /guix/build | |
| parent | e5ae499f4c91508123edae3df29afa94c6ef33ae (diff) | |
| parent | d00f1075077e55a3c2c750b3dd41be2a09eff530 (diff) | |
Merge remote-tracking branch 'origin/master' into staging
Diffstat (limited to 'guix/build')
| -rw-r--r-- | guix/build/syscalls.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/guix/build/syscalls.scm b/guix/build/syscalls.scm index df9b9f6ac7..d947b010d3 100644 --- a/guix/build/syscalls.scm +++ b/guix/build/syscalls.scm @@ -970,7 +970,10 @@ backend device." (string->pointer key) (string->pointer "") 0))) - (cond ((< size 0) #f) + (cond ((< size 0) + (throw 'system-error "getxattr" "~S: ~A" + (list file key (strerror err)) + (list err))) ((zero? size) "") ;; Get VALUE in buffer of SIZE. XXX actual size can race. (else (let*-values (((buf) (make-bytevector size)) |