Sat Dec 28 18:21:29 UTC 2024 I: starting to build racket-mode/experimental/arm64 on jenkins on '2024-12-28 18:21' Sat Dec 28 18:21:29 UTC 2024 I: The jenkins build log is/was available at https://jenkins.debian.net/userContent/reproducible/debian/build_service/arm64_19/51776/console.log Sat Dec 28 18:21:29 UTC 2024 I: Downloading source for experimental/racket-mode=20241217~git.3dc8c17-1 --2024-12-28 18:21:30-- http://cdn-fastly.deb.debian.org/debian/pool/main/r/racket-mode/racket-mode_20241217%7egit.3dc8c17-1.dsc Connecting to 46.16.76.132:3128... connected. Proxy request sent, awaiting response... 200 OK Length: 2370 (2.3K) [text/prs.lines.tag] Saving to: ‘racket-mode_20241217~git.3dc8c17-1.dsc’ 0K .. 100% 289M=0s 2024-12-28 18:21:30 (289 MB/s) - ‘racket-mode_20241217~git.3dc8c17-1.dsc’ saved [2370/2370] Sat Dec 28 18:21:30 UTC 2024 I: racket-mode_20241217~git.3dc8c17-1.dsc -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA512 Format: 3.0 (quilt) Source: racket-mode Binary: elpa-racket-mode Architecture: all Version: 20241217~git.3dc8c17-1 Maintainer: Debian Emacsen team Uploaders: David Bremner , Xiyue Deng , Homepage: https://github.com/greghendershott/racket-mode Standards-Version: 4.7.0 Vcs-Browser: https://salsa.debian.org/emacsen-team/racket-mode Vcs-Git: https://salsa.debian.org/emacsen-team/racket-mode.git Testsuite: autopkgtest-pkg-elpa Build-Depends: debhelper-compat (= 13), dh-elpa (>= 2.0), elpa-faceup , elpa-paredit , elpa-pos-tip , racket Package-List: elpa-racket-mode deb editors optional arch=all Checksums-Sha1: 912eb22e3a8d6a981e79d9c7e65e3af7df934523 302052 racket-mode_20241217~git.3dc8c17.orig.tar.xz cc27a99fa3885da744e260f695248926afb37dd3 4204 racket-mode_20241217~git.3dc8c17-1.debian.tar.xz Checksums-Sha256: bff09ad96775250ff74c63bd92931958fd6d9a97064b00263984dc158ec90f84 302052 racket-mode_20241217~git.3dc8c17.orig.tar.xz cadf6dd79d135fb5941d87a5e1e2440f24b5069e9b05f5e2ab9f0d8435f5fe81 4204 racket-mode_20241217~git.3dc8c17-1.debian.tar.xz Files: 856362ecc4457e4413980966aef06145 302052 racket-mode_20241217~git.3dc8c17.orig.tar.xz d55f8145c5b7623973ff13123f66cfd4 4204 racket-mode_20241217~git.3dc8c17-1.debian.tar.xz Dgit: 93af508a4cc85456702a8215df29fbb360a1c0ba debian archive/debian/20241217_git.3dc8c17-1 https://git.dgit.debian.org/racket-mode -----BEGIN PGP SIGNATURE----- iQIzBAEBCgAdFiEEm5FwB64DDjbk/CSLaVt65L8GYkAFAmduq2YACgkQaVt65L8G YkARDA//QWRd+NjZW/9FpxY8kYi9T6uEwvyKBxd2cDK0bf5BoHZyhAADsRyo6caT aVKjZlQDv76BILCSRXwJK5hWmoCkmL5RqxkndOc94Xvkaw/TKkCMPf+zh6kcMzsc +HS7Ee9nt9e07mRuYrAtZc2UkEBGgJpWTqui2ExrEQBkLgAT5Pz3DzSN3BS+XMmp FB1lVh2TkWZElVOCQHNB/qkkKddbv0+bUJ7yOx1c7fu0yXuXVUoTnBaqLA94upZg HK6Jm+KojNNOMegXzWzNlIaR7Js7E9WX7dwkqeEeJVCB+j0fFY35E0O/5CW6plGA jcyxab+NByIjTsLyR55cA/EuLPugSoGNBm5v3LYmjmHgiygx4Z9YQYzNyNJFLgay qncC91rlN4zfmcm2wD3sr7DJy19D0A+usf1S/oK3GKVmMvcwUS9YUr+D4yA51ysp UKPZqd8vSUkSThMRo864LzO076yc9K4fQsfG9zI8FO62qrBGlg74ND68kEvUvlZn YECQCtLqhgHIjFQtOkMteMCh5xua2KZ+TFlqHrjEIDmIzCn/wqjwtAxEBFz7x8OW n9l507OYayDoXSKRwgrUCgQSRy47b/u/uX5nJB65HYPos/j8RLcbBXCRdrGbhMXY uwX6zQuyywV+2CPMUISEfYCPcUVNEbJeViAL/zJpBkGj8sJXeCU= =XTor -----END PGP SIGNATURE----- Sat Dec 28 18:21:30 UTC 2024 I: Checking whether the package is not for us Sat Dec 28 18:21:30 UTC 2024 I: Starting 1st build on remote node codethink02-arm64.debian.net. Sat Dec 28 18:21:30 UTC 2024 I: Preparing to do remote build '1' on codethink02-arm64.debian.net. Sat Dec 28 18:51:55 UTC 2024 I: Deleting $TMPDIR on codethink02-arm64.debian.net. I: pbuilder: network access will be disabled during build I: Current time: Sat Dec 28 06:21:32 -12 2024 I: pbuilder-time-stamp: 1735410092 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/experimental-reproducible-base.tgz] I: copying local configuration W: --override-config is not set; not updating apt.conf Read the manpage for details. I: mounting /proc filesystem I: mounting /sys filesystem I: creating /{dev,run}/shm I: mounting /dev/pts filesystem I: redirecting /dev/ptmx to /dev/pts/ptmx I: policy-rc.d already exists I: Copying source file I: copying [racket-mode_20241217~git.3dc8c17-1.dsc] I: copying [./racket-mode_20241217~git.3dc8c17.orig.tar.xz] I: copying [./racket-mode_20241217~git.3dc8c17-1.debian.tar.xz] I: Extracting source dpkg-source: warning: cannot verify inline signature for ./racket-mode_20241217~git.3dc8c17-1.dsc: unsupported subcommand dpkg-source: info: extracting racket-mode in racket-mode-20241217~git.3dc8c17 dpkg-source: info: unpacking racket-mode_20241217~git.3dc8c17.orig.tar.xz dpkg-source: info: unpacking racket-mode_20241217~git.3dc8c17-1.debian.tar.xz I: Not using root during the build. I: Installing the build-deps I: user script /srv/workspace/pbuilder/3257105/tmp/hooks/D02_print_environment starting I: set BUILDDIR='/build/reproducible-path' BUILDUSERGECOS='first user,first room,first work-phone,first home-phone,first other' BUILDUSERNAME='pbuilder1' BUILD_ARCH='arm64' DEBIAN_FRONTEND='noninteractive' DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=12 ' DISTRIBUTION='experimental' HOME='/root' HOST_ARCH='arm64' IFS=' ' INVOCATION_ID='13d2d2a2bb3c4d859df52a883da2417b' LANG='C' LANGUAGE='en_US:en' LC_ALL='C' MAIL='/var/mail/root' OPTIND='1' PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games' PBCURRENTCOMMANDLINEOPERATION='build' PBUILDER_OPERATION='build' PBUILDER_PKGDATADIR='/usr/share/pbuilder' PBUILDER_PKGLIBDIR='/usr/lib/pbuilder' PBUILDER_SYSCONFDIR='/etc' PPID='3257105' PS1='# ' PS2='> ' PS4='+ ' PWD='/' SHELL='/bin/bash' SHLVL='2' SUDO_COMMAND='/usr/bin/timeout -k 18.1h 18h /usr/bin/ionice -c 3 /usr/bin/nice /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.56gWoTLI/pbuilderrc_ZOaJ --distribution experimental --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/experimental-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.56gWoTLI/b1 --logfile b1/build.log racket-mode_20241217~git.3dc8c17-1.dsc' SUDO_GID='109' SUDO_UID='104' SUDO_USER='jenkins' TERM='unknown' TZ='/usr/share/zoneinfo/Etc/GMT+12' USER='root' _='/usr/bin/systemd-run' http_proxy='http://192.168.101.4:3128' I: uname -a Linux codethink02-arm64 6.1.0-28-cloud-arm64 #1 SMP Debian 6.1.119-1 (2024-11-22) aarch64 GNU/Linux I: ls -l /bin lrwxrwxrwx 1 root root 7 Nov 22 14:40 /bin -> usr/bin I: user script /srv/workspace/pbuilder/3257105/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy Version: 0.invalid.0 Architecture: arm64 Maintainer: Debian Pbuilder Team Description: Dummy package to satisfy dependencies with aptitude - created by pbuilder This package was created automatically by pbuilder to satisfy the build-dependencies of the package being currently built. Depends: debhelper-compat (= 13), dh-elpa (>= 2.0), elpa-faceup, elpa-paredit, elpa-pos-tip, racket dpkg-deb: building package 'pbuilder-satisfydepends-dummy' in '/tmp/satisfydepends-aptitude/pbuilder-satisfydepends-dummy.deb'. Selecting previously unselected package pbuilder-satisfydepends-dummy. (Reading database ... 19975 files and directories currently installed.) Preparing to unpack .../pbuilder-satisfydepends-dummy.deb ... Unpacking pbuilder-satisfydepends-dummy (0.invalid.0) ... dpkg: pbuilder-satisfydepends-dummy: dependency problems, but configuring anyway as you requested: pbuilder-satisfydepends-dummy depends on debhelper-compat (= 13); however: Package debhelper-compat is not installed. pbuilder-satisfydepends-dummy depends on dh-elpa (>= 2.0); however: Package dh-elpa is not installed. pbuilder-satisfydepends-dummy depends on elpa-faceup; however: Package elpa-faceup is not installed. pbuilder-satisfydepends-dummy depends on elpa-paredit; however: Package elpa-paredit is not installed. pbuilder-satisfydepends-dummy depends on elpa-pos-tip; however: Package elpa-pos-tip is not installed. pbuilder-satisfydepends-dummy depends on racket; however: Package racket is not installed. Setting up pbuilder-satisfydepends-dummy (0.invalid.0) ... Reading package lists... Building dependency tree... Reading state information... Initializing package states... Writing extended state information... Building tag database... pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) The following NEW packages will be installed: autoconf{a} automake{a} autopoint{a} autotools-dev{a} bsdextrautils{a} ca-certificates{a} debhelper{a} dh-autoreconf{a} dh-elpa{a} dh-elpa-helper{a} dh-strip-nondeterminism{a} dwz{a} elpa-faceup{a} elpa-paredit{a} elpa-pos-tip{a} emacs-bin-common{a} emacs-common{a} emacs-el{a} emacs-nox{a} emacsen-common{a} file{a} gettext{a} gettext-base{a} groff-base{a} install-info{a} intltool-debian{a} libapt-pkg-perl{a} libarchive-zip-perl{a} libarray-unique-perl{a} libarray-utils-perl{a} libasound2-data{a} libasound2t64{a} libcgi-pm-perl{a} libclass-accessor-perl{a} libclone-perl{a} libconfig-tiny-perl{a} libdbus-1-3{a} libdebhelper-perl{a} libdebian-source-perl{a} libelf1t64{a} libencode-locale-perl{a} liberror-perl{a} libexporter-lite-perl{a} libexporter-tiny-perl{a} libffi8{a} libfile-find-rule-perl{a} libfile-listing-perl{a} libfile-stripnondeterminism-perl{a} libgccjit0{a} libgnutls30t64{a} libgpm2{a} libhtml-form-perl{a} libhtml-parser-perl{a} libhtml-tagset-perl{a} libhtml-tree-perl{a} libhttp-cookies-perl{a} libhttp-date-perl{a} libhttp-message-perl{a} libhttp-negotiate-perl{a} libicu72{a} libidn2-0{a} libio-html-perl{a} libio-socket-ssl-perl{a} libio-stringy-perl{a} liblcms2-2{a} liblist-moreutils-perl{a} liblist-moreutils-xs-perl{a} liblwp-mediatypes-perl{a} liblwp-protocol-https-perl{a} libmagic-mgc{a} libmagic1t64{a} libnet-http-perl{a} libnet-ssleay-perl{a} libnumber-compare-perl{a} libp11-kit0{a} libparse-debcontrol-perl{a} libpipeline1{a} libsub-install-perl{a} libsub-name-perl{a} libtasn1-6{a} libtext-glob-perl{a} libtie-ixhash-perl{a} libtimedate-perl{a} libtool{a} libtree-sitter0{a} libtry-tiny-perl{a} libuchardet0{a} libunistring5{a} liburi-perl{a} libwww-mechanize-perl{a} libwww-perl{a} libwww-robotrules-perl{a} libxml2{a} m4{a} man-db{a} netbase{a} openssl{a} perl-openssl-defaults{a} po-debconf{a} racket{a} racket-common{a} sensible-utils{a} The following packages are RECOMMENDED but will NOT be installed: alsa-topology-conf alsa-ucm-conf curl dbus emacs emacs-gtk emacs-lucid emacs-pgtk libarchive-cpio-perl libcgi-fast-perl libdata-dump-perl libgdk-pixbuf-2.0-0 libgdk-pixbuf-xlib-2.0-0 libglib2.0-0 libglib2.0-0t64 libgtk2.0-0t64 libhtml-format-perl libhttp-daemon-perl libio-compress-brotli-perl libjpeg62-turbo libltdl-dev libmail-sendmail-perl libmailtools-perl libpangocairo-1.0-0 libpng16-16 libpng16-16t64 lynx mailutils racket-doc wget 0 packages upgraded, 102 newly installed, 0 to remove and 0 not upgraded. Need to get 209 MB of archives. After unpacking 785 MB will be used. Writing extended state information... Get: 1 http://deb.debian.org/debian unstable/main arm64 netbase all 6.4 [12.8 kB] Get: 2 http://deb.debian.org/debian unstable/main arm64 sensible-utils all 0.0.24 [24.8 kB] Get: 3 http://deb.debian.org/debian unstable/main arm64 openssl arm64 3.3.2-2 [1347 kB] Get: 4 http://deb.debian.org/debian unstable/main arm64 ca-certificates all 20241223 [164 kB] Get: 5 http://deb.debian.org/debian unstable/main arm64 libmagic-mgc arm64 1:5.45-3+b1 [314 kB] Get: 6 http://deb.debian.org/debian unstable/main arm64 libmagic1t64 arm64 1:5.45-3+b1 [102 kB] Get: 7 http://deb.debian.org/debian unstable/main arm64 file arm64 1:5.45-3+b1 [43.4 kB] Get: 8 http://deb.debian.org/debian unstable/main arm64 gettext-base arm64 0.22.5-3 [198 kB] Get: 9 http://deb.debian.org/debian unstable/main arm64 libuchardet0 arm64 0.0.8-1+b2 [69.2 kB] Get: 10 http://deb.debian.org/debian unstable/main arm64 groff-base arm64 1.23.0-7 [1129 kB] Get: 11 http://deb.debian.org/debian unstable/main arm64 bsdextrautils arm64 2.40.2-13 [91.4 kB] Get: 12 http://deb.debian.org/debian unstable/main arm64 libpipeline1 arm64 1.5.8-1 [40.2 kB] Get: 13 http://deb.debian.org/debian unstable/main arm64 man-db arm64 2.13.0-1 [1404 kB] Get: 14 http://deb.debian.org/debian unstable/main arm64 m4 arm64 1.4.19-4 [277 kB] Get: 15 http://deb.debian.org/debian unstable/main arm64 autoconf all 2.72-3 [493 kB] Get: 16 http://deb.debian.org/debian unstable/main arm64 autotools-dev all 20220109.1 [51.6 kB] Get: 17 http://deb.debian.org/debian unstable/main arm64 automake all 1:1.16.5-1.3 [823 kB] Get: 18 http://deb.debian.org/debian unstable/main arm64 autopoint all 0.22.5-3 [723 kB] Get: 19 http://deb.debian.org/debian unstable/main arm64 libdebhelper-perl all 13.23 [90.6 kB] Get: 20 http://deb.debian.org/debian unstable/main arm64 libtool all 2.4.7-8 [517 kB] Get: 21 http://deb.debian.org/debian unstable/main arm64 dh-autoreconf all 20 [17.1 kB] Get: 22 http://deb.debian.org/debian unstable/main arm64 libarchive-zip-perl all 1.68-1 [104 kB] Get: 23 http://deb.debian.org/debian unstable/main arm64 libfile-stripnondeterminism-perl all 1.14.0-1 [19.5 kB] Get: 24 http://deb.debian.org/debian unstable/main arm64 dh-strip-nondeterminism all 1.14.0-1 [8448 B] Get: 25 http://deb.debian.org/debian unstable/main arm64 libelf1t64 arm64 0.192-4 [189 kB] Get: 26 http://deb.debian.org/debian unstable/main arm64 dwz arm64 0.15-1+b1 [102 kB] Get: 27 http://deb.debian.org/debian unstable/main arm64 libunistring5 arm64 1.3-1 [449 kB] Get: 28 http://deb.debian.org/debian unstable/main arm64 libicu72 arm64 72.1-5+b1 [9239 kB] Get: 29 http://deb.debian.org/debian unstable/main arm64 libxml2 arm64 2.12.7+dfsg+really2.9.14-0.2+b1 [630 kB] Get: 30 http://deb.debian.org/debian unstable/main arm64 gettext arm64 0.22.5-3 [1532 kB] Get: 31 http://deb.debian.org/debian unstable/main arm64 intltool-debian all 0.35.0+20060710.6 [22.9 kB] Get: 32 http://deb.debian.org/debian unstable/main arm64 po-debconf all 1.0.21+nmu1 [248 kB] Get: 33 http://deb.debian.org/debian unstable/main arm64 debhelper all 13.23 [919 kB] Get: 34 http://deb.debian.org/debian unstable/main arm64 libapt-pkg-perl arm64 0.1.40+b6 [63.8 kB] Get: 35 http://deb.debian.org/debian unstable/main arm64 libtie-ixhash-perl all 1.23-4 [11.7 kB] Get: 36 http://deb.debian.org/debian unstable/main arm64 libarray-unique-perl all 0.09-1 [12.9 kB] Get: 37 http://deb.debian.org/debian unstable/main arm64 libsub-name-perl arm64 0.28-1 [12.1 kB] Get: 38 http://deb.debian.org/debian unstable/main arm64 libclass-accessor-perl all 0.51-2 [22.7 kB] Get: 39 http://deb.debian.org/debian unstable/main arm64 libexporter-tiny-perl all 1.006002-1 [38.7 kB] Get: 40 http://deb.debian.org/debian unstable/main arm64 liblist-moreutils-xs-perl arm64 0.430-4+b2 [37.7 kB] Get: 41 http://deb.debian.org/debian unstable/main arm64 liblist-moreutils-perl all 0.430-2 [46.9 kB] Get: 42 http://deb.debian.org/debian unstable/main arm64 libio-stringy-perl all 2.113-2 [48.3 kB] Get: 43 http://deb.debian.org/debian unstable/main arm64 libencode-locale-perl all 1.05-3 [12.9 kB] Get: 44 http://deb.debian.org/debian unstable/main arm64 libtimedate-perl all 2.3300-2 [39.3 kB] Get: 45 http://deb.debian.org/debian unstable/main arm64 libhttp-date-perl all 6.06-1 [10.7 kB] Get: 46 http://deb.debian.org/debian unstable/main arm64 libfile-listing-perl all 6.16-1 [12.4 kB] Get: 47 http://deb.debian.org/debian unstable/main arm64 libhtml-tagset-perl all 3.24-1 [14.7 kB] Get: 48 http://deb.debian.org/debian unstable/main arm64 liburi-perl all 5.30-1 [105 kB] Get: 49 http://deb.debian.org/debian unstable/main arm64 libhtml-parser-perl arm64 3.83-1+b1 [97.5 kB] Get: 50 http://deb.debian.org/debian unstable/main arm64 libhtml-tree-perl all 5.07-3 [211 kB] Get: 51 http://deb.debian.org/debian unstable/main arm64 libclone-perl arm64 0.47-1+b1 [13.7 kB] Get: 52 http://deb.debian.org/debian unstable/main arm64 libio-html-perl all 1.004-3 [16.2 kB] Get: 53 http://deb.debian.org/debian unstable/main arm64 liblwp-mediatypes-perl all 6.04-2 [20.2 kB] Get: 54 http://deb.debian.org/debian unstable/main arm64 libhttp-message-perl all 7.00-2 [79.8 kB] Get: 55 http://deb.debian.org/debian unstable/main arm64 libhttp-cookies-perl all 6.11-1 [19.1 kB] Get: 56 http://deb.debian.org/debian unstable/main arm64 libhttp-negotiate-perl all 6.01-2 [13.1 kB] Get: 57 http://deb.debian.org/debian unstable/main arm64 perl-openssl-defaults arm64 7+b2 [6712 B] Get: 58 http://deb.debian.org/debian unstable/main arm64 libnet-ssleay-perl arm64 1.94-2 [323 kB] Get: 59 http://deb.debian.org/debian unstable/main arm64 libio-socket-ssl-perl all 2.089-1 [223 kB] Get: 60 http://deb.debian.org/debian unstable/main arm64 libnet-http-perl all 6.23-1 [23.9 kB] Get: 61 http://deb.debian.org/debian unstable/main arm64 liblwp-protocol-https-perl all 6.14-1 [10.8 kB] Get: 62 http://deb.debian.org/debian unstable/main arm64 libtry-tiny-perl all 0.32-1 [22.9 kB] Get: 63 http://deb.debian.org/debian unstable/main arm64 libwww-robotrules-perl all 6.02-1 [12.9 kB] Get: 64 http://deb.debian.org/debian unstable/main arm64 libwww-perl all 6.77-1 [183 kB] Get: 65 http://deb.debian.org/debian unstable/main arm64 liberror-perl all 0.17029-2 [29.0 kB] Get: 66 http://deb.debian.org/debian unstable/main arm64 libexporter-lite-perl all 0.09-2 [10.7 kB] Get: 67 http://deb.debian.org/debian unstable/main arm64 libparse-debcontrol-perl all 2.005-6 [21.6 kB] Get: 68 http://deb.debian.org/debian unstable/main arm64 libsub-install-perl all 0.929-1 [10.5 kB] Get: 69 http://deb.debian.org/debian unstable/main arm64 libcgi-pm-perl all 4.66-1 [217 kB] Get: 70 http://deb.debian.org/debian unstable/main arm64 libhtml-form-perl all 6.12-1 [32.3 kB] Get: 71 http://deb.debian.org/debian unstable/main arm64 libwww-mechanize-perl all 2.19-1 [114 kB] Get: 72 http://deb.debian.org/debian unstable/main arm64 libdebian-source-perl all 0.126 [53.2 kB] Get: 73 http://deb.debian.org/debian unstable/main arm64 emacs-el all 1:29.4+1-4 [18.8 MB] Get: 74 http://deb.debian.org/debian unstable/main arm64 emacsen-common all 3.0.5 [12.3 kB] Get: 75 http://deb.debian.org/debian unstable/main arm64 install-info arm64 7.1.1-1+b1 [165 kB] Get: 76 http://deb.debian.org/debian unstable/main arm64 emacs-common all 1:29.4+1-4 [15.2 MB] Get: 77 http://deb.debian.org/debian unstable/main arm64 emacs-bin-common arm64 1:29.4+1-4 [91.8 kB] Get: 78 http://deb.debian.org/debian unstable/main arm64 libasound2-data all 1.2.12-1 [21.0 kB] Get: 79 http://deb.debian.org/debian unstable/main arm64 libasound2t64 arm64 1.2.12-1+b1 [336 kB] Get: 80 http://deb.debian.org/debian unstable/main arm64 libdbus-1-3 arm64 1.16.0-1 [168 kB] Get: 81 http://deb.debian.org/debian unstable/main arm64 libgccjit0 arm64 14.2.0-11 [8810 kB] Get: 82 http://deb.debian.org/debian unstable/main arm64 libidn2-0 arm64 2.3.7-2+b1 [127 kB] Get: 83 http://deb.debian.org/debian unstable/main arm64 libffi8 arm64 3.4.6-1 [20.9 kB] Get: 84 http://deb.debian.org/debian unstable/main arm64 libp11-kit0 arm64 0.25.5-3 [409 kB] Get: 85 http://deb.debian.org/debian unstable/main arm64 libtasn1-6 arm64 4.19.0-3+b3 [46.9 kB] Get: 86 http://deb.debian.org/debian unstable/main arm64 libgnutls30t64 arm64 3.8.8-2 [1363 kB] Get: 87 http://deb.debian.org/debian unstable/main arm64 libgpm2 arm64 1.20.7-11+b1 [14.7 kB] Get: 88 http://deb.debian.org/debian unstable/main arm64 liblcms2-2 arm64 2.16-2 [151 kB] Get: 89 http://deb.debian.org/debian unstable/main arm64 libtree-sitter0 arm64 0.20.8-2+b2 [77.1 kB] Get: 90 http://deb.debian.org/debian unstable/main arm64 emacs-nox arm64 1:29.4+1-4 [6509 kB] Get: 91 http://deb.debian.org/debian unstable/main arm64 libarray-utils-perl all 0.5-3 [6184 B] Get: 92 http://deb.debian.org/debian unstable/main arm64 libconfig-tiny-perl all 2.30-1 [18.9 kB] Get: 93 http://deb.debian.org/debian unstable/main arm64 libnumber-compare-perl all 0.03-3 [6332 B] Get: 94 http://deb.debian.org/debian unstable/main arm64 libtext-glob-perl all 0.11-3 [7676 B] Get: 95 http://deb.debian.org/debian unstable/main arm64 libfile-find-rule-perl all 0.34-3 [26.6 kB] Get: 96 http://deb.debian.org/debian unstable/main arm64 dh-elpa all 2.1.5 [29.7 kB] Get: 97 http://deb.debian.org/debian unstable/main arm64 dh-elpa-helper all 2.1.5 [8320 B] Get: 98 http://deb.debian.org/debian unstable/main arm64 elpa-faceup all 0.0.4-7 [17.8 kB] Get: 99 http://deb.debian.org/debian unstable/main arm64 elpa-paredit all 26-2 [43.5 kB] Get: 100 http://deb.debian.org/debian unstable/main arm64 elpa-pos-tip all 0.4.6+git20191227-3 [11.7 kB] Get: 101 http://deb.debian.org/debian unstable/main arm64 racket-common all 8.14+dfsg1-1 [15.7 MB] Get: 102 http://deb.debian.org/debian unstable/main arm64 racket arm64 8.14+dfsg1-1 [117 MB] Fetched 209 MB in 3s (67.5 MB/s) Preconfiguring packages ... Selecting previously unselected package netbase. (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 ... 19975 files and directories currently installed.) Preparing to unpack .../000-netbase_6.4_all.deb ... Unpacking netbase (6.4) ... Selecting previously unselected package sensible-utils. Preparing to unpack .../001-sensible-utils_0.0.24_all.deb ... Unpacking sensible-utils (0.0.24) ... Selecting previously unselected package openssl. Preparing to unpack .../002-openssl_3.3.2-2_arm64.deb ... Unpacking openssl (3.3.2-2) ... Selecting previously unselected package ca-certificates. Preparing to unpack .../003-ca-certificates_20241223_all.deb ... Unpacking ca-certificates (20241223) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../004-libmagic-mgc_1%3a5.45-3+b1_arm64.deb ... Unpacking libmagic-mgc (1:5.45-3+b1) ... Selecting previously unselected package libmagic1t64:arm64. Preparing to unpack .../005-libmagic1t64_1%3a5.45-3+b1_arm64.deb ... Unpacking libmagic1t64:arm64 (1:5.45-3+b1) ... Selecting previously unselected package file. Preparing to unpack .../006-file_1%3a5.45-3+b1_arm64.deb ... Unpacking file (1:5.45-3+b1) ... Selecting previously unselected package gettext-base. Preparing to unpack .../007-gettext-base_0.22.5-3_arm64.deb ... Unpacking gettext-base (0.22.5-3) ... Selecting previously unselected package libuchardet0:arm64. Preparing to unpack .../008-libuchardet0_0.0.8-1+b2_arm64.deb ... Unpacking libuchardet0:arm64 (0.0.8-1+b2) ... Selecting previously unselected package groff-base. Preparing to unpack .../009-groff-base_1.23.0-7_arm64.deb ... Unpacking groff-base (1.23.0-7) ... Selecting previously unselected package bsdextrautils. Preparing to unpack .../010-bsdextrautils_2.40.2-13_arm64.deb ... Unpacking bsdextrautils (2.40.2-13) ... Selecting previously unselected package libpipeline1:arm64. Preparing to unpack .../011-libpipeline1_1.5.8-1_arm64.deb ... Unpacking libpipeline1:arm64 (1.5.8-1) ... Selecting previously unselected package man-db. Preparing to unpack .../012-man-db_2.13.0-1_arm64.deb ... Unpacking man-db (2.13.0-1) ... Selecting previously unselected package m4. Preparing to unpack .../013-m4_1.4.19-4_arm64.deb ... Unpacking m4 (1.4.19-4) ... Selecting previously unselected package autoconf. Preparing to unpack .../014-autoconf_2.72-3_all.deb ... Unpacking autoconf (2.72-3) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../015-autotools-dev_20220109.1_all.deb ... Unpacking autotools-dev (20220109.1) ... Selecting previously unselected package automake. Preparing to unpack .../016-automake_1%3a1.16.5-1.3_all.deb ... Unpacking automake (1:1.16.5-1.3) ... Selecting previously unselected package autopoint. Preparing to unpack .../017-autopoint_0.22.5-3_all.deb ... Unpacking autopoint (0.22.5-3) ... Selecting previously unselected package libdebhelper-perl. Preparing to unpack .../018-libdebhelper-perl_13.23_all.deb ... Unpacking libdebhelper-perl (13.23) ... Selecting previously unselected package libtool. Preparing to unpack .../019-libtool_2.4.7-8_all.deb ... Unpacking libtool (2.4.7-8) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../020-dh-autoreconf_20_all.deb ... Unpacking dh-autoreconf (20) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../021-libarchive-zip-perl_1.68-1_all.deb ... Unpacking libarchive-zip-perl (1.68-1) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../022-libfile-stripnondeterminism-perl_1.14.0-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (1.14.0-1) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../023-dh-strip-nondeterminism_1.14.0-1_all.deb ... Unpacking dh-strip-nondeterminism (1.14.0-1) ... Selecting previously unselected package libelf1t64:arm64. Preparing to unpack .../024-libelf1t64_0.192-4_arm64.deb ... Unpacking libelf1t64:arm64 (0.192-4) ... Selecting previously unselected package dwz. Preparing to unpack .../025-dwz_0.15-1+b1_arm64.deb ... Unpacking dwz (0.15-1+b1) ... Selecting previously unselected package libunistring5:arm64. Preparing to unpack .../026-libunistring5_1.3-1_arm64.deb ... Unpacking libunistring5:arm64 (1.3-1) ... Selecting previously unselected package libicu72:arm64. Preparing to unpack .../027-libicu72_72.1-5+b1_arm64.deb ... Unpacking libicu72:arm64 (72.1-5+b1) ... Selecting previously unselected package libxml2:arm64. Preparing to unpack .../028-libxml2_2.12.7+dfsg+really2.9.14-0.2+b1_arm64.deb ... Unpacking libxml2:arm64 (2.12.7+dfsg+really2.9.14-0.2+b1) ... Selecting previously unselected package gettext. Preparing to unpack .../029-gettext_0.22.5-3_arm64.deb ... Unpacking gettext (0.22.5-3) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../030-intltool-debian_0.35.0+20060710.6_all.deb ... Unpacking intltool-debian (0.35.0+20060710.6) ... Selecting previously unselected package po-debconf. Preparing to unpack .../031-po-debconf_1.0.21+nmu1_all.deb ... Unpacking po-debconf (1.0.21+nmu1) ... Selecting previously unselected package debhelper. Preparing to unpack .../032-debhelper_13.23_all.deb ... Unpacking debhelper (13.23) ... Selecting previously unselected package libapt-pkg-perl. Preparing to unpack .../033-libapt-pkg-perl_0.1.40+b6_arm64.deb ... Unpacking libapt-pkg-perl (0.1.40+b6) ... Selecting previously unselected package libtie-ixhash-perl. Preparing to unpack .../034-libtie-ixhash-perl_1.23-4_all.deb ... Unpacking libtie-ixhash-perl (1.23-4) ... Selecting previously unselected package libarray-unique-perl. Preparing to unpack .../035-libarray-unique-perl_0.09-1_all.deb ... Unpacking libarray-unique-perl (0.09-1) ... Selecting previously unselected package libsub-name-perl:arm64. Preparing to unpack .../036-libsub-name-perl_0.28-1_arm64.deb ... Unpacking libsub-name-perl:arm64 (0.28-1) ... Selecting previously unselected package libclass-accessor-perl. Preparing to unpack .../037-libclass-accessor-perl_0.51-2_all.deb ... Unpacking libclass-accessor-perl (0.51-2) ... Selecting previously unselected package libexporter-tiny-perl. Preparing to unpack .../038-libexporter-tiny-perl_1.006002-1_all.deb ... Unpacking libexporter-tiny-perl (1.006002-1) ... Selecting previously unselected package liblist-moreutils-xs-perl. Preparing to unpack .../039-liblist-moreutils-xs-perl_0.430-4+b2_arm64.deb ... Unpacking liblist-moreutils-xs-perl (0.430-4+b2) ... Selecting previously unselected package liblist-moreutils-perl. Preparing to unpack .../040-liblist-moreutils-perl_0.430-2_all.deb ... Unpacking liblist-moreutils-perl (0.430-2) ... Selecting previously unselected package libio-stringy-perl. Preparing to unpack .../041-libio-stringy-perl_2.113-2_all.deb ... Unpacking libio-stringy-perl (2.113-2) ... Selecting previously unselected package libencode-locale-perl. Preparing to unpack .../042-libencode-locale-perl_1.05-3_all.deb ... Unpacking libencode-locale-perl (1.05-3) ... Selecting previously unselected package libtimedate-perl. Preparing to unpack .../043-libtimedate-perl_2.3300-2_all.deb ... Unpacking libtimedate-perl (2.3300-2) ... Selecting previously unselected package libhttp-date-perl. Preparing to unpack .../044-libhttp-date-perl_6.06-1_all.deb ... Unpacking libhttp-date-perl (6.06-1) ... Selecting previously unselected package libfile-listing-perl. Preparing to unpack .../045-libfile-listing-perl_6.16-1_all.deb ... Unpacking libfile-listing-perl (6.16-1) ... Selecting previously unselected package libhtml-tagset-perl. Preparing to unpack .../046-libhtml-tagset-perl_3.24-1_all.deb ... Unpacking libhtml-tagset-perl (3.24-1) ... Selecting previously unselected package liburi-perl. Preparing to unpack .../047-liburi-perl_5.30-1_all.deb ... Unpacking liburi-perl (5.30-1) ... Selecting previously unselected package libhtml-parser-perl:arm64. Preparing to unpack .../048-libhtml-parser-perl_3.83-1+b1_arm64.deb ... Unpacking libhtml-parser-perl:arm64 (3.83-1+b1) ... Selecting previously unselected package libhtml-tree-perl. Preparing to unpack .../049-libhtml-tree-perl_5.07-3_all.deb ... Unpacking libhtml-tree-perl (5.07-3) ... Selecting previously unselected package libclone-perl:arm64. Preparing to unpack .../050-libclone-perl_0.47-1+b1_arm64.deb ... Unpacking libclone-perl:arm64 (0.47-1+b1) ... Selecting previously unselected package libio-html-perl. Preparing to unpack .../051-libio-html-perl_1.004-3_all.deb ... Unpacking libio-html-perl (1.004-3) ... Selecting previously unselected package liblwp-mediatypes-perl. Preparing to unpack .../052-liblwp-mediatypes-perl_6.04-2_all.deb ... Unpacking liblwp-mediatypes-perl (6.04-2) ... Selecting previously unselected package libhttp-message-perl. Preparing to unpack .../053-libhttp-message-perl_7.00-2_all.deb ... Unpacking libhttp-message-perl (7.00-2) ... Selecting previously unselected package libhttp-cookies-perl. Preparing to unpack .../054-libhttp-cookies-perl_6.11-1_all.deb ... Unpacking libhttp-cookies-perl (6.11-1) ... Selecting previously unselected package libhttp-negotiate-perl. Preparing to unpack .../055-libhttp-negotiate-perl_6.01-2_all.deb ... Unpacking libhttp-negotiate-perl (6.01-2) ... Selecting previously unselected package perl-openssl-defaults:arm64. Preparing to unpack .../056-perl-openssl-defaults_7+b2_arm64.deb ... Unpacking perl-openssl-defaults:arm64 (7+b2) ... Selecting previously unselected package libnet-ssleay-perl:arm64. Preparing to unpack .../057-libnet-ssleay-perl_1.94-2_arm64.deb ... Unpacking libnet-ssleay-perl:arm64 (1.94-2) ... Selecting previously unselected package libio-socket-ssl-perl. Preparing to unpack .../058-libio-socket-ssl-perl_2.089-1_all.deb ... Unpacking libio-socket-ssl-perl (2.089-1) ... Selecting previously unselected package libnet-http-perl. Preparing to unpack .../059-libnet-http-perl_6.23-1_all.deb ... Unpacking libnet-http-perl (6.23-1) ... Selecting previously unselected package liblwp-protocol-https-perl. Preparing to unpack .../060-liblwp-protocol-https-perl_6.14-1_all.deb ... Unpacking liblwp-protocol-https-perl (6.14-1) ... Selecting previously unselected package libtry-tiny-perl. Preparing to unpack .../061-libtry-tiny-perl_0.32-1_all.deb ... Unpacking libtry-tiny-perl (0.32-1) ... Selecting previously unselected package libwww-robotrules-perl. Preparing to unpack .../062-libwww-robotrules-perl_6.02-1_all.deb ... Unpacking libwww-robotrules-perl (6.02-1) ... Selecting previously unselected package libwww-perl. Preparing to unpack .../063-libwww-perl_6.77-1_all.deb ... Unpacking libwww-perl (6.77-1) ... Selecting previously unselected package liberror-perl. Preparing to unpack .../064-liberror-perl_0.17029-2_all.deb ... Unpacking liberror-perl (0.17029-2) ... Selecting previously unselected package libexporter-lite-perl. Preparing to unpack .../065-libexporter-lite-perl_0.09-2_all.deb ... Unpacking libexporter-lite-perl (0.09-2) ... Selecting previously unselected package libparse-debcontrol-perl. Preparing to unpack .../066-libparse-debcontrol-perl_2.005-6_all.deb ... Unpacking libparse-debcontrol-perl (2.005-6) ... Selecting previously unselected package libsub-install-perl. Preparing to unpack .../067-libsub-install-perl_0.929-1_all.deb ... Unpacking libsub-install-perl (0.929-1) ... Selecting previously unselected package libcgi-pm-perl. Preparing to unpack .../068-libcgi-pm-perl_4.66-1_all.deb ... Unpacking libcgi-pm-perl (4.66-1) ... Selecting previously unselected package libhtml-form-perl. Preparing to unpack .../069-libhtml-form-perl_6.12-1_all.deb ... Unpacking libhtml-form-perl (6.12-1) ... Selecting previously unselected package libwww-mechanize-perl. Preparing to unpack .../070-libwww-mechanize-perl_2.19-1_all.deb ... Unpacking libwww-mechanize-perl (2.19-1) ... Selecting previously unselected package libdebian-source-perl. Preparing to unpack .../071-libdebian-source-perl_0.126_all.deb ... Unpacking libdebian-source-perl (0.126) ... Selecting previously unselected package emacs-el. Preparing to unpack .../072-emacs-el_1%3a29.4+1-4_all.deb ... Unpacking emacs-el (1:29.4+1-4) ... Selecting previously unselected package emacsen-common. Preparing to unpack .../073-emacsen-common_3.0.5_all.deb ... Unpacking emacsen-common (3.0.5) ... Selecting previously unselected package install-info. Preparing to unpack .../074-install-info_7.1.1-1+b1_arm64.deb ... Unpacking install-info (7.1.1-1+b1) ... Selecting previously unselected package emacs-common. Preparing to unpack .../075-emacs-common_1%3a29.4+1-4_all.deb ... Unpacking emacs-common (1:29.4+1-4) ... Selecting previously unselected package emacs-bin-common. Preparing to unpack .../076-emacs-bin-common_1%3a29.4+1-4_arm64.deb ... Unpacking emacs-bin-common (1:29.4+1-4) ... Selecting previously unselected package libasound2-data. Preparing to unpack .../077-libasound2-data_1.2.12-1_all.deb ... Unpacking libasound2-data (1.2.12-1) ... Selecting previously unselected package libasound2t64:arm64. Preparing to unpack .../078-libasound2t64_1.2.12-1+b1_arm64.deb ... Unpacking libasound2t64:arm64 (1.2.12-1+b1) ... Selecting previously unselected package libdbus-1-3:arm64. Preparing to unpack .../079-libdbus-1-3_1.16.0-1_arm64.deb ... Unpacking libdbus-1-3:arm64 (1.16.0-1) ... Selecting previously unselected package libgccjit0:arm64. Preparing to unpack .../080-libgccjit0_14.2.0-11_arm64.deb ... Unpacking libgccjit0:arm64 (14.2.0-11) ... Selecting previously unselected package libidn2-0:arm64. Preparing to unpack .../081-libidn2-0_2.3.7-2+b1_arm64.deb ... Unpacking libidn2-0:arm64 (2.3.7-2+b1) ... Selecting previously unselected package libffi8:arm64. Preparing to unpack .../082-libffi8_3.4.6-1_arm64.deb ... Unpacking libffi8:arm64 (3.4.6-1) ... Selecting previously unselected package libp11-kit0:arm64. Preparing to unpack .../083-libp11-kit0_0.25.5-3_arm64.deb ... Unpacking libp11-kit0:arm64 (0.25.5-3) ... Selecting previously unselected package libtasn1-6:arm64. Preparing to unpack .../084-libtasn1-6_4.19.0-3+b3_arm64.deb ... Unpacking libtasn1-6:arm64 (4.19.0-3+b3) ... Selecting previously unselected package libgnutls30t64:arm64. Preparing to unpack .../085-libgnutls30t64_3.8.8-2_arm64.deb ... Unpacking libgnutls30t64:arm64 (3.8.8-2) ... Selecting previously unselected package libgpm2:arm64. Preparing to unpack .../086-libgpm2_1.20.7-11+b1_arm64.deb ... Unpacking libgpm2:arm64 (1.20.7-11+b1) ... Selecting previously unselected package liblcms2-2:arm64. Preparing to unpack .../087-liblcms2-2_2.16-2_arm64.deb ... Unpacking liblcms2-2:arm64 (2.16-2) ... Selecting previously unselected package libtree-sitter0:arm64. Preparing to unpack .../088-libtree-sitter0_0.20.8-2+b2_arm64.deb ... Unpacking libtree-sitter0:arm64 (0.20.8-2+b2) ... Selecting previously unselected package emacs-nox. Preparing to unpack .../089-emacs-nox_1%3a29.4+1-4_arm64.deb ... Unpacking emacs-nox (1:29.4+1-4) ... Selecting previously unselected package libarray-utils-perl. Preparing to unpack .../090-libarray-utils-perl_0.5-3_all.deb ... Unpacking libarray-utils-perl (0.5-3) ... Selecting previously unselected package libconfig-tiny-perl. Preparing to unpack .../091-libconfig-tiny-perl_2.30-1_all.deb ... Unpacking libconfig-tiny-perl (2.30-1) ... Selecting previously unselected package libnumber-compare-perl. Preparing to unpack .../092-libnumber-compare-perl_0.03-3_all.deb ... Unpacking libnumber-compare-perl (0.03-3) ... Selecting previously unselected package libtext-glob-perl. Preparing to unpack .../093-libtext-glob-perl_0.11-3_all.deb ... Unpacking libtext-glob-perl (0.11-3) ... Selecting previously unselected package libfile-find-rule-perl. Preparing to unpack .../094-libfile-find-rule-perl_0.34-3_all.deb ... Unpacking libfile-find-rule-perl (0.34-3) ... Selecting previously unselected package dh-elpa. Preparing to unpack .../095-dh-elpa_2.1.5_all.deb ... Unpacking dh-elpa (2.1.5) ... Selecting previously unselected package dh-elpa-helper. Preparing to unpack .../096-dh-elpa-helper_2.1.5_all.deb ... Unpacking dh-elpa-helper (2.1.5) ... Selecting previously unselected package elpa-faceup. Preparing to unpack .../097-elpa-faceup_0.0.4-7_all.deb ... Unpacking elpa-faceup (0.0.4-7) ... Selecting previously unselected package elpa-paredit. Preparing to unpack .../098-elpa-paredit_26-2_all.deb ... Unpacking elpa-paredit (26-2) ... Selecting previously unselected package elpa-pos-tip. Preparing to unpack .../099-elpa-pos-tip_0.4.6+git20191227-3_all.deb ... Unpacking elpa-pos-tip (0.4.6+git20191227-3) ... Selecting previously unselected package racket-common. Preparing to unpack .../100-racket-common_8.14+dfsg1-1_all.deb ... Unpacking racket-common (8.14+dfsg1-1) ... Selecting previously unselected package racket. Preparing to unpack .../101-racket_8.14+dfsg1-1_arm64.deb ... Unpacking racket (8.14+dfsg1-1) ... Setting up libapt-pkg-perl (0.1.40+b6) ... Setting up libarray-utils-perl (0.5-3) ... Setting up libpipeline1:arm64 (1.5.8-1) ... Setting up liblcms2-2:arm64 (2.16-2) ... Setting up libtie-ixhash-perl (1.23-4) ... Setting up libgpm2:arm64 (1.20.7-11+b1) ... Setting up libicu72:arm64 (72.1-5+b1) ... Setting up bsdextrautils (2.40.2-13) ... Setting up libtext-glob-perl (0.11-3) ... Setting up libmagic-mgc (1:5.45-3+b1) ... Setting up libclone-perl:arm64 (0.47-1+b1) ... Setting up libarchive-zip-perl (1.68-1) ... Setting up libio-stringy-perl (2.113-2) ... Setting up libhtml-tagset-perl (3.24-1) ... Setting up libdebhelper-perl (13.23) ... Setting up liblwp-mediatypes-perl (6.04-2) ... Setting up libmagic1t64:arm64 (1:5.45-3+b1) ... Setting up libtry-tiny-perl (0.32-1) ... Setting up perl-openssl-defaults:arm64 (7+b2) ... Setting up gettext-base (0.22.5-3) ... Setting up m4 (1.4.19-4) ... Setting up libencode-locale-perl (1.05-3) ... Setting up file (1:5.45-3+b1) ... Setting up libconfig-tiny-perl (2.30-1) ... Setting up libsub-install-perl (0.929-1) ... Setting up libelf1t64:arm64 (0.192-4) ... Setting up libnumber-compare-perl (0.03-3) ... Setting up liberror-perl (0.17029-2) ... Setting up libasound2-data (1.2.12-1) ... Setting up autotools-dev (20220109.1) ... Setting up libasound2t64:arm64 (1.2.12-1+b1) ... Setting up libtree-sitter0:arm64 (0.20.8-2+b2) ... Setting up emacsen-common (3.0.5) ... Setting up libfile-find-rule-perl (0.34-3) ... Setting up dh-elpa-helper (2.1.5) ... Setting up libdbus-1-3:arm64 (1.16.0-1) ... Setting up libunistring5:arm64 (1.3-1) ... Setting up libarray-unique-perl (0.09-1) ... Setting up libio-html-perl (1.004-3) ... Setting up autopoint (0.22.5-3) ... Setting up liblist-moreutils-xs-perl (0.430-4+b2) ... Setting up autoconf (2.72-3) ... Setting up libtimedate-perl (2.3300-2) ... Setting up libexporter-lite-perl (0.09-2) ... Setting up libsub-name-perl:arm64 (0.28-1) ... Setting up libffi8:arm64 (3.4.6-1) ... Setting up dwz (0.15-1+b1) ... Setting up sensible-utils (0.0.24) ... Setting up libuchardet0:arm64 (0.0.8-1+b2) ... Setting up libtasn1-6:arm64 (4.19.0-3+b3) ... Setting up netbase (6.4) ... Setting up install-info (7.1.1-1+b1) ... Setting up libexporter-tiny-perl (1.006002-1) ... Setting up libclass-accessor-perl (0.51-2) ... Setting up libgccjit0:arm64 (14.2.0-11) ... Setting up openssl (3.3.2-2) ... Setting up racket-common (8.14+dfsg1-1) ... Setting up libxml2:arm64 (2.12.7+dfsg+really2.9.14-0.2+b1) ... Setting up liburi-perl (5.30-1) ... Setting up elpa-faceup (0.0.4-7) ... Setting up libnet-ssleay-perl:arm64 (1.94-2) ... Setting up automake (1:1.16.5-1.3) ... update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode Setting up libfile-stripnondeterminism-perl (1.14.0-1) ... Setting up libhttp-date-perl (6.06-1) ... Setting up elpa-paredit (26-2) ... Setting up gettext (0.22.5-3) ... Setting up libfile-listing-perl (6.16-1) ... Setting up libtool (2.4.7-8) ... Setting up liblist-moreutils-perl (0.430-2) ... Setting up libnet-http-perl (6.23-1) ... Setting up libidn2-0:arm64 (2.3.7-2+b1) ... Setting up elpa-pos-tip (0.4.6+git20191227-3) ... Setting up intltool-debian (0.35.0+20060710.6) ... Setting up dh-autoreconf (20) ... Setting up ca-certificates (20241223) ... Updating certificates in /etc/ssl/certs... 152 added, 0 removed; done. Setting up libp11-kit0:arm64 (0.25.5-3) ... Setting up racket (8.14+dfsg1-1) ... Setting up dh-strip-nondeterminism (1.14.0-1) ... Setting up libwww-robotrules-perl (6.02-1) ... Setting up groff-base (1.23.0-7) ... Setting up libhtml-parser-perl:arm64 (3.83-1+b1) ... Setting up libio-socket-ssl-perl (2.089-1) ... Setting up libhttp-message-perl (7.00-2) ... Setting up libhtml-form-perl (6.12-1) ... Setting up libgnutls30t64:arm64 (3.8.8-2) ... Setting up libhttp-negotiate-perl (6.01-2) ... Setting up libhttp-cookies-perl (6.11-1) ... Setting up po-debconf (1.0.21+nmu1) ... Setting up libhtml-tree-perl (5.07-3) ... Setting up libcgi-pm-perl (4.66-1) ... Setting up man-db (2.13.0-1) ... Not building database; man-db/auto-update is not 'true'. Setting up debhelper (13.23) ... Setting up emacs-el (1:29.4+1-4) ... Setting up emacs-common (1:29.4+1-4) ... Setting up liblwp-protocol-https-perl (6.14-1) ... Setting up libwww-perl (6.77-1) ... Setting up libparse-debcontrol-perl (2.005-6) ... Setting up libwww-mechanize-perl (2.19-1) ... Setting up libdebian-source-perl (0.126) ... Setting up emacs-bin-common (1:29.4+1-4) ... update-alternatives: using /usr/bin/ctags.emacs to provide /usr/bin/ctags (ctags) in auto mode update-alternatives: using /usr/bin/ebrowse.emacs to provide /usr/bin/ebrowse (ebrowse) in auto mode update-alternatives: using /usr/bin/etags.emacs to provide /usr/bin/etags (etags) in auto mode Setting up emacs-nox (1:29.4+1-4) ... update-alternatives: using /usr/bin/emacs-nox to provide /usr/bin/emacs (emacs) in auto mode update-alternatives: using /usr/bin/emacs to provide /usr/bin/editor (editor) in auto mode update-alternatives: using /usr/bin/emacsclient.emacs to provide /usr/bin/emacsclient (emacsclient) in auto mode Install emacsen-common for emacs emacsen-common: Handling install of emacsen flavor emacs Install elpa-faceup for emacs install/faceup-0.0.4: Handling install of emacsen flavor emacs install/faceup-0.0.4: byte-compiling for emacs Install elpa-paredit for emacs install/paredit-26: Handling install of emacsen flavor emacs install/paredit-26: byte-compiling for emacs Install elpa-pos-tip for emacs install/pos-tip-0.4.6snapshot: Handling install of emacsen flavor emacs install/pos-tip-0.4.6snapshot: byte-compiling for emacs Setting up dh-elpa (2.1.5) ... Processing triggers for libc-bin (2.40-4) ... Processing triggers for ca-certificates (20241223) ... Updating certificates in /etc/ssl/certs... 0 added, 0 removed; done. Running hooks in /etc/ca-certificates/update.d... done. Reading package lists... Building dependency tree... Reading state information... Reading extended state information... Initializing package states... Writing extended state information... Building tag database... -> Finished parsing the build-deps I: Building the package I: Running cd /build/reproducible-path/racket-mode-20241217~git.3dc8c17/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-genchanges -S > ../racket-mode_20241217~git.3dc8c17-1_source.changes dpkg-buildpackage: info: source package racket-mode dpkg-buildpackage: info: source version 20241217~git.3dc8c17-1 dpkg-buildpackage: info: source distribution experimental dpkg-buildpackage: info: source changed by Sean Whitton dpkg-source --before-build . dpkg-buildpackage: info: host architecture arm64 dpkg-source: info: using options from racket-mode-20241217~git.3dc8c17/debian/source/options: --single-debian-patch debian/rules clean dh clean --with elpa dh_auto_clean make -j12 clean make[1]: Entering directory '/build/reproducible-path/racket-mode-20241217~git.3dc8c17' rm racket-back-end.elc racket-browse-url.elc racket-bug-report.elc racket-cmd.elc racket-collection.elc racket-common.elc racket-complete.elc racket-custom.elc racket-debug.elc racket-describe.elc racket-doc.elc racket-edit.elc racket-eldoc.elc racket-font-lock.elc racket-hash-lang.elc racket-imenu.elc racket-indent.elc racket-input.elc racket-keywords-and-builtins.elc racket-lisp-mode.elc racket-logger.elc racket-mode.elc racket-package.elc racket-parens.elc racket-ppss.elc racket-profile.elc racket-repl-buffer-name.elc racket-repl.elc racket-scribble-anchor.elc racket-scribble.elc racket-shell.elc racket-show.elc racket-smart-open.elc racket-stepper.elc racket-util.elc racket-visit.elc racket-wsl.elc racket-xp-complete.elc racket-xp.elc 2> /dev/null make[1]: [Makefile:36: clean] Error 1 (ignored) make[1]: Leaving directory '/build/reproducible-path/racket-mode-20241217~git.3dc8c17' dh_clean debian/rules binary dh binary --with elpa dh_update_autotools_config dh_autoreconf dh_auto_configure dh_auto_build make -j12 "INSTALL=install --strip-program=true" make[1]: Entering directory '/build/reproducible-path/racket-mode-20241217~git.3dc8c17' Targets: show-versions, clean, compile, deps, test, test-elisp, test-racket, test-slow make[1]: Leaving directory '/build/reproducible-path/racket-mode-20241217~git.3dc8c17' dh_elpa_test 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 \"CI\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" -l test/racket-tests.el --eval \(ert-run-tests-batch-and-exit\) Running 15 tests (2024-12-28 18:23:12+0000, selector `t') racket-test/unique-repls passed 1/15 racket-test/unique-repls (0.010809 sec) passed 2/15 racket-tests/cmd-read (5.886306 sec) racket-tests/debugger {racket-back-end-/} killed Test racket-tests/debugger backtrace: signal(ert-test-failed (((should racket-debug-mode) :form racket-debug-mode :value nil))) ert-fail(((should racket-debug-mode) :form racket-debug-mode :value nil)) (if (unwind-protect (setq value-906 racket-debug-mode) (setq form-description-907 (list '(should racket-debug-mode) :form 'racket-debug-mode :value value-906)) (ert--signal-should-execution form-description-907)) nil (ert-fail form-description-907)) (let (form-description-907) (if (unwind-protect (setq value-906 racket-debug-mode) (setq form-description-907 (list '(should racket-debug-mode) :form 'racket-debug-mode :value value-906)) (ert--signal-should-execution form-description-907)) nil (ert-fail form-description-907))) (let ((value-906 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-907) (if (unwind-protect (setq value-906 racket-debug-mode) (setq form-description-907 (list '(should racket-debug-mode) :form 'racket-debug-mode :value value-906)) (ert--signal-should-execution form-description-907)) nil (ert-fail form-description-907))) value-906) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-906 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-907) (if (unwind-protect (setq value-906 racket-debug-mode) (setq form-description-907 (list '... :form 'racket-debug-mode :value value-906)) (ert--signal-should-execution form-description-907)) nil (ert-fail form-description-907))) value-906)) (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-896 #'get-buffer) (args-897 (condition-case err (let ... ...) (error ...)))) (let ((value-898 'ert-form-evaluation-aborted-899)) (let (form-description-900) (if (unwind-protect ... ... ...) nil (ert-fail form-description-900))) value-898))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-901 #'racket--repl-session-id) (args-902 (condition-case err (let ... ...) (error ...)))) (let ((value-903 'ert-form-evaluation-aborted-904)) (let (form-description-905) (if (unwind-protect ... ... ...) nil (ert-fail form-description-905))) value-903))) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-906 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-907) (if (unwind-protect (setq value-906 racket-debug-mode) (setq form-description-907 ...) (ert--signal-should-execution form-description-907)) nil (ert-fail form-description-907))) value-906)) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-908 ...) (args-909 ...)) (let (...) (let ... ...) value-910)))) (let* ((fn-913 #'racket-tests/see-char-property) (args-914 (condition-case err (let (...) (list ... ... racket-debug-break-face)) (error (progn ... ...))))) (let ((value-915 'ert-form-evaluation-aborted-916)) (let (form-description-917) (if (unwind-protect (setq value-915 ...) (setq form-description-917 ...) (ert--signal-should-execution form-description-917)) nil (ert-fail form-description-917))) value-915)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-918 ...) (args-919 ...)) (let (...) (let ... ...) value-920)))) (let* ((fn-923 #'racket-tests/see-char-property) (args-924 (condition-case err (let (...) (list ... ... racket-debug-break-face)) (error (progn ... ...))))) (let ((value-925 'ert-form-evaluation-aborted-926)) (let (form-description-927) (if (unwind-protect (setq value-925 ...) (setq form-description-927 ...) (ert--signal-should-execution form-description-927)) nil (ert-fail form-description-927))) value-925)) (let* ((fn-928 #'racket-tests/see-char-property) (args-929 (condition-case err (let (...) (list ... ... ...)) (error (progn ... ...))))) (let ((value-930 'ert-form-evaluation-aborted-931)) (let (form-description-932) (if (unwind-protect (setq value-930 ...) (setq form-description-932 ...) (ert--signal-should-execution form-description-932)) nil (ert-fail form-description-932))) value-930)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-933 ...) (args-934 ...)) (let (...) (let ... ...) value-935)))) (let* ((fn-938 #'racket-tests/see-char-property) (args-939 (condition-case err (let (...) (list ... ... ...)) (error (progn ... ...))))) (let ((value-940 'ert-form-evaluation-aborted-941)) (let (form-description-942) (if (unwind-protect (setq value-940 ...) (setq form-description-942 ...) (ert--signal-should-execution form-description-942)) nil (ert-fail form-description-942))) value-940)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-943 ...) (args-944 ...)) (let (...) (let ... ...) value-945)))) (let* ((fn-948 #'racket-tests/see-char-property) (args-949 (condition-case err (let (...) (list ... ... nil)) (error (progn ... ...))))) (let ((value-950 'ert-form-evaluation-aborted-951)) (let (form-description-952) (if (unwind-protect (setq value-950 ...) (setq form-description-952 ...) (ert--signal-should-execution form-description-952)) nil (ert-fail form-description-952))) value-950)) (let ((value-953 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-954) (if (not (unwind-protect (setq value-953 racket-debug-mode) (setq form-description-954 ...) (ert--signal-should-execution form-description-954))) nil (ert-fail form-description-954))) value-953) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ((fn-955 ...) (args-956 ...)) (let (...) (let ... ...) value-957)) (kill-buffer)))) (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-894 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-895) (if (unwind-protect (setq value-894 (cond ... ...)) (setq form-description-895 (list ... :form ... :value value-894)) (ert--signal-should-execution form-description-895)) nil (ert-fail form-description-895))) value-894)) (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-896 #'get-buffer) (args-897 (condition-case err (let ... ...) (error ...)))) (let ((value-898 'ert-form-evaluation-aborted-899)) (let (form-description-900) (if (unwind-protect ... ... ...) nil (ert-fail form-description-900))) value-898))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-901 #'racket--repl-session-id) (args-902 (condition-case err (let ... ...) (error ...)))) (let ((value-903 'ert-form-evaluation-aborted-904)) (let (form-description-905) (if (unwind-protect ... ... ...) nil (ert-fail form-description-905))) value-903))) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-906 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-907) (if (unwind-protect (setq value-906 racket-debug-mode) (setq form-description-907 ...) (ert--signal-should-execution form-description-907)) nil (ert-fail form-description-907))) value-906)) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-908 ...) (args-909 ...)) (let (...) (let ... ...) value-910)))) (let* ((fn-913 #'racket-tests/see-char-property) (args-914 (condition-case err (let (...) (list ... ... racket-debug-break-face)) (error (progn ... ...))))) (let ((value-915 'ert-form-evaluation-aborted-916)) (let (form-description-917) (if (unwind-protect (setq value-915 ...) (setq form-description-917 ...) (ert--signal-should-execution form-description-917)) nil (ert-fail form-description-917))) value-915)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-918 ...) (args-919 ...)) (let (...) (let ... ...) value-920)))) (let* ((fn-923 #'racket-tests/see-char-property) (args-924 (condition-case err (let (...) (list ... ... racket-debug-break-face)) (error (progn ... ...))))) (let ((value-925 'ert-form-evaluation-aborted-926)) (let (form-description-927) (if (unwind-protect (setq value-925 ...) (setq form-description-927 ...) (ert--signal-should-execution form-description-927)) nil (ert-fail form-description-927))) value-925)) (let* ((fn-928 #'racket-tests/see-char-property) (args-929 (condition-case err (let (...) (list ... ... ...)) (error (progn ... ...))))) (let ((value-930 'ert-form-evaluation-aborted-931)) (let (form-description-932) (if (unwind-protect (setq value-930 ...) (setq form-description-932 ...) (ert--signal-should-execution form-description-932)) nil (ert-fail form-description-932))) value-930)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-933 ...) (args-934 ...)) (let (...) (let ... ...) value-935)))) (let* ((fn-938 #'racket-tests/see-char-property) (args-939 (condition-case err (let (...) (list ... ... ...)) (error (progn ... ...))))) (let ((value-940 'ert-form-evaluation-aborted-941)) (let (form-description-942) (if (unwind-protect (setq value-940 ...) (setq form-description-942 ...) (ert--signal-should-execution form-description-942)) nil (ert-fail form-description-942))) value-940)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-943 ...) (args-944 ...)) (let (...) (let ... ...) value-945)))) (let* ((fn-948 #'racket-tests/see-char-property) (args-949 (condition-case err (let (...) (list ... ... nil)) (error (progn ... ...))))) (let ((value-950 'ert-form-evaluation-aborted-951)) (let (form-description-952) (if (unwind-protect (setq value-950 ...) (setq form-description-952 ...) (ert--signal-should-execution form-description-952)) nil (ert-fail form-description-952))) value-950)) (let ((value-953 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-954) (if (not (unwind-protect (setq value-953 racket-debug-mode) (setq form-description-954 ...) (ert--signal-should-execution form-description-954))) nil (ert-fail form-description-954))) value-953) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ((fn-955 ...) (args-956 ...)) (let (...) (let ... ...) value-957)) (kill-buffer)))) (kill-buffer) (delete-file path)) (closure ((edit-mode . racket-mode)) 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 #'(lambda nil (cond (... ...) (... t)))) (let ((value-894 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-895) (if (unwind-protect (setq value-894 ...) (setq form-description-895 ...) (ert--signal-should-execution form-description-895)) nil (ert-fail form-description-895))) value-894)) (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-896 #'get-buffer) (args-897 (condition-case err ... ...))) (let ((value-898 ...)) (let (form-description-900) (if ... nil ...)) value-898))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-901 #'racket--repl-session-id) (args-902 (condition-case err ... ...))) (let ((value-903 ...)) (let (form-description-905) (if ... nil ...)) value-903))) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-906 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-907) (if (unwind-protect ... ... ...) nil (ert-fail form-description-907))) value-906)) (racket--call-with-repl-buffer #'(lambda nil (let* (... ...) (let ... ... value-910)))) (let* ((fn-913 #'racket-tests/see-char-property) (args-914 (condition-case err (let ... ...) (error ...)))) (let ((value-915 'ert-form-evaluation-aborted-916)) (let (form-description-917) (if (unwind-protect ... ... ...) nil (ert-fail form-description-917))) value-915)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* (... ...) (let ... ... value-920)))) (let* ((fn-923 #'racket-tests/see-char-property) (args-924 (condition-case err (let ... ...) (error ...)))) (let ((value-925 'ert-form-evaluation-aborted-926)) (let (form-description-927) (if (unwind-protect ... ... ...) nil (ert-fail form-description-927))) value-925)) (let* ((fn-928 #'racket-tests/see-char-property) (args-929 (condition-case err (let ... ...) (error ...)))) (let ((value-930 'ert-form-evaluation-aborted-931)) (let (form-description-932) (if (unwind-protect ... ... ...) nil (ert-fail form-description-932))) value-930)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* (... ...) (let ... ... value-935)))) (let* ((fn-938 #'racket-tests/see-char-property) (args-939 (condition-case err (let ... ...) (error ...)))) (let ((value-940 'ert-form-evaluation-aborted-941)) (let (form-description-942) (if (unwind-protect ... ... ...) nil (ert-fail form-description-942))) value-940)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* (... ...) (let ... ... value-945)))) (let* ((fn-948 #'racket-tests/see-char-property) (args-949 (condition-case err (let ... ...) (error ...)))) (let ((value-950 'ert-form-evaluation-aborted-951)) (let (form-description-952) (if (unwind-protect ... ... ...) nil (ert-fail form-description-952))) value-950)) (let ((value-953 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-954) (if (not (unwind-protect ... ... ...)) nil (ert-fail form-description-954))) value-953) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* (... ...) (let ... ... value-957)) (kill-buffer)))) (kill-buffer) (delete-file path)))() funcall((closure ((edit-mode . racket-mode)) 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 #'(lambda nil (cond ... ...))) (let ((value-894 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-895) (if (unwind-protect ... ... ...) nil (ert-fail form-description-895))) value-894)) (if (eq major-mode 'prog-mode) nil (racket-run '(16)) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-896 ...) (args-897 ...)) (let (...) (let ... ...) value-898))) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-901 ...) (args-902 ...)) (let (...) (let ... ...) value-903))) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-906 ...)) (let (form-description-907) (if ... nil ...)) value-906)) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-913 #'racket-tests/see-char-property) (args-914 (condition-case err ... ...))) (let ((value-915 ...)) (let (form-description-917) (if ... nil ...)) value-915)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-923 #'racket-tests/see-char-property) (args-924 (condition-case err ... ...))) (let ((value-925 ...)) (let (form-description-927) (if ... nil ...)) value-925)) (let* ((fn-928 #'racket-tests/see-char-property) (args-929 (condition-case err ... ...))) (let ((value-930 ...)) (let (form-description-932) (if ... nil ...)) value-930)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-938 #'racket-tests/see-char-property) (args-939 (condition-case err ... ...))) (let ((value-940 ...)) (let (form-description-942) (if ... nil ...)) value-940)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-948 #'racket-tests/see-char-property) (args-949 (condition-case err ... ...))) (let ((value-950 ...)) (let (form-description-952) (if ... nil ...)) value-950)) (let ((value-953 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-954) (if (not ...) nil (ert-fail form-description-954))) value-953) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ... ...) (kill-buffer)))) (kill-buffer) (delete-file path)))) (unwind-protect (funcall thunk) (racket-stop-back-end)) (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) racket-tests/call-with-back-end-settings((closure ((edit-mode . racket-mode)) 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 #'(lambda nil (cond ... ...))) (let ((value-894 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-895) (if (unwind-protect ... ... ...) nil (ert-fail form-description-895))) value-894)) (if (eq major-mode 'prog-mode) nil (racket-run '(16)) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-896 ...) (args-897 ...)) (let (...) (let ... ...) value-898))) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-901 ...) (args-902 ...)) (let (...) (let ... ...) value-903))) (progn (racket-tests/call-until-true #'(lambda nil racket-debug-mode)) (let ((value-906 ...)) (let (form-description-907) (if ... nil ...)) value-906)) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-913 #'racket-tests/see-char-property) (args-914 (condition-case err ... ...))) (let ((value-915 ...)) (let (form-description-917) (if ... nil ...)) value-915)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-923 #'racket-tests/see-char-property) (args-924 (condition-case err ... ...))) (let ((value-925 ...)) (let (form-description-927) (if ... nil ...)) value-925)) (let* ((fn-928 #'racket-tests/see-char-property) (args-929 (condition-case err ... ...))) (let ((value-930 ...)) (let (form-description-932) (if ... nil ...)) value-930)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-938 #'racket-tests/see-char-property) (args-939 (condition-case err ... ...))) (let ((value-940 ...)) (let (form-description-942) (if ... nil ...)) value-940)) (racket-debug-step) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...))) (let* ((fn-948 #'racket-tests/see-char-property) (args-949 (condition-case err ... ...))) (let ((value-950 ...)) (let (form-description-952) (if ... nil ...)) value-950)) (let ((value-953 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-954) (if (not ...) nil (ert-fail form-description-954))) value-953) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ... ...) (kill-buffer)))) (kill-buffer) (delete-file path)))) (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-894)) (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-906)) (racket--call-with-repl-buffer #'...) (let* (... ...) (let ... ... value-915)) (racket-debug-step) (racket--call-with-repl-buffer #'...) (let* (... ...) (let ... ... value-925)) (let* (... ...) (let ... ... value-930)) (racket-debug-step) (racket--call-with-repl-buffer #'...) (let* (... ...) (let ... ... value-940)) (racket-debug-step) (racket--call-with-repl-buffer #'...) (let* (... ...) (let ... ... value-950)) (let (...) (let ... ...) value-953) (racket--call-with-repl-buffer #'...)) (kill-buffer) (delete-file path)))) (setq tail (cdr tail))) (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-894)) (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-953) (racket--call-with-repl-buffer ...)) (kill-buffer) (delete-file path)))) (setq tail (cdr tail)))) (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))))) (closure (t) nil (message "racket-tests/debugger") (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* ... ... ... ... ... ... ... ...))) (setq tail (cdr tail))))))() ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/debugger :documentation nil :body (closure (t) nil (message "racket-tests/debugger") (let ... ...)) :most-recent-result #s(ert-test-failed :messages "racket-tests/debugger\n{racket-ba..." :should-forms (... ... ... ...) :duration 60.04623787 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :expected-result-type :passed :tags nil :file-name "/build/reproducible-path/racket-...") :result #s(ert-test-failed :messages "racket-tests/debugger\n{racket-ba..." :should-forms ((... :form ... :value t) (... :form ... :value #*>) (... :form ... :value 1) (... :form racket-debug-mode :value nil)) :duration 60.04623787 :condition (ert-test-failed (... :form racket-debug-mode :value nil)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals ... :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 ... :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 ... :args nil :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 nil :flags nil :locals nil :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 () #) :next-debugger debug :ert-debug-on-error nil)) ert-run-test(#s(ert-test :name racket-tests/debugger :documentation nil :body (closure (t) nil (message "racket-tests/debugger") (let ((tail ...)) (while tail (let ... ... ...)))) :most-recent-result #s(ert-test-failed :messages "racket-tests/debugger\n{racket-back-end..." :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 60.04623787 :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 (... ... ... ...) :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-906) :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 (closure ... nil ...) :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 (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 (closure ... nil ... ...) :args nil :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 (t #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 (nil) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args nil :flags nil :locals nil :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 "/build/reproducible-path/racket-mode-2...")) ert-run-or-rerun-test(#s(ert--stats :selector t :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 ... :most-recent-result ... :expected-result-type :passed :tags nil :file-name "/build/reprodu...") #f(compiled-function (event-type &rest event-args) #)) ert-run-tests(t #f(compiled-function (event-type &rest event-args) #) nil) ert-run-tests-batch(nil) ert-run-tests-batch-and-exit() command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"CI\" \"1\") (setq user-emacs-director..." "-l" "test/racket-tests.el" "--eval" "(ert-run-tests-batch-and-exit)")) command-line() normal-top-level() Test racket-tests/debugger condition: (ert-test-failed ((should racket-debug-mode) :form racket-debug-mode :value nil)) FAILED 3/15 racket-tests/debugger (60.046238 sec) at test/racket-tests.el:330 racket-tests/expand-expression {racket-back-end-/} killed Test racket-tests/expand-expression backtrace: signal(ert-test-failed (((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntestTyc4O6.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting...")))) ert-fail(((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntestTyc4O6.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting..."))) (if (unwind-protect (setq value-1017 (apply fn-1015 args-1016)) (setq form-description-1019 (nconc (list '(should (racket-tests/see-back ...))) (list :form (cons fn-1015 args-1016)) (if (eql value-1017 'ert-form-evaluation-aborted-1018) nil (list :value value-1017)) (if (eql value-1017 'ert-form-evaluation-aborted-1018) nil (let* ((-explainer- ...)) (if -explainer- (list :explanation ...) nil))))) (ert--signal-should-execution form-description-1019)) nil (ert-fail form-description-1019)) (let (form-description-1019) (if (unwind-protect (setq value-1017 (apply fn-1015 args-1016)) (setq form-description-1019 (nconc (list '(should ...)) (list :form (cons fn-1015 args-1016)) (if (eql value-1017 'ert-form-evaluation-aborted-1018) nil (list :value value-1017)) (if (eql value-1017 'ert-form-evaluation-aborted-1018) nil (let* (...) (if -explainer- ... nil))))) (ert--signal-should-execution form-description-1019)) nil (ert-fail form-description-1019))) (let ((value-1017 'ert-form-evaluation-aborted-1018)) (let (form-description-1019) (if (unwind-protect (setq value-1017 (apply fn-1015 args-1016)) (setq form-description-1019 (nconc (list '...) (list :form (cons fn-1015 args-1016)) (if (eql value-1017 ...) nil (list :value value-1017)) (if (eql value-1017 ...) nil (let* ... ...)))) (ert--signal-should-execution form-description-1019)) nil (ert-fail form-description-1019))) value-1017) (let* ((fn-1015 #'racket-tests/see-back) (args-1016 (condition-case err (let ((signal-hook-function #'ert--should-signal-hook)) (list (concat "\n" name "> "))) (error (progn (setq fn-1015 #'signal) (list (car err) (cdr err))))))) (let ((value-1017 'ert-form-evaluation-aborted-1018)) (let (form-description-1019) (if (unwind-protect (setq value-1017 (apply fn-1015 args-1016)) (setq form-description-1019 (nconc (list ...) (list :form ...) (if ... nil ...) (if ... nil ...))) (ert--signal-should-execution form-description-1019)) nil (ert-fail form-description-1019))) value-1017)) (closure ((name . "testTyc4O6.rkt")) nil (let* ((fn-1015 #'racket-tests/see-back) (args-1016 (condition-case err (let ((signal-hook-function ...)) (list (concat "\n" name "> "))) (error (progn (setq fn-1015 ...) (list ... ...)))))) (let ((value-1017 'ert-form-evaluation-aborted-1018)) (let (form-description-1019) (if (unwind-protect (setq value-1017 (apply fn-1015 args-1016)) (setq form-description-1019 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-1019)) nil (ert-fail form-description-1019))) value-1017)))() funcall((closure ((name . "testTyc4O6.rkt")) nil (let* ((fn-1015 #'racket-tests/see-back) (args-1016 (condition-case err (let (...) (list ...)) (error (progn ... ...))))) (let ((value-1017 'ert-form-evaluation-aborted-1018)) (let (form-description-1019) (if (unwind-protect (setq value-1017 ...) (setq form-description-1019 ...) (ert--signal-should-execution form-description-1019)) nil (ert-fail form-description-1019))) value-1017)))) (save-current-buffer (set-buffer buf) (funcall thunk)) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk))))) (let* ((val (get-buffer name))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk)))))) (let ((name val)) (let* ((val (get-buffer name))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk))))))) (if (stringp val) (let ((name val)) (let* ((val (get-buffer name))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk)))))))) (let* ((val (if (eq major-mode 'racket-repl-mode) (buffer-name) racket-repl-buffer-name))) (if (stringp val) (let ((name val)) (let* ((val (get-buffer name))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let (...) (save-current-buffer ... ...)))))))) racket--call-with-repl-buffer((closure ((name . "testTyc4O6.rkt")) nil (let* ((fn-1015 #'racket-tests/see-back) (args-1016 (condition-case err (let (...) (list ...)) (error (progn ... ...))))) (let ((value-1017 'ert-form-evaluation-aborted-1018)) (let (form-description-1019) (if (unwind-protect (setq value-1017 ...) (setq form-description-1019 ...) (ert--signal-should-execution form-description-1019)) nil (ert-fail form-description-1019))) value-1017)))) (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-1005 #'get-buffer) (args-1006 (condition-case err (let (...) (list racket-repl-buffer-name)) (error (progn ... ...))))) (let ((value-1007 'ert-form-evaluation-aborted-1008)) (let (form-description-1009) (if (unwind-protect (setq value-1007 ...) (setq form-description-1009 ...) (ert--signal-should-execution form-description-1009)) nil (ert-fail form-description-1009))) value-1007))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-1010 #'racket--repl-session-id) (args-1011 (condition-case err (let (...) (list)) (error (progn ... ...))))) (let ((value-1012 'ert-form-evaluation-aborted-1013)) (let (form-description-1014) (if (unwind-protect (setq value-1012 ...) (setq form-description-1014 ...) (ert--signal-should-execution form-description-1014)) nil (ert-fail form-description-1014))) value-1012))) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-1015 #'racket-tests/see-back) (args-1016 (condition-case err ... ...))) (let ((value-1017 ...)) (let (form-description-1019) (if ... nil ...)) value-1017)))) (goto-char (point-max)) (racket-expand-last-sexp 4) (set-buffer "*Racket Stepper *") (let* ((fn-1020 #'eq) (args-1021 (condition-case err (let ((signal-hook-function ...)) (list major-mode 'racket-stepper-mode)) (error (progn (setq fn-1020 ...) (list ... ...)))))) (let ((value-1022 'ert-form-evaluation-aborted-1023)) (let (form-description-1024) (if (unwind-protect (setq value-1022 (apply fn-1020 args-1021)) (setq form-description-1024 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-1024)) nil (ert-fail form-description-1024))) value-1022)) (let* ((fn-1025 #'equal) (args-1026 (condition-case err (let ((signal-hook-function ...)) (list header-line-format "Press RET to step. C-u RET to step all. C-h m to s...")) (error (progn (setq fn-1025 ...) (list ... ...)))))) (let ((value-1027 'ert-form-evaluation-aborted-1028)) (let (form-description-1029) (if (unwind-protect (setq value-1027 (apply fn-1025 args-1026)) (setq form-description-1029 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-1029)) nil (ert-fail form-description-1029))) value-1027)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-original))) (let* ((fn-1030 #'faceup-test-font-lock-buffer) (args-1031 (condition-case err (let (...) (list nil racket-tests/expand-expression-original)) (error (progn ... ...))))) (let ((value-1032 'ert-form-evaluation-aborted-1033)) (let (form-description-1034) (if (unwind-protect (setq value-1032 ...) (setq form-description-1034 ...) (ert--signal-should-execution form-description-1034)) nil (ert-fail form-description-1034))) value-1032))) (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-1035 #'faceup-test-font-lock-buffer) (args-1036 (condition-case err (let (...) (list nil racket-tests/expand-expression-final)) (error (progn ... ...))))) (let ((value-1037 'ert-form-evaluation-aborted-1038)) (let (form-description-1039) (if (unwind-protect (setq value-1037 ...) (setq form-description-1039 ...) (ert--signal-should-execution form-description-1039)) nil (ert-fail form-description-1039))) value-1037))) (quit-window) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ((fn-1040 #'racket-tests/see-back) (args-1041 (condition-case err ... ...))) (let ((value-1042 ...)) (let (form-description-1044) (if ... nil ...)) value-1042)) (kill-buffer))) (kill-buffer) (delete-file path)) (closure (t) nil (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-1005 #'get-buffer) (args-1006 (condition-case err (let ... ...) (error ...)))) (let ((value-1007 'ert-form-evaluation-aborted-1008)) (let (form-description-1009) (if (unwind-protect ... ... ...) nil (ert-fail form-description-1009))) value-1007))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-1010 #'racket--repl-session-id) (args-1011 (condition-case err (let ... ...) (error ...)))) (let ((value-1012 'ert-form-evaluation-aborted-1013)) (let (form-description-1014) (if (unwind-protect ... ... ...) nil (ert-fail form-description-1014))) value-1012))) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-1015 ...) (args-1016 ...)) (let (...) (let ... ...) value-1017)))) (goto-char (point-max)) (racket-expand-last-sexp 4) (set-buffer "*Racket Stepper *") (let* ((fn-1020 #'eq) (args-1021 (condition-case err (let (...) (list major-mode ...)) (error (progn ... ...))))) (let ((value-1022 'ert-form-evaluation-aborted-1023)) (let (form-description-1024) (if (unwind-protect (setq value-1022 ...) (setq form-description-1024 ...) (ert--signal-should-execution form-description-1024)) nil (ert-fail form-description-1024))) value-1022)) (let* ((fn-1025 #'equal) (args-1026 (condition-case err (let (...) (list header-line-format "Press RET to step. C-u RET to step all. C-h m to s...")) (error (progn ... ...))))) (let ((value-1027 'ert-form-evaluation-aborted-1028)) (let (form-description-1029) (if (unwind-protect (setq value-1027 ...) (setq form-description-1029 ...) (ert--signal-should-execution form-description-1029)) nil (ert-fail form-description-1029))) value-1027)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-original))) (let* ((fn-1030 #'faceup-test-font-lock-buffer) (args-1031 (condition-case err (let ... ...) (error ...)))) (let ((value-1032 'ert-form-evaluation-aborted-1033)) (let (form-description-1034) (if (unwind-protect ... ... ...) nil (ert-fail form-description-1034))) value-1032))) (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-1035 #'faceup-test-font-lock-buffer) (args-1036 (condition-case err (let ... ...) (error ...)))) (let ((value-1037 'ert-form-evaluation-aborted-1038)) (let (form-description-1039) (if (unwind-protect ... ... ...) nil (ert-fail form-description-1039))) value-1037))) (quit-window) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* ((fn-1040 ...) (args-1041 ...)) (let (...) (let ... ...) value-1042)) (kill-buffer))) (kill-buffer) (delete-file path)))() funcall((closure (t) nil (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-1005 #'get-buffer) (args-1006 (condition-case err ... ...))) (let ((value-1007 ...)) (let (form-description-1009) (if ... nil ...)) value-1007))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-1010 #'racket--repl-session-id) (args-1011 (condition-case err ... ...))) (let ((value-1012 ...)) (let (form-description-1014) (if ... nil ...)) value-1012))) (racket--call-with-repl-buffer #'(lambda nil (let* (... ...) (let ... ... value-1017)))) (goto-char (point-max)) (racket-expand-last-sexp 4) (set-buffer "*Racket Stepper *") (let* ((fn-1020 #'eq) (args-1021 (condition-case err (let ... ...) (error ...)))) (let ((value-1022 'ert-form-evaluation-aborted-1023)) (let (form-description-1024) (if (unwind-protect ... ... ...) nil (ert-fail form-description-1024))) value-1022)) (let* ((fn-1025 #'equal) (args-1026 (condition-case err (let ... ...) (error ...)))) (let ((value-1027 'ert-form-evaluation-aborted-1028)) (let (form-description-1029) (if (unwind-protect ... ... ...) nil (ert-fail form-description-1029))) value-1027)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-original))) (let* ((fn-1030 #'faceup-test-font-lock-buffer) (args-1031 (condition-case err ... ...))) (let ((value-1032 ...)) (let (form-description-1034) (if ... nil ...)) value-1032))) (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-1035 #'faceup-test-font-lock-buffer) (args-1036 (condition-case err ... ...))) (let ((value-1037 ...)) (let (form-description-1039) (if ... nil ...)) value-1037))) (quit-window) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* (... ...) (let ... ... value-1042)) (kill-buffer))) (kill-buffer) (delete-file path)))) (unwind-protect (funcall thunk) (racket-stop-back-end)) (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) racket-tests/call-with-back-end-settings((closure (t) nil (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-1005 #'get-buffer) (args-1006 (condition-case err ... ...))) (let ((value-1007 ...)) (let (form-description-1009) (if ... nil ...)) value-1007))) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-1010 #'racket--repl-session-id) (args-1011 (condition-case err ... ...))) (let ((value-1012 ...)) (let (form-description-1014) (if ... nil ...)) value-1012))) (racket--call-with-repl-buffer #'(lambda nil (let* (... ...) (let ... ... value-1017)))) (goto-char (point-max)) (racket-expand-last-sexp 4) (set-buffer "*Racket Stepper *") (let* ((fn-1020 #'eq) (args-1021 (condition-case err (let ... ...) (error ...)))) (let ((value-1022 'ert-form-evaluation-aborted-1023)) (let (form-description-1024) (if (unwind-protect ... ... ...) nil (ert-fail form-description-1024))) value-1022)) (let* ((fn-1025 #'equal) (args-1026 (condition-case err (let ... ...) (error ...)))) (let ((value-1027 'ert-form-evaluation-aborted-1028)) (let (form-description-1029) (if (unwind-protect ... ... ...) nil (ert-fail form-description-1029))) value-1027)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-expression-original))) (let* ((fn-1030 #'faceup-test-font-lock-buffer) (args-1031 (condition-case err ... ...))) (let ((value-1032 ...)) (let (form-description-1034) (if ... nil ...)) value-1032))) (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-1035 #'faceup-test-font-lock-buffer) (args-1036 (condition-case err ... ...))) (let ((value-1037 ...)) (let (form-description-1039) (if ... nil ...)) value-1037))) (quit-window) (racket--call-with-repl-buffer #'(lambda nil (racket-repl-exit) (let* (... ...) (let ... ... value-1042)) (kill-buffer))) (kill-buffer) (delete-file path)))) (closure (t) nil (message "racket-tests/expand-expression") (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(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-1007))) (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-1012))) (racket--call-with-repl-buffer #'(lambda nil ...)) (goto-char (point-max)) (racket-expand-last-sexp 4) (set-buffer "*Racket Stepper *") (let* ((fn-1020 ...) (args-1021 ...)) (let (...) (let ... ...) value-1022)) (let* ((fn-1025 ...) (args-1026 ...)) (let (...) (let ... ...) value-1027)) (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-1032))) (racket-tests/press "C-u RET") (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-1037))) (quit-window) (racket--call-with-repl-buffer #'(lambda nil ... ... ...)) (kill-buffer) (delete-file path)))))() ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/expand-expression :documentation nil :body (closure (t) nil (message "racket-tests/expand-expression") (racket-tests/call-with-back-end-settings ...)) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-expression\n{..." :should-forms (... ... ...) :duration 60.040951966 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :expected-result-type (satisfies racket-tests/expected-result-for-expand-expression-p) :tags nil :file-name "/build/reproducible-path/racket-...") :result #s(ert-test-failed :messages "racket-tests/expand-expression\n{..." :should-forms ((... :form ... :value #*>) (... :form ... :value 2) (... :form ... :value nil :explanation ...)) :duration 60.040951966 :condition (ert-test-failed (... :form ... :value nil :explanation ...)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals ... :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 ... :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 save-current-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 nil :fun cond :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 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 racket--call-with-repl-buffer :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 ... :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 ... :args nil :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 nil :flags nil :locals nil :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 () #) :next-debugger debug :ert-debug-on-error nil)) ert-run-test(#s(ert-test :name racket-tests/expand-expression :documentation nil :body (closure (t) nil (message "racket-tests/expand-expression") (racket-tests/call-with-back-end-settings #'(lambda nil ...))) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-expression\n{racket..." :should-forms (((should ...) :form (get-buffer "*Racket REPL *") :value #*>) ((should ...) :form (racket--repl-session-id) :value 2) ((should ...) :form (racket-tests/see-back "\ntestTyc4O6.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stop..."))) :duration 60.040951966 :condition (ert-test-failed ((should ...) :form (racket-tests/see-back "\ntestTyc4O6.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stop..."))) :backtrace (#s(backtrace-frame :evald t :fun signal :args (ert-test-failed ...) :flags nil :locals (... ... ... ...) :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-1017) :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 (closure ... nil ...) :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 save-current-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 nil :fun cond :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 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 racket--call-with-repl-buffer :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 (closure ... nil ...) :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 (closure ... nil ... ...) :args nil :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 (t #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 (nil) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args nil :flags nil :locals nil :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 "/build/reproducible-path/racket-mode-2...")) ert-run-or-rerun-test(#s(ert--stats :selector t :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 ... :most-recent-result ... :expected-result-type ... :tags nil :file-name "/build/reprodu...") #f(compiled-function (event-type &rest event-args) #)) ert-run-tests(t #f(compiled-function (event-type &rest event-args) #) nil) ert-run-tests-batch(nil) ert-run-tests-batch-and-exit() command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"CI\" \"1\") (setq user-emacs-director..." "-l" "test/racket-tests.el" "--eval" "(ert-run-tests-batch-and-exit)")) command-line() normal-top-level() Test racket-tests/expand-expression condition: (ert-test-failed ((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntestTyc4O6.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting back end...\n"))) FAILED 4/15 racket-tests/expand-expression (60.040952 sec) at test/racket-tests.el:1 racket-tests/expand-file-deep {racket-back-end-/} killed Test racket-tests/expand-file-deep backtrace: 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:Or...") :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 ...") (nil)) (on-line 5 ("") (nil)) (on-line 6 ("") (nil)))))) 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:Or...") :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 ...") (nil)) (on-line 5 ("") (nil)) (on-line 6 ("") (nil))))) (if (unwind-protect (setq value-992 (apply fn-990 args-991)) (setq form-description-994 (nconc (list '(should (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (list :form (cons fn-990 args-991)) (if (eql value-992 'ert-form-evaluation-aborted-993) nil (list :value value-992)) (if (eql value-992 'ert-form-evaluation-aborted-993) nil (let* ((-explainer- ...)) (if -explainer- (list :explanation ...) nil))))) (ert--signal-should-execution form-description-994)) nil (ert-fail form-description-994)) (let (form-description-994) (if (unwind-protect (setq value-992 (apply fn-990 args-991)) (setq form-description-994 (nconc (list '(should ...)) (list :form (cons fn-990 args-991)) (if (eql value-992 'ert-form-evaluation-aborted-993) nil (list :value value-992)) (if (eql value-992 'ert-form-evaluation-aborted-993) nil (let* (...) (if -explainer- ... nil))))) (ert--signal-should-execution form-description-994)) nil (ert-fail form-description-994))) (let ((value-992 'ert-form-evaluation-aborted-993)) (let (form-description-994) (if (unwind-protect (setq value-992 (apply fn-990 args-991)) (setq form-description-994 (nconc (list '...) (list :form (cons fn-990 args-991)) (if (eql value-992 ...) nil (list :value value-992)) (if (eql value-992 ...) nil (let* ... ...)))) (ert--signal-should-execution form-description-994)) nil (ert-fail form-description-994))) value-992) (let* ((fn-990 #'faceup-test-font-lock-buffer) (args-991 (condition-case err (let ((signal-hook-function #'ert--should-signal-hook)) (list nil racket-tests/expand-deep-0)) (error (progn (setq fn-990 #'signal) (list (car err) (cdr err))))))) (let ((value-992 'ert-form-evaluation-aborted-993)) (let (form-description-994) (if (unwind-protect (setq value-992 (apply fn-990 args-991)) (setq form-description-994 (nconc (list ...) (list :form ...) (if ... nil ...) (if ... nil ...))) (ert--signal-should-execution form-description-994)) nil (ert-fail form-description-994))) value-992)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (let* ((fn-990 #'faceup-test-font-lock-buffer) (args-991 (condition-case err (let ((signal-hook-function ...)) (list nil racket-tests/expand-deep-0)) (error (progn (setq fn-990 ...) (list ... ...)))))) (let ((value-992 'ert-form-evaluation-aborted-993)) (let (form-description-994) (if (unwind-protect (setq value-992 (apply fn-990 args-991)) (setq form-description-994 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-994)) nil (ert-fail form-description-994))) value-992))) (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-980 #'eq) (args-981 (condition-case err (let ((signal-hook-function ...)) (list major-mode 'racket-stepper-mode)) (error (progn (setq fn-980 ...) (list ... ...)))))) (let ((value-982 'ert-form-evaluation-aborted-983)) (let (form-description-984) (if (unwind-protect (setq value-982 (apply fn-980 args-981)) (setq form-description-984 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-984)) nil (ert-fail form-description-984))) value-982)) (let* ((fn-985 #'equal) (args-986 (condition-case err (let ((signal-hook-function ...)) (list header-line-format "Press RET to step. C-u RET to step all. C-h m to s...")) (error (progn (setq fn-985 ...) (list ... ...)))))) (let ((value-987 'ert-form-evaluation-aborted-988)) (let (form-description-989) (if (unwind-protect (setq value-987 (apply fn-985 args-986)) (setq form-description-989 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-989)) nil (ert-fail form-description-989))) value-987)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (let* ((fn-990 #'faceup-test-font-lock-buffer) (args-991 (condition-case err (let (...) (list nil racket-tests/expand-deep-0)) (error (progn ... ...))))) (let ((value-992 'ert-form-evaluation-aborted-993)) (let (form-description-994) (if (unwind-protect (setq value-992 ...) (setq form-description-994 ...) (ert--signal-should-execution form-description-994)) nil (ert-fail form-description-994))) value-992))) (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-995 #'faceup-test-font-lock-buffer) (args-996 (condition-case err (let (...) (list nil racket-tests/expand-deep-1)) (error (progn ... ...))))) (let ((value-997 'ert-form-evaluation-aborted-998)) (let (form-description-999) (if (unwind-protect (setq value-997 ...) (setq form-description-999 ...) (ert--signal-should-execution form-description-999)) nil (ert-fail form-description-999))) value-997))) (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-1000 #'faceup-test-font-lock-buffer) (args-1001 (condition-case err (let (...) (list nil racket-tests/expand-deep-2)) (error (progn ... ...))))) (let ((value-1002 'ert-form-evaluation-aborted-1003)) (let (form-description-1004) (if (unwind-protect (setq value-1002 ...) (setq form-description-1004 ...) (ert--signal-should-execution form-description-1004)) nil (ert-fail form-description-1004))) value-1002))) (kill-buffer) (delete-file path)) (closure (t) nil (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-980 #'eq) (args-981 (condition-case err (let (...) (list major-mode ...)) (error (progn ... ...))))) (let ((value-982 'ert-form-evaluation-aborted-983)) (let (form-description-984) (if (unwind-protect (setq value-982 ...) (setq form-description-984 ...) (ert--signal-should-execution form-description-984)) nil (ert-fail form-description-984))) value-982)) (let* ((fn-985 #'equal) (args-986 (condition-case err (let (...) (list header-line-format "Press RET to step. C-u RET to step all. C-h m to s...")) (error (progn ... ...))))) (let ((value-987 'ert-form-evaluation-aborted-988)) (let (form-description-989) (if (unwind-protect (setq value-987 ...) (setq form-description-989 ...) (ert--signal-should-execution form-description-989)) nil (ert-fail form-description-989))) value-987)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (let* ((fn-990 #'faceup-test-font-lock-buffer) (args-991 (condition-case err (let ... ...) (error ...)))) (let ((value-992 'ert-form-evaluation-aborted-993)) (let (form-description-994) (if (unwind-protect ... ... ...) nil (ert-fail form-description-994))) value-992))) (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-995 #'faceup-test-font-lock-buffer) (args-996 (condition-case err (let ... ...) (error ...)))) (let ((value-997 'ert-form-evaluation-aborted-998)) (let (form-description-999) (if (unwind-protect ... ... ...) nil (ert-fail form-description-999))) value-997))) (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-1000 #'faceup-test-font-lock-buffer) (args-1001 (condition-case err (let ... ...) (error ...)))) (let ((value-1002 'ert-form-evaluation-aborted-1003)) (let (form-description-1004) (if (unwind-protect ... ... ...) nil (ert-fail form-description-1004))) value-1002))) (kill-buffer) (delete-file path)))() funcall((closure (t) nil (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-980 #'eq) (args-981 (condition-case err (let ... ...) (error ...)))) (let ((value-982 'ert-form-evaluation-aborted-983)) (let (form-description-984) (if (unwind-protect ... ... ...) nil (ert-fail form-description-984))) value-982)) (let* ((fn-985 #'equal) (args-986 (condition-case err (let ... ...) (error ...)))) (let ((value-987 'ert-form-evaluation-aborted-988)) (let (form-description-989) (if (unwind-protect ... ... ...) nil (ert-fail form-description-989))) value-987)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (let* ((fn-990 #'faceup-test-font-lock-buffer) (args-991 (condition-case err ... ...))) (let ((value-992 ...)) (let (form-description-994) (if ... nil ...)) value-992))) (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-995 #'faceup-test-font-lock-buffer) (args-996 (condition-case err ... ...))) (let ((value-997 ...)) (let (form-description-999) (if ... nil ...)) value-997))) (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-1000 #'faceup-test-font-lock-buffer) (args-1001 (condition-case err ... ...))) (let ((value-1002 ...)) (let (form-description-1004) (if ... nil ...)) value-1002))) (kill-buffer) (delete-file path)))) (unwind-protect (funcall thunk) (racket-stop-back-end)) (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) racket-tests/call-with-back-end-settings((closure (t) nil (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-980 #'eq) (args-981 (condition-case err (let ... ...) (error ...)))) (let ((value-982 'ert-form-evaluation-aborted-983)) (let (form-description-984) (if (unwind-protect ... ... ...) nil (ert-fail form-description-984))) value-982)) (let* ((fn-985 #'equal) (args-986 (condition-case err (let ... ...) (error ...)))) (let ((value-987 'ert-form-evaluation-aborted-988)) (let (form-description-989) (if (unwind-protect ... ... ...) nil (ert-fail form-description-989))) value-987)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-deep-0))) (let* ((fn-990 #'faceup-test-font-lock-buffer) (args-991 (condition-case err ... ...))) (let ((value-992 ...)) (let (form-description-994) (if ... nil ...)) value-992))) (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-995 #'faceup-test-font-lock-buffer) (args-996 (condition-case err ... ...))) (let ((value-997 ...)) (let (form-description-999) (if ... nil ...)) value-997))) (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-1000 #'faceup-test-font-lock-buffer) (args-1001 (condition-case err ... ...))) (let ((value-1002 ...)) (let (form-description-1004) (if ... nil ...)) value-1002))) (kill-buffer) (delete-file path)))) (closure (t) nil (message "racket-tests/expand-file-deep") (racket-tests/call-with-back-end-settings #'(lambda nil (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-980 ...) (args-981 ...)) (let (...) (let ... ...) value-982)) (let* ((fn-985 ...) (args-986 ...)) (let (...) (let ... ...) value-987)) (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-992))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-997))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-1002))) (kill-buffer) (delete-file path)))))() ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/expand-file-deep :documentation nil :body (closure (t) nil (message "racket-tests/expand-file-deep") (racket-tests/call-with-back-end-settings ...)) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-file-deep\n{r..." :should-forms (... ... ...) :duration 60.06365487 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :expected-result-type (satisfies racket-tests/expected-result-for-expand-file-p) :tags nil :file-name "/build/reproducible-path/racket-...") :result #s(ert-test-failed :messages "racket-tests/expand-file-deep\n{r..." :should-forms ((... :form ... :value t) (... :form ... :value t :explanation nil) (... :form ... :value nil :explanation ...)) :duration 60.06365487 :condition (ert-test-failed (... :form ... :value nil :explanation ...)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals ... :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 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 ... :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 ... :args nil :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 nil :flags nil :locals nil :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 () #) :next-debugger debug :ert-debug-on-error nil)) ert-run-test(#s(ert-test :name racket-tests/expand-file-deep :documentation nil :body (closure (t) nil (message "racket-tests/expand-file-deep") (racket-tests/call-with-back-end-settings #'(lambda nil ...))) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-file-deep\n{racket-..." :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..." "Press RET to step. C-u RET to step all...") :value t :explanation nil) ((should ...) :form (faceup-test-font-lock-buffer nil "«f:macro hiding disabled by command pr...") :value nil :explanation (2 6 number-of-lines-differ ... ... ... ... ...))) :duration 60.06365487 :condition (ert-test-failed ((should ...) :form (faceup-test-font-lock-buffer nil "«f:macro hiding disabled by command pr...") :value nil :explanation (2 6 number-of-lines-differ ... ... ... ... ...))) :backtrace (#s(backtrace-frame :evald t :fun signal :args (ert-test-failed ...) :flags nil :locals (... ... ... ...) :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-992) :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 (closure ... nil ...) :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 (closure ... nil ... ...) :args nil :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 (t #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 (nil) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args nil :flags nil :locals nil :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 "/build/reproducible-path/racket-mode-2...")) ert-run-or-rerun-test(#s(ert--stats :selector t :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 ... :most-recent-result ... :expected-result-type ... :tags nil :file-name "/build/reprodu...") #f(compiled-function (event-type &rest event-args) #)) ert-run-tests(t #f(compiled-function (event-type &rest event-args) #) nil) ert-run-tests-batch(nil) ert-run-tests-batch-and-exit() command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"CI\" \"1\") (setq user-emacs-director..." "-l" "test/racket-tests.el" "--eval" "(ert-run-tests-batch-and-exit)")) command-line() normal-top-level() Test racket-tests/expand-file-deep condition: (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))))) FAILED 5/15 racket-tests/expand-file-deep (60.063655 sec) at test/racket-tests.el:1 racket-tests/expand-file-shallow {racket-back-end-/} killed Test racket-tests/expand-file-shallow backtrace: 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:Origi...") :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 ...") (nil)) (on-line 5 ("") (nil)) (on-line 6 ("") (nil)))))) 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:Origi...") :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 ...") (nil)) (on-line 5 ("") (nil)) (on-line 6 ("") (nil))))) (if (unwind-protect (setq value-972 (apply fn-970 args-971)) (setq form-description-974 (nconc (list '(should (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (list :form (cons fn-970 args-971)) (if (eql value-972 'ert-form-evaluation-aborted-973) nil (list :value value-972)) (if (eql value-972 'ert-form-evaluation-aborted-973) nil (let* ((-explainer- ...)) (if -explainer- (list :explanation ...) nil))))) (ert--signal-should-execution form-description-974)) nil (ert-fail form-description-974)) (let (form-description-974) (if (unwind-protect (setq value-972 (apply fn-970 args-971)) (setq form-description-974 (nconc (list '(should ...)) (list :form (cons fn-970 args-971)) (if (eql value-972 'ert-form-evaluation-aborted-973) nil (list :value value-972)) (if (eql value-972 'ert-form-evaluation-aborted-973) nil (let* (...) (if -explainer- ... nil))))) (ert--signal-should-execution form-description-974)) nil (ert-fail form-description-974))) (let ((value-972 'ert-form-evaluation-aborted-973)) (let (form-description-974) (if (unwind-protect (setq value-972 (apply fn-970 args-971)) (setq form-description-974 (nconc (list '...) (list :form (cons fn-970 args-971)) (if (eql value-972 ...) nil (list :value value-972)) (if (eql value-972 ...) nil (let* ... ...)))) (ert--signal-should-execution form-description-974)) nil (ert-fail form-description-974))) value-972) (let* ((fn-970 #'faceup-test-font-lock-buffer) (args-971 (condition-case err (let ((signal-hook-function #'ert--should-signal-hook)) (list nil racket-tests/expand-shallow-0)) (error (progn (setq fn-970 #'signal) (list (car err) (cdr err))))))) (let ((value-972 'ert-form-evaluation-aborted-973)) (let (form-description-974) (if (unwind-protect (setq value-972 (apply fn-970 args-971)) (setq form-description-974 (nconc (list ...) (list :form ...) (if ... nil ...) (if ... nil ...))) (ert--signal-should-execution form-description-974)) nil (ert-fail form-description-974))) value-972)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (let* ((fn-970 #'faceup-test-font-lock-buffer) (args-971 (condition-case err (let ((signal-hook-function ...)) (list nil racket-tests/expand-shallow-0)) (error (progn (setq fn-970 ...) (list ... ...)))))) (let ((value-972 'ert-form-evaluation-aborted-973)) (let (form-description-974) (if (unwind-protect (setq value-972 (apply fn-970 args-971)) (setq form-description-974 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-974)) nil (ert-fail form-description-974))) value-972))) (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-960 #'eq) (args-961 (condition-case err (let ((signal-hook-function ...)) (list major-mode 'racket-stepper-mode)) (error (progn (setq fn-960 ...) (list ... ...)))))) (let ((value-962 'ert-form-evaluation-aborted-963)) (let (form-description-964) (if (unwind-protect (setq value-962 (apply fn-960 args-961)) (setq form-description-964 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-964)) nil (ert-fail form-description-964))) value-962)) (let* ((fn-965 #'equal) (args-966 (condition-case err (let ((signal-hook-function ...)) (list header-line-format "Press RET to step. C-u RET to step all. C-h m to s...")) (error (progn (setq fn-965 ...) (list ... ...)))))) (let ((value-967 'ert-form-evaluation-aborted-968)) (let (form-description-969) (if (unwind-protect (setq value-967 (apply fn-965 args-966)) (setq form-description-969 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-969)) nil (ert-fail form-description-969))) value-967)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (let* ((fn-970 #'faceup-test-font-lock-buffer) (args-971 (condition-case err (let (...) (list nil racket-tests/expand-shallow-0)) (error (progn ... ...))))) (let ((value-972 'ert-form-evaluation-aborted-973)) (let (form-description-974) (if (unwind-protect (setq value-972 ...) (setq form-description-974 ...) (ert--signal-should-execution form-description-974)) nil (ert-fail form-description-974))) value-972))) (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-975 #'faceup-test-font-lock-buffer) (args-976 (condition-case err (let (...) (list nil racket-tests/expand-shallow-1)) (error (progn ... ...))))) (let ((value-977 'ert-form-evaluation-aborted-978)) (let (form-description-979) (if (unwind-protect (setq value-977 ...) (setq form-description-979 ...) (ert--signal-should-execution form-description-979)) nil (ert-fail form-description-979))) value-977))) (kill-buffer) (delete-file path)) (closure (t) nil (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-960 #'eq) (args-961 (condition-case err (let (...) (list major-mode ...)) (error (progn ... ...))))) (let ((value-962 'ert-form-evaluation-aborted-963)) (let (form-description-964) (if (unwind-protect (setq value-962 ...) (setq form-description-964 ...) (ert--signal-should-execution form-description-964)) nil (ert-fail form-description-964))) value-962)) (let* ((fn-965 #'equal) (args-966 (condition-case err (let (...) (list header-line-format "Press RET to step. C-u RET to step all. C-h m to s...")) (error (progn ... ...))))) (let ((value-967 'ert-form-evaluation-aborted-968)) (let (form-description-969) (if (unwind-protect (setq value-967 ...) (setq form-description-969 ...) (ert--signal-should-execution form-description-969)) nil (ert-fail form-description-969))) value-967)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (let* ((fn-970 #'faceup-test-font-lock-buffer) (args-971 (condition-case err (let ... ...) (error ...)))) (let ((value-972 'ert-form-evaluation-aborted-973)) (let (form-description-974) (if (unwind-protect ... ... ...) nil (ert-fail form-description-974))) value-972))) (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-975 #'faceup-test-font-lock-buffer) (args-976 (condition-case err (let ... ...) (error ...)))) (let ((value-977 'ert-form-evaluation-aborted-978)) (let (form-description-979) (if (unwind-protect ... ... ...) nil (ert-fail form-description-979))) value-977))) (kill-buffer) (delete-file path)))() funcall((closure (t) nil (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-960 #'eq) (args-961 (condition-case err (let ... ...) (error ...)))) (let ((value-962 'ert-form-evaluation-aborted-963)) (let (form-description-964) (if (unwind-protect ... ... ...) nil (ert-fail form-description-964))) value-962)) (let* ((fn-965 #'equal) (args-966 (condition-case err (let ... ...) (error ...)))) (let ((value-967 'ert-form-evaluation-aborted-968)) (let (form-description-969) (if (unwind-protect ... ... ...) nil (ert-fail form-description-969))) value-967)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (let* ((fn-970 #'faceup-test-font-lock-buffer) (args-971 (condition-case err ... ...))) (let ((value-972 ...)) (let (form-description-974) (if ... nil ...)) value-972))) (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-975 #'faceup-test-font-lock-buffer) (args-976 (condition-case err ... ...))) (let ((value-977 ...)) (let (form-description-979) (if ... nil ...)) value-977))) (kill-buffer) (delete-file path)))) (unwind-protect (funcall thunk) (racket-stop-back-end)) (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) racket-tests/call-with-back-end-settings((closure (t) nil (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-960 #'eq) (args-961 (condition-case err (let ... ...) (error ...)))) (let ((value-962 'ert-form-evaluation-aborted-963)) (let (form-description-964) (if (unwind-protect ... ... ...) nil (ert-fail form-description-964))) value-962)) (let* ((fn-965 #'equal) (args-966 (condition-case err (let ... ...) (error ...)))) (let ((value-967 'ert-form-evaluation-aborted-968)) (let (form-description-969) (if (unwind-protect ... ... ...) nil (ert-fail form-description-969))) value-967)) (progn (racket-tests/call-until-true #'(lambda nil (faceup-test-font-lock-buffer nil racket-tests/expand-shallow-0))) (let* ((fn-970 #'faceup-test-font-lock-buffer) (args-971 (condition-case err ... ...))) (let ((value-972 ...)) (let (form-description-974) (if ... nil ...)) value-972))) (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-975 #'faceup-test-font-lock-buffer) (args-976 (condition-case err ... ...))) (let ((value-977 ...)) (let (form-description-979) (if ... nil ...)) value-977))) (kill-buffer) (delete-file path)))) (closure (t) nil (message "racket-tests/expand-file-shallow") (racket-tests/call-with-back-end-settings #'(lambda nil (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-960 ...) (args-961 ...)) (let (...) (let ... ...) value-962)) (let* ((fn-965 ...) (args-966 ...)) (let (...) (let ... ...) value-967)) (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-972))) (racket-tests/press "RET") (progn (racket-tests/call-until-true #'...) (let* (... ...) (let ... ... value-977))) (kill-buffer) (delete-file path)))))() ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/expand-file-shallow :documentation nil :body (closure (t) nil (message "racket-tests/expand-file-shallow") (racket-tests/call-with-back-end-settings ...)) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-file-shallow..." :should-forms (... ... ...) :duration 60.030557517 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :expected-result-type (satisfies racket-tests/expected-result-for-expand-file-p) :tags nil :file-name "/build/reproducible-path/racket-...") :result #s(ert-test-failed :messages "racket-tests/expand-file-shallow..." :should-forms ((... :form ... :value t) (... :form ... :value t :explanation nil) (... :form ... :value nil :explanation ...)) :duration 60.030557517 :condition (ert-test-failed (... :form ... :value nil :explanation ...)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals ... :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 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 ... :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 ... :args nil :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 nil :flags nil :locals nil :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 () #) :next-debugger debug :ert-debug-on-error nil)) ert-run-test(#s(ert-test :name racket-tests/expand-file-shallow :documentation nil :body (closure (t) nil (message "racket-tests/expand-file-shallow") (racket-tests/call-with-back-end-settings #'(lambda nil ...))) :most-recent-result #s(ert-test-failed :messages "racket-tests/expand-file-shallow\n{rack..." :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..." "Press RET to step. C-u RET to step all...") :value t :explanation nil) ((should ...) :form (faceup-test-font-lock-buffer nil "«:button:racket-expand-hiding»: standa...") :value nil :explanation (2 6 number-of-lines-differ ... ... ... ... ...))) :duration 60.030557517 :condition (ert-test-failed ((should ...) :form (faceup-test-font-lock-buffer nil "«:button:racket-expand-hiding»: standa...") :value nil :explanation (2 6 number-of-lines-differ ... ... ... ... ...))) :backtrace (#s(backtrace-frame :evald t :fun signal :args (ert-test-failed ...) :flags nil :locals (... ... ... ...) :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-972) :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 (closure ... nil ...) :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 (closure ... nil ... ...) :args nil :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 (t #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 (nil) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args nil :flags nil :locals nil :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 "/build/reproducible-path/racket-mode-2...")) ert-run-or-rerun-test(#s(ert--stats :selector t :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 ... :most-recent-result ... :expected-result-type ... :tags nil :file-name "/build/reprodu...") #f(compiled-function (event-type &rest event-args) #)) ert-run-tests(t #f(compiled-function (event-type &rest event-args) #) nil) ert-run-tests-batch(nil) ert-run-tests-batch-and-exit() command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"CI\" \"1\") (setq user-emacs-director..." "-l" "test/racket-tests.el" "--eval" "(ert-run-tests-batch-and-exit)")) command-line() normal-top-level() Test racket-tests/expand-file-shallow condition: (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))))) FAILED 6/15 racket-tests/expand-file-shallow (60.030558 sec) at test/racket-tests.el:439 4 other buffers still using *Racket REPL * passed 7/15 racket-tests/fill-paragraph-comment (0.004699 sec) passed 8/15 racket-tests/font-lock (0.259443 sec) passed 9/15 racket-tests/indent-same (0.644631 sec) skipped 10/15 racket-tests/indent-speed-1 (0.000152 sec) skipped 11/15 racket-tests/indent-speed-2 (0.000118 sec) skipped 12/15 racket-tests/profile (0.000110 sec) racket-tests/repl {racket-back-end-/} killed passed 13/15 racket-tests/repl (60.063028 sec) racket-tests/run {racket-back-end-/} killed Test racket-tests/run backtrace: signal(ert-test-failed (((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntestDVJWmI.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting...")))) ert-fail(((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntestDVJWmI.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting..."))) (if (unwind-protect (setq value-817 (apply fn-815 args-816)) (setq form-description-819 (nconc (list '(should (racket-tests/see-back ...))) (list :form (cons fn-815 args-816)) (if (eql value-817 'ert-form-evaluation-aborted-818) nil (list :value value-817)) (if (eql value-817 'ert-form-evaluation-aborted-818) nil (let* ((-explainer- ...)) (if -explainer- (list :explanation ...) nil))))) (ert--signal-should-execution form-description-819)) nil (ert-fail form-description-819)) (let (form-description-819) (if (unwind-protect (setq value-817 (apply fn-815 args-816)) (setq form-description-819 (nconc (list '(should ...)) (list :form (cons fn-815 args-816)) (if (eql value-817 'ert-form-evaluation-aborted-818) nil (list :value value-817)) (if (eql value-817 'ert-form-evaluation-aborted-818) nil (let* (...) (if -explainer- ... nil))))) (ert--signal-should-execution form-description-819)) nil (ert-fail form-description-819))) (let ((value-817 'ert-form-evaluation-aborted-818)) (let (form-description-819) (if (unwind-protect (setq value-817 (apply fn-815 args-816)) (setq form-description-819 (nconc (list '...) (list :form (cons fn-815 args-816)) (if (eql value-817 ...) nil (list :value value-817)) (if (eql value-817 ...) nil (let* ... ...)))) (ert--signal-should-execution form-description-819)) nil (ert-fail form-description-819))) value-817) (let* ((fn-815 #'racket-tests/see-back) (args-816 (condition-case err (let ((signal-hook-function #'ert--should-signal-hook)) (list (concat "\n" name "> "))) (error (progn (setq fn-815 #'signal) (list (car err) (cdr err))))))) (let ((value-817 'ert-form-evaluation-aborted-818)) (let (form-description-819) (if (unwind-protect (setq value-817 (apply fn-815 args-816)) (setq form-description-819 (nconc (list ...) (list :form ...) (if ... nil ...) (if ... nil ...))) (ert--signal-should-execution form-description-819)) nil (ert-fail form-description-819))) value-817)) (closure ((name . "testDVJWmI.rkt")) nil (let* ((fn-815 #'racket-tests/see-back) (args-816 (condition-case err (let ((signal-hook-function ...)) (list (concat "\n" name "> "))) (error (progn (setq fn-815 ...) (list ... ...)))))) (let ((value-817 'ert-form-evaluation-aborted-818)) (let (form-description-819) (if (unwind-protect (setq value-817 (apply fn-815 args-816)) (setq form-description-819 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-819)) nil (ert-fail form-description-819))) value-817)) (racket-repl-exit) (let* ((fn-820 #'racket-tests/see-back) (args-821 (condition-case err (let ((signal-hook-function ...)) (list "REPL session ended\n")) (error (progn (setq fn-820 ...) (list ... ...)))))) (let ((value-822 'ert-form-evaluation-aborted-823)) (let (form-description-824) (if (unwind-protect (setq value-822 (apply fn-820 args-821)) (setq form-description-824 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-824)) nil (ert-fail form-description-824))) value-822)) (kill-buffer))() funcall((closure ((name . "testDVJWmI.rkt")) nil (let* ((fn-815 #'racket-tests/see-back) (args-816 (condition-case err (let (...) (list ...)) (error (progn ... ...))))) (let ((value-817 'ert-form-evaluation-aborted-818)) (let (form-description-819) (if (unwind-protect (setq value-817 ...) (setq form-description-819 ...) (ert--signal-should-execution form-description-819)) nil (ert-fail form-description-819))) value-817)) (racket-repl-exit) (let* ((fn-820 #'racket-tests/see-back) (args-821 (condition-case err (let (...) (list "REPL session ended\n")) (error (progn ... ...))))) (let ((value-822 'ert-form-evaluation-aborted-823)) (let (form-description-824) (if (unwind-protect (setq value-822 ...) (setq form-description-824 ...) (ert--signal-should-execution form-description-824)) nil (ert-fail form-description-824))) value-822)) (kill-buffer))) (save-current-buffer (set-buffer buf) (funcall thunk)) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk))))) (let* ((val (get-buffer name))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk)))))) (let ((name val)) (let* ((val (get-buffer name))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk))))))) (if (stringp val) (let ((name val)) (let* ((val (get-buffer name))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let ((buf val)) (save-current-buffer (set-buffer buf) (funcall thunk)))))))) (let* ((val (if (eq major-mode 'racket-repl-mode) (buffer-name) racket-repl-buffer-name))) (if (stringp val) (let ((name val)) (let* ((val (get-buffer name))) (cond ((not (bufferp val)) nil) ((buffer-live-p val) (let (...) (save-current-buffer ... ...)))))))) racket--call-with-repl-buffer((closure ((name . "testDVJWmI.rkt")) nil (let* ((fn-815 #'racket-tests/see-back) (args-816 (condition-case err (let (...) (list ...)) (error (progn ... ...))))) (let ((value-817 'ert-form-evaluation-aborted-818)) (let (form-description-819) (if (unwind-protect (setq value-817 ...) (setq form-description-819 ...) (ert--signal-should-execution form-description-819)) nil (ert-fail form-description-819))) value-817)) (racket-repl-exit) (let* ((fn-820 #'racket-tests/see-back) (args-821 (condition-case err (let (...) (list "REPL session ended\n")) (error (progn ... ...))))) (let ((value-822 'ert-form-evaluation-aborted-823)) (let (form-description-824) (if (unwind-protect (setq value-822 ...) (setq form-description-824 ...) (ert--signal-should-execution form-description-824)) nil (ert-fail form-description-824))) value-822)) (kill-buffer))) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-810 #'racket--repl-session-id) (args-811 (condition-case err (let (...) (list)) (error (progn ... ...))))) (let ((value-812 'ert-form-evaluation-aborted-813)) (let (form-description-814) (if (unwind-protect (setq value-812 ...) (setq form-description-814 ...) (ert--signal-should-execution form-description-814)) nil (ert-fail form-description-814))) value-812))) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-815 #'racket-tests/see-back) (args-816 (condition-case err ... ...))) (let ((value-817 ...)) (let (form-description-819) (if ... nil ...)) value-817)) (racket-repl-exit) (let* ((fn-820 #'racket-tests/see-back) (args-821 (condition-case err ... ...))) (let ((value-822 ...)) (let (form-description-824) (if ... nil ...)) value-822)) (kill-buffer)))) (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-808 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-809) (if (unwind-protect (setq value-808 (cond ... ...)) (setq form-description-809 (list ... :form ... :value value-808)) (ert--signal-should-execution form-description-809)) nil (ert-fail form-description-809))) value-808)) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-810 #'racket--repl-session-id) (args-811 (condition-case err (let ... ...) (error ...)))) (let ((value-812 'ert-form-evaluation-aborted-813)) (let (form-description-814) (if (unwind-protect ... ... ...) nil (ert-fail form-description-814))) value-812))) (racket--call-with-repl-buffer #'(lambda nil (let* ((fn-815 ...) (args-816 ...)) (let (...) (let ... ...) value-817)) (racket-repl-exit) (let* ((fn-820 ...) (args-821 ...)) (let (...) (let ... ...) value-822)) (kill-buffer)))) (kill-buffer) (delete-file path)) (closure ((edit-mode . racket-mode)) 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 #'(lambda nil (cond (... ...) (... t)))) (let ((value-808 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-809) (if (unwind-protect (setq value-808 ...) (setq form-description-809 ...) (ert--signal-should-execution form-description-809)) nil (ert-fail form-description-809))) value-808)) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true #'(lambda nil (racket--repl-session-id))) (let* ((fn-810 #'racket--repl-session-id) (args-811 (condition-case err ... ...))) (let ((value-812 ...)) (let (form-description-814) (if ... nil ...)) value-812))) (racket--call-with-repl-buffer #'(lambda nil (let* (... ...) (let ... ... value-817)) (racket-repl-exit) (let* (... ...) (let ... ... value-822)) (kill-buffer)))) (kill-buffer) (delete-file path)))() funcall((closure ((edit-mode . racket-mode)) 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 #'(lambda nil (cond ... ...))) (let ((value-808 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-809) (if (unwind-protect ... ... ...) nil (ert-fail form-description-809))) value-808)) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-810 ...) (args-811 ...)) (let (...) (let ... ...) value-812))) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...) (racket-repl-exit) (let* ... ...) (kill-buffer)))) (kill-buffer) (delete-file path)))) (unwind-protect (funcall thunk) (racket-stop-back-end)) (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) racket-tests/call-with-back-end-settings((closure ((edit-mode . racket-mode)) 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 #'(lambda nil (cond ... ...))) (let ((value-808 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-809) (if (unwind-protect ... ... ...) nil (ert-fail form-description-809))) value-808)) (if (eq major-mode 'prog-mode) nil (racket-run) (progn (racket-tests/call-until-true #'(lambda nil ...)) (let* ((fn-810 ...) (args-811 ...)) (let (...) (let ... ...) value-812))) (racket--call-with-repl-buffer #'(lambda nil (let* ... ...) (racket-repl-exit) (let* ... ...) (kill-buffer)))) (kill-buffer) (delete-file path)))) (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-808)) (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))) (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-808)) (if (eq major-mode ...) nil (racket-run) (progn ... ...) (racket--call-with-repl-buffer ...)) (kill-buffer) (delete-file path)))) (setq tail (cdr tail)))) (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))))) (closure (t) nil (message "racket-tests/run") (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* ... ... ... ... ... ... ... ...))) (setq tail (cdr tail))))))() ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/run :documentation "Start the REPL via a racke..." :body (closure ... nil ... ...) :most-recent-result #s(ert-test-failed :messages "racket-tests/run\n{racket-b..." :should-forms ... :duration 60.028270257 :condition ... :backtrace ... :infos nil) :expected-result-type :passed :tags nil :file-name "/build/reproducible-path/r...") :result #s(ert-test-failed :messages "racket-tests/run\n{racket-b..." :should-forms (... ... ...) :duration 60.028270257 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :exit-continuation #f(compiled-function () #) :next-debugger debug :ert-debug-on-error nil)) ert-run-test(#s(ert-test :name racket-tests/run :documentation "Start the REPL via a racket-run ..." :body (closure (t) nil (message "racket-tests/run") (let (...) (while tail ...))) :most-recent-result #s(ert-test-failed :messages "racket-tests/run\n{racket-back-en..." :should-forms ((... :form ... :value t) (... :form ... :value 4) (... :form ... :value nil :explanation ...)) :duration 60.028270257 :condition (ert-test-failed (... :form ... :value nil :explanation ...)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals ... :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 ... :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 save-current-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 nil :fun cond :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 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 racket--call-with-repl-buffer :args ... :flags nil :locals ... :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 ... :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 ... :args nil :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) ...) :infos nil) :expected-result-type :passed :tags nil :file-name "/build/reproducible-path/racket-...")) ert-run-or-rerun-test(#s(ert--stats :selector t :tests ... :test-map # :test-results ... :test-start-times ... :test-end-times ... :passed-expected 6 :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..." :body ... :most-recent-result ... :expected-result-type :passed :tags nil :file-name "/build/reprodu...") #f(compiled-function (event-type &rest event-args) #)) ert-run-tests(t #f(compiled-function (event-type &rest event-args) #) nil) ert-run-tests-batch(nil) ert-run-tests-batch-and-exit() command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"CI\" \"1\") (setq user-emacs-director..." "-l" "test/racket-tests.el" "--eval" "(ert-run-tests-batch-and-exit)")) command-line() normal-top-level() Test racket-tests/run condition: (ert-test-failed ((should (racket-tests/see-back (concat "\n" name "> "))) :form (racket-tests/see-back "\ntestDVJWmI.rkt> ") :value nil :explanation (actual . "Starting back end...\nREPL session stopped\nStarting back end...\nREPL session stopped\nREPL session stopped\nREPL session stopped\nREPL session stopped\nStarting back end...\n"))) FAILED 14/15 racket-tests/run (60.028270 sec) at test/racket-tests.el:229 racket-tests/xp {racket-back-end-/} killed Test racket-tests/xp backtrace: 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))) 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)) (if (unwind-protect (setq value-867 (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base")))) (setq form-description-868 (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-867)) (ert--signal-should-execution form-description-868)) nil (ert-fail form-description-868)) (let (form-description-868) (if (unwind-protect (setq value-867 (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base")))) (setq form-description-868 (list '(should (progn ... ... ...)) :form '(progn (goto-char ...) (racket-xp-next-definition) (looking-at-p ...)) :value value-867)) (ert--signal-should-execution form-description-868)) nil (ert-fail form-description-868))) (let ((value-867 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-868) (if (unwind-protect (setq value-867 (progn (goto-char (point-min)) (racket-xp-next-definition) (looking-at-p (regexp-quote "racket/base")))) (setq form-description-868 (list '(should ...) :form '(progn ... ... ...) :value value-867)) (ert--signal-should-execution form-description-868)) nil (ert-fail form-description-868))) value-867) (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-867 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-868) (if (unwind-protect (setq value-867 (progn (goto-char ...) (racket-xp-next-definition) (looking-at-p ...))) (setq form-description-868 (list '... :form '... :value value-867)) (ert--signal-should-execution form-description-868)) nil (ert-fail form-description-868))) value-867)) (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-865 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-866) (if (unwind-protect (setq value-865 racket-xp-mode) (setq form-description-866 (list '... :form 'racket-xp-mode :value value-865)) (ert--signal-should-execution form-description-866)) nil (ert-fail form-description-866))) value-865) (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-867 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-868) (if (unwind-protect (setq value-867 (progn ... ... ...)) (setq form-description-868 (list ... :form ... :value value-867)) (ert--signal-should-execution form-description-868)) nil (ert-fail form-description-868))) value-867)) (racket-xp-next-definition) (let* ((fn-869 #'racket-tests/see-forward) (args-870 (condition-case err (let ((signal-hook-function ...)) (list "foobar")) (error (progn (setq fn-869 ...) (list ... ...)))))) (let ((value-871 'ert-form-evaluation-aborted-872)) (let (form-description-873) (if (unwind-protect (setq value-871 (apply fn-869 args-870)) (setq form-description-873 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-873)) nil (ert-fail form-description-873))) value-871)) (let* ((fn-874 #'equal) (args-875 (condition-case err (let ((signal-hook-function ...)) (list (get-text-property ... ...) "1 bound occurrence")) (error (progn (setq fn-874 ...) (list ... ...)))))) (let ((value-876 'ert-form-evaluation-aborted-877)) (let (form-description-878) (if (unwind-protect (setq value-876 (apply fn-874 args-875)) (setq form-description-878 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-878)) nil (ert-fail form-description-878))) value-876)) (racket-xp-next-use) (let* ((fn-879 #'racket-tests/see-forward) (args-880 (condition-case err (let ((signal-hook-function ...)) (list "foobar")) (error (progn (setq fn-879 ...) (list ... ...)))))) (let ((value-881 'ert-form-evaluation-aborted-882)) (let (form-description-883) (if (unwind-protect (setq value-881 (apply fn-879 args-880)) (setq form-description-883 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-883)) nil (ert-fail form-description-883))) value-881)) (let* ((fn-884 #'equal) (args-885 (condition-case err (let ((signal-hook-function ...)) (list (get-text-property ... ...) "defined locally")) (error (progn (setq fn-884 ...) (list ... ...)))))) (let ((value-886 'ert-form-evaluation-aborted-887)) (let (form-description-888) (if (unwind-protect (setq value-886 (apply fn-884 args-885)) (setq form-description-888 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-888)) nil (ert-fail form-description-888))) value-886)) (goto-char (point-max)) (insert "foo") (completion-at-point) (let* ((fn-889 #'racket-tests/see-back) (args-890 (condition-case err (let ((signal-hook-function ...)) (list "foobar")) (error (progn (setq fn-889 ...) (list ... ...)))))) (let ((value-891 'ert-form-evaluation-aborted-892)) (let (form-description-893) (if (unwind-protect (setq value-891 (apply fn-889 args-890)) (setq form-description-893 (nconc ... ... ... ...)) (ert--signal-should-execution form-description-893)) nil (ert-fail form-description-893))) value-891)) (racket-xp-mode 0) (kill-buffer) (delete-file path)) (closure (t) nil (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-865 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-866) (if (unwind-protect (setq value-865 racket-xp-mode) (setq form-description-866 (list ... :form ... :value value-865)) (ert--signal-should-execution form-description-866)) nil (ert-fail form-description-866))) value-865) (progn (racket-tests/call-until-true #'(lambda nil (progn (goto-char ...) (racket-xp-next-definition) (looking-at-p ...)))) (let ((value-867 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-868) (if (unwind-protect (setq value-867 ...) (setq form-description-868 ...) (ert--signal-should-execution form-description-868)) nil (ert-fail form-description-868))) value-867)) (racket-xp-next-definition) (let* ((fn-869 #'racket-tests/see-forward) (args-870 (condition-case err (let (...) (list "foobar")) (error (progn ... ...))))) (let ((value-871 'ert-form-evaluation-aborted-872)) (let (form-description-873) (if (unwind-protect (setq value-871 ...) (setq form-description-873 ...) (ert--signal-should-execution form-description-873)) nil (ert-fail form-description-873))) value-871)) (let* ((fn-874 #'equal) (args-875 (condition-case err (let (...) (list ... "1 bound occurrence")) (error (progn ... ...))))) (let ((value-876 'ert-form-evaluation-aborted-877)) (let (form-description-878) (if (unwind-protect (setq value-876 ...) (setq form-description-878 ...) (ert--signal-should-execution form-description-878)) nil (ert-fail form-description-878))) value-876)) (racket-xp-next-use) (let* ((fn-879 #'racket-tests/see-forward) (args-880 (condition-case err (let (...) (list "foobar")) (error (progn ... ...))))) (let ((value-881 'ert-form-evaluation-aborted-882)) (let (form-description-883) (if (unwind-protect (setq value-881 ...) (setq form-description-883 ...) (ert--signal-should-execution form-description-883)) nil (ert-fail form-description-883))) value-881)) (let* ((fn-884 #'equal) (args-885 (condition-case err (let (...) (list ... "defined locally")) (error (progn ... ...))))) (let ((value-886 'ert-form-evaluation-aborted-887)) (let (form-description-888) (if (unwind-protect (setq value-886 ...) (setq form-description-888 ...) (ert--signal-should-execution form-description-888)) nil (ert-fail form-description-888))) value-886)) (goto-char (point-max)) (insert "foo") (completion-at-point) (let* ((fn-889 #'racket-tests/see-back) (args-890 (condition-case err (let (...) (list "foobar")) (error (progn ... ...))))) (let ((value-891 'ert-form-evaluation-aborted-892)) (let (form-description-893) (if (unwind-protect (setq value-891 ...) (setq form-description-893 ...) (ert--signal-should-execution form-description-893)) nil (ert-fail form-description-893))) value-891)) (racket-xp-mode 0) (kill-buffer) (delete-file path)))() funcall((closure (t) nil (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-865 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-866) (if (unwind-protect (setq value-865 racket-xp-mode) (setq form-description-866 ...) (ert--signal-should-execution form-description-866)) nil (ert-fail form-description-866))) value-865) (progn (racket-tests/call-until-true #'(lambda nil (progn ... ... ...))) (let ((value-867 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-868) (if (unwind-protect ... ... ...) nil (ert-fail form-description-868))) value-867)) (racket-xp-next-definition) (let* ((fn-869 #'racket-tests/see-forward) (args-870 (condition-case err (let ... ...) (error ...)))) (let ((value-871 'ert-form-evaluation-aborted-872)) (let (form-description-873) (if (unwind-protect ... ... ...) nil (ert-fail form-description-873))) value-871)) (let* ((fn-874 #'equal) (args-875 (condition-case err (let ... ...) (error ...)))) (let ((value-876 'ert-form-evaluation-aborted-877)) (let (form-description-878) (if (unwind-protect ... ... ...) nil (ert-fail form-description-878))) value-876)) (racket-xp-next-use) (let* ((fn-879 #'racket-tests/see-forward) (args-880 (condition-case err (let ... ...) (error ...)))) (let ((value-881 'ert-form-evaluation-aborted-882)) (let (form-description-883) (if (unwind-protect ... ... ...) nil (ert-fail form-description-883))) value-881)) (let* ((fn-884 #'equal) (args-885 (condition-case err (let ... ...) (error ...)))) (let ((value-886 'ert-form-evaluation-aborted-887)) (let (form-description-888) (if (unwind-protect ... ... ...) nil (ert-fail form-description-888))) value-886)) (goto-char (point-max)) (insert "foo") (completion-at-point) (let* ((fn-889 #'racket-tests/see-back) (args-890 (condition-case err (let ... ...) (error ...)))) (let ((value-891 'ert-form-evaluation-aborted-892)) (let (form-description-893) (if (unwind-protect ... ... ...) nil (ert-fail form-description-893))) value-891)) (racket-xp-mode 0) (kill-buffer) (delete-file path)))) (unwind-protect (funcall thunk) (racket-stop-back-end)) (let ((racket-command-timeout racket-tests/timeout)) (unwind-protect (funcall thunk) (racket-stop-back-end))) racket-tests/call-with-back-end-settings((closure (t) nil (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-865 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-866) (if (unwind-protect (setq value-865 racket-xp-mode) (setq form-description-866 ...) (ert--signal-should-execution form-description-866)) nil (ert-fail form-description-866))) value-865) (progn (racket-tests/call-until-true #'(lambda nil (progn ... ... ...))) (let ((value-867 (gensym "ert-form-evaluation-aborted-"))) (let (form-description-868) (if (unwind-protect ... ... ...) nil (ert-fail form-description-868))) value-867)) (racket-xp-next-definition) (let* ((fn-869 #'racket-tests/see-forward) (args-870 (condition-case err (let ... ...) (error ...)))) (let ((value-871 'ert-form-evaluation-aborted-872)) (let (form-description-873) (if (unwind-protect ... ... ...) nil (ert-fail form-description-873))) value-871)) (let* ((fn-874 #'equal) (args-875 (condition-case err (let ... ...) (error ...)))) (let ((value-876 'ert-form-evaluation-aborted-877)) (let (form-description-878) (if (unwind-protect ... ... ...) nil (ert-fail form-description-878))) value-876)) (racket-xp-next-use) (let* ((fn-879 #'racket-tests/see-forward) (args-880 (condition-case err (let ... ...) (error ...)))) (let ((value-881 'ert-form-evaluation-aborted-882)) (let (form-description-883) (if (unwind-protect ... ... ...) nil (ert-fail form-description-883))) value-881)) (let* ((fn-884 #'equal) (args-885 (condition-case err (let ... ...) (error ...)))) (let ((value-886 'ert-form-evaluation-aborted-887)) (let (form-description-888) (if (unwind-protect ... ... ...) nil (ert-fail form-description-888))) value-886)) (goto-char (point-max)) (insert "foo") (completion-at-point) (let* ((fn-889 #'racket-tests/see-back) (args-890 (condition-case err (let ... ...) (error ...)))) (let ((value-891 'ert-form-evaluation-aborted-892)) (let (form-description-893) (if (unwind-protect ... ... ...) nil (ert-fail form-description-893))) value-891)) (racket-xp-mode 0) (kill-buffer) (delete-file path)))) (closure (t) nil (message "racket-tests/xp") (racket-tests/call-with-back-end-settings #'(lambda nil (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-865 ...)) (let (form-description-866) (if ... nil ...)) value-865) (progn (racket-tests/call-until-true #'...) (let (...) (let ... ...) value-867)) (racket-xp-next-definition) (let* ((fn-869 ...) (args-870 ...)) (let (...) (let ... ...) value-871)) (let* ((fn-874 ...) (args-875 ...)) (let (...) (let ... ...) value-876)) (racket-xp-next-use) (let* ((fn-879 ...) (args-880 ...)) (let (...) (let ... ...) value-881)) (let* ((fn-884 ...) (args-885 ...)) (let (...) (let ... ...) value-886)) (goto-char (point-max)) (insert "foo") (completion-at-point) (let* ((fn-889 ...) (args-890 ...)) (let (...) (let ... ...) value-891)) (racket-xp-mode 0) (kill-buffer) (delete-file path)))))() ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :name racket-tests/xp :documentation nil :body (closure (t) nil (message "racket-tests/xp") (racket-tests/call-with-back-end-settings ...)) :most-recent-result #s(ert-test-failed :messages "racket-tests/xp\n{racket-back-end..." :should-forms (... ...) :duration 60.05402328 :condition (ert-test-failed ...) :backtrace (... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil) :expected-result-type :passed :tags nil :file-name "/build/reproducible-path/racket-...") :result #s(ert-test-failed :messages "racket-tests/xp\n{racket-back-end..." :should-forms ((... :form racket-xp-mode :value t) (... :form ... :value nil)) :duration 60.05402328 :condition (ert-test-failed (... :form ... :value nil)) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals ... :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 ... :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 ... :args nil :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 nil :flags nil :locals nil :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 () #) :next-debugger debug :ert-debug-on-error nil)) ert-run-test(#s(ert-test :name racket-tests/xp :documentation nil :body (closure (t) nil (message "racket-tests/xp") (racket-tests/call-with-back-end-settings #'(lambda nil ...))) :most-recent-result #s(ert-test-failed :messages "racket-tests/xp\n{racket-back-end-/} ki..." :should-forms (((should racket-xp-mode) :form racket-xp-mode :value t) ((should ...) :form (progn ... ... ...) :value nil)) :duration 60.05402328 :condition (ert-test-failed ((should ...) :form (progn ... ... ...) :value nil)) :backtrace (#s(backtrace-frame :evald t :fun signal :args (ert-test-failed ...) :flags nil :locals (... ... ... ...) :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-867) :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 (closure ... nil ...) :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 (closure ... nil ... ...) :args nil :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 (t #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 (nil) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tests-batch-and-exit :args nil :flags nil :locals nil :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 "/build/reproducible-path/racket-mode-2...")) ert-run-or-rerun-test(#s(ert--stats :selector t :tests ... :test-map # :test-results ... :test-start-times ... :test-end-times ... :passed-expected 6 :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 ... :most-recent-result ... :expected-result-type :passed :tags nil :file-name "/build/reprodu...") #f(compiled-function (event-type &rest event-args) #)) ert-run-tests(t #f(compiled-function (event-type &rest event-args) #) nil) ert-run-tests-batch(nil) ert-run-tests-batch-and-exit() command-line-1(("-l" "package" "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(add-to-list 'package-directory-list \"/usr/share/e..." "--eval" "(setq ert-batch-backtrace-right-margin nil)" "-f" "package-initialize" "-L" "." "-L" "test" "--eval" "(progn (setenv \"CI\" \"1\") (setq user-emacs-director..." "-l" "test/racket-tests.el" "--eval" "(ert-run-tests-batch-and-exit)")) command-line() normal-top-level() Test racket-tests/xp condition: (ert-test-failed ((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 nil)) FAILED 15/15 racket-tests/xp (60.054023 sec) at test/racket-tests.el:298 Ran 15 tests, 6 results as expected, 6 unexpected, 3 skipped (2024-12-28 18:47:34+0000, 1462.254458 sec) 6 unexpected results: FAILED racket-tests/debugger FAILED racket-tests/expand-expression FAILED racket-tests/expand-file-deep FAILED racket-tests/expand-file-shallow FAILED racket-tests/run FAILED racket-tests/xp 3 skipped results: SKIPPED racket-tests/indent-speed-1 SKIPPED racket-tests/indent-speed-2 SKIPPED racket-tests/profile {racket--repl-start}: picked next session id 1 back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) {racket--repl-start}: picked next session id 2 back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) {racket--repl-start}: picked next session id 3 back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) {racket--repl-start}: picked next session id 4 back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) back end is (:directory "/" :racket-program nil :remote-source-dir nil :restart-watch-directories nil :windows nil) 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 \"CI\" \"1\") (setq user-emacs-directory \"/tmp/emacs-home\"))" -l test/racket-tests.el --eval \(ert-run-tests-batch-and-exit\) returned exit code 1 make: *** [debian/rules:6: binary] Error 25 dpkg-buildpackage: error: debian/rules binary subprocess returned exit status 2 I: copying local configuration E: Failed autobuilding of package I: unmounting dev/ptmx filesystem I: unmounting dev/pts filesystem I: unmounting dev/shm filesystem I: unmounting proc filesystem I: unmounting sys filesystem I: cleaning the build env I: removing directory /srv/workspace/pbuilder/3257105 and its subdirectories Sat Dec 28 18:51:55 UTC 2024 W: No second build log, what happened?