store: Add an RPC counter.
authorLudovic Courtès <ludovic.courtes@inria.fr>
Fri, 16 Jun 2017 12:23:51 +0000 (14:23 +0200)
committerLudovic Courtès <ludo@gnu.org>
Fri, 16 Jun 2017 15:08:22 +0000 (17:08 +0200)
commitf4453df9a5742ef47cad79254b33bfaa1ff15d24
treee4f598aa498511524059fc01bdcf1ad3fb2d8d62
parentd27cc3bfaafe6b5b0831e88afb1c46311d382a0b
store: Add an RPC counter.

* guix/store.scm (%rpc-calls): New variable.
(show-rpc-profile, record-operation): New procedures.
(operation): Add call to 'record-operation'.
* guix/ui.scm (run-guix-command): Wrap COMMAND-MAIN in 'dynamic-wind'.
Run EXIT-HOOK.
guix/store.scm
guix/ui.scm