diff options
Diffstat (limited to 'tests/gpgme/gpgme-defs.scm')
| -rw-r--r-- | tests/gpgme/gpgme-defs.scm | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/gpgme/gpgme-defs.scm b/tests/gpgme/gpgme-defs.scm index 12e033cbd..2b104f264 100644 --- a/tests/gpgme/gpgme-defs.scm +++ b/tests/gpgme/gpgme-defs.scm @@ -171,3 +171,13 @@ (else (expand-one (append acc (list (car v))) (cdr v)))))) values))) + +(define python (catch #f + (path-expand "python" (string-split (getenv "PATH") *pathsep*)))) +(define (run-python-tests?) + (let* ((python-version + (string-trim char-whitespace? + (call-popen `(,python -c "import sys; print('{0}.{1}'.format(sys.version_info[0], sys.version_info[1]))") ""))) + (build-path (path-join gpgme-builddir "lang" "python" + (string-append "python" python-version "-gpg")))) + (trace (file-exists? (trace build-path))))) |