bug#47255: 28.0.50; epg-tests fail on FreeBSD12

[Michael Albinus]

Hi,

I'm testing Emacs on FreeBSD 12, in a virtual machine. epg-tests.el fail
like this:

--8<---------------cut here---------------start------------->8---
Running 7 tests (2021-03-06 10:12:17+0100, selector `(not (tag :unstable))')
Test epg-decrypt-1 backtrace:
  signal(epg-error ("Decryption failed" ""))
  apply(signal (epg-error ("Decryption failed" "")))
  (setq value-2 (apply fn-0 args-1))
  (unwind-protect (setq value-2 (apply fn-0 args-1)) (setq form-descri
  (if (unwind-protect (setq value-2 (apply fn-0 args-1)) (setq form-de
  (let (form-description-4) (if (unwind-protect (setq value-2 (apply f
  (let ((value-2 'ert-form-evaluation-aborted-3)) (let (form-descripti
  (let* ((fn-0 #'equal) (args-1 (condition-case err (let ((signal-hook
  (progn (set (make-local-variable 'epg-tests-context) context) (let (
  (unwind-protect (progn (set (make-local-variable 'epg-tests-context)
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn
  (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current
  (let ((epg-config (or (epg-tests-find-usable-gpg-configuration t nil
  (unwind-protect (let ((epg-config (or (epg-tests-find-usable-gpg-con
  (let* ((epg-tests-home-directory (make-temp-file "epg-tests-homedir"
  (closure (t) nil (let* ((epg-tests-home-directory (make-temp-file "e
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name epg-decrypt-1 :documentation nil :bod
  ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-m
  ert-run-tests((not (tag :unstable)) #f(compiled-function (event-type
  ert-run-tests-batch((not (tag :unstable)))
  ert-run-tests-batch-and-exit((not (tag :unstable)))
  eval((ert-run-tests-batch-and-exit '(not (tag :unstable))) t)
  command-line-1(("-L" ":." "-l" "ert" "-l" "lisp/epg-tests.el" "--eva
  command-line()
  normal-top-level()
Test epg-decrypt-1 condition:
    (epg-error "Decryption failed" "")
   FAILED  1/7  epg-decrypt-1 (0.290287 sec)
   passed  2/7  epg-import-1 (0.461930 sec)
Test epg-roundtrip-1 backtrace:
  signal(epg-error ("Encrypt failed" "Exit"))
  epg-encrypt-string(#s(epg-context :protocol OpenPGP :program "/usr/l
  (let ((cipher (epg-encrypt-string epg-tests-context "symmetric" nil)
  (progn (set (make-local-variable 'epg-tests-context) context) (let (
  (unwind-protect (progn (set (make-local-variable 'epg-tests-context)
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn
  (let ((temp-buffer (generate-new-buffer " *temp*" t))) (save-current
  (let ((epg-config (or (epg-tests-find-usable-gpg-configuration t nil
  (unwind-protect (let ((epg-config (or (epg-tests-find-usable-gpg-con
  (let* ((epg-tests-home-directory (make-temp-file "epg-tests-homedir"
  (closure (t) nil (let* ((epg-tests-home-directory (make-temp-file "e
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name epg-roundtrip-1 :documentation nil :b
  ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-m
  ert-run-tests((not (tag :unstable)) #f(compiled-function (event-type
  ert-run-tests-batch((not (tag :unstable)))
  ert-run-tests-batch-and-exit((not (tag :unstable)))
  eval((ert-run-tests-batch-and-exit '(not (tag :unstable))) t)
  command-line-1(("-L" ":." "-l" "ert" "-l" "lisp/epg-tests.el" "--eva
  command-line()
  normal-top-level()
Test epg-roundtrip-1 condition:
    (epg-error "Encrypt failed" "Exit")
   FAILED  3/7  epg-roundtrip-1 (0.536395 sec)
   passed  4/7  epg-roundtrip-2 (0.580619 sec)
   passed  5/7  epg-sign-verify-1 (0.687877 sec)
   passed  6/7  epg-sign-verify-2 (0.680832 sec)
   passed  7/7  epg-sign-verify-3 (0.688315 sec)

Ran 7 tests, 5 results as expected, 2 unexpected (2021-03-06 10:12:21+0100, 
4.194446 sec)

2 unexpected results:
   FAILED  epg-decrypt-1
   FAILED  epg-roundtrip-1
--8<---------------cut here---------------end--------------->8---


In GNU Emacs 28.0.50 (build 3, x86_64-unknown-freebsd12.2, GTK+ Version 
3.24.24, cairo version 1.16.0)
 of 2021-03-04 built on freebsd12
Repository revision: f5e1fc371af7a4211ca7a40b5db0b7da00cb1d93
Repository branch: master
System Description: 12.2-RELEASE

Configured features:
ACL CAIRO DBUS FREETYPE GIF GLIB GNUTLS GSETTINGS HARFBUZZ JPEG JSON
LCMS2 LIBOTF LIBXML2 M17N_FLT MODULES NOTIFY KQUEUE PDUMPER PNG RSVG
SOUND THREADS TIFF TOOLKIT_SCROLL_BARS X11 XDBE XIM XPM GTK3 ZLIB

Important settings:
  locale-coding-system: utf-8

Major mode: Lisp Interaction

Minor modes in effect:
  display-time-mode: t
  shell-dirtrack-mode: t
  icomplete-mode: t
  show-paren-mode: t
  tooltip-mode: t
  global-eldoc-mode: t
  eldoc-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  column-number-mode: t
  line-number-mode: t
  transient-mark-mode: t

Load-path shadows:
/home/albinus/src/tramp/lisp/tramp-sshfs hides 
/home/albinus/src/emacs/lisp/net/tramp-sshfs
/home/albinus/src/tramp/lisp/tramp-fuse hides 
/home/albinus/src/emacs/lisp/net/tramp-fuse
/home/albinus/src/tramp/lisp/tramp-sh hides 
/home/albinus/src/emacs/lisp/net/tramp-sh
/home/albinus/src/tramp/lisp/tramp-smb hides 
/home/albinus/src/emacs/lisp/net/tramp-smb
/home/albinus/src/tramp/lisp/tramp hides /home/albinus/src/emacs/lisp/net/tramp
/home/albinus/src/tramp/lisp/trampver hides 
/home/albinus/src/emacs/lisp/net/trampver
/home/albinus/src/tramp/lisp/tramp-sudoedit hides 
/home/albinus/src/emacs/lisp/net/tramp-sudoedit
/home/albinus/src/tramp/lisp/tramp-uu hides 
/home/albinus/src/emacs/lisp/net/tramp-uu
/home/albinus/src/tramp/lisp/tramp-gvfs hides 
/home/albinus/src/emacs/lisp/net/tramp-gvfs
/home/albinus/src/tramp/lisp/tramp-rclone hides 
/home/albinus/src/emacs/lisp/net/tramp-rclone
/home/albinus/src/tramp/lisp/tramp-ftp hides 
/home/albinus/src/emacs/lisp/net/tramp-ftp
/home/albinus/src/tramp/lisp/tramp-integration hides 
/home/albinus/src/emacs/lisp/net/tramp-integration
/home/albinus/src/tramp/lisp/tramp-crypt hides 
/home/albinus/src/emacs/lisp/net/tramp-crypt
/home/albinus/src/tramp/lisp/tramp-cmds hides 
/home/albinus/src/emacs/lisp/net/tramp-cmds
/home/albinus/src/tramp/lisp/tramp-adb hides 
/home/albinus/src/emacs/lisp/net/tramp-adb
/home/albinus/src/tramp/lisp/tramp-compat hides 
/home/albinus/src/emacs/lisp/net/tramp-compat
/home/albinus/src/tramp/lisp/tramp-archive hides 
/home/albinus/src/emacs/lisp/net/tramp-archive
/home/albinus/src/tramp/lisp/tramp-cache hides 
/home/albinus/src/emacs/lisp/net/tramp-cache
~/lisp/dbus hides /home/albinus/src/emacs/lisp/net/dbus
/home/albinus/src/tramp/lisp/tramp-loaddefs hides 
/home/albinus/src/emacs/lisp/net/tramp-loaddefs

Features:
(shadow sort mail-extr warnings emacsbug message rmc puny rfc822 mml
mml-sec epa derived epg epg-config gnus-util rmail rmail-loaddefs
text-property-search mm-decode mm-bodies mm-encode mail-parse rfc2231
mailabbrev gmm-utils mailheader sendmail rfc2047 rfc2045 ietf-drums
mm-util mail-prsvr mail-utils term/xterm xterm face-remap ob-shell ob
ob-tangle ol org-src ob-ref ob-lob ob-table ob-exp ob-comint ob-core
ob-eval org-keys org-compat advice org-macs vc vc-dispatcher cperl-mode
rx package browse-url url url-proxy url-privacy url-expand url-methods
url-history url-cookie url-domsuf url-util mailcap url-handlers
url-parse url-vars time tramp-sh tramp tramp-loaddefs trampver
tramp-integration files-x tramp-compat shell pcomplete comint ansi-color
ring parse-time iso8601 time-date ls-lisp format-spec auth-source cl-seq
eieio eieio-core cl-macs eieio-loaddefs cl-loaddefs cl-lib
password-cache json subr-x map ido seq byte-opt gv bytecomp byte-compile
cconv jka-compr icomplete paren dired dired-loaddefs disp-table
iso-transl tooltip eldoc electric uniquify ediff-hook vc-hooks
lisp-float-type mwheel term/x-win x-win term/common-win x-dnd tool-bar
dnd fontset image regexp-opt fringe tabulated-list replace newcomment
text-mode elisp-mode lisp-mode prog-mode register page tab-bar menu-bar
rfn-eshadow isearch easymenu timer select scroll-bar mouse jit-lock
font-lock syntax facemenu font-core term/tty-colors frame minibuffer
cl-generic cham georgian utf-8-lang misc-lang vietnamese tibetan thai
tai-viet lao korean japanese eucjp-ms cp51932 hebrew greek romanian
slovak czech european ethiopic indian cyrillic chinese composite
charscript charprop case-table epa-hook jka-cmpr-hook help simple abbrev
obarray cl-preloaded nadvice button loaddefs faces cus-face macroexp
files window text-properties overlay sha1 md5 base64 format env
code-pages mule custom widget hashtable-print-readable backquote threads
dbusbind kqueue lcms2 dynamic-setting system-font-setting
font-render-setting cairo move-toolbar gtk x-toolkit x multi-tty
make-network-process emacs)

Memory information:
((conses 16 97517 7255)
 (symbols 48 11978 1)
 (strings 32 36710 1389)
 (string-bytes 1 1239477)
 (vectors 16 18328)
 (vector-slots 8 198446 5479)
 (floats 8 64 525)
 (intervals 56 222 0)
 (buffers 992 12))