mirror of
git://git.gnupg.org/gnupg.git
synced 2025-07-02 22:46:30 +02:00
gpgscm,tests: Add new functions to the test environment.
* tests/gpgscm/lib.scm (first, last, powerset): New functions. * tests/gpgscm/tests.scm (interactive-shell): New function. * tests/openpgp/Makefile.am (EXTRA_DIST): Add new file. * tests/openpgp/README: Document 'interactive-shell'. * tests/openpgp/shell.scm: New file. Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
parent
d10b67b9bc
commit
1ec07cbc20
5 changed files with 63 additions and 2 deletions
|
@ -481,3 +481,11 @@
|
|||
(catch (list tmpfiles source *error*)
|
||||
(apply function `(,(call-with-input-file source read-all) ,@args)))
|
||||
(list tmpfiles source #f)))
|
||||
|
||||
;;
|
||||
;; Developing and debugging tests.
|
||||
;;
|
||||
|
||||
;; Spawn an os shell.
|
||||
(define (interactive-shell)
|
||||
(call-with-fds `(,(getenv "SHELL")) 0 1 2))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue