0s autopkgtest [17:16:59]: starting date and time: 2025-03-14 17:16:59+0000 0s autopkgtest [17:16:59]: git checkout: 325255d2 Merge branch 'pin-any-arch' into 'ubuntu/production' 0s autopkgtest [17:16:59]: host juju-7f2275-prod-proposed-migration-environment-15; command line: /home/ubuntu/autopkgtest/runner/autopkgtest --output-dir /tmp/autopkgtest-work.fxzy9yb9/out --timeout-copy=6000 --setup-commands /home/ubuntu/autopkgtest-cloud/worker-config-production/setup-canonical.sh --apt-pocket=proposed=src:dh-elpa --apt-upgrade racket-mode --timeout-short=300 --timeout-copy=20000 --timeout-build=20000 --env=ADT_TEST_TRIGGERS=dh-elpa/2.1.9ubuntu1 -- ssh -s /home/ubuntu/autopkgtest/ssh-setup/nova -- --flavor autopkgtest-ppc64el --security-groups autopkgtest-juju-7f2275-prod-proposed-migration-environment-15@bos03-ppc64el-8.secgroup --name adt-plucky-ppc64el-racket-mode-20250314-171659-juju-7f2275-prod-proposed-migration-environment-15-d31f2c6f-6718-48d6-a65f-cc8852531b15 --image adt/ubuntu-plucky-ppc64el-server --keyname testbed-juju-7f2275-prod-proposed-migration-environment-15 --net-id=net_prod-proposed-migration-ppc64el -e TERM=linux -e ''"'"'http_proxy=http://squid.internal:3128'"'"'' -e ''"'"'https_proxy=http://squid.internal:3128'"'"'' -e ''"'"'no_proxy=127.0.0.1,127.0.1.1,login.ubuntu.com,localhost,localdomain,novalocal,internal,archive.ubuntu.com,ports.ubuntu.com,security.ubuntu.com,ddebs.ubuntu.com,changelogs.ubuntu.com,keyserver.ubuntu.com,launchpadlibrarian.net,launchpadcontent.net,launchpad.net,10.24.0.0/24,keystone.ps5.canonical.com,objectstorage.prodstack5.canonical.com,radosgw.ps5.canonical.com'"'"'' --mirror=http://ftpmaster.internal/ubuntu/ 95s autopkgtest [17:18:34]: testbed dpkg architecture: ppc64el 95s autopkgtest [17:18:34]: testbed apt version: 2.9.33 96s autopkgtest [17:18:35]: @@@@@@@@@@@@@@@@@@@@ test bed setup 96s autopkgtest [17:18:35]: testbed release detected to be: None 97s autopkgtest [17:18:36]: updating testbed package index (apt update) 97s Get:1 http://ftpmaster.internal/ubuntu plucky-proposed InRelease [110 kB] 97s Hit:2 http://ftpmaster.internal/ubuntu plucky InRelease 97s Hit:3 http://ftpmaster.internal/ubuntu plucky-updates InRelease 97s Hit:4 http://ftpmaster.internal/ubuntu plucky-security InRelease 98s Get:5 http://ftpmaster.internal/ubuntu plucky-proposed/restricted Sources [2420 B] 98s Get:6 http://ftpmaster.internal/ubuntu plucky-proposed/multiverse Sources [11.5 kB] 98s Get:7 http://ftpmaster.internal/ubuntu plucky-proposed/universe Sources [372 kB] 98s Get:8 http://ftpmaster.internal/ubuntu plucky-proposed/main Sources [46.9 kB] 98s Get:9 http://ftpmaster.internal/ubuntu plucky-proposed/main ppc64el Packages [77.2 kB] 98s Get:10 http://ftpmaster.internal/ubuntu plucky-proposed/universe ppc64el Packages [299 kB] 98s Get:11 http://ftpmaster.internal/ubuntu plucky-proposed/multiverse ppc64el Packages [3020 B] 98s Fetched 922 kB in 1s (1094 kB/s) 99s Reading package lists... 99s + lsb_release --codename --short 99s + RELEASE=plucky 99s + cat 99s + [ plucky != trusty ] 99s + DEBIAN_FRONTEND=noninteractive eatmydata apt-get -y --allow-downgrades -o Dpkg::Options::=--force-confnew dist-upgrade 99s Reading package lists... 100s Building dependency tree... 100s Reading state information... 100s Calculating upgrade... 100s Calculating upgrade... 100s The following packages will be upgraded: 100s cloud-init cloud-init-base libmm-glib0 100s 3 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. 100s Need to get 897 kB of archives. 100s After this operation, 64.5 kB disk space will be freed. 100s Get:1 http://ftpmaster.internal/ubuntu plucky/main ppc64el cloud-init-base all 25.1-0ubuntu3 [616 kB] 100s Get:2 http://ftpmaster.internal/ubuntu plucky/main ppc64el libmm-glib0 ppc64el 1.23.4-0ubuntu3 [278 kB] 100s Get:3 http://ftpmaster.internal/ubuntu plucky/main ppc64el cloud-init all 25.1-0ubuntu3 [2100 B] 101s Preconfiguring packages ... 101s Fetched 897 kB in 1s (1675 kB/s) 101s (Reading database ... (Reading database ... 5% (Reading database ... 10% (Reading database ... 15% (Reading database ... 20% (Reading database ... 25% (Reading database ... 30% (Reading database ... 35% (Reading database ... 40% (Reading database ... 45% (Reading database ... 50% (Reading database ... 55% (Reading database ... 60% (Reading database ... 65% (Reading database ... 70% (Reading database ... 75% (Reading database ... 80% (Reading database ... 85% (Reading database ... 90% (Reading database ... 95% (Reading database ... 100% (Reading database ... 107193 files and directories currently installed.) 101s Preparing to unpack .../cloud-init-base_25.1-0ubuntu3_all.deb ... 101s Unpacking cloud-init-base (25.1-0ubuntu3) over (25.1-0ubuntu2) ... 101s Preparing to unpack .../libmm-glib0_1.23.4-0ubuntu3_ppc64el.deb ... 101s Unpacking libmm-glib0:ppc64el (1.23.4-0ubuntu3) over (1.23.4-0ubuntu2) ... 101s Preparing to unpack .../cloud-init_25.1-0ubuntu3_all.deb ... 101s Unpacking cloud-init (25.1-0ubuntu3) over (25.1-0ubuntu2) ... 101s Setting up cloud-init-base (25.1-0ubuntu3) ... 103s Setting up libmm-glib0:ppc64el (1.23.4-0ubuntu3) ... 103s Setting up cloud-init (25.1-0ubuntu3) ... 103s Processing triggers for rsyslog (8.2412.0-2ubuntu2) ... 103s Processing triggers for man-db (2.13.0-1) ... 104s Processing triggers for libc-bin (2.41-1ubuntu1) ... 104s + rm /etc/apt/preferences.d/force-downgrade-to-release.pref 104s + /usr/lib/apt/apt-helper analyze-pattern ?true 104s + uname -r 104s + sed s/\./\\./g 104s + running_kernel_pattern=^linux-.*6\.14\.0-7-generic.* 104s + apt list ?obsolete 104s + tail -n+2 104s + cut -d/ -f1 104s + grep -v ^linux-.*6\.14\.0-7-generic.* 104s + true 104s + obsolete_pkgs= 104s + DEBIAN_FRONTEND=noninteractive eatmydata apt-get -y purge --autoremove 104s Reading package lists... 105s Building dependency tree... 105s Reading state information... 105s Solving dependencies... 105s 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. 105s + grep -q trusty /etc/lsb-release 105s + [ ! -d /usr/share/doc/unattended-upgrades ] 105s + [ ! -d /usr/share/doc/lxd ] 105s + [ ! -d /usr/share/doc/lxd-client ] 105s + [ ! -d /usr/share/doc/snapd ] 105s + type iptables 105s + cat 105s + chmod 755 /etc/rc.local 105s + . /etc/rc.local 105s + iptables -w -t mangle -A FORWARD -p tcp --tcp-flags SYN,RST SYN -j TCPMSS --clamp-mss-to-pmtu 105s + iptables -A OUTPUT -d 10.255.255.1/32 -p tcp -j DROP 105s + iptables -A OUTPUT -d 10.255.255.2/32 -p tcp -j DROP 105s + uname -m 105s + [ ppc64le = ppc64le ] 105s + systemctl is-active keyboard-setup.service 105s + [ active = failed ] 105s + [ -d /run/systemd/system ] 105s + systemd-detect-virt --quiet --vm 105s + mkdir -p /etc/systemd/system/systemd-random-seed.service.d/ 105s + cat 105s + grep -q lz4 /etc/initramfs-tools/initramfs.conf 105s + echo COMPRESS=lz4 105s autopkgtest [17:18:44]: upgrading testbed (apt dist-upgrade and autopurge) 105s Reading package lists... 106s Building dependency tree... 106s Reading state information... 106s Calculating upgrade...Starting pkgProblemResolver with broken count: 0 106s Starting 2 pkgProblemResolver with broken count: 0 106s Done 106s Entering ResolveByKeep 106s 106s Calculating upgrade... 106s 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. 106s Reading package lists... 107s Building dependency tree... 107s Reading state information... 107s Starting pkgProblemResolver with broken count: 0 107s Starting 2 pkgProblemResolver with broken count: 0 107s Done 107s Solving dependencies... 107s 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. 107s autopkgtest [17:18:46]: rebooting testbed after setup commands that affected boot 137s autopkgtest [17:19:16]: testbed running kernel: Linux 6.14.0-7-generic #7-Ubuntu SMP Fri Feb 28 12:06:33 UTC 2025 140s autopkgtest [17:19:19]: @@@@@@@@@@@@@@@@@@@@ apt-source racket-mode 142s Get:1 http://ftpmaster.internal/ubuntu plucky/universe racket-mode 20250205~git.d9e66c7-1 (dsc) [2411 B] 142s Get:2 http://ftpmaster.internal/ubuntu plucky/universe racket-mode 20250205~git.d9e66c7-1 (tar) [306 kB] 142s Get:3 http://ftpmaster.internal/ubuntu plucky/universe racket-mode 20250205~git.d9e66c7-1 (diff) [5120 B] 142s gpgv: Signature made Sat Feb 8 09:57:58 2025 UTC 142s gpgv: using RSA key 88A41F77AA3CD668C8F8B5802DE965ED63825C93 142s gpgv: issuer "manphiz@gmail.com" 142s gpgv: Can't check signature: No public key 142s dpkg-source: warning: cannot verify inline signature for ./racket-mode_20250205~git.d9e66c7-1.dsc: no acceptable signature found 143s autopkgtest [17:19:22]: testing package racket-mode version 20250205~git.d9e66c7-1 143s autopkgtest [17:19:22]: build not needed 143s autopkgtest [17:19:22]: test dh-elpa-test-autopkgtest: preparing testbed 144s Reading package lists... 144s Building dependency tree... 144s Reading state information... 144s Starting pkgProblemResolver with broken count: 0 144s Starting 2 pkgProblemResolver with broken count: 0 144s Done 144s The following NEW packages will be installed: 144s autoconf automake autopoint autotools-dev build-essential cpp cpp-14 144s cpp-14-powerpc64le-linux-gnu cpp-powerpc64le-linux-gnu debhelper debugedit 144s dh-autoreconf dh-elpa dh-elpa-helper dh-strip-nondeterminism dwz elpa-faceup 144s elpa-paredit elpa-pos-tip elpa-racket-mode emacs-bin-common emacs-common 144s emacs-el emacs-nox emacsen-common g++ g++-14 g++-14-powerpc64le-linux-gnu 144s g++-powerpc64le-linux-gnu gcc gcc-14 gcc-14-powerpc64le-linux-gnu 144s gcc-powerpc64le-linux-gnu gettext git git-man intltool-debian 144s libapt-pkg-perl libarchive-zip-perl libarray-unique-perl libarray-utils-perl 144s libasan8 libasound2-data libasound2t64 libcc1-0 libcgi-pm-perl 144s libclass-accessor-perl libclone-perl libconfig-tiny-perl libdebhelper-perl 144s libdebian-source-perl libencode-locale-perl liberror-perl 144s libexporter-lite-perl libexporter-tiny-perl libfile-find-rule-perl 144s libfile-listing-perl libfile-stripnondeterminism-perl libgcc-14-dev 144s libgccjit0 libgomp1 libhtml-form-perl libhtml-parser-perl 144s libhtml-tagset-perl libhtml-tree-perl libhttp-cookies-perl libhttp-date-perl 144s libhttp-message-perl libhttp-negotiate-perl libio-html-perl 144s libio-socket-ssl-perl libio-stringy-perl libisl23 libitm1 liblcms2-2 144s liblist-moreutils-perl liblist-moreutils-xs-perl liblsan0 144s liblwp-mediatypes-perl liblwp-protocol-https-perl libmpc3 libnet-http-perl 144s libnet-ssleay-perl libnumber-compare-perl libparse-debcontrol-perl 144s libquadmath0 libstdc++-14-dev libsub-install-perl libsub-name-perl 144s libtext-glob-perl libtie-ixhash-perl libtimedate-perl libtool 144s libtree-sitter0 libtry-tiny-perl libtsan2 libubsan1 liburi-perl 144s libwww-mechanize-perl libwww-perl libwww-robotrules-perl m4 144s perl-openssl-defaults po-debconf racket racket-common 144s 0 upgraded, 106 newly installed, 0 to remove and 0 not upgraded. 144s Need to get 286 MB of archives. 144s After this operation, 1008 MB of additional disk space will be used. 144s Get:1 http://ftpmaster.internal/ubuntu plucky/main ppc64el m4 ppc64el 1.4.19-7 [279 kB] 145s Get:2 http://ftpmaster.internal/ubuntu plucky/main ppc64el autoconf all 2.72-3ubuntu1 [383 kB] 145s Get:3 http://ftpmaster.internal/ubuntu plucky/main ppc64el autotools-dev all 20220109.1 [44.9 kB] 145s Get:4 http://ftpmaster.internal/ubuntu plucky/main ppc64el automake all 1:1.17-3ubuntu1 [572 kB] 145s Get:5 http://ftpmaster.internal/ubuntu plucky/main ppc64el autopoint all 0.23.1-1 [619 kB] 145s Get:6 http://ftpmaster.internal/ubuntu plucky/main ppc64el libisl23 ppc64el 0.27-1 [882 kB] 145s Get:7 http://ftpmaster.internal/ubuntu plucky/main ppc64el libmpc3 ppc64el 1.3.1-1build2 [62.1 kB] 145s Get:8 http://ftpmaster.internal/ubuntu plucky/main ppc64el cpp-14-powerpc64le-linux-gnu ppc64el 14.2.0-17ubuntu3 [10.5 MB] 145s Get:9 http://ftpmaster.internal/ubuntu plucky/main ppc64el cpp-14 ppc64el 14.2.0-17ubuntu3 [1036 B] 145s Get:10 http://ftpmaster.internal/ubuntu plucky/main ppc64el cpp-powerpc64le-linux-gnu ppc64el 4:14.2.0-1ubuntu1 [5566 B] 145s Get:11 http://ftpmaster.internal/ubuntu plucky/main ppc64el cpp ppc64el 4:14.2.0-1ubuntu1 [22.4 kB] 145s Get:12 http://ftpmaster.internal/ubuntu plucky/main ppc64el libcc1-0 ppc64el 15-20250222-0ubuntu1 [48.7 kB] 145s Get:13 http://ftpmaster.internal/ubuntu plucky/main ppc64el libgomp1 ppc64el 15-20250222-0ubuntu1 [168 kB] 145s Get:14 http://ftpmaster.internal/ubuntu plucky/main ppc64el libitm1 ppc64el 15-20250222-0ubuntu1 [32.2 kB] 145s Get:15 http://ftpmaster.internal/ubuntu plucky/main ppc64el libasan8 ppc64el 15-20250222-0ubuntu1 [3009 kB] 145s Get:16 http://ftpmaster.internal/ubuntu plucky/main ppc64el liblsan0 ppc64el 15-20250222-0ubuntu1 [1376 kB] 145s Get:17 http://ftpmaster.internal/ubuntu plucky/main ppc64el libtsan2 ppc64el 15-20250222-0ubuntu1 [2733 kB] 146s Get:18 http://ftpmaster.internal/ubuntu plucky/main ppc64el libubsan1 ppc64el 15-20250222-0ubuntu1 [1234 kB] 146s Get:19 http://ftpmaster.internal/ubuntu plucky/main ppc64el libquadmath0 ppc64el 15-20250222-0ubuntu1 [160 kB] 146s Get:20 http://ftpmaster.internal/ubuntu plucky/main ppc64el libgcc-14-dev ppc64el 14.2.0-17ubuntu3 [1619 kB] 146s Get:21 http://ftpmaster.internal/ubuntu plucky/main ppc64el gcc-14-powerpc64le-linux-gnu ppc64el 14.2.0-17ubuntu3 [20.6 MB] 146s Get:22 http://ftpmaster.internal/ubuntu plucky/main ppc64el gcc-14 ppc64el 14.2.0-17ubuntu3 [536 kB] 146s Get:23 http://ftpmaster.internal/ubuntu plucky/main ppc64el gcc-powerpc64le-linux-gnu ppc64el 4:14.2.0-1ubuntu1 [1226 B] 146s Get:24 http://ftpmaster.internal/ubuntu plucky/main ppc64el gcc ppc64el 4:14.2.0-1ubuntu1 [5012 B] 146s Get:25 http://ftpmaster.internal/ubuntu plucky/main ppc64el libstdc++-14-dev ppc64el 14.2.0-17ubuntu3 [2678 kB] 146s Get:26 http://ftpmaster.internal/ubuntu plucky/main ppc64el g++-14-powerpc64le-linux-gnu ppc64el 14.2.0-17ubuntu3 [12.0 MB] 146s Get:27 http://ftpmaster.internal/ubuntu plucky/main ppc64el g++-14 ppc64el 14.2.0-17ubuntu3 [21.8 kB] 146s Get:28 http://ftpmaster.internal/ubuntu plucky/main ppc64el g++-powerpc64le-linux-gnu ppc64el 4:14.2.0-1ubuntu1 [966 B] 146s Get:29 http://ftpmaster.internal/ubuntu plucky/main ppc64el g++ ppc64el 4:14.2.0-1ubuntu1 [1088 B] 146s Get:30 http://ftpmaster.internal/ubuntu plucky/main ppc64el build-essential ppc64el 12.10ubuntu1 [4936 B] 146s Get:31 http://ftpmaster.internal/ubuntu plucky/main ppc64el libdebhelper-perl all 13.24.1ubuntu2 [95.4 kB] 146s Get:32 http://ftpmaster.internal/ubuntu plucky/main ppc64el libtool all 2.5.4-4 [168 kB] 146s Get:33 http://ftpmaster.internal/ubuntu plucky/main ppc64el dh-autoreconf all 20 [16.1 kB] 146s Get:34 http://ftpmaster.internal/ubuntu plucky/main ppc64el libarchive-zip-perl all 1.68-1 [90.2 kB] 146s Get:35 http://ftpmaster.internal/ubuntu plucky/main ppc64el libfile-stripnondeterminism-perl all 1.14.1-2 [20.3 kB] 146s Get:36 http://ftpmaster.internal/ubuntu plucky/main ppc64el dh-strip-nondeterminism all 1.14.1-2 [5064 B] 146s Get:37 http://ftpmaster.internal/ubuntu plucky/main ppc64el debugedit ppc64el 1:5.1-2 [52.4 kB] 146s Get:38 http://ftpmaster.internal/ubuntu plucky/main ppc64el dwz ppc64el 0.15-1build6 [142 kB] 146s Get:39 http://ftpmaster.internal/ubuntu plucky/main ppc64el gettext ppc64el 0.23.1-1 [1155 kB] 147s Get:40 http://ftpmaster.internal/ubuntu plucky/main ppc64el intltool-debian all 0.35.0+20060710.6 [23.2 kB] 147s Get:41 http://ftpmaster.internal/ubuntu plucky/main ppc64el po-debconf all 1.0.21+nmu1 [233 kB] 147s Get:42 http://ftpmaster.internal/ubuntu plucky/main ppc64el debhelper all 13.24.1ubuntu2 [895 kB] 147s Get:43 http://ftpmaster.internal/ubuntu plucky/main ppc64el libapt-pkg-perl ppc64el 0.1.41build1 [71.3 kB] 147s Get:44 http://ftpmaster.internal/ubuntu plucky/main ppc64el libtie-ixhash-perl all 1.23-4 [11.3 kB] 147s Get:45 http://ftpmaster.internal/ubuntu plucky/universe ppc64el libarray-unique-perl all 0.09-1 [12.2 kB] 147s Get:46 http://ftpmaster.internal/ubuntu plucky/main ppc64el libsub-name-perl ppc64el 0.28-1 [10.9 kB] 147s Get:47 http://ftpmaster.internal/ubuntu plucky/universe ppc64el libclass-accessor-perl all 0.51-2 [21.4 kB] 147s Get:48 http://ftpmaster.internal/ubuntu plucky/main ppc64el libexporter-tiny-perl all 1.006002-1 [36.8 kB] 147s Get:49 http://ftpmaster.internal/ubuntu plucky/universe ppc64el liblist-moreutils-xs-perl ppc64el 0.430-4build1 [43.2 kB] 147s Get:50 http://ftpmaster.internal/ubuntu plucky/universe ppc64el liblist-moreutils-perl all 0.430-2 [38.2 kB] 147s Get:51 http://ftpmaster.internal/ubuntu plucky/main ppc64el libio-stringy-perl all 2.113-2 [45.3 kB] 147s Get:52 http://ftpmaster.internal/ubuntu plucky/main ppc64el libencode-locale-perl all 1.05-3 [11.6 kB] 147s Get:53 http://ftpmaster.internal/ubuntu plucky/main ppc64el libtimedate-perl all 2.3300-2 [34.0 kB] 147s Get:54 http://ftpmaster.internal/ubuntu plucky/main ppc64el libhttp-date-perl all 6.06-1 [10.2 kB] 147s Get:55 http://ftpmaster.internal/ubuntu plucky/main ppc64el libfile-listing-perl all 6.16-1 [11.3 kB] 147s Get:56 http://ftpmaster.internal/ubuntu plucky/main ppc64el libhtml-tagset-perl all 3.24-1 [14.1 kB] 147s Get:57 http://ftpmaster.internal/ubuntu plucky/main ppc64el liburi-perl all 5.30-1 [94.4 kB] 147s Get:58 http://ftpmaster.internal/ubuntu plucky/main ppc64el libhtml-parser-perl ppc64el 3.83-1build1 [91.8 kB] 147s Get:59 http://ftpmaster.internal/ubuntu plucky/main ppc64el libhtml-tree-perl all 5.07-3 [200 kB] 147s Get:60 http://ftpmaster.internal/ubuntu plucky/main ppc64el libclone-perl ppc64el 0.47-1 [11.1 kB] 147s Get:61 http://ftpmaster.internal/ubuntu plucky/main ppc64el libio-html-perl all 1.004-3 [15.9 kB] 147s Get:62 http://ftpmaster.internal/ubuntu plucky/main ppc64el liblwp-mediatypes-perl all 6.04-2 [20.1 kB] 147s Get:63 http://ftpmaster.internal/ubuntu plucky/main ppc64el libhttp-message-perl all 7.00-2ubuntu1 [75.9 kB] 147s Get:64 http://ftpmaster.internal/ubuntu plucky/main ppc64el libhttp-cookies-perl all 6.11-1 [18.2 kB] 147s Get:65 http://ftpmaster.internal/ubuntu plucky/main ppc64el libhttp-negotiate-perl all 6.01-2 [12.4 kB] 147s Get:66 http://ftpmaster.internal/ubuntu plucky/main ppc64el perl-openssl-defaults ppc64el 7build3 [6628 B] 147s Get:67 http://ftpmaster.internal/ubuntu plucky/main ppc64el libnet-ssleay-perl ppc64el 1.94-3 [323 kB] 147s Get:68 http://ftpmaster.internal/ubuntu plucky/main ppc64el libio-socket-ssl-perl all 2.089-1 [200 kB] 147s Get:69 http://ftpmaster.internal/ubuntu plucky/main ppc64el libnet-http-perl all 6.23-1 [22.3 kB] 147s Get:70 http://ftpmaster.internal/ubuntu plucky/main ppc64el liblwp-protocol-https-perl all 6.14-1 [9040 B] 147s Get:71 http://ftpmaster.internal/ubuntu plucky/main ppc64el libtry-tiny-perl all 0.32-1 [21.2 kB] 147s Get:72 http://ftpmaster.internal/ubuntu plucky/main ppc64el libwww-robotrules-perl all 6.02-1 [12.6 kB] 147s Get:73 http://ftpmaster.internal/ubuntu plucky/main ppc64el libwww-perl all 6.78-1 [139 kB] 147s Get:74 http://ftpmaster.internal/ubuntu plucky/main ppc64el liberror-perl all 0.17030-1 [23.5 kB] 147s Get:75 http://ftpmaster.internal/ubuntu plucky/universe ppc64el libexporter-lite-perl all 0.09-2 [9748 B] 147s Get:76 http://ftpmaster.internal/ubuntu plucky/universe ppc64el libparse-debcontrol-perl all 2.005-6 [20.4 kB] 147s Get:77 http://ftpmaster.internal/ubuntu plucky/main ppc64el libsub-install-perl all 0.929-1 [9764 B] 147s Get:78 http://ftpmaster.internal/ubuntu plucky/main ppc64el libcgi-pm-perl all 4.67-1 [185 kB] 147s Get:79 http://ftpmaster.internal/ubuntu plucky/main ppc64el libhtml-form-perl all 6.12-1 [31.1 kB] 147s Get:80 http://ftpmaster.internal/ubuntu plucky/main ppc64el libwww-mechanize-perl all 2.19-1ubuntu1 [93.3 kB] 147s Get:81 http://ftpmaster.internal/ubuntu plucky/universe ppc64el libdebian-source-perl all 0.128 [53.6 kB] 147s Get:82 http://ftpmaster.internal/ubuntu plucky/universe ppc64el emacs-el all 1:30.1+1-4ubuntu1 [19.3 MB] 147s Get:83 http://ftpmaster.internal/ubuntu plucky/main ppc64el emacsen-common all 3.0.5 [12.1 kB] 147s Get:84 http://ftpmaster.internal/ubuntu plucky/universe ppc64el emacs-common all 1:30.1+1-4ubuntu1 [16.6 MB] 148s Get:85 http://ftpmaster.internal/ubuntu plucky/universe ppc64el emacs-bin-common ppc64el 1:30.1+1-4ubuntu1 [113 kB] 148s Get:86 http://ftpmaster.internal/ubuntu plucky/main ppc64el libasound2-data all 1.2.13-1build1 [21.1 kB] 148s Get:87 http://ftpmaster.internal/ubuntu plucky/main ppc64el libasound2t64 ppc64el 1.2.13-1build1 [496 kB] 148s Get:88 http://ftpmaster.internal/ubuntu plucky/universe ppc64el libgccjit0 ppc64el 14.2.0-17ubuntu3 [10.7 MB] 148s Get:89 http://ftpmaster.internal/ubuntu plucky/main ppc64el liblcms2-2 ppc64el 2.16-2 [243 kB] 148s Get:90 http://ftpmaster.internal/ubuntu plucky/universe ppc64el libtree-sitter0 ppc64el 0.20.8-2 [107 kB] 148s Get:91 http://ftpmaster.internal/ubuntu plucky/universe ppc64el emacs-nox ppc64el 1:30.1+1-4ubuntu1 [8365 kB] 148s Get:92 http://ftpmaster.internal/ubuntu plucky/universe ppc64el libarray-utils-perl all 0.5-3 [5862 B] 148s Get:93 http://ftpmaster.internal/ubuntu plucky/main ppc64el libconfig-tiny-perl all 2.30-1 [14.7 kB] 148s Get:94 http://ftpmaster.internal/ubuntu plucky/main ppc64el libnumber-compare-perl all 0.03-3 [5974 B] 148s Get:95 http://ftpmaster.internal/ubuntu plucky/main ppc64el libtext-glob-perl all 0.11-3 [6780 B] 148s Get:96 http://ftpmaster.internal/ubuntu plucky/main ppc64el libfile-find-rule-perl all 0.34-3 [24.4 kB] 148s Get:97 http://ftpmaster.internal/ubuntu plucky-proposed/universe ppc64el dh-elpa all 2.1.9ubuntu1 [31.5 kB] 148s Get:98 http://ftpmaster.internal/ubuntu plucky-proposed/universe ppc64el dh-elpa-helper all 2.1.9ubuntu1 [9632 B] 148s Get:99 http://ftpmaster.internal/ubuntu plucky/universe ppc64el elpa-faceup all 0.0.4-7 [18.2 kB] 148s Get:100 http://ftpmaster.internal/ubuntu plucky/universe ppc64el elpa-paredit all 27~git20241103.1.af07577-1 [33.0 kB] 148s Get:101 http://ftpmaster.internal/ubuntu plucky/universe ppc64el elpa-pos-tip all 0.4.6+git20191227-3 [11.9 kB] 149s Get:102 http://ftpmaster.internal/ubuntu plucky/universe ppc64el elpa-racket-mode all 20250205~git.d9e66c7-1 [207 kB] 149s Get:103 http://ftpmaster.internal/ubuntu plucky/main ppc64el git-man all 1:2.48.1-0ubuntu1 [1148 kB] 149s Get:104 http://ftpmaster.internal/ubuntu plucky/main ppc64el git ppc64el 1:2.48.1-0ubuntu1 [7338 kB] 149s Get:105 http://ftpmaster.internal/ubuntu plucky/universe ppc64el racket-common all 8.12+dfsg1-7ubuntu1 [14.7 MB] 150s Get:106 http://ftpmaster.internal/ubuntu plucky/universe ppc64el racket ppc64el 8.12+dfsg1-7ubuntu1 [142 MB] 158s Fetched 286 MB in 13s (22.6 MB/s) 158s Selecting previously unselected package m4. 158s (Reading database ... (Reading database ... 5% (Reading database ... 10% (Reading database ... 15% (Reading database ... 20% (Reading database ... 25% (Reading database ... 30% (Reading database ... 35% (Reading database ... 40% (Reading database ... 45% (Reading database ... 50% (Reading database ... 55% (Reading database ... 60% (Reading database ... 65% (Reading database ... 70% (Reading database ... 75% (Reading database ... 80% (Reading database ... 85% (Reading database ... 90% (Reading database ... 95% (Reading database ... 100% (Reading database ... 107193 files and directories currently installed.) 158s Preparing to unpack .../000-m4_1.4.19-7_ppc64el.deb ... 158s Unpacking m4 (1.4.19-7) ... 158s Selecting previously unselected package autoconf. 158s Preparing to unpack .../001-autoconf_2.72-3ubuntu1_all.deb ... 158s Unpacking autoconf (2.72-3ubuntu1) ... 158s Selecting previously unselected package autotools-dev. 158s Preparing to unpack .../002-autotools-dev_20220109.1_all.deb ... 158s Unpacking autotools-dev (20220109.1) ... 158s Selecting previously unselected package automake. 158s Preparing to unpack .../003-automake_1%3a1.17-3ubuntu1_all.deb ... 158s Unpacking automake (1:1.17-3ubuntu1) ... 158s Selecting previously unselected package autopoint. 158s Preparing to unpack .../004-autopoint_0.23.1-1_all.deb ... 158s Unpacking autopoint (0.23.1-1) ... 158s Selecting previously unselected package libisl23:ppc64el. 158s Preparing to unpack .../005-libisl23_0.27-1_ppc64el.deb ... 158s Unpacking libisl23:ppc64el (0.27-1) ... 158s Selecting previously unselected package libmpc3:ppc64el. 158s Preparing to unpack .../006-libmpc3_1.3.1-1build2_ppc64el.deb ... 158s Unpacking libmpc3:ppc64el (1.3.1-1build2) ... 158s Selecting previously unselected package cpp-14-powerpc64le-linux-gnu. 158s Preparing to unpack .../007-cpp-14-powerpc64le-linux-gnu_14.2.0-17ubuntu3_ppc64el.deb ... 158s Unpacking cpp-14-powerpc64le-linux-gnu (14.2.0-17ubuntu3) ... 158s Selecting previously unselected package cpp-14. 158s Preparing to unpack .../008-cpp-14_14.2.0-17ubuntu3_ppc64el.deb ... 158s Unpacking cpp-14 (14.2.0-17ubuntu3) ... 158s Selecting previously unselected package cpp-powerpc64le-linux-gnu. 158s Preparing to unpack .../009-cpp-powerpc64le-linux-gnu_4%3a14.2.0-1ubuntu1_ppc64el.deb ... 158s Unpacking cpp-powerpc64le-linux-gnu (4:14.2.0-1ubuntu1) ... 158s Selecting previously unselected package cpp. 158s Preparing to unpack .../010-cpp_4%3a14.2.0-1ubuntu1_ppc64el.deb ... 158s Unpacking cpp (4:14.2.0-1ubuntu1) ... 158s Selecting previously unselected package libcc1-0:ppc64el. 158s Preparing to unpack .../011-libcc1-0_15-20250222-0ubuntu1_ppc64el.deb ... 158s Unpacking libcc1-0:ppc64el (15-20250222-0ubuntu1) ... 158s Selecting previously unselected package libgomp1:ppc64el. 158s Preparing to unpack .../012-libgomp1_15-20250222-0ubuntu1_ppc64el.deb ... 158s Unpacking libgomp1:ppc64el (15-20250222-0ubuntu1) ... 158s Selecting previously unselected package libitm1:ppc64el. 158s Preparing to unpack .../013-libitm1_15-20250222-0ubuntu1_ppc64el.deb ... 158s Unpacking libitm1:ppc64el (15-20250222-0ubuntu1) ... 158s Selecting previously unselected package libasan8:ppc64el. 158s Preparing to unpack .../014-libasan8_15-20250222-0ubuntu1_ppc64el.deb ... 158s Unpacking libasan8:ppc64el (15-20250222-0ubuntu1) ... 158s Selecting previously unselected package liblsan0:ppc64el. 158s Preparing to unpack .../015-liblsan0_15-20250222-0ubuntu1_ppc64el.deb ... 158s Unpacking liblsan0:ppc64el (15-20250222-0ubuntu1) ... 158s Selecting previously unselected package libtsan2:ppc64el. 158s Preparing to unpack .../016-libtsan2_15-20250222-0ubuntu1_ppc64el.deb ... 158s Unpacking libtsan2:ppc64el (15-20250222-0ubuntu1) ... 158s Selecting previously unselected package libubsan1:ppc64el. 158s Preparing to unpack .../017-libubsan1_15-20250222-0ubuntu1_ppc64el.deb ... 158s Unpacking libubsan1:ppc64el (15-20250222-0ubuntu1) ... 158s Selecting previously unselected package libquadmath0:ppc64el. 158s Preparing to unpack .../018-libquadmath0_15-20250222-0ubuntu1_ppc64el.deb ... 158s Unpacking libquadmath0:ppc64el (15-20250222-0ubuntu1) ... 158s Selecting previously unselected package libgcc-14-dev:ppc64el. 158s Preparing to unpack .../019-libgcc-14-dev_14.2.0-17ubuntu3_ppc64el.deb ... 158s Unpacking libgcc-14-dev:ppc64el (14.2.0-17ubuntu3) ... 158s Selecting previously unselected package gcc-14-powerpc64le-linux-gnu. 158s Preparing to unpack .../020-gcc-14-powerpc64le-linux-gnu_14.2.0-17ubuntu3_ppc64el.deb ... 158s Unpacking gcc-14-powerpc64le-linux-gnu (14.2.0-17ubuntu3) ... 159s Selecting previously unselected package gcc-14. 159s Preparing to unpack .../021-gcc-14_14.2.0-17ubuntu3_ppc64el.deb ... 159s Unpacking gcc-14 (14.2.0-17ubuntu3) ... 159s Selecting previously unselected package gcc-powerpc64le-linux-gnu. 159s Preparing to unpack .../022-gcc-powerpc64le-linux-gnu_4%3a14.2.0-1ubuntu1_ppc64el.deb ... 159s Unpacking gcc-powerpc64le-linux-gnu (4:14.2.0-1ubuntu1) ... 159s Selecting previously unselected package gcc. 159s Preparing to unpack .../023-gcc_4%3a14.2.0-1ubuntu1_ppc64el.deb ... 159s Unpacking gcc (4:14.2.0-1ubuntu1) ... 159s Selecting previously unselected package libstdc++-14-dev:ppc64el. 159s Preparing to unpack .../024-libstdc++-14-dev_14.2.0-17ubuntu3_ppc64el.deb ... 159s Unpacking libstdc++-14-dev:ppc64el (14.2.0-17ubuntu3) ... 159s Selecting previously unselected package g++-14-powerpc64le-linux-gnu. 159s Preparing to unpack .../025-g++-14-powerpc64le-linux-gnu_14.2.0-17ubuntu3_ppc64el.deb ... 159s Unpacking g++-14-powerpc64le-linux-gnu (14.2.0-17ubuntu3) ... 159s Selecting previously unselected package g++-14. 159s Preparing to unpack .../026-g++-14_14.2.0-17ubuntu3_ppc64el.deb ... 159s Unpacking g++-14 (14.2.0-17ubuntu3) ... 159s Selecting previously unselected package g++-powerpc64le-linux-gnu. 159s Preparing to unpack .../027-g++-powerpc64le-linux-gnu_4%3a14.2.0-1ubuntu1_ppc64el.deb ... 159s Unpacking g++-powerpc64le-linux-gnu (4:14.2.0-1ubuntu1) ... 159s Selecting previously unselected package g++. 159s Preparing to unpack .../028-g++_4%3a14.2.0-1ubuntu1_ppc64el.deb ... 159s Unpacking g++ (4:14.2.0-1ubuntu1) ... 159s Selecting previously unselected package build-essential. 159s Preparing to unpack .../029-build-essential_12.10ubuntu1_ppc64el.deb ... 159s Unpacking build-essential (12.10ubuntu1) ... 159s Selecting previously unselected package libdebhelper-perl. 159s Preparing to unpack .../030-libdebhelper-perl_13.24.1ubuntu2_all.deb ... 159s Unpacking libdebhelper-perl (13.24.1ubuntu2) ... 159s Selecting previously unselected package libtool. 159s Preparing to unpack .../031-libtool_2.5.4-4_all.deb ... 159s Unpacking libtool (2.5.4-4) ... 159s Selecting previously unselected package dh-autoreconf. 159s Preparing to unpack .../032-dh-autoreconf_20_all.deb ... 159s Unpacking dh-autoreconf (20) ... 159s Selecting previously unselected package libarchive-zip-perl. 159s Preparing to unpack .../033-libarchive-zip-perl_1.68-1_all.deb ... 159s Unpacking libarchive-zip-perl (1.68-1) ... 159s Selecting previously unselected package libfile-stripnondeterminism-perl. 159s Preparing to unpack .../034-libfile-stripnondeterminism-perl_1.14.1-2_all.deb ... 159s Unpacking libfile-stripnondeterminism-perl (1.14.1-2) ... 159s Selecting previously unselected package dh-strip-nondeterminism. 159s Preparing to unpack .../035-dh-strip-nondeterminism_1.14.1-2_all.deb ... 159s Unpacking dh-strip-nondeterminism (1.14.1-2) ... 159s Selecting previously unselected package debugedit. 159s Preparing to unpack .../036-debugedit_1%3a5.1-2_ppc64el.deb ... 159s Unpacking debugedit (1:5.1-2) ... 159s Selecting previously unselected package dwz. 159s Preparing to unpack .../037-dwz_0.15-1build6_ppc64el.deb ... 159s Unpacking dwz (0.15-1build6) ... 159s Selecting previously unselected package gettext. 159s Preparing to unpack .../038-gettext_0.23.1-1_ppc64el.deb ... 159s Unpacking gettext (0.23.1-1) ... 159s Selecting previously unselected package intltool-debian. 159s Preparing to unpack .../039-intltool-debian_0.35.0+20060710.6_all.deb ... 159s Unpacking intltool-debian (0.35.0+20060710.6) ... 159s Selecting previously unselected package po-debconf. 159s Preparing to unpack .../040-po-debconf_1.0.21+nmu1_all.deb ... 159s Unpacking po-debconf (1.0.21+nmu1) ... 159s Selecting previously unselected package debhelper. 159s Preparing to unpack .../041-debhelper_13.24.1ubuntu2_all.deb ... 159s Unpacking debhelper (13.24.1ubuntu2) ... 159s Selecting previously unselected package libapt-pkg-perl. 159s Preparing to unpack .../042-libapt-pkg-perl_0.1.41build1_ppc64el.deb ... 159s Unpacking libapt-pkg-perl (0.1.41build1) ... 159s Selecting previously unselected package libtie-ixhash-perl. 159s Preparing to unpack .../043-libtie-ixhash-perl_1.23-4_all.deb ... 159s Unpacking libtie-ixhash-perl (1.23-4) ... 159s Selecting previously unselected package libarray-unique-perl. 159s Preparing to unpack .../044-libarray-unique-perl_0.09-1_all.deb ... 159s Unpacking libarray-unique-perl (0.09-1) ... 159s Selecting previously unselected package libsub-name-perl:ppc64el. 159s Preparing to unpack .../045-libsub-name-perl_0.28-1_ppc64el.deb ... 159s Unpacking libsub-name-perl:ppc64el (0.28-1) ... 159s Selecting previously unselected package libclass-accessor-perl. 159s Preparing to unpack .../046-libclass-accessor-perl_0.51-2_all.deb ... 159s Unpacking libclass-accessor-perl (0.51-2) ... 159s Selecting previously unselected package libexporter-tiny-perl. 159s Preparing to unpack .../047-libexporter-tiny-perl_1.006002-1_all.deb ... 159s Unpacking libexporter-tiny-perl (1.006002-1) ... 159s Selecting previously unselected package liblist-moreutils-xs-perl. 159s Preparing to unpack .../048-liblist-moreutils-xs-perl_0.430-4build1_ppc64el.deb ... 159s Unpacking liblist-moreutils-xs-perl (0.430-4build1) ... 159s Selecting previously unselected package liblist-moreutils-perl. 159s Preparing to unpack .../049-liblist-moreutils-perl_0.430-2_all.deb ... 159s Unpacking liblist-moreutils-perl (0.430-2) ... 159s Selecting previously unselected package libio-stringy-perl. 159s Preparing to unpack .../050-libio-stringy-perl_2.113-2_all.deb ... 159s Unpacking libio-stringy-perl (2.113-2) ... 159s Selecting previously unselected package libencode-locale-perl. 159s Preparing to unpack .../051-libencode-locale-perl_1.05-3_all.deb ... 159s Unpacking libencode-locale-perl (1.05-3) ... 160s Selecting previously unselected package libtimedate-perl. 160s Preparing to unpack .../052-libtimedate-perl_2.3300-2_all.deb ... 160s Unpacking libtimedate-perl (2.3300-2) ... 160s Selecting previously unselected package libhttp-date-perl. 160s Preparing to unpack .../053-libhttp-date-perl_6.06-1_all.deb ... 160s Unpacking libhttp-date-perl (6.06-1) ... 160s Selecting previously unselected package libfile-listing-perl. 160s Preparing to unpack .../054-libfile-listing-perl_6.16-1_all.deb ... 160s Unpacking libfile-listing-perl (6.16-1) ... 160s Selecting previously unselected package libhtml-tagset-perl. 160s Preparing to unpack .../055-libhtml-tagset-perl_3.24-1_all.deb ... 160s Unpacking libhtml-tagset-perl (3.24-1) ... 160s Selecting previously unselected package liburi-perl. 160s Preparing to unpack .../056-liburi-perl_5.30-1_all.deb ... 160s Unpacking liburi-perl (5.30-1) ... 160s Selecting previously unselected package libhtml-parser-perl:ppc64el. 160s Preparing to unpack .../057-libhtml-parser-perl_3.83-1build1_ppc64el.deb ... 160s Unpacking libhtml-parser-perl:ppc64el (3.83-1build1) ... 160s Selecting previously unselected package libhtml-tree-perl. 160s Preparing to unpack .../058-libhtml-tree-perl_5.07-3_all.deb ... 160s Unpacking libhtml-tree-perl (5.07-3) ... 160s Selecting previously unselected package libclone-perl:ppc64el. 160s Preparing to unpack .../059-libclone-perl_0.47-1_ppc64el.deb ... 160s Unpacking libclone-perl:ppc64el (0.47-1) ... 160s Selecting previously unselected package libio-html-perl. 160s Preparing to unpack .../060-libio-html-perl_1.004-3_all.deb ... 160s Unpacking libio-html-perl (1.004-3) ... 160s Selecting previously unselected package liblwp-mediatypes-perl. 160s Preparing to unpack .../061-liblwp-mediatypes-perl_6.04-2_all.deb ... 160s Unpacking liblwp-mediatypes-perl (6.04-2) ... 160s Selecting previously unselected package libhttp-message-perl. 160s Preparing to unpack .../062-libhttp-message-perl_7.00-2ubuntu1_all.deb ... 160s Unpacking libhttp-message-perl (7.00-2ubuntu1) ... 160s Selecting previously unselected package libhttp-cookies-perl. 160s Preparing to unpack .../063-libhttp-cookies-perl_6.11-1_all.deb ... 160s Unpacking libhttp-cookies-perl (6.11-1) ... 160s Selecting previously unselected package libhttp-negotiate-perl. 160s Preparing to unpack .../064-libhttp-negotiate-perl_6.01-2_all.deb ... 160s Unpacking libhttp-negotiate-perl (6.01-2) ... 160s Selecting previously unselected package perl-openssl-defaults:ppc64el. 160s Preparing to unpack .../065-perl-openssl-defaults_7build3_ppc64el.deb ... 160s Unpacking perl-openssl-defaults:ppc64el (7build3) ... 160s Selecting previously unselected package libnet-ssleay-perl:ppc64el. 160s Preparing to unpack .../066-libnet-ssleay-perl_1.94-3_ppc64el.deb ... 160s Unpacking libnet-ssleay-perl:ppc64el (1.94-3) ... 160s Selecting previously unselected package libio-socket-ssl-perl. 160s Preparing to unpack .../067-libio-socket-ssl-perl_2.089-1_all.deb ... 160s Unpacking libio-socket-ssl-perl (2.089-1) ... 160s Selecting previously unselected package libnet-http-perl. 160s Preparing to unpack .../068-libnet-http-perl_6.23-1_all.deb ... 160s Unpacking libnet-http-perl (6.23-1) ... 160s Selecting previously unselected package liblwp-protocol-https-perl. 160s Preparing to unpack .../069-liblwp-protocol-https-perl_6.14-1_all.deb ... 160s Unpacking liblwp-protocol-https-perl (6.14-1) ... 160s Selecting previously unselected package libtry-tiny-perl. 160s Preparing to unpack .../070-libtry-tiny-perl_0.32-1_all.deb ... 160s Unpacking libtry-tiny-perl (0.32-1) ... 160s Selecting previously unselected package libwww-robotrules-perl. 160s Preparing to unpack .../071-libwww-robotrules-perl_6.02-1_all.deb ... 160s Unpacking libwww-robotrules-perl (6.02-1) ... 160s Selecting previously unselected package libwww-perl. 160s Preparing to unpack .../072-libwww-perl_6.78-1_all.deb ... 160s Unpacking libwww-perl (6.78-1) ... 160s Selecting previously unselected package liberror-perl. 160s Preparing to unpack .../073-liberror-perl_0.17030-1_all.deb ... 160s Unpacking liberror-perl (0.17030-1) ... 160s Selecting previously unselected package libexporter-lite-perl. 160s Preparing to unpack .../074-libexporter-lite-perl_0.09-2_all.deb ... 160s Unpacking libexporter-lite-perl (0.09-2) ... 160s Selecting previously unselected package libparse-debcontrol-perl. 160s Preparing to unpack .../075-libparse-debcontrol-perl_2.005-6_all.deb ... 160s Unpacking libparse-debcontrol-perl (2.005-6) ... 160s Selecting previously unselected package libsub-install-perl. 160s Preparing to unpack .../076-libsub-install-perl_0.929-1_all.deb ... 160s Unpacking libsub-install-perl (0.929-1) ... 160s Selecting previously unselected package libcgi-pm-perl. 160s Preparing to unpack .../077-libcgi-pm-perl_4.67-1_all.deb ... 160s Unpacking libcgi-pm-perl (4.67-1) ... 160s Selecting previously unselected package libhtml-form-perl. 160s Preparing to unpack .../078-libhtml-form-perl_6.12-1_all.deb ... 160s Unpacking libhtml-form-perl (6.12-1) ... 160s Selecting previously unselected package libwww-mechanize-perl. 160s Preparing to unpack .../079-libwww-mechanize-perl_2.19-1ubuntu1_all.deb ... 160s Unpacking libwww-mechanize-perl (2.19-1ubuntu1) ... 160s Selecting previously unselected package libdebian-source-perl. 160s Preparing to unpack .../080-libdebian-source-perl_0.128_all.deb ... 160s Unpacking libdebian-source-perl (0.128) ... 160s Selecting previously unselected package emacs-el. 160s Preparing to unpack .../081-emacs-el_1%3a30.1+1-4ubuntu1_all.deb ... 160s Unpacking emacs-el (1:30.1+1-4ubuntu1) ... 160s Selecting previously unselected package emacsen-common. 160s Preparing to unpack .../082-emacsen-common_3.0.5_all.deb ... 160s Unpacking emacsen-common (3.0.5) ... 160s Selecting previously unselected package emacs-common. 160s Preparing to unpack .../083-emacs-common_1%3a30.1+1-4ubuntu1_all.deb ... 160s Unpacking emacs-common (1:30.1+1-4ubuntu1) ... 161s Selecting previously unselected package emacs-bin-common. 161s Preparing to unpack .../084-emacs-bin-common_1%3a30.1+1-4ubuntu1_ppc64el.deb ... 161s Unpacking emacs-bin-common (1:30.1+1-4ubuntu1) ... 161s Selecting previously unselected package libasound2-data. 161s Preparing to unpack .../085-libasound2-data_1.2.13-1build1_all.deb ... 161s Unpacking libasound2-data (1.2.13-1build1) ... 161s Selecting previously unselected package libasound2t64:ppc64el. 161s Preparing to unpack .../086-libasound2t64_1.2.13-1build1_ppc64el.deb ... 161s Unpacking libasound2t64:ppc64el (1.2.13-1build1) ... 161s Selecting previously unselected package libgccjit0:ppc64el. 161s Preparing to unpack .../087-libgccjit0_14.2.0-17ubuntu3_ppc64el.deb ... 161s Unpacking libgccjit0:ppc64el (14.2.0-17ubuntu3) ... 161s Selecting previously unselected package liblcms2-2:ppc64el. 161s Preparing to unpack .../088-liblcms2-2_2.16-2_ppc64el.deb ... 161s Unpacking liblcms2-2:ppc64el (2.16-2) ... 161s Selecting previously unselected package libtree-sitter0:ppc64el. 161s Preparing to unpack .../089-libtree-sitter0_0.20.8-2_ppc64el.deb ... 161s Unpacking libtree-sitter0:ppc64el (0.20.8-2) ... 161s Selecting previously unselected package emacs-nox. 161s Preparing to unpack .../090-emacs-nox_1%3a30.1+1-4ubuntu1_ppc64el.deb ... 161s Unpacking emacs-nox (1:30.1+1-4ubuntu1) ... 161s Selecting previously unselected package libarray-utils-perl. 161s Preparing to unpack .../091-libarray-utils-perl_0.5-3_all.deb ... 161s Unpacking libarray-utils-perl (0.5-3) ... 161s Selecting previously unselected package libconfig-tiny-perl. 161s Preparing to unpack .../092-libconfig-tiny-perl_2.30-1_all.deb ... 161s Unpacking libconfig-tiny-perl (2.30-1) ... 161s Selecting previously unselected package libnumber-compare-perl. 161s Preparing to unpack .../093-libnumber-compare-perl_0.03-3_all.deb ... 161s Unpacking libnumber-compare-perl (0.03-3) ... 161s Selecting previously unselected package libtext-glob-perl. 161s Preparing to unpack .../094-libtext-glob-perl_0.11-3_all.deb ... 161s Unpacking libtext-glob-perl (0.11-3) ... 162s Selecting previously unselected package libfile-find-rule-perl. 162s Preparing to unpack .../095-libfile-find-rule-perl_0.34-3_all.deb ... 162s Unpacking libfile-find-rule-perl (0.34-3) ... 162s Selecting previously unselected package dh-elpa. 162s Preparing to unpack .../096-dh-elpa_2.1.9ubuntu1_all.deb ... 162s Unpacking dh-elpa (2.1.9ubuntu1) ... 162s Selecting previously unselected package dh-elpa-helper. 162s Preparing to unpack .../097-dh-elpa-helper_2.1.9ubuntu1_all.deb ... 162s Unpacking dh-elpa-helper (2.1.9ubuntu1) ... 162s Selecting previously unselected package elpa-faceup. 162s Preparing to unpack .../098-elpa-faceup_0.0.4-7_all.deb ... 162s Unpacking elpa-faceup (0.0.4-7) ... 162s Selecting previously unselected package elpa-paredit. 162s Preparing to unpack .../099-elpa-paredit_27~git20241103.1.af07577-1_all.deb ... 162s Unpacking elpa-paredit (27~git20241103.1.af07577-1) ... 162s Selecting previously unselected package elpa-pos-tip. 162s Preparing to unpack .../100-elpa-pos-tip_0.4.6+git20191227-3_all.deb ... 162s Unpacking elpa-pos-tip (0.4.6+git20191227-3) ... 162s Selecting previously unselected package elpa-racket-mode. 162s Preparing to unpack .../101-elpa-racket-mode_20250205~git.d9e66c7-1_all.deb ... 162s Unpacking elpa-racket-mode (20250205~git.d9e66c7-1) ... 162s Selecting previously unselected package git-man. 162s Preparing to unpack .../102-git-man_1%3a2.48.1-0ubuntu1_all.deb ... 162s Unpacking git-man (1:2.48.1-0ubuntu1) ... 162s Selecting previously unselected package git. 162s Preparing to unpack .../103-git_1%3a2.48.1-0ubuntu1_ppc64el.deb ... 162s Unpacking git (1:2.48.1-0ubuntu1) ... 162s Selecting previously unselected package racket-common. 162s Preparing to unpack .../104-racket-common_8.12+dfsg1-7ubuntu1_all.deb ... 162s Unpacking racket-common (8.12+dfsg1-7ubuntu1) ... 163s Selecting previously unselected package racket. 163s Preparing to unpack .../105-racket_8.12+dfsg1-7ubuntu1_ppc64el.deb ... 163s Unpacking racket (8.12+dfsg1-7ubuntu1) ... 167s Setting up libapt-pkg-perl (0.1.41build1) ... 167s Setting up libarray-utils-perl (0.5-3) ... 167s Setting up liblcms2-2:ppc64el (2.16-2) ... 167s Setting up libtie-ixhash-perl (1.23-4) ... 167s Setting up libtext-glob-perl (0.11-3) ... 167s Setting up libclone-perl:ppc64el (0.47-1) ... 167s Setting up libarchive-zip-perl (1.68-1) ... 167s Setting up libio-stringy-perl (2.113-2) ... 167s Setting up libhtml-tagset-perl (3.24-1) ... 167s Setting up libdebhelper-perl (13.24.1ubuntu2) ... 167s Setting up liblwp-mediatypes-perl (6.04-2) ... 167s Setting up libtry-tiny-perl (0.32-1) ... 167s Setting up perl-openssl-defaults:ppc64el (7build3) ... 167s Setting up m4 (1.4.19-7) ... 167s Setting up libencode-locale-perl (1.05-3) ... 167s Setting up libgomp1:ppc64el (15-20250222-0ubuntu1) ... 167s Setting up libconfig-tiny-perl (2.30-1) ... 167s Setting up libsub-install-perl (0.929-1) ... 167s Setting up libnumber-compare-perl (0.03-3) ... 167s Setting up liberror-perl (0.17030-1) ... 167s Setting up libasound2-data (1.2.13-1build1) ... 167s Setting up autotools-dev (20220109.1) ... 167s Setting up libasound2t64:ppc64el (1.2.13-1build1) ... 167s Setting up libtree-sitter0:ppc64el (0.20.8-2) ... 167s Setting up emacsen-common (3.0.5) ... 167s Setting up libfile-find-rule-perl (0.34-3) ... 167s Setting up dh-elpa-helper (2.1.9ubuntu1) ... 167s Setting up libquadmath0:ppc64el (15-20250222-0ubuntu1) ... 167s Setting up libarray-unique-perl (0.09-1) ... 167s Setting up libmpc3:ppc64el (1.3.1-1build2) ... 167s Setting up libio-html-perl (1.004-3) ... 167s Setting up autopoint (0.23.1-1) ... 167s Setting up liblist-moreutils-xs-perl (0.430-4build1) ... 167s Setting up autoconf (2.72-3ubuntu1) ... 167s Setting up libtimedate-perl (2.3300-2) ... 167s Setting up libexporter-lite-perl (0.09-2) ... 167s Setting up libubsan1:ppc64el (15-20250222-0ubuntu1) ... 167s Setting up libsub-name-perl:ppc64el (0.28-1) ... 167s Setting up dwz (0.15-1build6) ... 167s Setting up libasan8:ppc64el (15-20250222-0ubuntu1) ... 167s Setting up debugedit (1:5.1-2) ... 167s Setting up git-man (1:2.48.1-0ubuntu1) ... 167s Setting up libtsan2:ppc64el (15-20250222-0ubuntu1) ... 167s Setting up libexporter-tiny-perl (1.006002-1) ... 167s Setting up libclass-accessor-perl (0.51-2) ... 167s Setting up libisl23:ppc64el (0.27-1) ... 167s Setting up racket-common (8.12+dfsg1-7ubuntu1) ... 167s Setting up libcc1-0:ppc64el (15-20250222-0ubuntu1) ... 167s Setting up liburi-perl (5.30-1) ... 167s Setting up liblsan0:ppc64el (15-20250222-0ubuntu1) ... 167s Setting up libitm1:ppc64el (15-20250222-0ubuntu1) ... 167s Setting up elpa-faceup (0.0.4-7) ... 167s Setting up libnet-ssleay-perl:ppc64el (1.94-3) ... 167s Setting up automake (1:1.17-3ubuntu1) ... 167s update-alternatives: using /usr/bin/automake-1.17 to provide /usr/bin/automake (automake) in auto mode 167s Setting up libfile-stripnondeterminism-perl (1.14.1-2) ... 167s Setting up libhttp-date-perl (6.06-1) ... 167s Setting up elpa-paredit (27~git20241103.1.af07577-1) ... 167s Setting up gettext (0.23.1-1) ... 167s Setting up libfile-listing-perl (6.16-1) ... 167s Setting up elpa-racket-mode (20250205~git.d9e66c7-1) ... 167s Setting up liblist-moreutils-perl (0.430-2) ... 167s Setting up libnet-http-perl (6.23-1) ... 167s Setting up elpa-pos-tip (0.4.6+git20191227-3) ... 167s Setting up intltool-debian (0.35.0+20060710.6) ... 167s Setting up racket (8.12+dfsg1-7ubuntu1) ... 167s Setting up git (1:2.48.1-0ubuntu1) ... 167s Setting up cpp-14-powerpc64le-linux-gnu (14.2.0-17ubuntu3) ... 167s Setting up cpp-14 (14.2.0-17ubuntu3) ... 167s Setting up dh-strip-nondeterminism (1.14.1-2) ... 167s Setting up libwww-robotrules-perl (6.02-1) ... 167s Setting up libhtml-parser-perl:ppc64el (3.83-1build1) ... 167s Setting up libgcc-14-dev:ppc64el (14.2.0-17ubuntu3) ... 167s Setting up libgccjit0:ppc64el (14.2.0-17ubuntu3) ... 167s Setting up libstdc++-14-dev:ppc64el (14.2.0-17ubuntu3) ... 167s Setting up libio-socket-ssl-perl (2.089-1) ... 167s Setting up cpp-powerpc64le-linux-gnu (4:14.2.0-1ubuntu1) ... 167s Setting up gcc-14-powerpc64le-linux-gnu (14.2.0-17ubuntu3) ... 167s Setting up libhttp-message-perl (7.00-2ubuntu1) ... 167s Setting up libhtml-form-perl (6.12-1) ... 167s Setting up libhttp-negotiate-perl (6.01-2) ... 167s Setting up g++-14-powerpc64le-linux-gnu (14.2.0-17ubuntu3) ... 167s Setting up libhttp-cookies-perl (6.11-1) ... 167s Setting up po-debconf (1.0.21+nmu1) ... 167s Setting up libhtml-tree-perl (5.07-3) ... 167s Setting up libcgi-pm-perl (4.67-1) ... 167s Setting up gcc-14 (14.2.0-17ubuntu3) ... 167s Setting up gcc-powerpc64le-linux-gnu (4:14.2.0-1ubuntu1) ... 167s Setting up cpp (4:14.2.0-1ubuntu1) ... 167s Setting up g++-14 (14.2.0-17ubuntu3) ... 167s Setting up g++-powerpc64le-linux-gnu (4:14.2.0-1ubuntu1) ... 167s Setting up libtool (2.5.4-4) ... 167s Setting up gcc (4:14.2.0-1ubuntu1) ... 167s Setting up dh-autoreconf (20) ... 167s Setting up g++ (4:14.2.0-1ubuntu1) ... 167s update-alternatives: using /usr/bin/g++ to provide /usr/bin/c++ (c++) in auto mode 167s Setting up build-essential (12.10ubuntu1) ... 167s Setting up debhelper (13.24.1ubuntu2) ... 167s Setting up emacs-el (1:30.1+1-4ubuntu1) ... 167s Setting up emacs-common (1:30.1+1-4ubuntu1) ... 167s Setting up liblwp-protocol-https-perl (6.14-1) ... 167s Setting up libwww-perl (6.78-1) ... 167s Setting up libparse-debcontrol-perl (2.005-6) ... 167s Setting up libwww-mechanize-perl (2.19-1ubuntu1) ... 167s Setting up libdebian-source-perl (0.128) ... 167s Setting up emacs-bin-common (1:30.1+1-4ubuntu1) ... 167s update-alternatives: using /usr/bin/ctags.emacs to provide /usr/bin/ctags (ctags) in auto mode 167s update-alternatives: using /usr/bin/ebrowse.emacs to provide /usr/bin/ebrowse (ebrowse) in auto mode 167s update-alternatives: using /usr/bin/etags.emacs to provide /usr/bin/etags (etags) in auto mode 167s Setting up emacs-nox (1:30.1+1-4ubuntu1) ... 167s update-alternatives: using /usr/bin/emacs-nox to provide /usr/bin/emacs (emacs) in auto mode 167s update-alternatives: using /usr/bin/emacsclient.emacs to provide /usr/bin/emacsclient (emacsclient) in auto mode 167s Install emacsen-common for emacs 167s emacsen-common: Handling install of emacsen flavor emacs 167s 167s In toplevel form: 167s usr/share/emacs/site-lisp/debian-startup.el:1:1: Warning: file has no ‘lexical-binding’ directive on its first line 167s Install elpa-racket-mode for emacs 167s install/racket-mode-1: Handling install of emacsen flavor emacs 167s install/racket-mode-1: byte-compiling for emacs 168s Install elpa-pos-tip for emacs 168s install/pos-tip-0.4.6snapshot20191227: Handling install of emacsen flavor emacs 168s install/pos-tip-0.4.6snapshot20191227: byte-compiling for emacs 168s Install elpa-faceup for emacs 168s install/faceup-0.0.4: Handling install of emacsen flavor emacs 168s install/faceup-0.0.4: byte-compiling for emacs 169s Install elpa-paredit for emacs 169s install/paredit-27beta: Handling install of emacsen flavor emacs 169s install/paredit-27beta: byte-compiling for emacs 169s Setting up dh-elpa (2.1.9ubuntu1) ... 169s Processing triggers for libc-bin (2.41-1ubuntu1) ... 169s Processing triggers for man-db (2.13.0-1) ... 170s Processing triggers for install-info (7.1.1-1) ... 172s autopkgtest [17:19:51]: test dh-elpa-test-autopkgtest: dh_elpa_test --autopkgtest 172s autopkgtest [17:19:51]: test dh-elpa-test-autopkgtest: [----------------------- 172s emacs -batch -Q -l package --eval "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa\")" --eval "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" --eval "(setq ert-batch-backtrace-right-margin nil)" -f package-initialize -L . -L test --eval "(progn (setenv \"DEBIAN_BUILDD\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" -l test/racket-tests.el -l debian/ert-helper.el 173s Note, built-in variable ‘image-scaling-factor’ not bound 173s Running 14 tests (2025-03-14 17:19:52+0000, selector ‘(not (or "racket-tests/repl"))’) 173s racket-test/unique-repls 173s passed 1/14 racket-test/unique-repls (0.007502 sec) 176s passed 2/14 racket-tests/cmd-read (2.999537 sec) 176s racket-tests/debugger 1076s 1076s {racket-back-end-/} killed 1076s Test racket-tests/debugger backtrace: 1076s signal(ert-test-failed (((should racket-debug-mode) :form racket-debug-mode :value nil))) 1076s ert-fail(((should racket-debug-mode) :form racket-debug-mode :value nil)) 1076s (if (unwind-protect (setq value-183 racket-debug-mode) (setq form-description-184 (list '(should racket-debug-mode) :form 'racket-debug-mode :value value-183)) (ert--signal-should-execution form-description-184)) nil (ert-fail form-description-184)) 1076s (let (form-description-184) (if (unwind-protect (setq value-183 racket-debug-mode) (setq form-description-184 (list '(should racket-debug-mode) :form 'racket-debug-mode :value value-183)) (ert--signal-should-execution form-description-184)) nil (ert-fail form-description-184))) 1076s (let ((value-183 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-184) (if (unwind-protect (setq value-183 racket-debug-mode) (setq form-description-184 (list '(should racket-debug-mode) :form 'racket-debug-mode :value value-183)) (ert--signal-should-execution form-description-184)) nil (ert-fail form-description-184))) value-183) 1076s (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-183 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-184) (if (unwind-protect (setq value-183 racket-debug-mode) (setq form-description-184 (list '... :form 'racket-debug-mode :value value-183)) (ert--signal-should-execution form-description-184)) nil (ert-fail form-description-184))) value-183)) 1076s (if (eq major-mode 'prog-mode) nil (racket-run '(16)) (progn (racket-tests/call-until-true #'(lambda nil (get-buffer racket-repl-buffer-name))) (let* ((fn-173 #'get-buffer) (args-174 (condition-case err (list racket-repl-buffer-name) (error ...)))) (let ((value-175 'ert-form-evaluation-aborted-176)) (let (form-description-177) (if (unwind-protect ... ... ...) nil (ert-fail form-description-177))) value-175))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-178 #'racket--repl-session-id) (args-179 (condition-case err (list) (error ...)))) (let ((value-180 'ert-form-evaluation-aborted-181)) (let (form-description-182) (if (unwind-protect ... ... ...) nil (ert-fail form-description-182))) value-180))) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-183 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-184) (if (unwind-protect (setq value-183 racket-debug-mode) (setq form-description-184 ...) (ert--signal-should-execution form-description-184)) nil (ert-fail form-description-184))) value-183)) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-185 ...) (args-186 ...)) (let (...) (let ... ...) value-187)))) (let* ((fn-190 #'racket-tests/see-char-property) (args-191 (condition-case err (list (point) 'face racket-debug-break-face) (error (progn ... ...))))) (let ((value-192 'ert-form-evaluation-aborted-193)) (let (form-description-194) (if (unwind-protect (setq value-192 ...) (setq form-description-194 ...) (ert--signal-should-execution form-description-194)) nil (ert-fail form-description-194))) value-192)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-195 ...) (args-196 ...)) (let (...) (let ... ...) value-197)))) (let* ((fn-200 #'racket-tests/see-char-property) (args-201 (condition-case err (list (point) 'face racket-debug-break-face) (error (progn ... ...))))) (let ((value-202 'ert-form-evaluation-aborted-203)) (let (form-description-204) (if (unwind-protect (setq value-202 ...) (setq form-description-204 ...) (ert--signal-should-execution form-description-204)) nil (ert-fail form-description-204))) value-202)) (let* ((fn-205 #'racket-tests/see-char-property) (args-206 (condition-case err (list (- ... 3) 'after-string (propertize "41" ... racket-debug-locals-face)) (error (progn ... ...))))) (let ((value-207 'ert-form-evaluation-aborted-208)) (let (form-description-209) (if (unwind-protect (setq value-207 ...) (setq form-description-209 ...) (ert--signal-should-execution form-description-209)) nil (ert-fail form-description-209))) value-207)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-210 ...) (args-211 ...)) (let (...) (let ... ...) value-212)))) (let* ((fn-215 #'racket-tests/see-char-property) (args-216 (condition-case err (list (point) 'after-string (propertize "⇒ (values 42)" ... racket-debug-result-face)) (error (progn ... ...))))) (let ((value-217 'ert-form-evaluation-aborted-218)) (let (form-description-219) (if (unwind-protect (setq value-217 ...) (setq form-description-219 ...) (ert--signal-should-execution form-description-219)) nil (ert-fail form-description-219))) value-217)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-220 ...) (args-221 ...)) (let (...) (let ... ...) value-222)))) (let* ((fn-225 #'racket-tests/see-char-property) (args-226 (condition-case err (list (point) 'after-string nil) (error (progn ... ...))))) (let ((value-227 'ert-form-evaluation-aborted-228)) (let (form-description-229) (if (unwind-protect (setq value-227 ...) (setq form-description-229 ...) (ert--signal-should-execution form-description-229)) nil (ert-fail form-description-229))) value-227)) (let ((value-230 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-231) (if (not (unwind-protect (setq value-230 racket-debug-mode) (setq form-description-231 ...) (ert--signal-should-execution form-description-231))) nil (ert-fail form-description-231))) value-230) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ((fn-232 ...) (args-233 ...)) (let (...) (let ... ...) value-234)) (kill-buffer)))) 1076s (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define (f x) (+ 1 x))\n(f 41)\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'(lambda nil (cond ((memql major-mode ...) (not buffer-read-only)) ((memql major-mode ...) t)))) (let ((value-171 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-172) (if (unwind-protect (setq value-171 (cond ... ...)) (setq form-description-172 (list ... :form ... :value value-171)) (ert--signal-should-execution form-description-172)) nil (ert-fail form-description-172))) value-171)) (if (eq major-mode 'prog-mode) nil (racket-run '(16)) (progn (racket-tests/call-until-true #'(lambda nil (get-buffer racket-repl-buffer-name))) (let* ((fn-173 #'get-buffer) (args-174 (condition-case err (list racket-repl-buffer-name) (error ...)))) (let ((value-175 'ert-form-evaluation-aborted-176)) (let (form-description-177) (if (unwind-protect ... ... ...) nil (ert-fail form-description-177))) value-175))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-178 #'racket--repl-session-id) (args-179 (condition-case err (list) (error ...)))) (let ((value-180 'ert-form-evaluation-aborted-181)) (let (form-description-182) (if (unwind-protect ... ... ...) nil (ert-fail form-description-182))) value-180))) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-183 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-184) (if (unwind-protect (setq value-183 racket-debug-mode) (setq form-description-184 ...) (ert--signal-should-execution form-description-184)) nil (ert-fail form-description-184))) value-183)) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-185 ...) (args-186 ...)) (let (...) (let ... ...) value-187)))) (let* ((fn-190 #'racket-tests/see-char-property) (args-191 (condition-case err (list (point) 'face racket-debug-break-face) (error (progn ... ...))))) (let ((value-192 'ert-form-evaluation-aborted-193)) (let (form-description-194) (if (unwind-protect (setq value-192 ...) (setq form-description-194 ...) (ert--signal-should-execution form-description-194)) nil (ert-fail form-description-194))) value-192)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-195 ...) (args-196 ...)) (let (...) (let ... ...) value-197)))) (let* ((fn-200 #'racket-tests/see-char-property) (args-201 (condition-case err (list (point) 'face racket-debug-break-face) (error (progn ... ...))))) (let ((value-202 'ert-form-evaluation-aborted-203)) (let (form-description-204) (if (unwind-protect (setq value-202 ...) (setq form-description-204 ...) (ert--signal-should-execution form-description-204)) nil (ert-fail form-description-204))) value-202)) (let* ((fn-205 #'racket-tests/see-char-property) (args-206 (condition-case err (list (- ... 3) 'after-string (propertize "41" ... racket-debug-locals-face)) (error (progn ... ...))))) (let ((value-207 'ert-form-evaluation-aborted-208)) (let (form-description-209) (if (unwind-protect (setq value-207 ...) (setq form-description-209 ...) (ert--signal-should-execution form-description-209)) nil (ert-fail form-description-209))) value-207)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-210 ...) (args-211 ...)) (let (...) (let ... ...) value-212)))) (let* ((fn-215 #'racket-tests/see-char-property) (args-216 (condition-case err (list (point) 'after-string (propertize "⇒ (values 42)" ... racket-debug-result-face)) (error (progn ... ...))))) (let ((value-217 'ert-form-evaluation-aborted-218)) (let (form-description-219) (if (unwind-protect (setq value-217 ...) (setq form-description-219 ...) (ert--signal-should-execution form-description-219)) nil (ert-fail form-description-219))) value-217)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-220 ...) (args-221 ...)) (let (...) (let ... ...) value-222)))) (let* ((fn-225 #'racket-tests/see-char-property) (args-226 (condition-case err (list (point) 'after-string nil) (error (progn ... ...))))) (let ((value-227 'ert-form-evaluation-aborted-228)) (let (form-description-229) (if (unwind-protect (setq value-227 ...) (setq form-description-229 ...) (ert--signal-should-execution form-description-229)) nil (ert-fail form-description-229))) value-227)) (let ((value-230 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-231) (if (not (unwind-protect (setq value-230 racket-debug-mode) (setq form-description-231 ...) (ert--signal-should-execution form-description-231))) nil (ert-fail form-description-231))) value-230) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ((fn-232 ...) (args-233 ...)) (let (...) (let ... ...) value-234)) (kill-buffer)))) (kill-buffer) (delete-file path)) 1076s #f(lambda () [(edit-mode racket-mode)] (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define (f x) (+ 1 x))\n(f 41)\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'...) (let (...) (let ... ...) value-171)) (if (eq major-mode 'prog-mode) nil (racket-run '...) (progn (racket-tests/call-until-true ...) (let* ... ...)) (progn (racket-tests/call-until-true ...) (let* ... ...)) (progn (racket-tests/call-until-true ...) (let ... ... value-183)) (racket--call-with-repl-buffer #'...) (let* (... ...) (let ... ... value-192)) (racket-debug-step) ...) (kill-buffer) (delete-file path)))() 1076s funcall(#f(lambda () [(edit-mode racket-mode)] (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define (f x) (+ 1 x))\n(f 41)\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'(lambda nil (cond ... ...))) (let ((value-171 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-172) (if (unwind-protect ... ... ...) nil (ert-fail form-description-172))) value-171)) (if (eq major-mode 'prog-mode) nil (racket-run '(16)) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-173 ...) (args-174 ...)) (let (...) (let ... ...) value-175))) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-178 ...) (args-179 ...)) (let (...) (let ... ...) value-180))) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-183 ...)) (let (form-description-184) (if ... nil ...)) value-183)) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-190 #'racket-tests/see-char-property) (args-191 (condition-case err ... ...))) (let ((value-192 ...)) (let (form-description-194) (if ... nil ...)) value-192)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-200 #'racket-tests/see-char-property) (args-201 (condition-case err ... ...))) (let ((value-202 ...)) (let (form-description-204) (if ... nil ...)) value-202)) (let* ((fn-205 #'racket-tests/see-char-property) (args-206 (condition-case err ... ...))) (let ((value-207 ...)) (let (form-description-209) (if ... nil ...)) value-207)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-215 #'racket-tests/see-char-property) (args-216 (condition-case err ... ...))) (let ((value-217 ...)) (let (form-description-219) (if ... nil ...)) value-217)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-225 #'racket-tests/see-char-property) (args-226 (condition-case err ... ...))) (let ((value-227 ...)) (let (form-description-229) (if ... nil ...)) value-227)) (let ((value-230 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-231) (if (not ...) nil (ert-fail form-description-231))) value-230) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ... ...) (kill-buffer)))) (kill-buffer) (delete-file path)))) 1076s (unwind-protect (funcall thunk) (racket-stop-back-end)) 1076s (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) 1076s racket-tests/call-with-back-end-settings(#f(lambda () [(edit-mode racket-mode)] (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define (f x) (+ 1 x))\n(f 41)\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'(lambda nil (cond ... ...))) (let ((value-171 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-172) (if (unwind-protect ... ... ...) nil (ert-fail form-description-172))) value-171)) (if (eq major-mode 'prog-mode) nil (racket-run '(16)) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-173 ...) (args-174 ...)) (let (...) (let ... ...) value-175))) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-178 ...) (args-179 ...)) (let (...) (let ... ...) value-180))) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-183 ...)) (let (form-description-184) (if ... nil ...)) value-183)) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-190 #'racket-tests/see-char-property) (args-191 (condition-case err ... ...))) (let ((value-192 ...)) (let (form-description-194) (if ... nil ...)) value-192)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-200 #'racket-tests/see-char-property) (args-201 (condition-case err ... ...))) (let ((value-202 ...)) (let (form-description-204) (if ... nil ...)) value-202)) (let* ((fn-205 #'racket-tests/see-char-property) (args-206 (condition-case err ... ...))) (let ((value-207 ...)) (let (form-description-209) (if ... nil ...)) value-207)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-215 #'racket-tests/see-char-property) (args-216 (condition-case err ... ...))) (let ((value-217 ...)) (let (form-description-219) (if ... nil ...)) value-217)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-225 #'racket-tests/see-char-property) (args-226 (condition-case err ... ...))) (let ((value-227 ...)) (let (form-description-229) (if ... nil ...)) value-227)) (let ((value-230 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-231) (if (not ...) nil (ert-fail form-description-231))) value-230) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ... ...) (kill-buffer)))) (kill-buffer) (delete-file path)))) 1076s (let ((edit-mode (car tail))) (racket-tests/call-with-back-end-settings #'(lambda nil (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define (f x) (+ 1 x))\n(f 41)\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'...) (let (...) (let ... ...) value-171)) (if (eq major-mode 'prog-mode) nil (racket-run '...) (progn (racket-tests/call-until-true ...) (let* ... ...)) (progn (racket-tests/call-until-true ...) (let* ... ...)) (progn (racket-tests/call-until-true ...) (let ... ... value-183)) (racket--call-with-repl-buffer #'...) (let* (... ...) (let ... ... value-192)) (racket-debug-step) (racket--call-with-repl-buffer #'...) (let* (... ...) (let ... ... value-202)) (let* (... ...) (let ... ... value-207)) (racket-debug-step) (racket--call-with-repl-buffer #'...) (let* (... ...) (let ... ... value-217)) (racket-debug-step) (racket--call-with-repl-buffer #'...) (let* (... ...) (let ... ... value-227)) (let (...) (let ... ...) value-230) (racket--call-with-repl-buffer #'...)) (kill-buffer) (delete-file path)))) (setq tail (cdr tail))) 1076s (while tail (let ((edit-mode (car tail))) (racket-tests/call-with-back-end-settings #'(lambda nil (let* ((path ...) (name ...) (code "#lang racket/base\n(define (f x) (+ 1 x))\n(f 41)\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true ...) (let ... ... value-171)) (if (eq major-mode ...) nil (racket-run ...) (progn ... ...) (progn ... ...) (progn ... ...) (racket--call-with-repl-buffer ...) (let* ... ...) (racket-debug-step) (racket--call-with-repl-buffer ...) (let* ... ...) (let* ... ...) (racket-debug-step) (racket--call-with-repl-buffer ...) (let* ... ...) (racket-debug-step) (racket--call-with-repl-buffer ...) (let* ... ...) (let ... ... value-230) (racket--call-with-repl-buffer ...)) (kill-buffer) (delete-file path)))) (setq tail (cdr tail)))) 1076s (let ((tail (list #'racket-mode #'racket-hash-lang-mode))) (while tail (let ((edit-mode (car tail))) (racket-tests/call-with-back-end-settings #'(lambda nil (let* (... ... ...) (write-region code nil path nil ...) (find-file path) (funcall edit-mode) (progn ... ...) (if ... nil ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) (kill-buffer) (delete-file path)))) (setq tail (cdr tail))))) 1076s #f(lambda () [t] (message "racket-tests/debugger") (let ((tail (list ... ...))) (while tail (let (...) (racket-tests/call-with-back-end-settings ...) (setq tail ...)))) nil)() 1076s #f(compiled-function () #)() 1076s handler-bind-1(#f(compiled-function () #) (error quit) #f(compiled-function (err) #)) 1076s ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/debugger :documentation nil :body #f(lambda () [t] (message "racket-tests/debugger") (let ... ...) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/debugger\n{racket-back-end-/} killed\n" :should-forms (... ... ... ...) :duration 900.0115333 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :expected-result-type :passed :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") :result #s(ert-test-failed :messages "racket-tests/debugger\n{racket-back-end-/} killed\n" :should-forms ((... :form ... :value t) (... :form ... :value #*>) (... :form ... :value 1) (... :form racket-debug-mode :value nil)) :duration 900.0115333 :condition (ert-test-failed (... :form racket-debug-mode :value nil)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun progn :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun while :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args #0 :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :exit-continuation #f(compiled-function () #) :ert-debug-on-error nil)) 1076s ert-run-test(#s(ert-test :name racket-tests/debugger :documentation nil :body #f(lambda () [t] (message "racket-tests/debugger") (let ((tail ...)) (while tail (let ... ... ...))) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/debugger\n{racket-back-end-/} killed\n" :should-forms (((should ...) :form (cond ... ...) :value t) ((should ...) :form (get-buffer "*Racket REPL *") :value #*>) ((should ...) :form (racket--repl-session-id) :value 1) ((should racket-debug-mode) :form racket-debug-mode :value nil)) :duration 900.0115333 :condition (ert-test-failed ((should racket-debug-mode) :form racket-debug-mode :value nil)) :backtrace (#s(backtrace-frame :evald t :fun signal :args (ert-test-failed ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args (... nil ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ... value-183) :flags nil :locals (... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun progn :args (... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args (... nil ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args (... ... ... ... ... ... ... ...) :flags nil :locals (... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args (#f(lambda () ... ...)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args (... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args (#f(lambda () ... ...)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ... ...) :flags nil :locals (... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun while :args (tail ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args (#f(compiled-function () #) ... #f(compiled-function (err) #)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args (...) :flags nil :locals (... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args #0 :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args (... #1 #f(compiled-function (event-type &rest event-args) #)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args (... #f(compiled-function (event-type &rest event-args) #) nil) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) :flags nil :locals (... ... ... ... ... ... ... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args (...) :flags nil :locals (... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :expected-result-type :passed :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el")) 1076s ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-map # :test-results ... :test-start-times ... :test-end-times ... :passed-expected 2 :passed-unexpected 0 :failed-expected 0 :failed-unexpected 1 :skipped 0 :start-time ... :end-time nil :aborted-p nil ...) #s(ert-test :name racket-tests/debugger :documentation nil :body #f(lambda () ... ... ... nil) :most-recent-result ... :expected-result-type :passed :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") #f(compiled-function (event-type &rest event-args) #)) 1076s ert-run-tests((not (or "racket-tests/repl")) #f(compiled-function (event-type &rest event-args) #) nil) 1076s ert-run-tests-batch((not (or "racket-tests/repl"))) 1076s ert-run-tests-batch-and-exit((not (or "racket-tests/repl"))) 1076s load-with-code-conversion("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) 1076s command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa\")" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"DEBIAN_BUILDD\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" "-l" "test/racket-tests.el" "-l" "debian/ert-helper.el")) 1076s command-line() 1076s normal-top-level() 1076s 1076s Test racket-tests/debugger condition: 1076s (ert-test-failed 1076s ((should racket-debug-mode) :form racket-debug-mode :value nil)) 1076s FAILED 3/14 racket-tests/debugger (900.011533 sec) at test/racket-tests.el:337 1644s racket-tests/expand-expression 2544s 2544s {racket-back-end-/} killed 3237s Test racket-tests/expand-expression backtrace: 3238s signal(ert-test-failed (((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntest2Iqyer.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting back end...\n")))) 3238s ert-fail(((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntest2Iqyer.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting back end...\n"))) 3238s (if (unwind-protect (setq value-294 (apply fn-292 args-293)) (setq form-description-296 (nconc (list '(should (racket-tests/see-back ...))) (list :form (cons fn-292 args-293)) (if (eql value-294 'ert-form-evaluation-aborted-295) nil (list :value value-294)) (if (eql value-294 'ert-form-evaluation-aborted-295) nil (let* ((-explainer- ...)) (if -explainer- (list :explanation ...) nil))))) (ert--signal-should-execution form-description-296)) nil (ert-fail form-description-296)) 3238s (let (form-description-296) (if (unwind-protect (setq value-294 (apply fn-292 args-293)) (setq form-description-296 (nconc (list '(should ...)) (list :form (cons fn-292 args-293)) (if (eql value-294 'ert-form-evaluation-aborted-295) nil (list :value value-294)) (if (eql value-294 'ert-form-evaluation-aborted-295) nil (let* (...) (if -explainer- ... nil))))) (ert--signal-should-execution form-description-296)) nil (ert-fail form-description-296))) 3238s (let ((value-294 'ert-form-evaluation-aborted-295)) (let (form-description-296) (if (unwind-protect (setq value-294 (apply fn-292 args-293)) (setq form-description-296 (nconc (list '...) (list :form (cons fn-292 args-293)) (if (eql value-294 ...) nil (list :value value-294)) (if (eql value-294 ...) nil (let* ... ...)))) (ert--signal-should-execution form-description-296)) nil (ert-fail form-description-296))) value-294) 3238s (let* ((fn-292 #'racket-tests/see-back) (args-293 (condition-case err (list (concat "\n" name "> ")) (error (progn (setq fn-292 #'signal) (list (car err) (cdr err))))))) (let ((value-294 'ert-form-evaluation-aborted-295)) (let (form-description-296) (if (unwind-protect (setq value-294 (apply fn-292 args-293)) (setq form-description-296 (nconc (list ...) (list :form ...) (if ... nil ...) (if ... nil ...))) (ert--signal-should-execution form-description-296)) nil (ert-fail form-description-296))) value-294)) 3238s #f(lambda () [(name "test2Iqyer.rkt")] (let* ((fn-292 #'racket-tests/see-back) (args-293 (condition-case err ... ...))) (let ((value-294 ...)) (let (form-description-296) (if ... nil ...)) value-294)))() 3238s racket--call-with-repl-buffer(#f(lambda () [(name "test2Iqyer.rkt")] (let* ((fn-292 #'racket-tests/see-back) (args-293 (condition-case err (list (concat "\n" name "> ")) (error (progn ... ...))))) (let ((value-294 'ert-form-evaluation-aborted-295)) (let (form-description-296) (if (unwind-protect (setq value-294 ...) (setq form-description-296 ...) (ert--signal-should-execution form-description-296)) nil (ert-fail form-description-296))) value-294)))) 3238s (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(cond [(< 1 2) #t] [else #f])\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-run) (progn (racket-tests/call-until-true #'(lambda nil (get-buffer racket-repl-buffer-name))) (let* ((fn-282 #'get-buffer) (args-283 (condition-case err (list racket-repl-buffer-name) (error (progn ... ...))))) (let ((value-284 'ert-form-evaluation-aborted-285)) (let (form-description-286) (if (unwind-protect (setq value-284 ...) (setq form-description-286 ...) (ert--signal-should-execution form-description-286)) nil (ert-fail form-description-286))) value-284))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-287 #'racket--repl-session-id) (args-288 (condition-case err (list) (error (progn ... ...))))) (let ((value-289 'ert-form-evaluation-aborted-290)) (let (form-description-291) (if (unwind-protect (setq value-289 ...) (setq form-description-291 ...) (ert--signal-should-execution form-description-291)) nil (ert-fail form-description-291))) value-289))) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-292 #'racket-tests/see-back) (args-293 (condition-case err ... ...))) (let ((value-294 ...)) (let (form-description-296) (if ... nil ...)) value-294)))) (goto-char (point-max)) (racket-expand-last-sexp 4) (set-buffer "*Racket Stepper *") (let* ((fn-297 #'eq) (args-298 (condition-case err (list major-mode 'racket-stepper-mode) (error (progn (setq fn-297 ...) (list ... ...)))))) (let ((value-299 'ert-form-evaluation-aborted-300)) (let (form-description-301) (if (unwind-protect (setq value-299 (apply fn-297 args-298)) (setq form-description-301 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-301)) nil (ert-fail form-description-301))) value-299)) (let* ((fn-302 #'equal) (args-303 (condition-case err (list header-line-format "Press RET to step. C-u RET to step all. C-h m to see help.") (error (progn (setq fn-302 ...) (list ... ...)))))) (let ((value-304 'ert-form-evaluation-aborted-305)) (let (form-description-306) (if (unwind-protect (setq value-304 (apply fn-302 args-303)) (setq form-description-306 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-306)) nil (ert-fail form-description-306))) value-304)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-original))) (let* ((fn-307 #'faceup-test-font-lock-buffer) (args-308 (condition-case err (list nil racket-tests/expand-expression-original) (error (progn ... ...))))) (let ((value-309 'ert-form-evaluation-aborted-310)) (let (form-description-311) (if (unwind-protect (setq value-309 ...) (setq form-description-311 ...) (ert--signal-should-execution form-description-311)) nil (ert-fail form-description-311))) value-309))) (racket-tests/press "C-u RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-final))) (let* ((fn-312 #'faceup-test-font-lock-buffer) (args-313 (condition-case err (list nil racket-tests/expand-expression-final) (error (progn ... ...))))) (let ((value-314 'ert-form-evaluation-aborted-315)) (let (form-description-316) (if (unwind-protect (setq value-314 ...) (setq form-description-316 ...) (ert--signal-should-execution form-description-316)) nil (ert-fail form-description-316))) value-314))) (quit-window) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ((fn-317 #'racket-tests/see-back) (args-318 (condition-case err ... ...))) (let ((value-319 ...)) (let (form-description-321) (if ... nil ...)) value-319)) (kill-buffer))) (kill-buffer) (delete-file path)) 3238s #f(lambda () [t] (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(cond [(< 1 2) #t] [else #f])\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-run) (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-284))) (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-289))) (racket--call-with-repl-buffer #'(lambda nil ...)) (goto-char (point-max)) (racket-expand-last-sexp 4) ...))() 3238s funcall(#f(lambda () [t] (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(cond [(< 1 2) #t] [else #f])\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-run) (progn (racket-tests/call-until-true #'(lambda nil (get-buffer racket-repl-buffer-name))) (let* ((fn-282 #'get-buffer) (args-283 (condition-case err ... ...))) (let ((value-284 ...)) (let (form-description-286) (if ... nil ...)) value-284))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-287 #'racket--repl-session-id) (args-288 (condition-case err ... ...))) (let ((value-289 ...)) (let (form-description-291) (if ... nil ...)) value-289))) (racket--call-with-repl-buffer #'(lambda nil (let* (... ...) (let ... ... value-294)))) (goto-char (point-max)) (racket-expand-last-sexp 4) (set-buffer "*Racket Stepper *") (let* ((fn-297 #'eq) (args-298 (condition-case err (list major-mode ...) (error ...)))) (let ((value-299 'ert-form-evaluation-aborted-300)) (let (form-description-301) (if (unwind-protect ... ... ...) nil (ert-fail form-description-301))) value-299)) (let* ((fn-302 #'equal) (args-303 (condition-case err (list header-line-format "Press RET to step. C-u RET to step all. C-h m to see help.") (error ...)))) (let ((value-304 'ert-form-evaluation-aborted-305)) (let (form-description-306) (if (unwind-protect ... ... ...) nil (ert-fail form-description-306))) value-304)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-original))) (let* ((fn-307 #'faceup-test-font-lock-buffer) (args-308 (condition-case err ... ...))) (let ((value-309 ...)) (let (form-description-311) (if ... nil ...)) value-309))) (racket-tests/press "C-u RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-final))) (let* ((fn-312 #'faceup-test-font-lock-buffer) (args-313 (condition-case err ... ...))) (let ((value-314 ...)) (let (form-description-316) (if ... nil ...)) value-314))) (quit-window) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* (... ...) (let ... ... value-319)) (kill-buffer))) (kill-buffer) (delete-file path)))) 3238s (unwind-protect (funcall thunk) (racket-stop-back-end)) 3238s (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) 3238s racket-tests/call-with-back-end-settings(#f(lambda () [t] (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(cond [(< 1 2) #t] [else #f])\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-run) (progn (racket-tests/call-until-true #'(lambda nil (get-buffer racket-repl-buffer-name))) (let* ((fn-282 #'get-buffer) (args-283 (condition-case err ... ...))) (let ((value-284 ...)) (let (form-description-286) (if ... nil ...)) value-284))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-287 #'racket--repl-session-id) (args-288 (condition-case err ... ...))) (let ((value-289 ...)) (let (form-description-291) (if ... nil ...)) value-289))) (racket--call-with-repl-buffer #'(lambda nil (let* (... ...) (let ... ... value-294)))) (goto-char (point-max)) (racket-expand-last-sexp 4) (set-buffer "*Racket Stepper *") (let* ((fn-297 #'eq) (args-298 (condition-case err (list major-mode ...) (error ...)))) (let ((value-299 'ert-form-evaluation-aborted-300)) (let (form-description-301) (if (unwind-protect ... ... ...) nil (ert-fail form-description-301))) value-299)) (let* ((fn-302 #'equal) (args-303 (condition-case err (list header-line-format "Press RET to step. C-u RET to step all. C-h m to see help.") (error ...)))) (let ((value-304 'ert-form-evaluation-aborted-305)) (let (form-description-306) (if (unwind-protect ... ... ...) nil (ert-fail form-description-306))) value-304)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-original))) (let* ((fn-307 #'faceup-test-font-lock-buffer) (args-308 (condition-case err ... ...))) (let ((value-309 ...)) (let (form-description-311) (if ... nil ...)) value-309))) (racket-tests/press "C-u RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-final))) (let* ((fn-312 #'faceup-test-font-lock-buffer) (args-313 (condition-case err ... ...))) (let ((value-314 ...)) (let (form-description-316) (if ... nil ...)) value-314))) (quit-window) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* (... ...) (let ... ... value-319)) (kill-buffer))) (kill-buffer) (delete-file path)))) 3238s #f(lambda () [t] (message "racket-tests/expand-expression") (racket-tests/call-with-back-end-settings #'(lambda nil (let* ... ... ... ... ... ... ... ... ... ...))) nil)() 3238s #f(compiled-function () #)() 3238s handler-bind-1(#f(compiled-function () #) (error quit) #f(compiled-function (err) #)) 3238s ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/expand-expression :documentation nil :body #f(lambda () [t] (message "racket-tests/expand-expression") (racket-tests/call-with-back-end-settings ...) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-expression\n{racket-back-end-/} killed\n" :should-forms (... ... ...) :duration 900.030403294 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :expected-result-type (satisfies racket-tests/expected-result-for-expand-expression-p) :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") :result #s(ert-test-failed :messages "racket-tests/expand-expression\n{racket-back-end-/} killed\n" :should-forms ((... :form ... :value #*>) (... :form ... :value 2) (... :form ... :value nil :explanation ...)) :duration 900.030403294 :condition (ert-test-failed (... :form ... :value nil :explanation ...)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket--call-with-repl-buffer :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args #0 :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :exit-continuation #f(compiled-function () #) :ert-debug-on-error nil)) 3238s ert-run-test(#s(ert-test :name racket-tests/expand-expression :documentation nil :body #f(lambda () [t] (message "racket-tests/expand-expression") (racket-tests/call-with-back-end-settings #'(lambda nil ...)) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-expression\n{racket-back-end-/} killed\n" :should-forms (((should ...) :form (get-buffer "*Racket REPL *") :value #*>) ((should ...) :form (racket--repl-session-id) :value 2) ((should ...) :form (racket-tests/see-back "\ntest2Iqyer.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting back end...\n"))) :duration 900.030403294 :condition (ert-test-failed ((should ...) :form (racket-tests/see-back "\ntest2Iqyer.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting back end...\n"))) :backtrace (#s(backtrace-frame :evald t :fun signal :args (ert-test-failed ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args (... nil ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ... value-294) :flags nil :locals (... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args (... ...) :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket--call-with-repl-buffer :args (#f(lambda () ... ...)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args (#f(lambda () ... ...)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args (... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args (#f(lambda () ... ...)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args (#f(compiled-function () #) ... #f(compiled-function (err) #)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args (...) :flags nil :locals (... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args #0 :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args (... #1 #f(compiled-function (event-type &rest event-args) #)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args (... #f(compiled-function (event-type &rest event-args) #) nil) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) :flags nil :locals (... ... ... ... ... ... ... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args (...) :flags nil :locals (... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :expected-result-type (satisfies racket-tests/expected-result-for-expand-expression-p) :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el")) 3238s ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-map # :test-results ... :test-start-times ... :test-end-times ... :passed-expected 2 :passed-unexpected 0 :failed-expected 0 :failed-unexpected 2 :skipped 0 :start-time ... :end-time nil :aborted-p nil ...) #s(ert-test :name racket-tests/expand-expression :documentation nil :body #f(lambda () ... ... ... nil) :most-recent-result ... :expected-result-type ... :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") #f(compiled-function (event-type &rest event-args) #)) 3238s ert-run-tests((not (or "racket-tests/repl")) #f(compiled-function (event-type &rest event-args) #) nil) 3238s ert-run-tests-batch((not (or "racket-tests/repl"))) 3238s ert-run-tests-batch-and-exit((not (or "racket-tests/repl"))) 3238s load-with-code-conversion("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) 3238s command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa\")" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"DEBIAN_BUILDD\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" "-l" "test/racket-tests.el" "-l" "debian/ert-helper.el")) 3238s command-line() 3238s normal-top-level() 3238s 3238s Test racket-tests/expand-expression condition: 3238s (ert-test-failed 3238s ((should (racket-tests/see-back (concat "\n" name "> "))) :form 3238s (racket-tests/see-back "\ntest2Iqyer.rkt> ") :value nil :explanation 3238s (actual 3238s . "Starting back end...\nREPL session stopped\nStarting back end...\n"))) 3712s FAILED 4/14 racket-tests/expand-expression (900.030403 sec) at test/racket-tests.el:1 3712s racket-tests/expand-file-deep 4612s 4612s {racket-back-end-/} killed 4612s Test racket-tests/expand-file-deep backtrace: 4612s signal(ert-test-failed (((should (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0)) :form (faceup-test-font-lock-buffer nil "«f:macro hiding disabled by command prefix»\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") :value nil :explanation (2 6 number-of-lines-differ (on-line 1 ("«f:macro hiding disabled by command prefix»") ("«f:Starting macro expansion stepper... please wait...»")) (on-line 3 ("«f:Original»") (nil)) (on-line 4 ("(module foo racket/base (#%module-begin (define x 42) x))") (nil)) (on-line 5 ("") (nil)) (on-line 6 ("") (nil)))))) 4612s ert-fail(((should (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0)) :form (faceup-test-font-lock-buffer nil "«f:macro hiding disabled by command prefix»\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") :value nil :explanation (2 6 number-of-lines-differ (on-line 1 ("«f:macro hiding disabled by command prefix»") ("«f:Starting macro expansion stepper... please wait...»")) (on-line 3 ("«f:Original»") (nil)) (on-line 4 ("(module foo racket/base (#%module-begin (define x 42) x))") (nil)) (on-line 5 ("") (nil)) (on-line 6 ("") (nil))))) 4612s (if (unwind-protect (setq value-269 (apply fn-267 args-268)) (setq form-description-271 (nconc (list '(should (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (list :form (cons fn-267 args-268)) (if (eql value-269 'ert-form-evaluation-aborted-270) nil (list :value value-269)) (if (eql value-269 'ert-form-evaluation-aborted-270) nil (let* ((-explainer- ...)) (if -explainer- (list :explanation ...) nil))))) (ert--signal-should-execution form-description-271)) nil (ert-fail form-description-271)) 4612s (let (form-description-271) (if (unwind-protect (setq value-269 (apply fn-267 args-268)) (setq form-description-271 (nconc (list '(should ...)) (list :form (cons fn-267 args-268)) (if (eql value-269 'ert-form-evaluation-aborted-270) nil (list :value value-269)) (if (eql value-269 'ert-form-evaluation-aborted-270) nil (let* (...) (if -explainer- ... nil))))) (ert--signal-should-execution form-description-271)) nil (ert-fail form-description-271))) 4612s (let ((value-269 'ert-form-evaluation-aborted-270)) (let (form-description-271) (if (unwind-protect (setq value-269 (apply fn-267 args-268)) (setq form-description-271 (nconc (list '...) (list :form (cons fn-267 args-268)) (if (eql value-269 ...) nil (list :value value-269)) (if (eql value-269 ...) nil (let* ... ...)))) (ert--signal-should-execution form-description-271)) nil (ert-fail form-description-271))) value-269) 4612s (let* ((fn-267 #'faceup-test-font-lock-buffer) (args-268 (condition-case err (list nil racket-tests/expand-deep-0) (error (progn (setq fn-267 #'signal) (list (car err) (cdr err))))))) (let ((value-269 'ert-form-evaluation-aborted-270)) (let (form-description-271) (if (unwind-protect (setq value-269 (apply fn-267 args-268)) (setq form-description-271 (nconc (list ...) (list :form ...) (if ... nil ...) (if ... nil ...))) (ert--signal-should-execution form-description-271)) nil (ert-fail form-description-271))) value-269)) 4612s (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (let* ((fn-267 #'faceup-test-font-lock-buffer) (args-268 (condition-case err (list nil racket-tests/expand-deep-0) (error (progn (setq fn-267 ...) (list ... ...)))))) (let ((value-269 'ert-form-evaluation-aborted-270)) (let (form-description-271) (if (unwind-protect (setq value-269 (apply fn-267 args-268)) (setq form-description-271 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-271)) nil (ert-fail form-description-271))) value-269))) 4612s (let* ((dir (make-temp-file "test" t)) (path (concat dir "/" racket-tests/expand-mod-name ".rkt")) (code "#lang racket/base\n(define x 42)\nx")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-expand-file 4) (set-buffer "*Racket Stepper *") (let* ((fn-257 #'eq) (args-258 (condition-case err (list major-mode 'racket-stepper-mode) (error (progn (setq fn-257 ...) (list ... ...)))))) (let ((value-259 'ert-form-evaluation-aborted-260)) (let (form-description-261) (if (unwind-protect (setq value-259 (apply fn-257 args-258)) (setq form-description-261 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-261)) nil (ert-fail form-description-261))) value-259)) (let* ((fn-262 #'equal) (args-263 (condition-case err (list header-line-format "Press RET to step. C-u RET to step all. C-h m to see help.") (error (progn (setq fn-262 ...) (list ... ...)))))) (let ((value-264 'ert-form-evaluation-aborted-265)) (let (form-description-266) (if (unwind-protect (setq value-264 (apply fn-262 args-263)) (setq form-description-266 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-266)) nil (ert-fail form-description-266))) value-264)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (let* ((fn-267 #'faceup-test-font-lock-buffer) (args-268 (condition-case err (list nil racket-tests/expand-deep-0) (error (progn ... ...))))) (let ((value-269 'ert-form-evaluation-aborted-270)) (let (form-description-271) (if (unwind-protect (setq value-269 ...) (setq form-description-271 ...) (ert--signal-should-execution form-description-271)) nil (ert-fail form-description-271))) value-269))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-1))) (let* ((fn-272 #'faceup-test-font-lock-buffer) (args-273 (condition-case err (list nil racket-tests/expand-deep-1) (error (progn ... ...))))) (let ((value-274 'ert-form-evaluation-aborted-275)) (let (form-description-276) (if (unwind-protect (setq value-274 ...) (setq form-description-276 ...) (ert--signal-should-execution form-description-276)) nil (ert-fail form-description-276))) value-274))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-2))) (let* ((fn-277 #'faceup-test-font-lock-buffer) (args-278 (condition-case err (list nil racket-tests/expand-deep-2) (error (progn ... ...))))) (let ((value-279 'ert-form-evaluation-aborted-280)) (let (form-description-281) (if (unwind-protect (setq value-279 ...) (setq form-description-281 ...) (ert--signal-should-execution form-description-281)) nil (ert-fail form-description-281))) value-279))) (kill-buffer) (delete-file path)) 4612s #f(lambda () [t] (let* ((dir (make-temp-file "test" t)) (path (concat dir "/" racket-tests/expand-mod-name ".rkt")) (code "#lang racket/base\n(define x 42)\nx")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-expand-file 4) (set-buffer "*Racket Stepper *") (let* ((fn-257 ...) (args-258 ...)) (let (...) (let ... ...) value-259)) (let* ((fn-262 ...) (args-263 ...)) (let (...) (let ... ...) value-264)) (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-269))) (racket-tests/press "RET") ...))() 4612s funcall(#f(lambda () [t] (let* ((dir (make-temp-file "test" t)) (path (concat dir "/" racket-tests/expand-mod-name ".rkt")) (code "#lang racket/base\n(define x 42)\nx")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-expand-file 4) (set-buffer "*Racket Stepper *") (let* ((fn-257 #'eq) (args-258 (condition-case err (list major-mode ...) (error ...)))) (let ((value-259 'ert-form-evaluation-aborted-260)) (let (form-description-261) (if (unwind-protect ... ... ...) nil (ert-fail form-description-261))) value-259)) (let* ((fn-262 #'equal) (args-263 (condition-case err (list header-line-format "Press RET to step. C-u RET to step all. C-h m to see help.") (error ...)))) (let ((value-264 'ert-form-evaluation-aborted-265)) (let (form-description-266) (if (unwind-protect ... ... ...) nil (ert-fail form-description-266))) value-264)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (let* ((fn-267 #'faceup-test-font-lock-buffer) (args-268 (condition-case err ... ...))) (let ((value-269 ...)) (let (form-description-271) (if ... nil ...)) value-269))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-1))) (let* ((fn-272 #'faceup-test-font-lock-buffer) (args-273 (condition-case err ... ...))) (let ((value-274 ...)) (let (form-description-276) (if ... nil ...)) value-274))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-2))) (let* ((fn-277 #'faceup-test-font-lock-buffer) (args-278 (condition-case err ... ...))) (let ((value-279 ...)) (let (form-description-281) (if ... nil ...)) value-279))) (kill-buffer) (delete-file path)))) 4612s (unwind-protect (funcall thunk) (racket-stop-back-end)) 4612s (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) 4612s racket-tests/call-with-back-end-settings(#f(lambda () [t] (let* ((dir (make-temp-file "test" t)) (path (concat dir "/" racket-tests/expand-mod-name ".rkt")) (code "#lang racket/base\n(define x 42)\nx")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-expand-file 4) (set-buffer "*Racket Stepper *") (let* ((fn-257 #'eq) (args-258 (condition-case err (list major-mode ...) (error ...)))) (let ((value-259 'ert-form-evaluation-aborted-260)) (let (form-description-261) (if (unwind-protect ... ... ...) nil (ert-fail form-description-261))) value-259)) (let* ((fn-262 #'equal) (args-263 (condition-case err (list header-line-format "Press RET to step. C-u RET to step all. C-h m to see help.") (error ...)))) (let ((value-264 'ert-form-evaluation-aborted-265)) (let (form-description-266) (if (unwind-protect ... ... ...) nil (ert-fail form-description-266))) value-264)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (let* ((fn-267 #'faceup-test-font-lock-buffer) (args-268 (condition-case err ... ...))) (let ((value-269 ...)) (let (form-description-271) (if ... nil ...)) value-269))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-1))) (let* ((fn-272 #'faceup-test-font-lock-buffer) (args-273 (condition-case err ... ...))) (let ((value-274 ...)) (let (form-description-276) (if ... nil ...)) value-274))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-2))) (let* ((fn-277 #'faceup-test-font-lock-buffer) (args-278 (condition-case err ... ...))) (let ((value-279 ...)) (let (form-description-281) (if ... nil ...)) value-279))) (kill-buffer) (delete-file path)))) 4612s #f(lambda () [t] (message "racket-tests/expand-file-deep") (racket-tests/call-with-back-end-settings #'(lambda nil (let* ... ... ... ... ... ... ... ... ... ...))) nil)() 4612s #f(compiled-function () #)() 4612s handler-bind-1(#f(compiled-function () #) (error quit) #f(compiled-function (err) #)) 4612s ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/expand-file-deep :documentation nil :body #f(lambda () ... ... ... nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-file-deep\n{racket-back-end-/} killed\n" :should-forms ... :duration 900.014089564 :condition ... :backtrace ... :infos nil) :expected-result-type (satisfies racket-tests/expected-result-for-expand-file-p) :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") :result #s(ert-test-failed :messages "racket-tests/expand-file-deep\n{racket-back-end-/} killed\n" :should-forms (... ... ...) :duration 900.014089564 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :exit-continuation #f(compiled-function () #) :ert-debug-on-error nil)) 4612s ert-run-test(#s(ert-test :name racket-tests/expand-file-deep :documentation nil :body #f(lambda () [t] (message "racket-tests/expand-file-deep") (racket-tests/call-with-back-end-settings #'(lambda nil ...)) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-file-deep\n{racket-back-end-/} killed\n" :should-forms (((should ...) :form (eq racket-stepper-mode racket-stepper-mode) :value t) ((should ...) :form (equal "Press RET to step. C-u RET to step all. C-h m to see help." "Press RET to step. C-u RET to step all. C-h m to see help.") :value t :explanation nil) ((should ...) :form (faceup-test-font-lock-buffer nil "«f:macro hiding disabled by command prefix»\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") :value nil :explanation (2 6 number-of-lines-differ ... ... ... ... ...))) :duration 900.014089564 :condition (ert-test-failed ((should ...) :form (faceup-test-font-lock-buffer nil "«f:macro hiding disabled by command prefix»\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") :value nil :explanation (2 6 number-of-lines-differ ... ... ... ... ...))) :backtrace (#s(backtrace-frame :evald t :fun signal :args (ert-test-failed ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args (... nil ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (... ... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ... value-269) :flags nil :locals (... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args (... ...) :flags nil :locals (... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun progn :args (... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args (... ... ... ... ... ... ... ... ... ... ... ... ... ...) :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args (#f(lambda () ... ...)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args (... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args (#f(lambda () ... ...)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args (#f(compiled-function () #) ... #f(compiled-function (err) #)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args (...) :flags nil :locals (... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args #0 :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args (... #1 #f(compiled-function (event-type &rest event-args) #)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args (... #f(compiled-function (event-type &rest event-args) #) nil) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) :flags nil :locals (... ... ... ... ... ... ... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args (...) :flags nil :locals (... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :expected-result-type (satisfies racket-tests/expected-result-for-expand-file-p) :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el")) 4612s ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-map # :test-results ... :test-start-times ... :test-end-times ... :passed-expected 2 :passed-unexpected 0 :failed-expected 0 :failed-unexpected 3 :skipped 0 :start-time ... :end-time nil :aborted-p nil ...) #s(ert-test :name racket-tests/expand-file-deep :documentation nil :body #f(lambda () ... ... ... nil) :most-recent-result ... :expected-result-type ... :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") #f(compiled-function (event-type &rest event-args) #)) 4612s ert-run-tests((not (or "racket-tests/repl")) #f(compiled-function (event-type &rest event-args) #) nil) 4612s ert-run-tests-batch((not (or "racket-tests/repl"))) 4612s ert-run-tests-batch-and-exit((not (or "racket-tests/repl"))) 4612s load-with-code-conversion("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) 4612s command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa\")" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"DEBIAN_BUILDD\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" "-l" "test/racket-tests.el" "-l" "debian/ert-helper.el")) 4612s command-line() 4612s normal-top-level() 4612s 4612s Test racket-tests/expand-file-deep condition: 4612s (ert-test-failed 4612s ((should 4612s (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0)) 4612s :form 4612s (faceup-test-font-lock-buffer nil 4612s "«f:macro hiding disabled by command prefix»\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") 4612s :value nil :explanation 4612s (2 6 number-of-lines-differ 4612s (on-line 1 ("«f:macro hiding disabled by command prefix»") 4612s ("«f:Starting macro expansion stepper... please wait...»")) 4612s (on-line 3 ("«f:Original»") (nil)) 4612s (on-line 4 4612s ("(module foo racket/base (#%module-begin (define x 42) x))") 4612s (nil)) 4612s (on-line 5 ("") (nil)) (on-line 6 ("") (nil))))) 4613s FAILED 5/14 racket-tests/expand-file-deep (900.014090 sec) at test/racket-tests.el:1 4613s racket-tests/expand-file-shallow 5513s 5513s {racket-back-end-/} killed 5513s Test racket-tests/expand-file-shallow backtrace: 5514s signal(ert-test-failed (((should (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0)) :form (faceup-test-font-lock-buffer nil "«:button:racket-expand-hiding»: standard\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") :value nil :explanation (2 6 number-of-lines-differ (on-line 1 ("«:button:racket-expand-hiding»: standard") ("«f:Starting macro expansion stepper... please wait...»")) (on-line 3 ("«f:Original»") (nil)) (on-line 4 ("(module foo racket/base (#%module-begin (define x 42) x))") (nil)) (on-line 5 ("") (nil)) (on-line 6 ("") (nil)))))) 5514s ert-fail(((should (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0)) :form (faceup-test-font-lock-buffer nil "«:button:racket-expand-hiding»: standard\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") :value nil :explanation (2 6 number-of-lines-differ (on-line 1 ("«:button:racket-expand-hiding»: standard") ("«f:Starting macro expansion stepper... please wait...»")) (on-line 3 ("«f:Original»") (nil)) (on-line 4 ("(module foo racket/base (#%module-begin (define x 42) x))") (nil)) (on-line 5 ("") (nil)) (on-line 6 ("") (nil))))) 5514s (if (unwind-protect (setq value-249 (apply fn-247 args-248)) (setq form-description-251 (nconc (list '(should (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (list :form (cons fn-247 args-248)) (if (eql value-249 'ert-form-evaluation-aborted-250) nil (list :value value-249)) (if (eql value-249 'ert-form-evaluation-aborted-250) nil (let* ((-explainer- ...)) (if -explainer- (list :explanation ...) nil))))) (ert--signal-should-execution form-description-251)) nil (ert-fail form-description-251)) 5514s (let (form-description-251) (if (unwind-protect (setq value-249 (apply fn-247 args-248)) (setq form-description-251 (nconc (list '(should ...)) (list :form (cons fn-247 args-248)) (if (eql value-249 'ert-form-evaluation-aborted-250) nil (list :value value-249)) (if (eql value-249 'ert-form-evaluation-aborted-250) nil (let* (...) (if -explainer- ... nil))))) (ert--signal-should-execution form-description-251)) nil (ert-fail form-description-251))) 5514s (let ((value-249 'ert-form-evaluation-aborted-250)) (let (form-description-251) (if (unwind-protect (setq value-249 (apply fn-247 args-248)) (setq form-description-251 (nconc (list '...) (list :form (cons fn-247 args-248)) (if (eql value-249 ...) nil (list :value value-249)) (if (eql value-249 ...) nil (let* ... ...)))) (ert--signal-should-execution form-description-251)) nil (ert-fail form-description-251))) value-249) 5514s (let* ((fn-247 #'faceup-test-font-lock-buffer) (args-248 (condition-case err (list nil racket-tests/expand-shallow-0) (error (progn (setq fn-247 #'signal) (list (car err) (cdr err))))))) (let ((value-249 'ert-form-evaluation-aborted-250)) (let (form-description-251) (if (unwind-protect (setq value-249 (apply fn-247 args-248)) (setq form-description-251 (nconc (list ...) (list :form ...) (if ... nil ...) (if ... nil ...))) (ert--signal-should-execution form-description-251)) nil (ert-fail form-description-251))) value-249)) 5514s (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (let* ((fn-247 #'faceup-test-font-lock-buffer) (args-248 (condition-case err (list nil racket-tests/expand-shallow-0) (error (progn (setq fn-247 ...) (list ... ...)))))) (let ((value-249 'ert-form-evaluation-aborted-250)) (let (form-description-251) (if (unwind-protect (setq value-249 (apply fn-247 args-248)) (setq form-description-251 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-251)) nil (ert-fail form-description-251))) value-249))) 5514s (let* ((dir (make-temp-file "test" t)) (path (concat dir "/" racket-tests/expand-mod-name ".rkt")) (code "#lang racket/base\n(define x 42)\nx")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (let ((racket-expand-hiding 'standard)) (racket-expand-file)) (set-buffer "*Racket Stepper *") (let* ((fn-237 #'eq) (args-238 (condition-case err (list major-mode 'racket-stepper-mode) (error (progn (setq fn-237 ...) (list ... ...)))))) (let ((value-239 'ert-form-evaluation-aborted-240)) (let (form-description-241) (if (unwind-protect (setq value-239 (apply fn-237 args-238)) (setq form-description-241 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-241)) nil (ert-fail form-description-241))) value-239)) (let* ((fn-242 #'equal) (args-243 (condition-case err (list header-line-format "Press RET to step. C-u RET to step all. C-h m to see help.") (error (progn (setq fn-242 ...) (list ... ...)))))) (let ((value-244 'ert-form-evaluation-aborted-245)) (let (form-description-246) (if (unwind-protect (setq value-244 (apply fn-242 args-243)) (setq form-description-246 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-246)) nil (ert-fail form-description-246))) value-244)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (let* ((fn-247 #'faceup-test-font-lock-buffer) (args-248 (condition-case err (list nil racket-tests/expand-shallow-0) (error (progn ... ...))))) (let ((value-249 'ert-form-evaluation-aborted-250)) (let (form-description-251) (if (unwind-protect (setq value-249 ...) (setq form-description-251 ...) (ert--signal-should-execution form-description-251)) nil (ert-fail form-description-251))) value-249))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-1))) (let* ((fn-252 #'faceup-test-font-lock-buffer) (args-253 (condition-case err (list nil racket-tests/expand-shallow-1) (error (progn ... ...))))) (let ((value-254 'ert-form-evaluation-aborted-255)) (let (form-description-256) (if (unwind-protect (setq value-254 ...) (setq form-description-256 ...) (ert--signal-should-execution form-description-256)) nil (ert-fail form-description-256))) value-254))) (kill-buffer) (delete-file path)) 5514s #f(lambda () [t] (let* ((dir (make-temp-file "test" t)) (path (concat dir "/" racket-tests/expand-mod-name ".rkt")) (code "#lang racket/base\n(define x 42)\nx")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (let ((racket-expand-hiding ...)) (racket-expand-file)) (set-buffer "*Racket Stepper *") (let* ((fn-237 ...) (args-238 ...)) (let (...) (let ... ...) value-239)) (let* ((fn-242 ...) (args-243 ...)) (let (...) (let ... ...) value-244)) (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-249))) (racket-tests/press "RET") ...))() 5514s funcall(#f(lambda () [t] (let* ((dir (make-temp-file "test" t)) (path (concat dir "/" racket-tests/expand-mod-name ".rkt")) (code "#lang racket/base\n(define x 42)\nx")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (let ((racket-expand-hiding 'standard)) (racket-expand-file)) (set-buffer "*Racket Stepper *") (let* ((fn-237 #'eq) (args-238 (condition-case err (list major-mode ...) (error ...)))) (let ((value-239 'ert-form-evaluation-aborted-240)) (let (form-description-241) (if (unwind-protect ... ... ...) nil (ert-fail form-description-241))) value-239)) (let* ((fn-242 #'equal) (args-243 (condition-case err (list header-line-format "Press RET to step. C-u RET to step all. C-h m to see help.") (error ...)))) (let ((value-244 'ert-form-evaluation-aborted-245)) (let (form-description-246) (if (unwind-protect ... ... ...) nil (ert-fail form-description-246))) value-244)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (let* ((fn-247 #'faceup-test-font-lock-buffer) (args-248 (condition-case err ... ...))) (let ((value-249 ...)) (let (form-description-251) (if ... nil ...)) value-249))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-1))) (let* ((fn-252 #'faceup-test-font-lock-buffer) (args-253 (condition-case err ... ...))) (let ((value-254 ...)) (let (form-description-256) (if ... nil ...)) value-254))) (kill-buffer) (delete-file path)))) 5514s (unwind-protect (funcall thunk) (racket-stop-back-end)) 5514s (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) 5514s racket-tests/call-with-back-end-settings(#f(lambda () [t] (let* ((dir (make-temp-file "test" t)) (path (concat dir "/" racket-tests/expand-mod-name ".rkt")) (code "#lang racket/base\n(define x 42)\nx")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (let ((racket-expand-hiding 'standard)) (racket-expand-file)) (set-buffer "*Racket Stepper *") (let* ((fn-237 #'eq) (args-238 (condition-case err (list major-mode ...) (error ...)))) (let ((value-239 'ert-form-evaluation-aborted-240)) (let (form-description-241) (if (unwind-protect ... ... ...) nil (ert-fail form-description-241))) value-239)) (let* ((fn-242 #'equal) (args-243 (condition-case err (list header-line-format "Press RET to step. C-u RET to step all. C-h m to see help.") (error ...)))) (let ((value-244 'ert-form-evaluation-aborted-245)) (let (form-description-246) (if (unwind-protect ... ... ...) nil (ert-fail form-description-246))) value-244)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (let* ((fn-247 #'faceup-test-font-lock-buffer) (args-248 (condition-case err ... ...))) (let ((value-249 ...)) (let (form-description-251) (if ... nil ...)) value-249))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-1))) (let* ((fn-252 #'faceup-test-font-lock-buffer) (args-253 (condition-case err ... ...))) (let ((value-254 ...)) (let (form-description-256) (if ... nil ...)) value-254))) (kill-buffer) (delete-file path)))) 5514s #f(lambda () [t] (message "racket-tests/expand-file-shallow") (racket-tests/call-with-back-end-settings #'(lambda nil (let* ... ... ... ... ... ... ... ... ... ...))) nil)() 5514s #f(compiled-function () #)() 5514s handler-bind-1(#f(compiled-function () #) (error quit) #f(compiled-function (err) #)) 5514s ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/expand-file-shallow :documentation nil :body #f(lambda () ... ... ... nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-file-shallow\n{racket-back-end-/} killed\n" :should-forms ... :duration 900.012778143 :condition ... :backtrace ... :infos nil) :expected-result-type (satisfies racket-tests/expected-result-for-expand-file-p) :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") :result #s(ert-test-failed :messages "racket-tests/expand-file-shallow\n{racket-back-end-/} killed\n" :should-forms (... ... ...) :duration 900.012778143 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :exit-continuation #f(compiled-function () #) :ert-debug-on-error nil)) 5514s ert-run-test(#s(ert-test :name racket-tests/expand-file-shallow :documentation nil :body #f(lambda () [t] (message "racket-tests/expand-file-shallow") (racket-tests/call-with-back-end-settings #'(lambda nil ...)) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-file-shallow\n{racket-back-end-/} killed\n" :should-forms (((should ...) :form (eq racket-stepper-mode racket-stepper-mode) :value t) ((should ...) :form (equal "Press RET to step. C-u RET to step all. C-h m to see help." "Press RET to step. C-u RET to step all. C-h m to see help.") :value t :explanation nil) ((should ...) :form (faceup-test-font-lock-buffer nil "«:button:racket-expand-hiding»: standard\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") :value nil :explanation (2 6 number-of-lines-differ ... ... ... ... ...))) :duration 900.012778143 :condition (ert-test-failed ((should ...) :form (faceup-test-font-lock-buffer nil "«:button:racket-expand-hiding»: standard\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") :value nil :explanation (2 6 number-of-lines-differ ... ... ... ... ...))) :backtrace (#s(backtrace-frame :evald t :fun signal :args (ert-test-failed ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args (... nil ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (... ... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ... value-249) :flags nil :locals (... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args (... ...) :flags nil :locals (... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun progn :args (... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args (... ... ... ... ... ... ... ... ... ... ... ...) :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args (#f(lambda () ... ...)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args (... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args (#f(lambda () ... ...)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args (#f(compiled-function () #) ... #f(compiled-function (err) #)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args (...) :flags nil :locals (... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args #0 :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args (... #1 #f(compiled-function (event-type &rest event-args) #)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args (... #f(compiled-function (event-type &rest event-args) #) nil) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) :flags nil :locals (... ... ... ... ... ... ... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args (...) :flags nil :locals (... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :expected-result-type (satisfies racket-tests/expected-result-for-expand-file-p) :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el")) 5514s ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-map # :test-results ... :test-start-times ... :test-end-times ... :passed-expected 2 :passed-unexpected 0 :failed-expected 0 :failed-unexpected 4 :skipped 0 :start-time ... :end-time nil :aborted-p nil ...) #s(ert-test :name racket-tests/expand-file-shallow :documentation nil :body #f(lambda () ... ... ... nil) :most-recent-result ... :expected-result-type ... :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") #f(compiled-function (event-type &rest event-args) #)) 5514s ert-run-tests((not (or "racket-tests/repl")) #f(compiled-function (event-type &rest event-args) #) nil) 5514s ert-run-tests-batch((not (or "racket-tests/repl"))) 5514s ert-run-tests-batch-and-exit((not (or "racket-tests/repl"))) 5514s load-with-code-conversion("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) 5514s command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa\")" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"DEBIAN_BUILDD\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" "-l" "test/racket-tests.el" "-l" "debian/ert-helper.el")) 5514s command-line() 5514s normal-top-level() 5514s 5514s Test racket-tests/expand-file-shallow condition: 5514s (ert-test-failed 5514s ((should 5514s (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0)) 5514s :form 5514s (faceup-test-font-lock-buffer nil 5514s "«:button:racket-expand-hiding»: standard\n\n«f:Original»\n(module foo racket/base (#%module-begin (define x 42) x))\n\n") 5514s :value nil :explanation 5514s (2 6 number-of-lines-differ 5514s (on-line 1 ("«:button:racket-expand-hiding»: standard") 5514s ("«f:Starting macro expansion stepper... please wait...»")) 5514s (on-line 3 ("«f:Original»") (nil)) 5514s (on-line 4 5514s ("(module foo racket/base (#%module-begin (define x 42) x))") 5514s (nil)) 5514s (on-line 5 ("") (nil)) (on-line 6 ("") (nil))))) 5514s FAILED 6/14 racket-tests/expand-file-shallow (900.012778 sec) at test/racket-tests.el:446 5514s 4 other buffers still using *Racket REPL * 5514s passed 7/14 racket-tests/fill-paragraph-comment (0.002248 sec) 5514s passed 8/14 racket-tests/font-lock (0.171656 sec) 5514s passed 9/14 racket-tests/indent-same (0.197119 sec) 5514s skipped 10/14 racket-tests/indent-speed-1 (0.000132 sec) 5514s skipped 11/14 racket-tests/indent-speed-2 (0.000120 sec) 5514s skipped 12/14 racket-tests/profile (0.000114 sec) 5514s racket-tests/run 6414s 6414s {racket-back-end-/} killed 6414s Test racket-tests/run backtrace: 6414s signal(ert-test-failed (((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntestnztO8k.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting back end...\nREPL session stopped\nREPL session stopped\nREPL session stopped\nStarting back end...\n")))) 6414s ert-fail(((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntestnztO8k.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting back end...\nREPL session stopped\nREPL session stopped\nREPL session stopped\nStarting back end...\n"))) 6414s (if (unwind-protect (setq value-94 (apply fn-92 args-93)) (setq form-description-96 (nconc (list '(should (racket-tests/see-back ...))) (list :form (cons fn-92 args-93)) (if (eql value-94 'ert-form-evaluation-aborted-95) nil (list :value value-94)) (if (eql value-94 'ert-form-evaluation-aborted-95) nil (let* ((-explainer- ...)) (if -explainer- (list :explanation ...) nil))))) (ert--signal-should-execution form-description-96)) nil (ert-fail form-description-96)) 6414s (let (form-description-96) (if (unwind-protect (setq value-94 (apply fn-92 args-93)) (setq form-description-96 (nconc (list '(should ...)) (list :form (cons fn-92 args-93)) (if (eql value-94 'ert-form-evaluation-aborted-95) nil (list :value value-94)) (if (eql value-94 'ert-form-evaluation-aborted-95) nil (let* (...) (if -explainer- ... nil))))) (ert--signal-should-execution form-description-96)) nil (ert-fail form-description-96))) 6414s (let ((value-94 'ert-form-evaluation-aborted-95)) (let (form-description-96) (if (unwind-protect (setq value-94 (apply fn-92 args-93)) (setq form-description-96 (nconc (list '...) (list :form (cons fn-92 args-93)) (if (eql value-94 ...) nil (list :value value-94)) (if (eql value-94 ...) nil (let* ... ...)))) (ert--signal-should-execution form-description-96)) nil (ert-fail form-description-96))) value-94) 6414s (let* ((fn-92 #'racket-tests/see-back) (args-93 (condition-case err (list (concat "\n" name "> ")) (error (progn (setq fn-92 #'signal) (list (car err) (cdr err))))))) (let ((value-94 'ert-form-evaluation-aborted-95)) (let (form-description-96) (if (unwind-protect (setq value-94 (apply fn-92 args-93)) (setq form-description-96 (nconc (list ...) (list :form ...) (if ... nil ...) (if ... nil ...))) (ert--signal-should-execution form-description-96)) nil (ert-fail form-description-96))) value-94)) 6414s #f(lambda () [(name "testnztO8k.rkt")] (let* ((fn-92 #'racket-tests/see-back) (args-93 (condition-case err ... ...))) (let ((value-94 ...)) (let (form-description-96) (if ... nil ...)) value-94)) (racket-repl-exit) (let* ((fn-97 #'racket-tests/see-back) (args-98 (condition-case err ... ...))) (let ((value-99 ...)) (let (form-description-101) (if ... nil ...)) value-99)) (kill-buffer))() 6414s racket--call-with-repl-buffer(#f(lambda () [(name "testnztO8k.rkt")] (let* ((fn-92 #'racket-tests/see-back) (args-93 (condition-case err (list (concat "\n" name "> ")) (error (progn ... ...))))) (let ((value-94 'ert-form-evaluation-aborted-95)) (let (form-description-96) (if (unwind-protect (setq value-94 ...) (setq form-description-96 ...) (ert--signal-should-execution form-description-96)) nil (ert-fail form-description-96))) value-94)) (racket-repl-exit) (let* ((fn-97 #'racket-tests/see-back) (args-98 (condition-case err (list "REPL session ended\n") (error (progn ... ...))))) (let ((value-99 'ert-form-evaluation-aborted-100)) (let (form-description-101) (if (unwind-protect (setq value-99 ...) (setq form-description-101 ...) (ert--signal-should-execution form-description-101)) nil (ert-fail form-description-101))) value-99)) (kill-buffer))) 6414s (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-87 #'racket--repl-session-id) (args-88 (condition-case err (list) (error (progn ... ...))))) (let ((value-89 'ert-form-evaluation-aborted-90)) (let (form-description-91) (if (unwind-protect (setq value-89 ...) (setq form-description-91 ...) (ert--signal-should-execution form-description-91)) nil (ert-fail form-description-91))) value-89))) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-92 #'racket-tests/see-back) (args-93 (condition-case err ... ...))) (let ((value-94 ...)) (let (form-description-96) (if ... nil ...)) value-94)) (racket-repl-exit) (let* ((fn-97 #'racket-tests/see-back) (args-98 (condition-case err ... ...))) (let ((value-99 ...)) (let (form-description-101) (if ... nil ...)) value-99)) (kill-buffer)))) 6414s (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'(lambda nil (cond ((memql major-mode ...) (not buffer-read-only)) ((memql major-mode ...) t)))) (let ((value-85 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-86) (if (unwind-protect (setq value-85 (cond ... ...)) (setq form-description-86 (list ... :form ... :value value-85)) (ert--signal-should-execution form-description-86)) nil (ert-fail form-description-86))) value-85)) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-87 #'racket--repl-session-id) (args-88 (condition-case err (list) (error ...)))) (let ((value-89 'ert-form-evaluation-aborted-90)) (let (form-description-91) (if (unwind-protect ... ... ...) nil (ert-fail form-description-91))) value-89))) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-92 ...) (args-93 ...)) (let (...) (let ... ...) value-94)) (racket-repl-exit) (let* ((fn-97 ...) (args-98 ...)) (let (...) (let ... ...) value-99)) (kill-buffer)))) (kill-buffer) (delete-file path)) 6414s #f(lambda () [(edit-mode racket-mode)] (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'...) (let (...) (let ... ...) value-85)) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true ...) (let* ... ...)) (racket--call-with-repl-buffer #'...)) (kill-buffer) (delete-file path)))() 6414s funcall(#f(lambda () [(edit-mode racket-mode)] (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'(lambda nil (cond ... ...))) (let ((value-85 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-86) (if (unwind-protect ... ... ...) nil (ert-fail form-description-86))) value-85)) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-87 ...) (args-88 ...)) (let (...) (let ... ...) value-89))) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...) (racket-repl-exit) (let* ... ...) (kill-buffer)))) (kill-buffer) (delete-file path)))) 6414s (unwind-protect (funcall thunk) (racket-stop-back-end)) 6414s (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) 6414s racket-tests/call-with-back-end-settings(#f(lambda () [(edit-mode racket-mode)] (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'(lambda nil (cond ... ...))) (let ((value-85 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-86) (if (unwind-protect ... ... ...) nil (ert-fail form-description-86))) value-85)) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-87 ...) (args-88 ...)) (let (...) (let ... ...) value-89))) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...) (racket-repl-exit) (let* ... ...) (kill-buffer)))) (kill-buffer) (delete-file path)))) 6414s (let ((edit-mode (car tail))) (racket-tests/call-with-back-end-settings #'(lambda nil (let* ((path (make-temp-file "test" nil ".rkt")) (name (file-name-nondirectory path)) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true #'...) (let (...) (let ... ...) value-85)) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true ...) (let* ... ...)) (racket--call-with-repl-buffer #'...)) (kill-buffer) (delete-file path)))) (setq tail (cdr tail))) 6414s (while tail (let ((edit-mode (car tail))) (racket-tests/call-with-back-end-settings #'(lambda nil (let* ((path ...) (name ...) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (funcall edit-mode) (progn (racket-tests/call-until-true ...) (let ... ... value-85)) (if (eq major-mode ...) nil (racket-run) (progn ... ...) (racket--call-with-repl-buffer ...)) (kill-buffer) (delete-file path)))) (setq tail (cdr tail)))) 6414s (let ((tail (list #'racket-mode #'racket-hash-lang-mode))) (while tail (let ((edit-mode (car tail))) (racket-tests/call-with-back-end-settings #'(lambda nil (let* (... ... ...) (write-region code nil path nil ...) (find-file path) (funcall edit-mode) (progn ... ...) (if ... nil ... ... ...) (kill-buffer) (delete-file path)))) (setq tail (cdr tail))))) 6414s #f(lambda () [t] (message "racket-tests/run") (let ((tail (list ... ...))) (while tail (let (...) (racket-tests/call-with-back-end-settings ...) (setq tail ...)))) nil)() 6414s #f(compiled-function () #)() 6414s handler-bind-1(#f(compiled-function () #) (error quit) #f(compiled-function (err) #)) 6414s ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/run :documentation "Start the REPL via a racket-run command." :body #f(lambda () [t] (message "racket-tests/run") (let ... ...) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/run\n{racket-back-end-/} killed\n" :should-forms (... ... ...) :duration 900.010257464 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :expected-result-type :passed :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") :result #s(ert-test-failed :messages "racket-tests/run\n{racket-back-end-/} killed\n" :should-forms ((... :form ... :value t) (... :form ... :value 3) (... :form ... :value nil :explanation ...)) :duration 900.010257464 :condition (ert-test-failed (... :form ... :value nil :explanation ...)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... ... ...) :args nil :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket--call-with-repl-buffer :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun while :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args #0 :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :exit-continuation #f(compiled-function () #) :ert-debug-on-error nil)) 6414s ert-run-test(#s(ert-test :name racket-tests/run :documentation "Start the REPL via a racket-run command." :body #f(lambda () [t] (message "racket-tests/run") (let (...) (while tail ...)) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/run\n{racket-back-end-/} killed\n" :should-forms ((... :form ... :value t) (... :form ... :value 3) (... :form ... :value nil :explanation ...)) :duration 900.010257464 :condition (ert-test-failed (... :form ... :value nil :explanation ...)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... ... ...) :args nil :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket--call-with-repl-buffer :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun while :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args #0 :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :expected-result-type :passed :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el")) 6414s ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-map # :test-results ... :test-start-times ... :test-end-times ... :passed-expected 5 :passed-unexpected 0 :failed-expected 0 :failed-unexpected 5 :skipped 3 :start-time ... :end-time nil :aborted-p nil ...) #s(ert-test :name racket-tests/run :documentation "Start the REPL via a racket-run command." :body #f(lambda () ... ... ... nil) :most-recent-result ... :expected-result-type :passed :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") #f(compiled-function (event-type &rest event-args) #)) 6414s ert-run-tests((not (or "racket-tests/repl")) #f(compiled-function (event-type &rest event-args) #) nil) 6414s ert-run-tests-batch((not (or "racket-tests/repl"))) 6414s ert-run-tests-batch-and-exit((not (or "racket-tests/repl"))) 6414s load-with-code-conversion("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) 6414s command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa\")" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"DEBIAN_BUILDD\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" "-l" "test/racket-tests.el" "-l" "debian/ert-helper.el")) 6414s command-line() 6414s normal-top-level() 6414s 6414s Test racket-tests/run condition: 6414s (ert-test-failed 6414s ((should (racket-tests/see-back (concat "\n" name "> "))) :form 6414s (racket-tests/see-back "\ntestnztO8k.rkt> ") :value nil :explanation 6414s (actual 6414s . "Starting back end...\nREPL session stopped\nStarting back end...\nREPL session stopped\nREPL session stopped\nREPL session stopped\nStarting back end...\n"))) 6414s FAILED 13/14 racket-tests/run (900.010257 sec) at test/racket-tests.el:236 6414s racket-tests/xp 7314s 7314s {racket-back-end-/} killed 7314s Test racket-tests/xp backtrace: 7315s signal(ert-test-failed (((should (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base")))) :form (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base"))) :value nil))) 7315s ert-fail(((should (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base")))) :form (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base"))) :value nil)) 7315s (if (unwind-protect (setq value-144 (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base")))) (setq form-description-145 (list '(should (progn (goto-char ...) (racket-xp-next-definition) (looking-at-p ...))) :form '(progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base"))) :value value-144)) (ert--signal-should-execution form-description-145)) nil (ert-fail form-description-145)) 7315s (let (form-description-145) (if (unwind-protect (setq value-144 (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base")))) (setq form-description-145 (list '(should (progn ... ... ...)) :form '(progn (goto-char ...) (racket-xp-next-definition) (looking-at-p ...)) :value value-144)) (ert--signal-should-execution form-description-145)) nil (ert-fail form-description-145))) 7315s (let ((value-144 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-145) (if (unwind-protect (setq value-144 (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base")))) (setq form-description-145 (list '(should ...) :form '(progn ... ... ...) :value value-144)) (ert--signal-should-execution form-description-145)) nil (ert-fail form-description-145))) value-144) 7315s (progn (racket-tests/call-until-true #'(lambda nil (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base"))))) (let ((value-144 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-145) (if (unwind-protect (setq value-144 (progn (goto-char ...) (racket-xp-next-definition) (looking-at-p ...))) (setq form-description-145 (list '... :form '... :value value-144)) (ert--signal-should-execution form-description-145)) nil (ert-fail form-description-145))) value-144)) 7315s (let* ((path (make-temp-file "test" nil ".rkt")) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-xp-mode 0) (racket-xp-mode 1) (let ((value-142 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-143) (if (unwind-protect (setq value-142 racket-xp-mode) (setq form-description-143 (list '... :form 'racket-xp-mode :value value-142)) (ert--signal-should-execution form-description-143)) nil (ert-fail form-description-143))) value-142) (progn (racket-tests/call-until-true #'(lambda nil (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base"))))) (let ((value-144 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-145) (if (unwind-protect (setq value-144 (progn ... ... ...)) (setq form-description-145 (list ... :form ... :value value-144)) (ert--signal-should-execution form-description-145)) nil (ert-fail form-description-145))) value-144)) (racket-xp-next-definition) (let* ((fn-146 #'racket-tests/see-forward) (args-147 (condition-case err (list "foobar") (error (progn (setq fn-146 ...) (list ... ...)))))) (let ((value-148 'ert-form-evaluation-aborted-149)) (let (form-description-150) (if (unwind-protect (setq value-148 (apply fn-146 args-147)) (setq form-description-150 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-150)) nil (ert-fail form-description-150))) value-148)) (let* ((fn-151 #'equal) (args-152 (condition-case err (list (get-text-property (point) 'help-echo) "1 bound occurrence") (error (progn (setq fn-151 ...) (list ... ...)))))) (let ((value-153 'ert-form-evaluation-aborted-154)) (let (form-description-155) (if (unwind-protect (setq value-153 (apply fn-151 args-152)) (setq form-description-155 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-155)) nil (ert-fail form-description-155))) value-153)) (racket-xp-next-use) (let* ((fn-156 #'racket-tests/see-forward) (args-157 (condition-case err (list "foobar") (error (progn (setq fn-156 ...) (list ... ...)))))) (let ((value-158 'ert-form-evaluation-aborted-159)) (let (form-description-160) (if (unwind-protect (setq value-158 (apply fn-156 args-157)) (setq form-description-160 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-160)) nil (ert-fail form-description-160))) value-158)) (let* ((fn-161 #'equal) (args-162 (condition-case err (list (get-text-property (point) 'help-echo) "defined locally") (error (progn (setq fn-161 ...) (list ... ...)))))) (let ((value-163 'ert-form-evaluation-aborted-164)) (let (form-description-165) (if (unwind-protect (setq value-163 (apply fn-161 args-162)) (setq form-description-165 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-165)) nil (ert-fail form-description-165))) value-163)) (goto-char (point-max)) (insert "foo") (completion-at-point) (let* ((fn-166 #'racket-tests/see-back) (args-167 (condition-case err (list "foobar") (error (progn (setq fn-166 ...) (list ... ...)))))) (let ((value-168 'ert-form-evaluation-aborted-169)) (let (form-description-170) (if (unwind-protect (setq value-168 (apply fn-166 args-167)) (setq form-description-170 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-170)) nil (ert-fail form-description-170))) value-168)) (racket-xp-mode 0) (kill-buffer) (delete-file path)) 7315s #f(lambda () [t] (let* ((path (make-temp-file "test" nil ".rkt")) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-xp-mode 0) (racket-xp-mode 1) (let ((value-142 ...)) (let (form-description-143) (if ... nil ...)) value-142) (progn (racket-tests/call-until-true #'...) (let (...) (let ... ...) value-144)) (racket-xp-next-definition) (let* ((fn-146 ...) (args-147 ...)) (let (...) (let ... ...) value-148)) ...))() 7315s funcall(#f(lambda () [t] (let* ((path (make-temp-file "test" nil ".rkt")) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-xp-mode 0) (racket-xp-mode 1) (let ((value-142 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-143) (if (unwind-protect (setq value-142 racket-xp-mode) (setq form-description-143 ...) (ert--signal-should-execution form-description-143)) nil (ert-fail form-description-143))) value-142) (progn (racket-tests/call-until-true #'(lambda nil (progn ... ... ...))) (let ((value-144 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-145) (if (unwind-protect ... ... ...) nil (ert-fail form-description-145))) value-144)) (racket-xp-next-definition) (let* ((fn-146 #'racket-tests/see-forward) (args-147 (condition-case err (list "foobar") (error ...)))) (let ((value-148 'ert-form-evaluation-aborted-149)) (let (form-description-150) (if (unwind-protect ... ... ...) nil (ert-fail form-description-150))) value-148)) (let* ((fn-151 #'equal) (args-152 (condition-case err (list ... "1 bound occurrence") (error ...)))) (let ((value-153 'ert-form-evaluation-aborted-154)) (let (form-description-155) (if (unwind-protect ... ... ...) nil (ert-fail form-description-155))) value-153)) (racket-xp-next-use) (let* ((fn-156 #'racket-tests/see-forward) (args-157 (condition-case err (list "foobar") (error ...)))) (let ((value-158 'ert-form-evaluation-aborted-159)) (let (form-description-160) (if (unwind-protect ... ... ...) nil (ert-fail form-description-160))) value-158)) (let* ((fn-161 #'equal) (args-162 (condition-case err (list ... "defined locally") (error ...)))) (let ((value-163 'ert-form-evaluation-aborted-164)) (let (form-description-165) (if (unwind-protect ... ... ...) nil (ert-fail form-description-165))) value-163)) (goto-char (point-max)) (insert "foo") (completion-at-point) (let* ((fn-166 #'racket-tests/see-back) (args-167 (condition-case err (list "foobar") (error ...)))) (let ((value-168 'ert-form-evaluation-aborted-169)) (let (form-description-170) (if (unwind-protect ... ... ...) nil (ert-fail form-description-170))) value-168)) (racket-xp-mode 0) (kill-buffer) (delete-file path)))) 7315s (unwind-protect (funcall thunk) (racket-stop-back-end)) 7315s (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) 7315s racket-tests/call-with-back-end-settings(#f(lambda () [t] (let* ((path (make-temp-file "test" nil ".rkt")) (code "#lang racket/base\n(define foobar 42)\nfoobar\n")) (write-region code nil path nil 'no-wrote-file-message) (find-file path) (racket-xp-mode 0) (racket-xp-mode 1) (let ((value-142 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-143) (if (unwind-protect (setq value-142 racket-xp-mode) (setq form-description-143 ...) (ert--signal-should-execution form-description-143)) nil (ert-fail form-description-143))) value-142) (progn (racket-tests/call-until-true #'(lambda nil (progn ... ... ...))) (let ((value-144 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-145) (if (unwind-protect ... ... ...) nil (ert-fail form-description-145))) value-144)) (racket-xp-next-definition) (let* ((fn-146 #'racket-tests/see-forward) (args-147 (condition-case err (list "foobar") (error ...)))) (let ((value-148 'ert-form-evaluation-aborted-149)) (let (form-description-150) (if (unwind-protect ... ... ...) nil (ert-fail form-description-150))) value-148)) (let* ((fn-151 #'equal) (args-152 (condition-case err (list ... "1 bound occurrence") (error ...)))) (let ((value-153 'ert-form-evaluation-aborted-154)) (let (form-description-155) (if (unwind-protect ... ... ...) nil (ert-fail form-description-155))) value-153)) (racket-xp-next-use) (let* ((fn-156 #'racket-tests/see-forward) (args-157 (condition-case err (list "foobar") (error ...)))) (let ((value-158 'ert-form-evaluation-aborted-159)) (let (form-description-160) (if (unwind-protect ... ... ...) nil (ert-fail form-description-160))) value-158)) (let* ((fn-161 #'equal) (args-162 (condition-case err (list ... "defined locally") (error ...)))) (let ((value-163 'ert-form-evaluation-aborted-164)) (let (form-description-165) (if (unwind-protect ... ... ...) nil (ert-fail form-description-165))) value-163)) (goto-char (point-max)) (insert "foo") (completion-at-point) (let* ((fn-166 #'racket-tests/see-back) (args-167 (condition-case err (list "foobar") (error ...)))) (let ((value-168 'ert-form-evaluation-aborted-169)) (let (form-description-170) (if (unwind-protect ... ... ...) nil (ert-fail form-description-170))) value-168)) (racket-xp-mode 0) (kill-buffer) (delete-file path)))) 7315s #f(lambda () [t] (message "racket-tests/xp") (racket-tests/call-with-back-end-settings #'(lambda nil (let* ... ... ... ... ... ... ... ... ... ...))) nil)() 7315s #f(compiled-function () #)() 7315s handler-bind-1(#f(compiled-function () #) (error quit) #f(compiled-function (err) #)) 7315s ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/xp :documentation nil :body #f(lambda () [t] (message "racket-tests/xp") (racket-tests/call-with-back-end-settings ...) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/xp\n{racket-back-end-/} killed\n" :should-forms (... ...) :duration 900.009247427 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :expected-result-type :passed :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") :result #s(ert-test-failed :messages "racket-tests/xp\n{racket-back-end-/} killed\n" :should-forms ((... :form racket-xp-mode :value t) (... :form ... :value nil)) :duration 900.009247427 :condition (ert-test-failed (... :form ... :value nil)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun progn :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args #0 :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :exit-continuation #f(compiled-function () #) :ert-debug-on-error nil)) 7315s ert-run-test(#s(ert-test :name racket-tests/xp :documentation nil :body #f(lambda () [t] (message "racket-tests/xp") (racket-tests/call-with-back-end-settings #'(lambda nil ...)) nil) :most-recent-result #s(ert-test-failed :messages "racket-tests/xp\n{racket-back-end-/} killed\n" :should-forms (((should racket-xp-mode) :form racket-xp-mode :value t) ((should ...) :form (progn ... ... ...) :value nil)) :duration 900.009247427 :condition (ert-test-failed ((should ...) :form (progn ... ... ...) :value nil)) :backtrace (#s(backtrace-frame :evald t :fun signal :args (ert-test-failed ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-fail :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :args (... nil ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ... value-144) :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun progn :args (... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :flags nil :locals (... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ...) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall :args (#f(lambda () ... ...)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args (... ...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :args (... ...) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun racket-tests/call-with-back-end-settings :args (#f(lambda () ... ...)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(lambda () ... ... ... nil) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun #f(compiled-function () #) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun handler-bind-1 :args (#f(compiled-function () #) ... #f(compiled-function (err) #)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run-test-internal :args (...) :flags nil :locals (... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args #0 :flags nil :locals (... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test :args (... #1 #f(compiled-function (event-type &rest event-args) #)) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests :args (... #f(compiled-function (event-type &rest event-args) #) nil) :flags nil :locals (...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args (...) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun load-with-code-conversion :args ("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) :flags nil :locals (... ... ... ... ... ... ... ... ... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line-1 :args (...) :flags nil :locals (... ... ... ...) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-line :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun normal-top-level :args nil :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :expected-result-type :passed :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el")) 7315s ert-run-or-rerun-test(#s(ert--stats :selector ... :tests ... :test-map # :test-results ... :test-start-times ... :test-end-times ... :passed-expected 5 :passed-unexpected 0 :failed-expected 0 :failed-unexpected 6 :skipped 3 :start-time ... :end-time nil :aborted-p nil ...) #s(ert-test :name racket-tests/xp :documentation nil :body #f(lambda () ... ... ... nil) :most-recent-result ... :expected-result-type :passed :tags nil :file-name "/tmp/autopkgtest.KlWPx8/build.8Wz/src/test/racket-tests.el") #f(compiled-function (event-type &rest event-args) #)) 7315s ert-run-tests((not (or "racket-tests/repl")) #f(compiled-function (event-type &rest event-args) #) nil) 7315s ert-run-tests-batch((not (or "racket-tests/repl"))) 7315s ert-run-tests-batch-and-exit((not (or "racket-tests/repl"))) 7315s load-with-code-conversion("/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" "/tmp/autopkgtest.KlWPx8/build.8Wz/src/debian/ert-helper.el" nil t) 7315s command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa\")" "--eval" "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"DEBIAN_BUILDD\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" "-l" "test/racket-tests.el" "-l" "debian/ert-helper.el")) 7315s command-line() 7315s normal-top-level() 7315s 7315s Test racket-tests/xp condition: 7315s (ert-test-failed 7315s ((should 7315s (progn 7315s (goto-char ...) (racket-xp-next-definition) (looking-at-p ...))) 7315s :form 7315s (progn 7315s (goto-char (point-min)) (racket-xp-next-definition) 7315s (looking-at-p (regexp-quote "racket/base"))) 7315s :value nil)) 7315s FAILED 14/14 racket-tests/xp (900.009247 sec) at test/racket-tests.el:305 7315s 7315s Ran 14 tests, 5 results as expected, 6 unexpected, 3 skipped (2025-03-14 19:18:53+0000, 7141.660218 sec) 7315s 7315s 6 unexpected results: 7315s FAILED racket-tests/debugger 7546s FAILED racket-tests/expand-expression 7546s FAILED racket-tests/expand-file-deep 7546s FAILED racket-tests/expand-file-shallow 7546s FAILED racket-tests/run 7546s FAILED racket-tests/xp 7546s 7546s 3 skipped results: 7546s SKIPPED racket-tests/indent-speed-1 7546s SKIPPED racket-tests/indent-speed-2 7546s SKIPPED racket-tests/profile 7546s 7546s {racket--repl-start}: picked next session id 1 7546s back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) 7546s {racket--repl-start}: picked next session id 2 7546s back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) 7546s back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) 7546s back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) 7546s {racket--repl-start}: picked next session id 3 7546s back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) 7546s back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) 7546s dh_elpa_test: error: emacs -batch -Q -l package --eval "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa\")" --eval "(add-to-list 'package-directory-list \"/usr/share/emacs/site-lisp/elpa-src\")" --eval "(setq ert-batch-backtrace-right-margin nil)" -f package-initialize -L . -L test --eval "(progn (setenv \"DEBIAN_BUILDD\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" -l test/racket-tests.el -l debian/ert-helper.el returned exit code 1 7547s autopkgtest [19:22:46]: test dh-elpa-test-autopkgtest: -----------------------] 7547s dh-elpa-test-autopkgtest FAIL non-zero exit status 25 7547s autopkgtest [19:22:46]: test dh-elpa-test-autopkgtest: - - - - - - - - - - results - - - - - - - - - - 7548s autopkgtest [19:22:47]: @@@@@@@@@@@@@@@@@@@@ summary 7548s dh-elpa-test-autopkgtest FAIL non-zero exit status 25 7553s nova [W] Using flock in prodstack6-ppc64el 7553s Creating nova instance adt-plucky-ppc64el-racket-mode-20250314-171659-juju-7f2275-prod-proposed-migration-environment-15-d31f2c6f-6718-48d6-a65f-cc8852531b15 from image adt/ubuntu-plucky-ppc64el-server-20250314.img (UUID 0d1e0e85-c651-4838-b55c-eb9eeda2180e)... 7553s nova [W] Timed out waiting for 645ddb11-e973-4f18-8112-317df9b5588f to get deleted.