aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-01-09 23:59:07 +0100
committerLudovic Courtès <ludo@gnu.org>2014-01-24 00:01:49 +0100
commit5674a3fdb6b4b0f744e2339167d415d8a7a265a0 (patch)
treebc10575c1ea79ac0070284d8be4880a833bd4bbb
parent59f734f351ee1703dca3e7e01150b52517d48849 (diff)
downloadpatches-5674a3fdb6b4b0f744e2339167d415d8a7a265a0.tar
patches-5674a3fdb6b4b0f744e2339167d415d8a7a265a0.tar.gz
store: Add comments for the %stderr constants.
* guix/store.scm (process-stderr): Add comments for the various constants, to help when stracing.
-rw-r--r--guix/store.scm10
1 files changed, 5 insertions, 5 deletions
diff --git a/guix/store.scm b/guix/store.scm
index 1012480b39..8ad32b2fd5 100644
--- a/guix/store.scm
+++ b/guix/store.scm
@@ -360,11 +360,11 @@ encoding conversion errors."
(nix-server-socket server))
;; magic cookies from worker-protocol.hh
- (define %stderr-next #x6f6c6d67)
- (define %stderr-read #x64617461) ; data needed from source
- (define %stderr-write #x64617416) ; data for sink
- (define %stderr-last #x616c7473)
- (define %stderr-error #x63787470)
+ (define %stderr-next #x6f6c6d67) ; "olmg", build log
+ (define %stderr-read #x64617461) ; "data", data needed from source
+ (define %stderr-write #x64617416) ; "dat\x16", data for sink
+ (define %stderr-last #x616c7473) ; "alts", we're done
+ (define %stderr-error #x63787470) ; "cxtp", error reporting
(let ((k (read-int p)))
(cond ((= k %stderr-write)