diff options
author | Justus Winter <[email protected]> | 2017-01-10 14:50:57 +0000 |
---|---|---|
committer | Justus Winter <[email protected]> | 2017-01-10 14:50:57 +0000 |
commit | 88e42ef08d65d4d1bc29c6cea48df19ca0d5e2bd (patch) | |
tree | f8aebf78fafa3e7f78a8a4cc126e564f48063a37 /tests/openpgp/defs.scm | |
parent | tools: Fix memory leaks and improve error handling. (diff) | |
download | gnupg-88e42ef08d65d4d1bc29c6cea48df19ca0d5e2bd.tar.gz gnupg-88e42ef08d65d4d1bc29c6cea48df19ca0d5e2bd.zip |
tests: Improve gpgconf test.
* tests/openpgp/defs.scm (valgrind): New variable.
(gpg-config): Fix clearing an option.
* tests/openpgp/gpgconf.scm: Also toggle 'quiet'.
Signed-off-by: Justus Winter <[email protected]>
Diffstat (limited to 'tests/openpgp/defs.scm')
-rw-r--r-- | tests/openpgp/defs.scm | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/tests/openpgp/defs.scm b/tests/openpgp/defs.scm index 1895a7587..548476bdb 100644 --- a/tests/openpgp/defs.scm +++ b/tests/openpgp/defs.scm @@ -131,6 +131,15 @@ (string-append bin-prefix "/" (basename (caddr t))) (string-append (getenv "objdir") "/" (caddr t))))))) +;; You can splice VALGRIND into your argument vector to run programs +;; under valgrind. For example, to run valgrind on gpg, you may want +;; to redefine gpg: +;; +;; (set! gpg `(,@valgrind ,@gpg)) +;; +(define valgrind + '("/usr/bin/valgrind" --leak-check=full --error-exitcode=154)) + (define (gpg-conf . args) (gpg-conf' "" args)) (define (gpg-conf' input args) @@ -149,7 +158,7 @@ (gpg-conf' (string-append key ":0:" (percent-encode value)) `(--change-options ,component))) (define (clear) - (gpg-conf' (string-append key ":1:") + (gpg-conf' (string-append key ":16:") `(--change-options ,component))))) |