diff options
author | Ludovic Courtès <ludo@gnu.org> | 2014-01-09 23:59:07 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2014-01-24 00:01:49 +0100 |
commit | 5674a3fdb6b4b0f744e2339167d415d8a7a265a0 (patch) | |
tree | bc10575c1ea79ac0070284d8be4880a833bd4bbb | |
parent | 59f734f351ee1703dca3e7e01150b52517d48849 (diff) | |
download | guix-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.scm | 10 |
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) |