0s autopkgtest [16:03:55]: starting date and time: 2025-03-15 16:03:55+0000 0s autopkgtest [16:03:55]: git checkout: 325255d2 Merge branch 'pin-any-arch' into 'ubuntu/production' 0s autopkgtest [16:03:55]: host juju-7f2275-prod-proposed-migration-environment-9; command line: /home/ubuntu/autopkgtest/runner/autopkgtest --output-dir /tmp/autopkgtest-work.2wzr4kdf/out --timeout-copy=6000 --setup-commands 'ln -s /dev/null /etc/systemd/system/bluetooth.service; printf "http_proxy=http://squid.internal:3128\nhttps_proxy=http://squid.internal:3128\nno_proxy=127.0.0.1,127.0.1.1,login.ubuntu.com,localhost,localdomain,novalocal,internal,archive.ubuntu.com,ports.ubuntu.com,security.ubuntu.com,ddebs.ubuntu.com,changelogs.ubuntu.com,keyserver.ubuntu.com,launchpadlibrarian.net,launchpadcontent.net,launchpad.net,10.24.0.0/24,keystone.ps5.canonical.com,objectstorage.prodstack5.canonical.com,radosgw.ps5.canonical.com\n" >> /etc/environment' --apt-pocket=proposed=src:glibc --apt-upgrade r-cran-diffobj --timeout-short=300 --timeout-copy=20000 --timeout-build=20000 --env=ADT_TEST_TRIGGERS=glibc/2.41-1ubuntu2 -- lxd -r lxd-armhf-10.145.243.242 lxd-armhf-10.145.243.242:autopkgtest/ubuntu/plucky/armhf 20s autopkgtest [16:04:15]: testbed dpkg architecture: armhf 22s autopkgtest [16:04:17]: testbed apt version: 2.9.33 26s autopkgtest [16:04:21]: @@@@@@@@@@@@@@@@@@@@ test bed setup 28s autopkgtest [16:04:23]: testbed release detected to be: None 36s autopkgtest [16:04:31]: updating testbed package index (apt update) 38s Get:1 http://ftpmaster.internal/ubuntu plucky-proposed InRelease [126 kB] 38s Get:2 http://ftpmaster.internal/ubuntu plucky InRelease [257 kB] 39s Get:3 http://ftpmaster.internal/ubuntu plucky-updates InRelease [126 kB] 39s Get:4 http://ftpmaster.internal/ubuntu plucky-security InRelease [126 kB] 39s Get:5 http://ftpmaster.internal/ubuntu plucky-proposed/main Sources [99.7 kB] 39s Get:6 http://ftpmaster.internal/ubuntu plucky-proposed/multiverse Sources [15.8 kB] 39s Get:7 http://ftpmaster.internal/ubuntu plucky-proposed/universe Sources [379 kB] 40s Get:8 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf Packages [114 kB] 40s Get:9 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf c-n-f Metadata [1832 B] 40s Get:10 http://ftpmaster.internal/ubuntu plucky-proposed/restricted armhf c-n-f Metadata [116 B] 40s Get:11 http://ftpmaster.internal/ubuntu plucky-proposed/universe armhf Packages [312 kB] 40s Get:12 http://ftpmaster.internal/ubuntu plucky-proposed/universe armhf c-n-f Metadata [11.1 kB] 40s Get:13 http://ftpmaster.internal/ubuntu plucky-proposed/multiverse armhf Packages [3472 B] 40s Get:14 http://ftpmaster.internal/ubuntu plucky-proposed/multiverse armhf c-n-f Metadata [240 B] 40s Get:15 http://ftpmaster.internal/ubuntu plucky/main Sources [1394 kB] 42s Get:16 http://ftpmaster.internal/ubuntu plucky/universe Sources [21.0 MB] 69s Get:17 http://ftpmaster.internal/ubuntu plucky/multiverse Sources [299 kB] 69s Get:18 http://ftpmaster.internal/ubuntu plucky/main armhf Packages [1378 kB] 71s Get:19 http://ftpmaster.internal/ubuntu plucky/main armhf c-n-f Metadata [29.4 kB] 71s Get:20 http://ftpmaster.internal/ubuntu plucky/restricted armhf c-n-f Metadata [108 B] 71s Get:21 http://ftpmaster.internal/ubuntu plucky/universe armhf Packages [15.1 MB] 90s Get:22 http://ftpmaster.internal/ubuntu plucky/multiverse armhf Packages [172 kB] 92s Fetched 41.0 MB in 54s (757 kB/s) 93s Reading package lists... 99s autopkgtest [16:05:34]: upgrading testbed (apt dist-upgrade and autopurge) 101s Reading package lists... 101s Building dependency tree... 101s Reading state information... 102s Calculating upgrade...Starting pkgProblemResolver with broken count: 0 102s Starting 2 pkgProblemResolver with broken count: 0 102s Done 103s Entering ResolveByKeep 103s 103s Calculating upgrade... 104s The following packages will be upgraded: 104s libc-bin libc6 locales pinentry-curses python3-jinja2 sos strace 104s 7 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. 104s Need to get 8683 kB of archives. 104s After this operation, 23.6 kB of additional disk space will be used. 104s Get:1 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf libc6 armhf 2.41-1ubuntu2 [2932 kB] 108s Get:2 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf libc-bin armhf 2.41-1ubuntu2 [545 kB] 109s Get:3 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf locales all 2.41-1ubuntu2 [4246 kB] 114s Get:4 http://ftpmaster.internal/ubuntu plucky/main armhf strace armhf 6.13+ds-1ubuntu1 [445 kB] 114s Get:5 http://ftpmaster.internal/ubuntu plucky/main armhf pinentry-curses armhf 1.3.1-2ubuntu3 [40.6 kB] 115s Get:6 http://ftpmaster.internal/ubuntu plucky/main armhf python3-jinja2 all 3.1.5-2ubuntu1 [109 kB] 115s Get:7 http://ftpmaster.internal/ubuntu plucky/main armhf sos all 4.9.0-5 [365 kB] 116s Preconfiguring packages ... 116s Fetched 8683 kB in 11s (763 kB/s) 116s (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 ... 64655 files and directories currently installed.) 116s Preparing to unpack .../libc6_2.41-1ubuntu2_armhf.deb ... 116s Unpacking libc6:armhf (2.41-1ubuntu2) over (2.41-1ubuntu1) ... 116s Setting up libc6:armhf (2.41-1ubuntu2) ... 116s (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 ... 64655 files and directories currently installed.) 116s Preparing to unpack .../libc-bin_2.41-1ubuntu2_armhf.deb ... 116s Unpacking libc-bin (2.41-1ubuntu2) over (2.41-1ubuntu1) ... 117s Setting up libc-bin (2.41-1ubuntu2) ... 117s (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 ... 64655 files and directories currently installed.) 117s Preparing to unpack .../locales_2.41-1ubuntu2_all.deb ... 117s Unpacking locales (2.41-1ubuntu2) over (2.41-1ubuntu1) ... 117s Preparing to unpack .../strace_6.13+ds-1ubuntu1_armhf.deb ... 117s Unpacking strace (6.13+ds-1ubuntu1) over (6.11-0ubuntu1) ... 117s Preparing to unpack .../pinentry-curses_1.3.1-2ubuntu3_armhf.deb ... 117s Unpacking pinentry-curses (1.3.1-2ubuntu3) over (1.3.1-2ubuntu2) ... 117s Preparing to unpack .../python3-jinja2_3.1.5-2ubuntu1_all.deb ... 117s Unpacking python3-jinja2 (3.1.5-2ubuntu1) over (3.1.5-2) ... 117s Preparing to unpack .../archives/sos_4.9.0-5_all.deb ... 118s Unpacking sos (4.9.0-5) over (4.9.0-4) ... 118s Setting up sos (4.9.0-5) ... 119s Setting up pinentry-curses (1.3.1-2ubuntu3) ... 119s Setting up locales (2.41-1ubuntu2) ... 120s Generating locales (this might take a while)... 122s en_US.UTF-8... done 122s Generation complete. 122s Setting up python3-jinja2 (3.1.5-2ubuntu1) ... 122s Setting up strace (6.13+ds-1ubuntu1) ... 122s Processing triggers for man-db (2.13.0-1) ... 123s Processing triggers for systemd (257.3-1ubuntu3) ... 126s Reading package lists... 126s Building dependency tree... 126s Reading state information... 126s Starting pkgProblemResolver with broken count: 0 126s Starting 2 pkgProblemResolver with broken count: 0 126s Done 127s Solving dependencies... 127s 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. 129s autopkgtest [16:06:04]: rebooting testbed after setup commands that affected boot 170s autopkgtest [16:06:45]: testbed running kernel: Linux 6.8.0-52-generic #53~22.04.1-Ubuntu SMP PREEMPT_DYNAMIC Wed Jan 15 18:10:51 UTC 2 194s autopkgtest [16:07:09]: @@@@@@@@@@@@@@@@@@@@ apt-source r-cran-diffobj 204s Get:1 http://ftpmaster.internal/ubuntu plucky/universe r-cran-diffobj 0.3.5-1 (dsc) [2117 B] 204s Get:2 http://ftpmaster.internal/ubuntu plucky/universe r-cran-diffobj 0.3.5-1 (tar) [479 kB] 204s Get:3 http://ftpmaster.internal/ubuntu plucky/universe r-cran-diffobj 0.3.5-1 (diff) [3480 B] 204s gpgv: Signature made Tue Oct 12 17:58:35 2021 UTC 204s gpgv: using RSA key F1F007320A035541F0A663CA578A0494D1C646D1 204s gpgv: issuer "tille@debian.org" 204s gpgv: Can't check signature: No public key 204s dpkg-source: warning: cannot verify inline signature for ./r-cran-diffobj_0.3.5-1.dsc: no acceptable signature found 204s autopkgtest [16:07:19]: testing package r-cran-diffobj version 0.3.5-1 206s autopkgtest [16:07:21]: build not needed 211s autopkgtest [16:07:26]: test run-unit-test: preparing testbed 212s Reading package lists... 213s Building dependency tree... 213s Reading state information... 213s Starting pkgProblemResolver with broken count: 0 213s Starting 2 pkgProblemResolver with broken count: 0 213s Done 214s The following NEW packages will be installed: 214s fontconfig fontconfig-config fonts-dejavu-core fonts-dejavu-mono libblas3 214s libcairo2 libdatrie1 libdeflate0 libfontconfig1 libfreetype6 libgfortran5 214s libgomp1 libgraphite2-3 libharfbuzz0b libice6 libjbig0 libjpeg-turbo8 214s libjpeg8 liblapack3 liblerc4 libpango-1.0-0 libpangocairo-1.0-0 214s libpangoft2-1.0-0 libpaper-utils libpaper2 libpixman-1-0 libsharpyuv0 libsm6 214s libtcl8.6 libthai-data libthai0 libtiff6 libtk8.6 libwebp7 libxcb-render0 214s libxcb-shm0 libxft2 libxrender1 libxss1 libxt6t64 r-base-core r-cran-brio 214s r-cran-callr r-cran-cli r-cran-crayon r-cran-desc r-cran-diffobj 214s r-cran-digest r-cran-evaluate r-cran-fs r-cran-glue r-cran-jsonlite 214s r-cran-lifecycle r-cran-magrittr r-cran-pkgbuild r-cran-pkgload 214s r-cran-praise r-cran-processx r-cran-ps r-cran-r6 r-cran-rlang 214s r-cran-rprojroot r-cran-testthat r-cran-waldo r-cran-withr unzip x11-common 214s xdg-utils zip 214s 0 upgraded, 69 newly installed, 0 to remove and 0 not upgraded. 214s Need to get 47.7 MB of archives. 214s After this operation, 87.3 MB of additional disk space will be used. 214s Get:1 http://ftpmaster.internal/ubuntu plucky/main armhf libfreetype6 armhf 2.13.3+dfsg-1 [330 kB] 215s Get:2 http://ftpmaster.internal/ubuntu plucky/main armhf fonts-dejavu-mono all 2.37-8 [502 kB] 215s Get:3 http://ftpmaster.internal/ubuntu plucky/main armhf fonts-dejavu-core all 2.37-8 [835 kB] 217s Get:4 http://ftpmaster.internal/ubuntu plucky/main armhf fontconfig-config armhf 2.15.0-2ubuntu1 [37.5 kB] 217s Get:5 http://ftpmaster.internal/ubuntu plucky/main armhf libfontconfig1 armhf 2.15.0-2ubuntu1 [114 kB] 217s Get:6 http://ftpmaster.internal/ubuntu plucky/main armhf fontconfig armhf 2.15.0-2ubuntu1 [190 kB] 217s Get:7 http://ftpmaster.internal/ubuntu plucky/main armhf libblas3 armhf 3.12.1-2 [132 kB] 217s Get:8 http://ftpmaster.internal/ubuntu plucky/main armhf libpixman-1-0 armhf 0.44.0-3 [183 kB] 217s Get:9 http://ftpmaster.internal/ubuntu plucky/main armhf libxcb-render0 armhf 1.17.0-2 [15.3 kB] 217s Get:10 http://ftpmaster.internal/ubuntu plucky/main armhf libxcb-shm0 armhf 1.17.0-2 [5774 B] 217s Get:11 http://ftpmaster.internal/ubuntu plucky/main armhf libxrender1 armhf 1:0.9.10-1.1build1 [16.0 kB] 217s Get:12 http://ftpmaster.internal/ubuntu plucky/main armhf libcairo2 armhf 1.18.2-2 [484 kB] 218s Get:13 http://ftpmaster.internal/ubuntu plucky/main armhf libdatrie1 armhf 0.2.13-3build1 [15.7 kB] 218s Get:14 http://ftpmaster.internal/ubuntu plucky/main armhf libdeflate0 armhf 1.23-1 [38.5 kB] 218s Get:15 http://ftpmaster.internal/ubuntu plucky/main armhf libgfortran5 armhf 15-20250222-0ubuntu1 [330 kB] 219s Get:16 http://ftpmaster.internal/ubuntu plucky/main armhf libgomp1 armhf 15-20250222-0ubuntu1 [128 kB] 219s Get:17 http://ftpmaster.internal/ubuntu plucky/main armhf libgraphite2-3 armhf 1.3.14-2ubuntu1 [64.8 kB] 219s Get:18 http://ftpmaster.internal/ubuntu plucky/main armhf libharfbuzz0b armhf 10.2.0-1 [464 kB] 219s Get:19 http://ftpmaster.internal/ubuntu plucky/main armhf x11-common all 1:7.7+23ubuntu3 [21.7 kB] 219s Get:20 http://ftpmaster.internal/ubuntu plucky/main armhf libice6 armhf 2:1.1.1-1 [36.5 kB] 219s Get:21 http://ftpmaster.internal/ubuntu plucky/main armhf libjpeg-turbo8 armhf 2.1.5-3ubuntu2 [127 kB] 220s Get:22 http://ftpmaster.internal/ubuntu plucky/main armhf libjpeg8 armhf 8c-2ubuntu11 [2148 B] 220s Get:23 http://ftpmaster.internal/ubuntu plucky/main armhf liblapack3 armhf 3.12.1-2 [2091 kB] 222s Get:24 http://ftpmaster.internal/ubuntu plucky/main armhf liblerc4 armhf 4.0.0+ds-5ubuntu1 [160 kB] 222s Get:25 http://ftpmaster.internal/ubuntu plucky/main armhf libthai-data all 0.1.29-2build1 [158 kB] 222s Get:26 http://ftpmaster.internal/ubuntu plucky/main armhf libthai0 armhf 0.1.29-2build1 [15.2 kB] 222s Get:27 http://ftpmaster.internal/ubuntu plucky/main armhf libpango-1.0-0 armhf 1.56.2-1 [216 kB] 223s Get:28 http://ftpmaster.internal/ubuntu plucky/main armhf libpangoft2-1.0-0 armhf 1.56.2-1 [43.6 kB] 223s Get:29 http://ftpmaster.internal/ubuntu plucky/main armhf libpangocairo-1.0-0 armhf 1.56.2-1 [25.1 kB] 223s Get:30 http://ftpmaster.internal/ubuntu plucky/main armhf libpaper2 armhf 2.2.5-0.3 [16.3 kB] 223s Get:31 http://ftpmaster.internal/ubuntu plucky/main armhf libpaper-utils armhf 2.2.5-0.3 [14.2 kB] 223s Get:32 http://ftpmaster.internal/ubuntu plucky/main armhf libsharpyuv0 armhf 1.5.0-0.1 [16.4 kB] 223s Get:33 http://ftpmaster.internal/ubuntu plucky/main armhf libsm6 armhf 2:1.2.4-1 [15.1 kB] 223s Get:34 http://ftpmaster.internal/ubuntu plucky/main armhf libtcl8.6 armhf 8.6.16+dfsg-1 [909 kB] 224s Get:35 http://ftpmaster.internal/ubuntu plucky/main armhf libjbig0 armhf 2.1-6.1ubuntu2 [24.9 kB] 224s Get:36 http://ftpmaster.internal/ubuntu plucky/main armhf libwebp7 armhf 1.5.0-0.1 [188 kB] 224s Get:37 http://ftpmaster.internal/ubuntu plucky/main armhf libtiff6 armhf 4.5.1+git230720-4ubuntu4 [179 kB] 224s Get:38 http://ftpmaster.internal/ubuntu plucky/main armhf libxft2 armhf 2.3.6-1build1 [37.4 kB] 224s Get:39 http://ftpmaster.internal/ubuntu plucky/main armhf libxss1 armhf 1:1.2.3-1build3 [6500 B] 224s Get:40 http://ftpmaster.internal/ubuntu plucky/main armhf libtk8.6 armhf 8.6.16-1 [686 kB] 225s Get:41 http://ftpmaster.internal/ubuntu plucky/main armhf libxt6t64 armhf 1:1.2.1-1.2build1 [145 kB] 225s Get:42 http://ftpmaster.internal/ubuntu plucky/main armhf zip armhf 3.0-14ubuntu2 [164 kB] 225s Get:43 http://ftpmaster.internal/ubuntu plucky/main armhf unzip armhf 6.0-28ubuntu6 [167 kB] 226s Get:44 http://ftpmaster.internal/ubuntu plucky/main armhf xdg-utils all 1.2.1-2ubuntu1 [66.0 kB] 226s Get:45 http://ftpmaster.internal/ubuntu plucky/universe armhf r-base-core armhf 4.4.3-1 [28.2 MB] 259s Get:46 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-brio armhf 1.1.5-1 [37.9 kB] 259s Get:47 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-ps armhf 1.9.0-1 [403 kB] 259s Get:48 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-r6 all 2.6.1-1 [101 kB] 259s Get:49 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-processx armhf 3.8.6-1 [359 kB] 260s Get:50 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-callr all 3.7.6-1 [458 kB] 260s Get:51 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-cli armhf 3.6.4-1 [1377 kB] 262s Get:52 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-crayon all 1.5.3-1 [165 kB] 262s Get:53 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-desc all 1.4.3-1 [359 kB] 262s Get:54 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-diffobj armhf 0.3.5-1 [1115 kB] 264s Get:55 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-digest armhf 0.6.37-1 [207 kB] 264s Get:56 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-evaluate all 1.0.3-1 [114 kB] 264s Get:57 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-fs armhf 1.6.5+dfsg-1 [242 kB] 264s Get:58 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-glue armhf 1.8.0-1 [162 kB] 265s Get:59 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-jsonlite armhf 1.9.1+dfsg-1 [440 kB] 265s Get:60 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-rlang armhf 1.1.5-1 [1701 kB] 267s Get:61 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-lifecycle all 1.0.4+dfsg-1 [110 kB] 268s Get:62 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-magrittr armhf 2.0.3-1 [154 kB] 268s Get:63 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-pkgbuild all 1.4.6-1 [213 kB] 268s Get:64 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-rprojroot all 2.0.4-2 [125 kB] 268s Get:65 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-withr all 3.0.2+dfsg-1 [214 kB] 269s Get:66 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-pkgload all 1.4.0-1 [247 kB] 269s Get:67 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-praise all 1.0.0-4build1 [20.3 kB] 269s Get:68 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-waldo all 0.6.1-2 [150 kB] 269s Get:69 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-testthat armhf 3.2.3-1 [1633 kB] 271s Preconfiguring packages ... 272s Fetched 47.7 MB in 57s (838 kB/s) 272s Selecting previously unselected package libfreetype6:armhf. 272s (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 ... 64655 files and directories currently installed.) 272s Preparing to unpack .../00-libfreetype6_2.13.3+dfsg-1_armhf.deb ... 272s Unpacking libfreetype6:armhf (2.13.3+dfsg-1) ... 272s Selecting previously unselected package fonts-dejavu-mono. 272s Preparing to unpack .../01-fonts-dejavu-mono_2.37-8_all.deb ... 272s Unpacking fonts-dejavu-mono (2.37-8) ... 272s Selecting previously unselected package fonts-dejavu-core. 272s Preparing to unpack .../02-fonts-dejavu-core_2.37-8_all.deb ... 272s Unpacking fonts-dejavu-core (2.37-8) ... 272s Selecting previously unselected package fontconfig-config. 272s Preparing to unpack .../03-fontconfig-config_2.15.0-2ubuntu1_armhf.deb ... 272s Unpacking fontconfig-config (2.15.0-2ubuntu1) ... 272s Selecting previously unselected package libfontconfig1:armhf. 272s Preparing to unpack .../04-libfontconfig1_2.15.0-2ubuntu1_armhf.deb ... 272s Unpacking libfontconfig1:armhf (2.15.0-2ubuntu1) ... 272s Selecting previously unselected package fontconfig. 272s Preparing to unpack .../05-fontconfig_2.15.0-2ubuntu1_armhf.deb ... 272s Unpacking fontconfig (2.15.0-2ubuntu1) ... 272s Selecting previously unselected package libblas3:armhf. 272s Preparing to unpack .../06-libblas3_3.12.1-2_armhf.deb ... 272s Unpacking libblas3:armhf (3.12.1-2) ... 272s Selecting previously unselected package libpixman-1-0:armhf. 272s Preparing to unpack .../07-libpixman-1-0_0.44.0-3_armhf.deb ... 272s Unpacking libpixman-1-0:armhf (0.44.0-3) ... 272s Selecting previously unselected package libxcb-render0:armhf. 272s Preparing to unpack .../08-libxcb-render0_1.17.0-2_armhf.deb ... 272s Unpacking libxcb-render0:armhf (1.17.0-2) ... 272s Selecting previously unselected package libxcb-shm0:armhf. 272s Preparing to unpack .../09-libxcb-shm0_1.17.0-2_armhf.deb ... 272s Unpacking libxcb-shm0:armhf (1.17.0-2) ... 272s Selecting previously unselected package libxrender1:armhf. 272s Preparing to unpack .../10-libxrender1_1%3a0.9.10-1.1build1_armhf.deb ... 272s Unpacking libxrender1:armhf (1:0.9.10-1.1build1) ... 272s Selecting previously unselected package libcairo2:armhf. 272s Preparing to unpack .../11-libcairo2_1.18.2-2_armhf.deb ... 272s Unpacking libcairo2:armhf (1.18.2-2) ... 272s Selecting previously unselected package libdatrie1:armhf. 273s Preparing to unpack .../12-libdatrie1_0.2.13-3build1_armhf.deb ... 273s Unpacking libdatrie1:armhf (0.2.13-3build1) ... 273s Selecting previously unselected package libdeflate0:armhf. 273s Preparing to unpack .../13-libdeflate0_1.23-1_armhf.deb ... 273s Unpacking libdeflate0:armhf (1.23-1) ... 273s Selecting previously unselected package libgfortran5:armhf. 273s Preparing to unpack .../14-libgfortran5_15-20250222-0ubuntu1_armhf.deb ... 273s Unpacking libgfortran5:armhf (15-20250222-0ubuntu1) ... 273s Selecting previously unselected package libgomp1:armhf. 273s Preparing to unpack .../15-libgomp1_15-20250222-0ubuntu1_armhf.deb ... 273s Unpacking libgomp1:armhf (15-20250222-0ubuntu1) ... 273s Selecting previously unselected package libgraphite2-3:armhf. 273s Preparing to unpack .../16-libgraphite2-3_1.3.14-2ubuntu1_armhf.deb ... 273s Unpacking libgraphite2-3:armhf (1.3.14-2ubuntu1) ... 273s Selecting previously unselected package libharfbuzz0b:armhf. 273s Preparing to unpack .../17-libharfbuzz0b_10.2.0-1_armhf.deb ... 273s Unpacking libharfbuzz0b:armhf (10.2.0-1) ... 273s Selecting previously unselected package x11-common. 273s Preparing to unpack .../18-x11-common_1%3a7.7+23ubuntu3_all.deb ... 273s Unpacking x11-common (1:7.7+23ubuntu3) ... 273s Selecting previously unselected package libice6:armhf. 273s Preparing to unpack .../19-libice6_2%3a1.1.1-1_armhf.deb ... 273s Unpacking libice6:armhf (2:1.1.1-1) ... 273s Selecting previously unselected package libjpeg-turbo8:armhf. 273s Preparing to unpack .../20-libjpeg-turbo8_2.1.5-3ubuntu2_armhf.deb ... 273s Unpacking libjpeg-turbo8:armhf (2.1.5-3ubuntu2) ... 273s Selecting previously unselected package libjpeg8:armhf. 273s Preparing to unpack .../21-libjpeg8_8c-2ubuntu11_armhf.deb ... 273s Unpacking libjpeg8:armhf (8c-2ubuntu11) ... 273s Selecting previously unselected package liblapack3:armhf. 273s Preparing to unpack .../22-liblapack3_3.12.1-2_armhf.deb ... 273s Unpacking liblapack3:armhf (3.12.1-2) ... 273s Selecting previously unselected package liblerc4:armhf. 273s Preparing to unpack .../23-liblerc4_4.0.0+ds-5ubuntu1_armhf.deb ... 273s Unpacking liblerc4:armhf (4.0.0+ds-5ubuntu1) ... 273s Selecting previously unselected package libthai-data. 273s Preparing to unpack .../24-libthai-data_0.1.29-2build1_all.deb ... 273s Unpacking libthai-data (0.1.29-2build1) ... 273s Selecting previously unselected package libthai0:armhf. 273s Preparing to unpack .../25-libthai0_0.1.29-2build1_armhf.deb ... 273s Unpacking libthai0:armhf (0.1.29-2build1) ... 273s Selecting previously unselected package libpango-1.0-0:armhf. 273s Preparing to unpack .../26-libpango-1.0-0_1.56.2-1_armhf.deb ... 273s Unpacking libpango-1.0-0:armhf (1.56.2-1) ... 273s Selecting previously unselected package libpangoft2-1.0-0:armhf. 273s Preparing to unpack .../27-libpangoft2-1.0-0_1.56.2-1_armhf.deb ... 273s Unpacking libpangoft2-1.0-0:armhf (1.56.2-1) ... 273s Selecting previously unselected package libpangocairo-1.0-0:armhf. 273s Preparing to unpack .../28-libpangocairo-1.0-0_1.56.2-1_armhf.deb ... 273s Unpacking libpangocairo-1.0-0:armhf (1.56.2-1) ... 273s Selecting previously unselected package libpaper2:armhf. 273s Preparing to unpack .../29-libpaper2_2.2.5-0.3_armhf.deb ... 273s Unpacking libpaper2:armhf (2.2.5-0.3) ... 273s Selecting previously unselected package libpaper-utils. 273s Preparing to unpack .../30-libpaper-utils_2.2.5-0.3_armhf.deb ... 273s Unpacking libpaper-utils (2.2.5-0.3) ... 273s Selecting previously unselected package libsharpyuv0:armhf. 273s Preparing to unpack .../31-libsharpyuv0_1.5.0-0.1_armhf.deb ... 273s Unpacking libsharpyuv0:armhf (1.5.0-0.1) ... 273s Selecting previously unselected package libsm6:armhf. 273s Preparing to unpack .../32-libsm6_2%3a1.2.4-1_armhf.deb ... 273s Unpacking libsm6:armhf (2:1.2.4-1) ... 274s Selecting previously unselected package libtcl8.6:armhf. 274s Preparing to unpack .../33-libtcl8.6_8.6.16+dfsg-1_armhf.deb ... 274s Unpacking libtcl8.6:armhf (8.6.16+dfsg-1) ... 274s Selecting previously unselected package libjbig0:armhf. 274s Preparing to unpack .../34-libjbig0_2.1-6.1ubuntu2_armhf.deb ... 274s Unpacking libjbig0:armhf (2.1-6.1ubuntu2) ... 274s Selecting previously unselected package libwebp7:armhf. 274s Preparing to unpack .../35-libwebp7_1.5.0-0.1_armhf.deb ... 274s Unpacking libwebp7:armhf (1.5.0-0.1) ... 274s Selecting previously unselected package libtiff6:armhf. 274s Preparing to unpack .../36-libtiff6_4.5.1+git230720-4ubuntu4_armhf.deb ... 274s Unpacking libtiff6:armhf (4.5.1+git230720-4ubuntu4) ... 274s Selecting previously unselected package libxft2:armhf. 274s Preparing to unpack .../37-libxft2_2.3.6-1build1_armhf.deb ... 274s Unpacking libxft2:armhf (2.3.6-1build1) ... 274s Selecting previously unselected package libxss1:armhf. 274s Preparing to unpack .../38-libxss1_1%3a1.2.3-1build3_armhf.deb ... 274s Unpacking libxss1:armhf (1:1.2.3-1build3) ... 274s Selecting previously unselected package libtk8.6:armhf. 274s Preparing to unpack .../39-libtk8.6_8.6.16-1_armhf.deb ... 274s Unpacking libtk8.6:armhf (8.6.16-1) ... 274s Selecting previously unselected package libxt6t64:armhf. 274s Preparing to unpack .../40-libxt6t64_1%3a1.2.1-1.2build1_armhf.deb ... 274s Unpacking libxt6t64:armhf (1:1.2.1-1.2build1) ... 274s Selecting previously unselected package zip. 274s Preparing to unpack .../41-zip_3.0-14ubuntu2_armhf.deb ... 274s Unpacking zip (3.0-14ubuntu2) ... 274s Selecting previously unselected package unzip. 274s Preparing to unpack .../42-unzip_6.0-28ubuntu6_armhf.deb ... 274s Unpacking unzip (6.0-28ubuntu6) ... 274s Selecting previously unselected package xdg-utils. 274s Preparing to unpack .../43-xdg-utils_1.2.1-2ubuntu1_all.deb ... 274s Unpacking xdg-utils (1.2.1-2ubuntu1) ... 274s Selecting previously unselected package r-base-core. 274s Preparing to unpack .../44-r-base-core_4.4.3-1_armhf.deb ... 274s Unpacking r-base-core (4.4.3-1) ... 274s Selecting previously unselected package r-cran-brio. 274s Preparing to unpack .../45-r-cran-brio_1.1.5-1_armhf.deb ... 274s Unpacking r-cran-brio (1.1.5-1) ... 274s Selecting previously unselected package r-cran-ps. 274s Preparing to unpack .../46-r-cran-ps_1.9.0-1_armhf.deb ... 274s Unpacking r-cran-ps (1.9.0-1) ... 274s Selecting previously unselected package r-cran-r6. 275s Preparing to unpack .../47-r-cran-r6_2.6.1-1_all.deb ... 275s Unpacking r-cran-r6 (2.6.1-1) ... 275s Selecting previously unselected package r-cran-processx. 275s Preparing to unpack .../48-r-cran-processx_3.8.6-1_armhf.deb ... 275s Unpacking r-cran-processx (3.8.6-1) ... 275s Selecting previously unselected package r-cran-callr. 275s Preparing to unpack .../49-r-cran-callr_3.7.6-1_all.deb ... 275s Unpacking r-cran-callr (3.7.6-1) ... 275s Selecting previously unselected package r-cran-cli. 275s Preparing to unpack .../50-r-cran-cli_3.6.4-1_armhf.deb ... 275s Unpacking r-cran-cli (3.6.4-1) ... 275s Selecting previously unselected package r-cran-crayon. 275s Preparing to unpack .../51-r-cran-crayon_1.5.3-1_all.deb ... 275s Unpacking r-cran-crayon (1.5.3-1) ... 275s Selecting previously unselected package r-cran-desc. 275s Preparing to unpack .../52-r-cran-desc_1.4.3-1_all.deb ... 275s Unpacking r-cran-desc (1.4.3-1) ... 275s Selecting previously unselected package r-cran-diffobj. 275s Preparing to unpack .../53-r-cran-diffobj_0.3.5-1_armhf.deb ... 275s Unpacking r-cran-diffobj (0.3.5-1) ... 275s Selecting previously unselected package r-cran-digest. 275s Preparing to unpack .../54-r-cran-digest_0.6.37-1_armhf.deb ... 275s Unpacking r-cran-digest (0.6.37-1) ... 275s Selecting previously unselected package r-cran-evaluate. 275s Preparing to unpack .../55-r-cran-evaluate_1.0.3-1_all.deb ... 275s Unpacking r-cran-evaluate (1.0.3-1) ... 275s Selecting previously unselected package r-cran-fs. 275s Preparing to unpack .../56-r-cran-fs_1.6.5+dfsg-1_armhf.deb ... 275s Unpacking r-cran-fs (1.6.5+dfsg-1) ... 275s Selecting previously unselected package r-cran-glue. 275s Preparing to unpack .../57-r-cran-glue_1.8.0-1_armhf.deb ... 275s Unpacking r-cran-glue (1.8.0-1) ... 275s Selecting previously unselected package r-cran-jsonlite. 275s Preparing to unpack .../58-r-cran-jsonlite_1.9.1+dfsg-1_armhf.deb ... 275s Unpacking r-cran-jsonlite (1.9.1+dfsg-1) ... 275s Selecting previously unselected package r-cran-rlang. 275s Preparing to unpack .../59-r-cran-rlang_1.1.5-1_armhf.deb ... 275s Unpacking r-cran-rlang (1.1.5-1) ... 275s Selecting previously unselected package r-cran-lifecycle. 275s Preparing to unpack .../60-r-cran-lifecycle_1.0.4+dfsg-1_all.deb ... 275s Unpacking r-cran-lifecycle (1.0.4+dfsg-1) ... 275s Selecting previously unselected package r-cran-magrittr. 275s Preparing to unpack .../61-r-cran-magrittr_2.0.3-1_armhf.deb ... 275s Unpacking r-cran-magrittr (2.0.3-1) ... 275s Selecting previously unselected package r-cran-pkgbuild. 275s Preparing to unpack .../62-r-cran-pkgbuild_1.4.6-1_all.deb ... 275s Unpacking r-cran-pkgbuild (1.4.6-1) ... 275s Selecting previously unselected package r-cran-rprojroot. 275s Preparing to unpack .../63-r-cran-rprojroot_2.0.4-2_all.deb ... 275s Unpacking r-cran-rprojroot (2.0.4-2) ... 276s Selecting previously unselected package r-cran-withr. 276s Preparing to unpack .../64-r-cran-withr_3.0.2+dfsg-1_all.deb ... 276s Unpacking r-cran-withr (3.0.2+dfsg-1) ... 276s Selecting previously unselected package r-cran-pkgload. 276s Preparing to unpack .../65-r-cran-pkgload_1.4.0-1_all.deb ... 276s Unpacking r-cran-pkgload (1.4.0-1) ... 276s Selecting previously unselected package r-cran-praise. 276s Preparing to unpack .../66-r-cran-praise_1.0.0-4build1_all.deb ... 276s Unpacking r-cran-praise (1.0.0-4build1) ... 276s Selecting previously unselected package r-cran-waldo. 276s Preparing to unpack .../67-r-cran-waldo_0.6.1-2_all.deb ... 276s Unpacking r-cran-waldo (0.6.1-2) ... 276s Selecting previously unselected package r-cran-testthat. 276s Preparing to unpack .../68-r-cran-testthat_3.2.3-1_armhf.deb ... 276s Unpacking r-cran-testthat (3.2.3-1) ... 276s Setting up libgraphite2-3:armhf (1.3.14-2ubuntu1) ... 276s Setting up libpixman-1-0:armhf (0.44.0-3) ... 276s Setting up libsharpyuv0:armhf (1.5.0-0.1) ... 276s Setting up liblerc4:armhf (4.0.0+ds-5ubuntu1) ... 276s Setting up libxrender1:armhf (1:0.9.10-1.1build1) ... 276s Setting up libdatrie1:armhf (0.2.13-3build1) ... 276s Setting up libxcb-render0:armhf (1.17.0-2) ... 276s Setting up unzip (6.0-28ubuntu6) ... 276s Setting up x11-common (1:7.7+23ubuntu3) ... 276s Setting up libdeflate0:armhf (1.23-1) ... 276s Setting up libxcb-shm0:armhf (1.17.0-2) ... 276s Setting up libgomp1:armhf (15-20250222-0ubuntu1) ... 276s Setting up libjbig0:armhf (2.1-6.1ubuntu2) ... 276s Setting up zip (3.0-14ubuntu2) ... 276s Setting up libblas3:armhf (3.12.1-2) ... 276s update-alternatives: using /usr/lib/arm-linux-gnueabihf/blas/libblas.so.3 to provide /usr/lib/arm-linux-gnueabihf/libblas.so.3 (libblas.so.3-arm-linux-gnueabihf) in auto mode 276s Setting up libfreetype6:armhf (2.13.3+dfsg-1) ... 276s Setting up fonts-dejavu-mono (2.37-8) ... 276s Setting up libtcl8.6:armhf (8.6.16+dfsg-1) ... 276s Setting up fonts-dejavu-core (2.37-8) ... 276s Setting up libjpeg-turbo8:armhf (2.1.5-3ubuntu2) ... 276s Setting up libgfortran5:armhf (15-20250222-0ubuntu1) ... 276s Setting up libwebp7:armhf (1.5.0-0.1) ... 276s Setting up libharfbuzz0b:armhf (10.2.0-1) ... 276s Setting up libthai-data (0.1.29-2build1) ... 277s Setting up libxss1:armhf (1:1.2.3-1build3) ... 277s Setting up libpaper2:armhf (2.2.5-0.3) ... 277s Setting up xdg-utils (1.2.1-2ubuntu1) ... 277s update-alternatives: using /usr/bin/xdg-open to provide /usr/bin/open (open) in auto mode 277s Setting up libjpeg8:armhf (8c-2ubuntu11) ... 277s Setting up libice6:armhf (2:1.1.1-1) ... 277s Setting up liblapack3:armhf (3.12.1-2) ... 277s update-alternatives: using /usr/lib/arm-linux-gnueabihf/lapack/liblapack.so.3 to provide /usr/lib/arm-linux-gnueabihf/liblapack.so.3 (liblapack.so.3-arm-linux-gnueabihf) in auto mode 277s Setting up fontconfig-config (2.15.0-2ubuntu1) ... 277s Setting up libpaper-utils (2.2.5-0.3) ... 277s Setting up libthai0:armhf (0.1.29-2build1) ... 277s Setting up libtiff6:armhf (4.5.1+git230720-4ubuntu4) ... 277s Setting up libfontconfig1:armhf (2.15.0-2ubuntu1) ... 277s Setting up libsm6:armhf (2:1.2.4-1) ... 277s Setting up fontconfig (2.15.0-2ubuntu1) ... 279s Regenerating fonts cache... done. 279s Setting up libxft2:armhf (2.3.6-1build1) ... 279s Setting up libtk8.6:armhf (8.6.16-1) ... 279s Setting up libpango-1.0-0:armhf (1.56.2-1) ... 279s Setting up libcairo2:armhf (1.18.2-2) ... 279s Setting up libxt6t64:armhf (1:1.2.1-1.2build1) ... 279s Setting up libpangoft2-1.0-0:armhf (1.56.2-1) ... 279s Setting up libpangocairo-1.0-0:armhf (1.56.2-1) ... 279s Setting up r-base-core (4.4.3-1) ... 279s Creating config file /etc/R/Renviron with new version 279s Setting up r-cran-crayon (1.5.3-1) ... 279s Setting up r-cran-ps (1.9.0-1) ... 279s Setting up r-cran-r6 (2.6.1-1) ... 279s Setting up r-cran-magrittr (2.0.3-1) ... 279s Setting up r-cran-fs (1.6.5+dfsg-1) ... 279s Setting up r-cran-brio (1.1.5-1) ... 279s Setting up r-cran-diffobj (0.3.5-1) ... 279s Setting up r-cran-rlang (1.1.5-1) ... 279s Setting up r-cran-withr (3.0.2+dfsg-1) ... 279s Setting up r-cran-processx (3.8.6-1) ... 279s Setting up r-cran-praise (1.0.0-4build1) ... 279s Setting up r-cran-digest (0.6.37-1) ... 279s Setting up r-cran-evaluate (1.0.3-1) ... 279s Setting up r-cran-glue (1.8.0-1) ... 279s Setting up r-cran-cli (3.6.4-1) ... 279s Setting up r-cran-lifecycle (1.0.4+dfsg-1) ... 279s Setting up r-cran-rprojroot (2.0.4-2) ... 279s Setting up r-cran-jsonlite (1.9.1+dfsg-1) ... 279s Setting up r-cran-waldo (0.6.1-2) ... 279s Setting up r-cran-callr (3.7.6-1) ... 279s Setting up r-cran-desc (1.4.3-1) ... 279s Setting up r-cran-pkgbuild (1.4.6-1) ... 279s Setting up r-cran-pkgload (1.4.0-1) ... 279s Setting up r-cran-testthat (3.2.3-1) ... 279s Processing triggers for libc-bin (2.41-1ubuntu2) ... 279s Processing triggers for man-db (2.13.0-1) ... 280s Processing triggers for install-info (7.1.1-1) ... 288s autopkgtest [16:08:43]: test run-unit-test: [----------------------- 290s Begin testing test-atomic.R 290s 290s R version 4.4.3 (2025-02-28) -- "Trophy Case" 290s Copyright (C) 2025 The R Foundation for Statistical Computing 290s Platform: arm-unknown-linux-gnueabihf (32-bit) 290s 290s R is free software and comes with ABSOLUTELY NO WARRANTY. 290s You are welcome to redistribute it under certain conditions. 290s Type 'license()' or 'licence()' for distribution details. 290s 290s R is a collaborative project with many contributors. 290s Type 'contributors()' for more information and 290s 'citation()' on how to cite R or R packages in publications. 290s 290s Type 'demo()' for some demos, 'help()' for on-line help, or 290s 'help.start()' for an HTML browser interface to help. 290s Type 'q()' to quit R. 290s 290s > NAME <- "atomic" 290s > source(file.path('_helper', 'init.R')) 290s > 290s > # - Basic Tests 290s > 290s > all.equal(as.character(diffPrint(chr.1, chr.2)), rdsf(100)) 290s [1] TRUE 290s > all.equal( 290s + as.character(diffPrint(chr.1, chr.2, mode="unified")), rdsf(200) 290s + ) 290s [1] TRUE 290s > all.equal( 290s + as.character(diffPrint(chr.1, chr.2, mode="context")), rdsf(400) 290s + ) 290s [1] TRUE 290s > all.equal( 290s + as.character(diffPrint(chr.1[2:3], chr.2[2], mode="sidebyside")), rdsf(500) 290s + ) 290s [1] TRUE 290s > # Check that `extra` works 290s > 290s > all.equal( 290s + as.character( 290s + diffPrint(chr.1, chr.2, mode="unified", extra=list(quote=FALSE)) 290s + ), 290s + rdsf(600) 290s + ) 290s [1] TRUE 290s > # make sure blanks line up correctly 290s > 290s > all.equal( 290s + as.character(diffPrint(chr.3, chr.4)), rdsf(700) 290s + ) 291s [1] TRUE 291s > all.equal( 291s + as.character(diffPrint(chr.3, chr.4, mode="unified")), rdsf(800) 291s + ) 291s [1] TRUE 291s > 291s > # - Word wrap in atomic 291s > 291s > A <- A.1 <- B <- c(letters, LETTERS) 291s > B[15] <- "Alabama" 291s > A.1[5] <- "Ee" 291s > C <- A[-15] 291s > D <- C 291s > E <- B[-45] 291s > 291s > # Test simple changes to vectors; at 80 columns removing 1:8 corresponds to 291s > # row deletion 291s > 291s > all.equal(as.character(diffPrint(A[-(1:8)], A)), rdsf(900)) 291s [1] TRUE 291s > all.equal(as.character(diffPrint(A, A[-(1:8)])), rdsf(1000)) 291s [1] TRUE 291s > 291s > all.equal(as.character(diffPrint(A[-1], A[-2])), rdsf(1100)) 291s [1] TRUE 291s > 291s > # Replace single word 291s > 291s > all.equal(as.character(diffPrint(A, B)), rdsf(1200)) 291s [1] TRUE 291s > all.equal(as.character(diffPrint(B, A)), rdsf(1250)) 291s [1] TRUE 291s > 291s > # Make sure turning off word.diff also turns of unwrapping, but that we can 291s > # turn off unwrapping without turning off word diff 291s > 291s > all.equal( 291s + as.character(diffPrint(A, B, word.diff=FALSE)), rdsf(1300) 291s + ) 291s [1] TRUE 291s > all.equal( 291s + as.character(diffPrint(A, B, unwrap.atomic=FALSE)), rdsf(1400) 291s + ) 291s [1] TRUE 291s > # Different wrap frequency and removed words that span lines 291s > 291s > all.equal( 291s + as.character(diffPrint(A, A.1[-(13:18)])), rdsf(1425) 291s + ) 291s [1] TRUE 291s > # Removing words 291s > 291s > all.equal(as.character(diffPrint(C, B)), rdsf(1450)) 291s [1] TRUE 291s > 291s > # Two hunks 291s > 291s > all.equal(as.character(diffPrint(D, E)), rdsf(1500)) 291s [1] TRUE 291s > all.equal(as.character(diffPrint(E, D)), rdsf(1600)) 291s [1] TRUE 291s > 291s > # Vignette example 291s > 291s > state.abb.2 <- state.abb 291s > state.abb.2[38] <- "Pennsylvania" 291s > 291s > all.equal( 291s + as.character(diffPrint(state.abb, state.abb.2)), rdsf(1700) 291s + ) 291s [1] TRUE 291s > # Number corner cases 291s > 291s > all.equal(as.character(diffPrint(1:100, 2:101)), rdsf(1800)) 291s [1] TRUE 291s > all.equal(as.character(diffPrint(2:101, 1:100)), rdsf(1900)) 291s [1] TRUE 291s > all.equal( 291s + as.character(diffPrint(2:101, (1:100)[-9])), rdsf(2000) 291s + ) 291s [1] TRUE 291s > all.equal( 291s + as.character(diffPrint((2:101)[-98], (1:100)[-9])), rdsf(2100) 291s + ) 291s [1] TRUE 291s > # This is one of those that a better in-hunk align algorithm would benefit 291s > 291s > int.1 <- int.2 <- 1:100 291s > int.2[c(8, 20, 60)] <- 99 291s > int.2 <- c(50:1, int.2) 291s > all.equal(as.character(diffPrint(int.1, int.2)), rdsf(2200)) 291s [1] TRUE 291s > 291s > # - with names 291s > rand.chrs <- do.call(paste0, expand.grid(LETTERS, LETTERS)) 291s > F <- F1 <- F2 <- (2:105)[-98] 291s > G <- G2 <- G3 <- G4 <- G5 <- (1:100)[-9] 291s > nm.1 <- rand.chrs[seq_along(F)] 291s > nm.2 <- rand.chrs[seq_along(G)] 291s > names(F1) <- names(F2) <- nm.1 291s > names(G3) <- names(G2) <- names(G3) <- names(G4) <- names(G5) <- nm.2 291s > names(G3)[c(5, 25, 60)] <- c("XXXXX", rand.chrs[c(300, 350)]) 291s > names(G4)[c(5, 25, 60)] <- names(G5)[c(5, 25, 60)] <- 291s + c("XX", rand.chrs[c(300, 350)]) 291s > attr(F2, "blah") <- 1:5 291s > attr(G5, "blah") <- 3:8 291s > 291s > all.equal(as.character(diffPrint(F, G)), rdsf(2300)) 291s [1] TRUE 291s > all.equal(as.character(diffPrint(F1, G2)), rdsf(2400)) 291s [1] TRUE 291s > 291s > # Challenging case b/c the names wrap with values, and you have to pick one or 291s > # the other to match when the wrap frequencies are different 291s > 291s > all.equal(as.character(diffPrint(F1, G3)), rdsf(2500)) 291s [1] TRUE 291s > all.equal(as.character(diffPrint(F1, G4)), rdsf(2520)) 292s [1] TRUE 292s > 292s > # Attributes 292s > 292s > all.equal(as.character(diffPrint(F2, G5)), rdsf(2530)) 292s [1] TRUE 292s > all.equal(as.character(diffPrint(F1, G5)), rdsf(2540)) 292s [1] TRUE 292s > 292s > # - Original tests 292s > set.seed(2) 292s > w1 <- sample( 292s + c( 292s + "carrot", "cat", "cake", "eat", "rabbit", "holes", "the", "a", "pasta", 292s + "boom", "noon", "sky", "hat", "blah", "paris", "dog", "snake" 292s + ), 25, replace=TRUE 292s + ) 292s > w4 <- w3 <- w2 <- w1 292s > w2[sample(seq_along(w1), 5)] <- LETTERS[1:5] 292s > w3 <- w1[8:15] 292s > w4 <- c(w1[1:5], toupper(w1[1:5]), w1[6:15], toupper(w1[1:5])) 292s > 292s > all.equal(as.character(diffPrint(w1, w2)), rdsf(2600)) 292s [1] TRUE 292s > all.equal(as.character(diffPrint(w1, w3)), rdsf(2700)) 292s [1] TRUE 292s > all.equal(as.character(diffPrint(w1, w4)), rdsf(2800)) 292s [1] TRUE 292s > 292s > # - Simple word diffs 292s > a <- c("a", "b", "c", "d") 292s > b <- c("b", "c", "d", "e") 292s > all.equal(as.character(diffPrint(a, b)), rdsf(2900)) 292s [1] TRUE 292s > 292s > a <- c("x", "a", "b", "c", "d", "z") 292s > b <- c("x", "b", "c", "d", "e", "z") 292s > all.equal(as.character(diffPrint(a, b)), rdsf(3000)) 292s [1] TRUE 292s > 292s > a <- c("x", "a", "b", "c", "d", "z") 292s > b <- c("z", "b", "c", "d", "e", "x") 292s > all.equal(as.character(diffPrint(a, b)), rdsf(3100)) 292s [1] TRUE 292s > 292s > # - Alignment edge cases 292s > all.equal( 292s + as.character(diffPrint(20:50, 30:62)), rdsf(3200) 292s + ) 292s [1] TRUE 292s > # below is off; should be aligning matching context line, part of the problem 292s > # might be that we're doing the realignment without thinking about what the 292s > # other hunk has. 292s > # 292s > # Possible encode each line as hunk#:diff/mix/cont 292s > 292s > # all.equal( 292s > # as.character(diffPrint(20:50, 35:62)), rdsf(3300) 292s > # ) 292s > 292s > # another interesting example where the existing algo seems to lead to a 292s > # reasonable outcome 292s > 292s > all.equal( 292s + as.character(diffPrint(c(1:24,35:45), c(1:8, 17:45))), rdsf(3400) 292s + ) 292s [1] TRUE 292s > 292s PASS 292s Begin testing test-banner.R 292s 292s R version 4.4.3 (2025-02-28) -- "Trophy Case" 292s Copyright (C) 2025 The R Foundation for Statistical Computing 292s Platform: arm-unknown-linux-gnueabihf (32-bit) 292s 292s R is free software and comes with ABSOLUTELY NO WARRANTY. 292s You are welcome to redistribute it under certain conditions. 292s Type 'license()' or 'licence()' for distribution details. 292s 292s R is a collaborative project with many contributors. 292s Type 'contributors()' for more information and 292s 'citation()' on how to cite R or R packages in publications. 292s 292s Type 'demo()' for some demos, 'help()' for on-line help, or 292s 'help.start()' for an HTML browser interface to help. 292s Type 'q()' to quit R. 292s 292s > NAME <- "banner" 292s > source(file.path('_helper', 'init.R')) 292s > 292s > # - Banner Capture ------------------------------------------------------------ 292s > 292s > ref <- as.character( 292s + diffPrint(1 + 2, letters, tar.banner="1 + 2", cur.banner="letters") 292s + ) 293s > identical(as.character(diffPrint(1 + 2, letters)), ref) 293s [1] TRUE 293s > invisible( 293s + setMethod( 293s + "diffPrint", c("numeric", "character"), 293s + function(target, current, ...) callNextMethod() 293s + ) ) 293s > identical(as.character(diffPrint(1 + 2, letters)), ref) 293s [1] TRUE 293s > isTRUE( 293s + !identical(as.character(diffPrint(1 + 2, LETTERS)), ref) 293s + ) 293s [1] TRUE 293s > 293s PASS 293s Begin testing test-capture.R 293s 293s R version 4.4.3 (2025-02-28) -- "Trophy Case" 293s Copyright (C) 2025 The R Foundation for Statistical Computing 293s Platform: arm-unknown-linux-gnueabihf (32-bit) 293s 293s R is free software and comes with ABSOLUTELY NO WARRANTY. 293s You are welcome to redistribute it under certain conditions. 293s Type 'license()' or 'licence()' for distribution details. 293s 293s R is a collaborative project with many contributors. 293s Type 'contributors()' for more information and 293s 'citation()' on how to cite R or R packages in publications. 293s 293s Type 'demo()' for some demos, 'help()' for on-line help, or 293s 'help.start()' for an HTML browser interface to help. 293s Type 'q()' to quit R. 293s 293s > NAME <- "capture" 293s > source(file.path('_helper', 'init.R')) 293s > 293s > # - capture width issues ------------------------------------------------------- 293s > 293s > local({ 293s + old.opt <- options(width=40L) 293s + on.exit(options(old.opt)) 293s + etc <- new("Settings", style=StyleRaw(), text.width=5L) # impossible width 293s + # warn: "Unable to set desired " 293s + res <- diffobj:::capture(letters, etc, function(...) do.call(cat, list(...))) 293s + all.equal(nchar(res), c(40L, 40L, 36L)) 293s + }) 293s [1] TRUE 293s Warning message: 293s In diffobj:::capture(letters, etc, function(...) do.call(cat, list(...))) : 293s Unable to set desired width 5, (invalid 'width' parameter, allowed 10...10000);proceeding with existing setting. 293s > 293s > # - errors in capture ---------------------------------------------------------- 293s > 293s > etc <- new("Settings", style=StyleRaw()) 293s > try(diffobj:::capture(stop('boom'), etc, function(...) stop(...))) # boom 293s Error in eval(x, etc@frame) : boom 293s Error in err("Failed attempting to get text representation of object: ", : 293s Failed attempting to get text representation of object: boom 293s > print <- function() NULL 293s > str <- function() NULL 293s > etc@mode <- "auto" 293s > etc@frame <- environment() 293s > try(diffobj:::capt_print(1, 2, etc, function(...) stop(...), list())) # compose 293s Error in match.call(definition, call, expand.dots, envir) : 293s unused argument (x = NULL) 293s Error in err("Unable to compose `print` call") : 293s Unable to compose `print` call 293s > # spec object 293s > try(diffobj:::capt_str(1, 2, etc, function(...) stop(...), list(object=1))) 293s Error in err("You may not specify `object` as part of `extra`") : 293s You may not specify `object` as part of `extra` 293s > try( # attempting to deparse 293s + diffobj:::capt_deparse( 293s + stop('a'), stop('b'), etc, function(...) stop(...), list() 293s + ) 293s + ) 293s Error in do.call(deparse, c(list(target), extra), quote = TRUE) : a 293s Error in err("Error attempting to deparse object(s)") : 293s Error attempting to deparse object(s) 293s > try( # target 293s + suppressWarnings( 293s + diffobj:::capt_file( 293s + tempfile(), tempfile(), etc, function(...) stop(...), list() 293s + ) ) 293s + ) 293s Error in file(con, "r") : cannot open the connection 293s Error in err("Unable to read `target` file.") : 293s Unable to read `target` file. 293s > local({ 293s + f <- tempfile() 293s + on.exit(unlink(f), add=TRUE) 293s + writeLines(letters, f) 293s + try( # "`current`" 293s + suppressWarnings( 293s + diffobj:::capt_file(f, tempfile(), etc, function(...) stop(...), list()) 293s + ) 293s + ) 293s + try( # "`target`" 293s + suppressWarnings( 293s + diffobj:::capt_csv( 293s + tempfile(), tempfile(), etc, function(...) stop(...), list() 293s + ) ) 293s + ) 293s + try( # "`current`" 293s + suppressWarnings( 293s + diffobj:::capt_csv( 293s + f, tempfile(), etc, function(...) stop(...), list() 293s + ) ) 293s + ) 293s + }) 293s Error in file(con, "r") : cannot open the connection 293s Error in err("Unable to read `current` file.") : 293s Unable to read `current` file. 293s Error in file(file, "rt") : cannot open the connection 293s Error in err("Unable to read `target` file.") : 293s Unable to read `target` file. 293s Error in file(file, "rt") : cannot open the connection 293s Error in err("Unable to read `current` file.") : 293s Unable to read `current` file. 293s > bad_obj <- structure(list(NULL), class='diffobj_ogewlhgiadfl3') 293s > try( # "Coercion of `target`" 293s + diffobj:::capt_chr(bad_obj, letters, etc, function(...) stop(...), list()) 293s + ) 293s Error in diffobj:::capt_chr(bad_obj, letters, etc, function(...) stop(...), : 293s Coercion of `target` did not produce character object (list). 293s > try( # "Coercion of `current`" 293s + diffobj:::capt_chr(letters, bad_obj, etc, function(...) stop(...), list()) 293s + ) 293s Error in diffobj:::capt_chr(letters, bad_obj, etc, function(...) stop(...), : 293s Coercion of `current` did not produce character object (list). 293s > 293s PASS 293s Begin testing test-check.R 293s 293s R version 4.4.3 (2025-02-28) -- "Trophy Case" 293s Copyright (C) 2025 The R Foundation for Statistical Computing 293s Platform: arm-unknown-linux-gnueabihf (32-bit) 293s 293s R is free software and comes with ABSOLUTELY NO WARRANTY. 293s You are welcome to redistribute it under certain conditions. 293s Type 'license()' or 'licence()' for distribution details. 293s 293s R is a collaborative project with many contributors. 293s Type 'contributors()' for more information and 293s 'citation()' on how to cite R or R packages in publications. 293s 293s Type 'demo()' for some demos, 'help()' for on-line help, or 293s 'help.start()' for an HTML browser interface to help. 293s Type 'q()' to quit R. 293s 293s > NAME <- "check" 293s > source(file.path('_helper', 'init.R')) 294s > 294s > # - is.less_flags -------------------------------------------------------------- 294s > 294s > isTRUE(diffobj:::is.less_flags("RVXF")) 294s [1] TRUE 294s > isTRUE(diffobj:::is.less_flags("rvxF")) 294s [1] TRUE 294s > identical(diffobj:::is.less_flags(c("rvxF", "RVXF")), FALSE) 294s [1] TRUE 294s > identical(diffobj:::is.less_flags(23), FALSE) 294s [1] TRUE 294s > identical(diffobj:::is.less_flags("rv xF"), FALSE) 294s [1] TRUE 294s > 294s > # - is.int.2L ------------------------------------------------------------------ 294s > 294s > isTRUE(diffobj:::is.int.2L(1:2)) 294s [1] TRUE 294s > isTRUE(diffobj:::is.int.2L(as.numeric(1:2))) 294s [1] TRUE 294s > identical(diffobj:::is.int.2L(c(1.3, 2.2)), FALSE) 294s [1] TRUE 294s > identical(diffobj:::is.int.2L(1:3), FALSE) 294s [1] TRUE 294s > identical(diffobj:::is.int.2L(c(1, NA)), FALSE) 294s [1] TRUE 294s > 294s > # - arg.funs ------------------------------------------------------------------- 294s > 294s > isTRUE(diffobj:::is.one.arg.fun(function(x) NULL)) 294s [1] TRUE 294s > isTRUE(diffobj:::is.one.arg.fun(function(x, y=5) NULL)) 294s [1] TRUE 294s > 294s > diffobj:::is.one.arg.fun(function(..., x) NULL) # "cannot have `...` as " 294s [1] "cannot have `...` as the first argument" 294s > diffobj:::is.one.arg.fun(NULL) # "is not a fun" 294s [1] "is not a function" 294s > diffobj:::is.one.arg.fun(function() NULL) # "have at least" 294s [1] "does not have at least one arguments" 294s > diffobj:::is.one.arg.fun(function(x, y) NULL) # "cannot have any" 294s [1] "cannot have any non-optional arguments other than first one" 294s > 294s > isTRUE(diffobj:::is.two.arg.fun(function(x, y) NULL)) 294s [1] TRUE 294s > isTRUE(diffobj:::is.two.arg.fun(function(x, y=5) NULL)) 294s [1] TRUE 294s > 294s > diffobj:::is.two.arg.fun(function(x, ..., y) NULL) # "cannot have `...` as " 294s [1] "cannot have `...` as one of the first two arguments" 294s > diffobj:::is.two.arg.fun(NULL) # "is not a fun" 294s [1] "is not a function" 294s > diffobj:::is.two.arg.fun(function(x) NULL) # "have at least") 294s [1] "does not have at least two arguments" 294s > diffobj:::is.two.arg.fun(function(x, y, z) NULL) # "cannot have any" 294s [1] "cannot have any non-optional arguments other than first two" 294s > 294s > # - valid_object --------------------------------------------------------------- 294s > 294s > s.h <- StyleHtml() 294s > s.h@wrap <- TRUE 294s > try(diffobj:::valid_object(s.h, "style", stop)) #an invalid `StyleHtml` object 294s Error in diffobj:::valid_object(s.h, "style", stop) : 294s Argument `style` is an invalid `StyleHtml` object because: - slot `wrap` must be FALSE for `styleHtml` objects. 294s > 294s > pal <- PaletteOfStyles() 294s > pal["html", "light", "yb"] <- list(s.h) 294s > try(# "`palette.of.styles` is an invalid" 294s + diffChr( 294s + "A", "B", palette.of.styles=pal, style="auto", format="html", 294s + brightness="light", color.mode="yb" 294s + ) 294s + ) 294s Error in diffChr(target = "A", current = "B", palette.of.styles = pal, : 294s Argument `palette.of.styles` is an invalid `StyleHtml` because it contains and invalid `Style` object: - slot `wrap` must be FALSE for `styleHtml` objects. 294s > # - brightness ----------------------------------------------------------------- 294s > 294s > try(diffPrint(1:3, 3:6, brightness=NA)) # "must be character" 294s Error in diffPrint(target = 1:3, current = 3:6, brightness = NA) : 294s Argument `brightness` must be character and not contain NAs 294s > try(diffPrint(1:3, 3:6, brightness="red")) # "may only contain values" 294s Error in diffPrint(target = 1:3, current = 3:6, brightness = "red") : 294s Argument `brightness` may only contain values in `c("neutral", "light", "dark")` 294s > try(diffPrint(1:3, 3:6, brightness=c(raw='light'))) # "one empty name" 294s Error in diffPrint(target = 1:3, current = 3:6, brightness = c(raw = "light")) : 294s Argument `brightness` must include at least one empty name `""` if it has names. 294s > try(diffPrint(1:3, 3:6, brightness=c('light', 'dark'))) # have names 294s Error in diffPrint(target = 1:3, current = 3:6, brightness = c("light", : 294s Argument `brightness` must have names if it has length > 1, and those names must include at least an empty name `""` as well as names only from `c("raw", "ansi8", "ansi256", "html")`. 294s > 294s > # - misc ----------------------------------------------------------------------- 294s > 294s > diffobj:::is.one.file.name(1) # "must be character" 294s [1] "must be character(1L) and not NA" 294s > try(diffPrint(1:3, 2:6, extra="hello")) # "must be a list" 294s Error in diffPrint(target = 1:3, current = 2:6, extra = "hello") : 294s Argument `extra` must be a list. 294s > try(diffPrint(1:3, 2:6, context=TRUE)) # "Argument `context` must" 294s Error in diffPrint(target = 1:3, current = 2:6, context = TRUE) : 294s Argument `context` must be integer(1L) and not NA, an object produced by `auto_context`, or "auto". 294s > try(diffPrint(1:3, 2:6, mode=1)) # "must be character" 294s Error in diffPrint(target = 1:3, current = 2:6, mode = 1) : 294s Argument `mode` must be character(1L) and in `c("auto", "unified", "context", "sidebyside")`. 294s > try(diffPrint(1:3, 2:6, tab.stops=-1)) # "strictly positive" 294s Error in diffPrint(target = 1:3, current = 2:6, tab.stops = -1) : 294s Argument `tab.stops` must be integer containing at least one value and with all values strictly positive 294s > try(diffPrint(1:3, 2:6, hunk.limit='hello')) # "integer vector" 294s Error in diffPrint(target = 1:3, current = 2:6, hunk.limit = "hello") : 294s Argument `hunk.limit` must be an integer vector of length 1 or 2 and if length 2, with the first value larger than or equal to the second. 294s > try(diffPrint(1:3, 2:6, guides='hello')) # "or a function" 294s Error in diffPrint(target = 1:3, current = 2:6, guides = "hello") : 294s Argument `guides` must be TRUE, FALSE, or a function 294s > try(diffPrint(1:3, 2:6, guides=function(x, y, z) NULL))# "cannot have any non" 294s Error in diffPrint(target = 1:3, current = 2:6, guides = function(x, y, : 294s Argument `guides` cannot have any non-optional arguments other than first two 294s > try(diffPrint(1:3, 2:6, trim='hello')) # "TRUE, FALSE, or a function" 294s Error in diffPrint(target = 1:3, current = 2:6, trim = "hello") : 294s Argument `trim` must be TRUE, FALSE, or a function 294s > try(diffPrint(1:3, 2:6, trim=function(x, y, z) NULL)) # "cannot have any non" 294s Error in diffPrint(target = 1:3, current = 2:6, trim = function(x, y, : 294s Argument `trim` cannot have any non-optional arguments other than first two 294s > try(diffPrint(1:3, 2:6, interactive='hello')) # "must be TRUE or" 294s Error in diffPrint(target = 1:3, current = 2:6, interactive = "hello") : 294s Argument `interactive` must be TRUE or FALSE. 294s > try(diffPrint(1:3, 2:6, max.diffs=1:10)) # "must be integer" 294s Error in diffPrint(target = 1:3, current = 2:6, max.diffs = 1:10) : 294s Argument `max.diffs` must be integer(1L) and not NA. 294s > try(diffPrint(1:3, 2:6, tar.banner=1:10)) # "must be atomic" 294s Error in diffPrint(target = 1:3, current = 2:6, tar.banner = 1:10) : 294s Argument `tar.banner` must be atomic and length(1L), NULL, a symbol, or a call 294s > try(diffPrint(1:3, 2:6, style=1:10)) # "must be \"auto\", a" 294s Error in diffPrint(target = 1:3, current = 2:6, style = 1:10) : 294s Argument `style` must be "auto", a `Style` object, or a list. 294s > try(diffPrint(1:3, 2:6, pager=1:10)) # "must be one of" 294s Error in diffPrint(target = 1:3, current = 2:6, pager = 1:10) : 294s Argument `pager` must be one of `c("auto", "off", "on")`, a `Pager` object, or a list. 294s > try(diffPrint(1:3, 2:6, format=1:10)) # "must be character" 294s Error in diffPrint(target = 1:3, current = 2:6, format = 1:10) : 294s Argument `format` must be character(1L) and not NA 294s > try(diffPrint(1:3, 2:6, palette.of.styles=1:10)) # "must be a `PaletteOfStyles`" 294s Error in diffPrint(target = 1:3, current = 2:6, palette.of.styles = 1:10) : 294s Argument `palette.of.styles` must be a `PaletteOfStyles` object. 294s > try(diffChr(letters, LETTERS, context=NA)) # "must be integer" 294s Error in diffChr(target = letters, current = LETTERS, context = NA) : 294s Argument `context` must be integer(1L) and not NA, an object produced by `auto_context`, or "auto". 294s > 294s > 294s > 294s PASS 294s Begin testing test-context.R 294s 294s R version 4.4.3 (2025-02-28) -- "Trophy Case" 294s Copyright (C) 2025 The R Foundation for Statistical Computing 294s Platform: arm-unknown-linux-gnueabihf (32-bit) 294s 294s R is free software and comes with ABSOLUTELY NO WARRANTY. 294s You are welcome to redistribute it under certain conditions. 294s Type 'license()' or 'licence()' for distribution details. 294s 294s R is a collaborative project with many contributors. 294s Type 'contributors()' for more information and 294s 'citation()' on how to cite R or R packages in publications. 294s 294s Type 'demo()' for some demos, 'help()' for on-line help, or 294s 'help.start()' for an HTML browser interface to help. 294s Type 'q()' to quit R. 294s 294s > NAME <- "context" 294s > source(file.path('_helper', 'init.R')) 294s > 294s > # - interesting context values ------------------------------------------------- 294s > 294s > all.equal( 294s + as.character(diffChr(chr.9, chr.10, context=0)), 294s + rdsf(100) 294s + ) 294s [1] TRUE 294s > all.equal( 294s + as.character(diffChr(chr.9, chr.10, context=-1L)), 294s + rdsf(150) 294s + ) 295s [1] TRUE 295s > all.equal( 295s + as.character(diffChr(chr.9, chr.10, context="auto")), 295s + rdsf(200) 295s + ) 295s [1] TRUE 295s > all.equal( 295s + as.character(diffChr(chr.9, chr.10, context=0, mode="context")), rdsf(300) 295s + ) 295s [1] TRUE 295s > # - with line limit ------------------------------------------------------------ 295s > 295s > all.equal( 295s + as.character(diffChr(chr.9, chr.10, context="auto", line.limit=18)), 295s + rdsf(400) 295s + ) 295s [1] TRUE 295s > all.equal( 295s + as.character(diffChr(chr.9, chr.10, context="auto", line.limit=25)), 295s + rdsf(500) 295s + ) 295s [1] TRUE 295s > # default to min context 295s > 295s > a <- b <- letters 295s > b[c(3, 20)] <- LETTERS[c(3,20)] 295s > all.equal( 295s + capture.output( 295s + show(diffChr(a, b, line.limit=c(20, 10), context='auto', format='raw')) 295s + ), 295s + txtf(100) 295s + ) 295s [1] TRUE 295s > # trim hunks in auto-context mode 295s > 295s > a <- b <- letters 295s > b[c(3, 10, 20)] <- LETTERS[c(3,10,20)] 295s > all.equal( 295s + capture.output(show( 295s + diffChr( 295s + a, b, hunk.limit=c(2, 1), context=auto_context(1, 5), line.limit=20, 295s + format='raw' 295s + ) 295s + )), 295s + txtf(200) 295s + ) 295s [1] TRUE 295s > # - error handling ------------------------------------------------------------- 295s > 295s > try(auto_context(min=-1, max=1:3)) # "`min` must be" 295s Error in auto_context(min = -1, max = 1:3) : 295s Argument `min` must be integer(1L) and greater than zero 295s > try(auto_context(min=1, max=1:3)) # "`max` must be" 295s Error in auto_context(min = 1, max = 1:3) : 295s Argument `max` must be integer(1L) and not NA 295s > 295s > 295s PASS 295s Begin testing test-core.R 295s 295s R version 4.4.3 (2025-02-28) -- "Trophy Case" 295s Copyright (C) 2025 The R Foundation for Statistical Computing 295s Platform: arm-unknown-linux-gnueabihf (32-bit) 295s 295s R is free software and comes with ABSOLUTELY NO WARRANTY. 295s You are welcome to redistribute it under certain conditions. 295s Type 'license()' or 'licence()' for distribution details. 295s 295s R is a collaborative project with many contributors. 295s Type 'contributors()' for more information and 295s 'citation()' on how to cite R or R packages in publications. 295s 295s Type 'demo()' for some demos, 'help()' for on-line help, or 295s 'help.start()' for an HTML browser interface to help. 295s Type 'q()' to quit R. 295s 295s > NAME <- "core" 295s > source(file.path('_helper', 'init.R')) 295s > 295s > # The Myers paper strings 295s > 295s > A <- c("a", "b", "c", "a", "b", "b", "a") 295s > B <- c("c", "b", "a", "b", "a", "c") 295s > 295s > # - diff myers simple ---------------------------------------------------------- 295s > 295s > identical( 295s + diffobj:::myers_simple(character(), character()), 295s + list(target = integer(0), current = integer(0)) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple("a", character()), 295s + list(target = NA_integer_, current = integer(0)) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple(character(), "a"), 295s + list(target = integer(0), current = NA_integer_) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple("a", "a"), list(target = 0L, current = 0L) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple("a", "b"), 295s + list(target = 1L, current = 1L) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple(c("a", "b"), "b"), 295s + list(target = c(NA, 0L), current = 0L) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple(c("a", "b"), "a"), 295s + list(target = c(0L, NA), current = 0L) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple("a", c("a", "b")), 295s + list(target = 0L, current = c(0L, NA)) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple("b", c("a", "b")), 295s + list(target = 0L, current = c(NA, 0L)) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple(c("a", "b"), c("b", "c")), 295s + list(target = c(NA, 0L), current = c(0L, NA)) 295s + ) 295s [1] TRUE 295s > identical( 295s + diffobj:::myers_simple(c("a", "b", "c", "d"), c("a", "c", "d", "b")), 295s + list(target = c(0L, NA, 0L, 0L), current = c(0L, 0L, 0L, NA)) 295s + ) 295s [1] TRUE 295s > # Actual Myers sample string 295s > identical( 295s + diffobj:::myers_simple(A, B), 295s + list(target = c(NA, NA, 0L, 0L, 0L, NA, 0L), current = c(0L, NA, 0L, 0L, 0L, NA)) 295s + ) 295s [1] TRUE 295s > # - diff myers mba ------------------------------------------------------------- 295s > 295s > identical(ses(character(), character()), character()) 295s [1] TRUE 295s > identical(ses("a", character()), "1d0") 295s [1] TRUE 295s > identical(ses(character(), "a"), "0a1") 295s [1] TRUE 295s > identical(ses("a", "a"), character()) 295s [1] TRUE 295s > identical(ses("a", "b"), "1c1") 295s [1] TRUE 295s > identical(ses(c("a", "b"), "b"), "1d0") 295s [1] TRUE 295s > identical(ses(c("a", "b"), "a"), "2d1") 295s [1] TRUE 295s > identical(ses("a", c("a", "b")), "1a2") 295s [1] TRUE 295s > identical(ses("b", c("a", "b")), "0a1") 295s [1] TRUE 295s > identical(ses(c("a", "b"), c("b", "c")), c("1d0", "2a2")) 295s [1] TRUE 295s > identical( 295s + ses(c("a", "b", "c", "d"), c("a", "c", "d", "b")), c("2d1", "4a4") 295s + ) 295s [1] TRUE 295s > # Actual Myers sample string 295s > identical(ses(A, B), c("1,2d0", "4d1", "5a3", "7a6")) 295s [1] TRUE 295s > # This used to cause errors due to under-allocated buffer vector 295s > identical(ses(letters[1:10], LETTERS[1:2]), "1,10c1,2") 295s [1] TRUE 295s > 295s > # A little more complex with changes, this was a problem at some point 295s > 295s > A2 <- c("A", "B", "C") 295s > B2 <- c("X", "A", "Y", "C") 295s > identical(ses(A2, B2), c("0a1", "2c3")) 295s [1] TRUE 295s > 295s > # More complicated strings; intended for use with contexts for hunks, 295s > # but making sure the diffs are correct 295s > 295s > A1 <- c("A", "AA", "B", "C", "D", "E", "F", "G", "H") 295s > B1 <- c("A", "B", "X", "W", "D", "DD", "E", "Y", "Z") 295s > C1 <- c("X", "D", "E", "Y", "Z", "H") 295s > 295s > identical(ses(A1, B1), c("2d1", "4c3,4", "5a6", "7,9c8,9")) 295s [1] TRUE 295s > identical(ses(A1, C1), c("1,4c1", "7,8c4,5")) 295s [1] TRUE 295s > 295s > A5 <- c("A", "AA", "B", "C", "D", "E", "F", "G", "H") 295s > B5 <- c("A", "B", "X", "W", "D", "E", "F", "W", "G") 295s > identical(ses(A5, B5), c("2d1", "4c3,4", "7a8", "9d9")) 295s [1] TRUE 295s > 295s > # NAs treated as strings 295s > 295s > identical(ses(c(NA, "a", "b"), c("a", "b", NA)), c("1d0", "3a3")) 295s [1] TRUE 295s > 295s > # Coersion to character 295s > 295s > identical(ses(1:5, 4:6), c("1,3d0", "5a3")) 295s [1] TRUE 295s > 295s > # - print/summary -------------------------------------------------------------- 295s > capture.output( 295s + res.1 <- summary(diffobj:::diff_myers(A, B), with.match=TRUE) 295s + ) 295s [1] " type string len offset" "1 Delete ab 2 1" 295s [3] "2 Match c 1 3" "3 Delete a 1 4" 295s [5] "4 Match b 1 5" "5 Insert a 1 3" 295s [7] "6 Match ba 2 6" "7 Insert c 1 6" 295s > identical( 295s + res.1, 295s + structure(list(type = structure(c(3L, 1L, 3L, 1L, 2L, 1L, 2L), .Label = c("Match", 295s + "Insert", "Delete"), class = "factor"), string = c("ab", "c", 295s + "a", "b", "a", "ba", "c"), len = c(2L, 1L, 1L, 1L, 1L, 2L, 1L 295s + ), offset = c(1L, 3L, 4L, 5L, 3L, 6L, 6L)), class = "data.frame", row.names = c(NA, 295s + -7L)) 295s + ) 295s [1] TRUE 295s > capture.output( 295s + res.2 <- summary(diffobj:::diff_myers(A, B), with.match=FALSE) 295s + ) 296s [1] " type len offset" "1 Delete 2 1" "2 Match 1 3" 296s [4] "3 Delete 1 4" "4 Match 1 5" "5 Insert 1 3" 296s [7] "6 Match 2 6" "7 Insert 1 6" 296s > identical( 296s + res.2, 296s + structure(list(type = structure(c(3L, 1L, 3L, 1L, 2L, 1L, 2L), .Label = c("Match", "Insert", "Delete"), class = "factor"), len = c(2L, 1L, 1L, 1L, 1L, 2L, 1L), offset = c(1L, 3L, 4L, 5L, 3L, 6L, 6L)), .Names = c("type", "len", "offset"), row.names = c(NA, -7L), class = "data.frame") 296s + ) 296s [1] TRUE 296s > identical( 296s + capture.output(print(diffobj:::diff_myers(A, B))), ses(A, B) 296s + ) 296s [1] TRUE 296s > # # - translate 296s > # aa <- c("a", "b", "b", "c", "e") 296s > # bb <- c("x", "y", "c", "f", "e") 296s > # identical( 296s > # diffobj:::diffObjCompact(diffobj:::diff_myers(A, B)), 296s > # list(target = c(NA, NA, 0L, NA, 0L, 0L, 0L), current = c(0L, 0L, NA, 0L, 0L, NA)) 296s > # ) 296s > # identical( 296s > # diffobj:::diffObjCompact(diffobj:::diff_myers(aa, bb)), 296s > # list(target = c(1L, 2L, NA, 0L, 0L), current = c(1L, 2L, 0L, NA, 0L)) 296s > # ) 296s > # 296s > # } ) 296s > 296s PASS 296s Begin testing test-diffChr.R 296s 296s R version 4.4.3 (2025-02-28) -- "Trophy Case" 296s Copyright (C) 2025 The R Foundation for Statistical Computing 296s Platform: arm-unknown-linux-gnueabihf (32-bit) 296s 296s R is free software and comes with ABSOLUTELY NO WARRANTY. 296s You are welcome to redistribute it under certain conditions. 296s Type 'license()' or 'licence()' for distribution details. 296s 296s R is a collaborative project with many contributors. 296s Type 'contributors()' for more information and 296s 'citation()' on how to cite R or R packages in publications. 296s 296s Type 'demo()' for some demos, 'help()' for on-line help, or 296s 'help.start()' for an HTML browser interface to help. 296s Type 'q()' to quit R. 296s 296s > NAME <- "diffChr" 296s > source(file.path('_helper', 'init.R')) 296s > 296s > # - Corner Cases --------------------------------------------------------------- 296s > 296s > # Corner cases from https://neil.fraser.name/writing/diff/ 296s > # Both of these appear handled correctly by the algorithm here 296s > # first one: suboptimal edit script due to two sided approach 296s > 296s > A1 <- c("X", "A", "X", "C", "X", "A", "B", "C") 296s > B1 <- c("A", "B", "C", "Y") 296s > all.equal(as.character(diffChr(A1, B1)), rdsf(100)) 296s [1] TRUE 296s > 296s > # second one: failure to find intersection at ends of paths (paths run into 296s > # each other eventually) 296s > 296s > A2 <- c("A", "B", "X", "A", "B") 296s > B2 <- c("A", "Y", "B") 296s > all.equal(as.character(diffChr(A2, B2)), rdsf(200)) 296s [1] TRUE 296s > 296s > # Simple corner cases 296s > 296s > all.equal( 296s + as.character(diffChr(character(), character())), rdsf(225) 296s + ) 296s [1] TRUE 296s > all.equal(as.character(diffChr("", "")), rdsf(250)) 296s [1] TRUE 296s > 296s > # - Larger strings ------------------------------------------------------------- 296s > 296s > # diffChr(X[1:2000], X[2001:4000]) 296s > 296s > all.equal(as.character(diffChr(chr.7, chr.8)), rdsf(300)) 297s [1] TRUE 297s > 297s > # Too slow to run; useful for benchmarking though 297s > 297s > # X1 <- X[1:2e4] 297s > # X2 <- X1[-sample(seq_along(X1), 2e3)] 297s > # X2[sample(seq_along(X2), 4e3)] <- "XXXXXX" 297s > # res <- diffChr(X1, X2) 297s > # res <- diffChr(X[1:10000], X[7500:17500]) 297s > # res <- ses(X[1:10000], X[7500:17500]) 297s > # res <- diffChr(X[1:25000], X[10001:50000], max.diffs=65000) 297s > 297s > # - Sentences 297s > chr.5 <- c( 297s + "hello there how are you doing", 297s + "humpty dumpty took a big fall", 297s + "lorem ipsum dolor sic est boom", 297s + "a computer once wrote a phrase" 297s + ) 297s > chr.6 <- c( 297s + "hello THERE how are you doing", 297s + "and another SENTENCE blah blah", 297s + "humpty dumpty TOOK a big fall", 297s + "a COMPUTER once wrote a phrase" 297s + ) 297s > all.equal(as.character(diffChr(chr.5, chr.6)), rdsf(400)) 297s [1] TRUE 297s > all.equal( 297s + as.character(diffChr(chr.5, chr.6, mode="unified")), rdsf(500) 297s + ) 297s [1] TRUE 297s > all.equal( 297s + as.character(diffChr(chr.5, chr.6, mode="context")), rdsf(600) 297s + ) 297s [1] TRUE 297s > # - Whitespace ----------------------------------------------------------------- 297s > 297s > all.equal( 297s + as.character(diffChr(c("a", "b", "c"), c("a ", "b", "c"))), rdsf(800) 297s + ) 297s [1] TRUE 297s > all.equal( 297s + as.character( 297s + diffChr(c("a", "b", "c"), c("a ", "b", "c"), ignore.white.space=FALSE) 297s + ), 297s + rdsf(900) 297s + ) 297s [1] TRUE 297s > # New lines count as new elements 297s > all.equal( 297s + as.character(diffChr("woo\nhoo\nfoo", c("woo", "foo"))), rdsf(1000) 297s + ) 297s [1] TRUE 297s > all.equal( 297s + capture.output(diffChr("hello . world", "hello. world", format='raw')), 297s + txtf(100) 297s + ) 297s [1] TRUE 297s > # - SGR ------------------------------------------------------------------------ 297s > 297s > a <- c("hello \033[31mworld\033[m", "umbrellas", "tomatoes") 297s > b <- c("hello world", "umbrellas", "tomatoes") 297s > 297s > local({ 297s + old.opt <- options(diffobj.sgr.supported=TRUE) 297s + on.exit(options(old.opt)) 297s + diff <- diffChr(a, b) # warn: 'contained ANSI CSI SGR' 297s + try(diffChr(a, b, strip.sgr=1:3)) # "TRUE, FALSE, or NULL" 297s + try(diffChr(a, b, sgr.supported=1:3)) # "TRUE, FALSE, or NULL" 297s + 297s + c( 297s + all.equal(capture.output(show(diff)), txtf(200)), 297s + all.equal(capture.output(show(diffChr(a, b, strip.sgr=FALSE))), txtf(300)), 297s + all.equal(capture.output(show(diffChr(a, b, format='raw'))), txtf(400)) 297s + ) 297s + }) 297s Error in diffChr(target = a, current = b, strip.sgr = 1:3) : 297s Argument `strip.sgr` must be TRUE, FALSE, or NULL 297s In addition: Warning message: 297s In diffChr(target = a, current = b) : 297s `target` or `current` contained ANSI CSI SGR when rendered; these were stripped. Use `strip.sgr=FALSE` to preserve them in the diffs. 297s Error in diffChr(target = a, current = b, sgr.supported = 1:3) : 297s Argument `sgr.supported` must be TRUE, FALSE, or NULL 297s [1] TRUE TRUE TRUE 297s > # - Alignment ------------------------------------------------------------------ 297s > 297s > chr.7 <- c("a b c d e", "F G h i j k", "xxx", "yyy", "k l m n o") 297s > chr.8 <- c("f g h i j k", "hello", "goodbye", "yo", "k l m n o") 297s > 297s > all.equal(as.character(diffChr(chr.7, chr.8)), rdsf(1100)) 297s [1] TRUE 297s > all.equal( 297s + as.character(diffChr(chr.7, chr.8, align=4/6)), rdsf(1100) # same as above 297s + ) 297s [1] TRUE 297s > # No longer aligns 297s > all.equal( 297s + as.character(diffChr(chr.7, chr.8, align=4.01/6)), rdsf(1200) 297s + ) 297s [1] TRUE 297s > all.equal( 297s + as.character(diffChr(chr.7, chr.8, align=AlignThreshold(min.chars=4))), 297s + rdsf(1100) # same as earlier 297s + ) 297s [1] TRUE 297s > all.equal( 297s + as.character(diffChr(chr.7, chr.8, align=AlignThreshold(min.chars=5))), 297s + rdsf(1200) # same as above 297s + ) 297s [1] TRUE 297s > 297s > ## Normally this would not align, but we allow symbols to count towards 297s > ## alignment 297s > chr.7a <- c("a b c e", "d [ f g") 297s > chr.7b <- "D [ f g" 297s > a1 <- AlignThreshold(threshold=0, min.chars=2, count.alnum.only=FALSE) 297s > all.equal( 297s + as.character(diffChr(chr.7a, chr.7b, align=a1, format='raw')), 297s + structure( 297s + c("< chr.7a > chr.7b ", "@@ 1,2 @@ @@ 1 @@ ", 297s + "< a b c e ~ ", "< d [ f g > D [ f g "), len = 4L) 297s + ) 297s [1] TRUE 297s > # corner case where alignment alog exits early because it runs out of B values 297s > # to match A values to. 297s > 297s > b <- c('a b c e', 'x w z f', 'e f g h') 297s > a <- c('z o o o', 'p o o o', 'A b c e') 297s > al <- AlignThreshold(threshold=0, min.chars=0) 297s > all.equal( 297s + capture.output(show(diffChr(b, a, align=al, format='raw'))), txtf(500) 297s + ) 297s [1] TRUE 297s > # - NAs ------------------------------------------------------------------------ 297s > 297s > all.equal( 297s + as.character( 297s + diffChr(c(NA, letters[1:3]), c(letters[1:3], LETTERS[1:2], NA)) 297s + ), 297s + rdsf(1300) 297s + ) 297s [1] TRUE 297s > all.equal( 297s + as.character( 297s + diffChr(c(letters[1:3]), c(letters[1:3], LETTERS[1:2], NA)) 297s + ), 297s + rdsf(1400) 297s + ) 297s [1] TRUE 297s > all.equal( 297s + as.character( 297s + diffChr(c(NA, letters[1:3]), c(letters[1:3], LETTERS[1:2])) 297s + ), 297s + rdsf(1500) 297s + ) 297s [1] TRUE 297s > # - Nested dots issue 134, h/t Noam Ross --------------------------------------- 297s > 297s > fn <- function(target, current, ...) { 297s + diffChr(target, current, ...) 297s + } 297s > all.equal( 297s + as.character(fn("a", "b", format = "raw")), 297s + structure( 297s + c( 297s + "< target > current ", 297s + "@@ 1 @@ @@ 1 @@ ", 297s + "< a > b "), len = 3L 297s + ) 297s + ) 297s [1] TRUE 297s > 297s > # - Newlines in input, issue 135, h/t Flying Sheep ----------------------------- 297s > 297s > a <- 'A Time Series:\n[1] 1 2 3 4' 297s > b <- 'A Time Series:\n[1] 9 4 1 4' 297s > all.equal( 297s + c(as.character(diffobj::diffChr(a, b, format = 'raw'))), 297s + c("< a > b ", 297s + "@@ 1,2 @@ @@ 1,2 @@ ", 297s + " A Time Series: A Time Series:", 297s + "< [1] 1 2 3 4 > [1] 9 4 1 4 ") 297s + ) 297s [1] TRUE 297s > 297s > # - Attributes causing dispatch in guides, issue 142 --------------------------- 297s > 297s > zlold <- c("0x0000, 0x001F", "0x007F, 0x009F", "0x0300, 0x036F") 297s > zlnew <- structure( 297s + c("0x0000, 0x001F", "0x008F, 0x009F", "0x0300, 0x036F"), .Dim = 3L 297s + ) 297s > diffChr(zlold, zlnew) # no warning 297s < zlold > zlnew 297s @@ 1,3 @@  @@ 1,3 @@  297s 0x0000, 0x001F 0x0000, 0x001F 297s < 0x007F, 0x009F > 0x008F, 0x009F 297s 0x0300, 0x036F 0x0300, 0x036F 297s > 297s > # - do.call, issue 158 --------------------------------------------------------- 297s > 297s > do.call(diffChr, list(1:2, 3:4, format='raw')) 297s < 1:2 > 3:4 297s @@ 1,2 @@ @@ 1,2 @@ 297s < 1 > 3 297s < 2 > 4 297s > 297s > 297s PASS 297s Begin testing test-diffDeparse.R 297s 297s R version 4.4.3 (2025-02-28) -- "Trophy Case" 297s Copyright (C) 2025 The R Foundation for Statistical Computing 297s Platform: arm-unknown-linux-gnueabihf (32-bit) 297s 297s R is free software and comes with ABSOLUTELY NO WARRANTY. 297s You are welcome to redistribute it under certain conditions. 297s Type 'license()' or 'licence()' for distribution details. 297s 297s R is a collaborative project with many contributors. 297s Type 'contributors()' for more information and 297s 'citation()' on how to cite R or R packages in publications. 297s 297s Type 'demo()' for some demos, 'help()' for on-line help, or 297s 'help.start()' for an HTML browser interface to help. 297s Type 'q()' to quit R. 297s 298s > NAME <- "diffDeparse" 298s > source(file.path('_helper', 'init.R')) 298s > 298s > # - deparse -------------------------------------------------------------------- 298s > 298s > # First one will be done in unified mode since `deparse` disregards 298s > # option(width=), second will be done side by side 298s > 298s > all.equal(as.character(diffDeparse(letters, LETTERS)), rdsf(100)) 298s [1] TRUE 298s > all.equal( 298s + as.character( 298s + diffDeparse(letters, LETTERS, extra=list(width.cutoff=20)) 298s + ), 298s + rdsf(200) 298s + ) 298s [1] TRUE 298s > 298s PASS 298s Begin testing test-diffObj.R 298s 298s R version 4.4.3 (2025-02-28) -- "Trophy Case" 298s Copyright (C) 2025 The R Foundation for Statistical Computing 298s Platform: arm-unknown-linux-gnueabihf (32-bit) 298s 298s R is free software and comes with ABSOLUTELY NO WARRANTY. 298s You are welcome to redistribute it under certain conditions. 298s Type 'license()' or 'licence()' for distribution details. 298s 298s R is a collaborative project with many contributors. 298s Type 'contributors()' for more information and 298s 'citation()' on how to cite R or R packages in publications. 298s 298s Type 'demo()' for some demos, 'help()' for on-line help, or 298s 'help.start()' for an HTML browser interface to help. 298s Type 'q()' to quit R. 298s 298s > NAME <- "diffObj" 298s > source(file.path('_helper', 'init.R')) 298s > 298s > # - simple diffobj ------------------------------------------------------------- 298s > 298s > # no diff for print 298s > all.equal(as.character(diffObj(iris.s, iris.c)), rdsf(100)) 299s [1] TRUE 299s > # no diff for str 299s > all.equal( 299s + as.character(diffObj(1:100, c(1:99, 200L))), rdsf(200) 299s + ) 299s [1] TRUE 299s > # diffs for both and must pick one, first one is str, second is print 299s > all.equal( 299s + as.character(diffObj(mdl1[7], mdl2[7])), rdsf(300) 299s + ) 299s [1] TRUE 299s > all.equal(as.character(diffObj(mdl1, mdl2)), rdsf(400)) 299s [1] TRUE 299s > 299s > # - fits or doesn't ------------------------------------------------------------ 299s > 299s > # Note, the first test used to favor str until we handicapped print 299s > all.equal( 299s + diffObj(matrix(1:20, ncol=2), matrix(2:21, ncol=2), line.limit=5)@capt.mode, 299s + "str" 299s + ) 299s [1] TRUE 299s > # test kinda slow, would be better to have one with smaller objects with print 299s > # methods 299s > 299s > all.equal( 299s + diffObj(mdl1, mdl2, line.limit=15, mode='unified')@capt.mode, "print" 299s + ) 300s [1] TRUE 300s > all.equal(diffObj(1:1000, 1000:1, line.limit=5)@capt.mode, "str") 300s [1] TRUE 300s > 300s > # - misc ----------------------------------------------------------------------- 300s > 300s > try(diffObj(1, 2, extra=list(TRUE))) # "extra" 300s Error in .local(target, current, ...) : 300s Argument `extra` must be empty in `diffObj`. 300s > 300s > # - print error ---------------------------------------------------------------- 300s > 300s > x <- structure("hello", class="diffobj_ogewlhgiadfl") 300s > y <- structure("goodbye", class="diffobj_ogewlhgiadfl") 300s > try(diffObj(x, y)) # "Error in calling .diffPrint." 300s Error in print.diffobj_ogewlhgiadfl(structure("goodbye", class = "diffobj_ogewlhgiadfl")) : 300s failure 300s Error in diffObj(target = x, current = y) : 300s Error in calling `diffPrint`: Failed attempting to get text representation of object: failure 300s > 300s > # Random exmaples to think through `diffObj` output 300s > 300s > diffObj( 300s + pairlist("`logical(2L)` should be length 2 (is 3)"), 300s + pairlist("be length 2 (is 3)") 300s + ) 300s < pairlist("`logical(2L)` should be l.. > pairlist("be length 2 (is 3)") 300s @@ 1,3 @@  @@ 1,3 @@  300s [[1]] [[1]] 300s < [1] "`logical(2L)` should be length 2 > [1] "be length 2 (is 3)" 300s :  (is 3)" ~ 300s 300s > 300s > diffObj( 300s + pairlist("`matrix(integer(), nrow = 3)` should be matrix (is list)", "`list(character(1L), 1L)[[2]]` should be type \"integer-like\" (is \"character\")"), 300s + pairlist("be class \"matrix\" (is \"list\")", "be type \"integer-like\" (is \"character\") at index [[2]]") 300s + ) 300s < pairlist("`matrix(integer(), nrow =.. > pairlist("be class \"matrix\" (is \.. 300s @@ 1,6 @@  @@ 1,6 @@  300s [[1]] [[1]] 300s < [1] "`matrix(integer(), nrow = 3)` sh > [1] "be class \"matrix\" (is \"list\" 300s : ould be matrix (is list)" : )" 300s 300s [[2]] [[2]] 300s < [1] "`list(character(1L), 1L)[[2]]` s > [1] "be type \"integer-like\" (is \"c 300s : hould be type \"integer-like\" (is \" : haracter\") at index [[2]]" 300s : character\")" ~ 300s 300s > 300s PASS 300s Begin testing test-diffStr.R 300s 300s R version 4.4.3 (2025-02-28) -- "Trophy Case" 300s Copyright (C) 2025 The R Foundation for Statistical Computing 300s Platform: arm-unknown-linux-gnueabihf (32-bit) 300s 300s R is free software and comes with ABSOLUTELY NO WARRANTY. 300s You are welcome to redistribute it under certain conditions. 300s Type 'license()' or 'licence()' for distribution details. 300s 300s R is a collaborative project with many contributors. 300s Type 'contributors()' for more information and 300s 'citation()' on how to cite R or R packages in publications. 300s 300s Type 'demo()' for some demos, 'help()' for on-line help, or 300s 'help.start()' for an HTML browser interface to help. 300s Type 'q()' to quit R. 300s 300s > NAME <- "diffStr" 300s > source(file.path('_helper', 'init.R')) 300s > 300s > # - lm models ------------------------------------------------------------------ 300s > 300s > # formula display changed 300s > if( 300s + R.Version()$major >= 3 && R.Version()$minor >= "3.1" || R.Version()$major > 3 300s + ) 300s + all.equal(as.character(diffStr(mdl1, mdl2)), rdsf(100)) 301s [1] TRUE 301s > 301s > # Too strict a line limit, can't get under 301s > all.equal( 301s + as.character(diffStr(mdl1[7], mdl2[7], line.limit=10)), rdsf(200) 301s + ) 301s [1] TRUE 301s > # Now we can get under 301s > all.equal( 301s + as.character(diffStr(mdl1[7], mdl2[7], line.limit=15)), rdsf(300) 301s + ) 301s [1] TRUE 301s > 301s > # - Simple structure ----------------------------------------------------------- 301s > # 301s > # Character types 301s > 301s > all.equal(as.character(diffStr(iris.c, iris.s)), rdsf(400)) 301s [1] TRUE 301s > 301s > # - Strict width --------------------------------------------------------------- 301s > # formula display changed 301s > if( 301s + R.Version()$major >= 3 && R.Version()$minor >= "3.1" || R.Version()$major > 3 301s + ) { 301s + c( 301s + all.equal( 301s + as.character( 301s + diffStr(mdl1, mdl2, extra=list(strict.width="wrap"), line.limit=30) 301s + ), 301s + rdsf(500) 301s + ), 301s + all.equal( 301s + as.character( 301s + diffStr(mdl1, mdl2, extra=list(strict.width="cut"), line.limit=30) 301s + ), 301s + rdsf(550) 301s + ) ) 301s + } 302s [1] TRUE TRUE 302s > # - max.diffs ------------------------------------------------------------------ 302s > 302s > invisible(diffStr(iris, mtcars, max.diffs=2)) # warn: "Exceeded diff limit" 302s Warning message: 302s Exceeded diff limit during diff computation (18 vs. 2 allowed); overall diff is likely not optimal 302s > 302s > # - max.level ------------------------------------------------------------------ 302s > 302s > all.equal( 302s + as.character(diffStr(mdl1[7], mdl2[7], extra=list(max.level="auto"))), 302s + rdsf(600) 302s + ) 302s [1] TRUE 302s > all.equal( 302s + as.character(diffStr(mdl1[7], mdl2[7], extra=list(max.level=2))), 302s + rdsf(700) 302s + ) 302s [1] TRUE 302s > # Has a difference, but can't get under; the second is just for reference 302s > 302s > lst.1 <- lst.2 <- lst.3 <- list(a=list(b=list(c=list(d=list(e=list(25)))))) 302s > names(lst.2) <- "A" 302s > 302s > all.equal( 302s + as.character(diffStr(lst.1, lst.2, line.limit=2)), rdsf(800) 302s + ) 302s [1] TRUE 302s > all.equal( 302s + as.character(diffStr(lst.1, lst.2, line.limit=2)), rdsf(900) 302s + ) 302s [1] TRUE 302s > # Test that initial run shows difference, but too big, but next one down 302s > # doesn't so have to increase level 302s > 302s > names(lst.3$a$b$c$d) <- "E" 302s > all.equal( 302s + as.character(diffStr(lst.1, lst.3, line.limit=6)), rdsf(1000) 302s + ) 302s [1] TRUE 302s > 302s > # - No visible differences ----------------------------------------------------- 302s > 302s > all.equal( 302s + as.character(diffStr(1:100, c(1:99, 101L))), rdsf(1100) 302s + ) 302s [1] TRUE 302s > 302s > # - Quoted Objects ------------------------------------------------------------- 302s > 302s > all.equal( 302s + as.character(diffStr(quote(zz + 1), quote(zz + 3))), 302s + structure( 302s + c("\033[33m<\033[39m \033[33mstr(quote(zz +..\033[39m \033[34m>\033[39m \033[34mstr(quote(zz +..\033[39m", "\033[36m@@ 1 @@ \033[39m \033[36m@@ 1 @@ \033[39m", "\033[33m<\033[39m \033[90m\033[39m language zz + \033[33m1\033[39m\033[90m\033[39m \033[34m>\033[39m \033[90m\033[39m language zz + \033[34m3\033[39m\033[90m\033[39m" 302s + ), len = 3L 302s + ) ) 302s [1] TRUE 302s > 302s > all.equal( 302s + as.character(diffStr(quote(x), quote(y))), 302s + structure(c("\033[33m<\033[39m \033[33mstr(quo..\033[39m \033[34m>\033[39m \033[34mstr(quo..\033[39m", "\033[36m@@ 1 @@ \033[39m \033[36m@@ 1 @@ \033[39m", "\033[33m<\033[39m \033[90m\033[39m symbol \033[33mx\033[39m\033[90m\033[39m \033[34m>\033[39m \033[90m\033[39m symbol \033[34my\033[39m\033[90m\033[39m"), len = 3L) 302s + ) 302s [1] TRUE 302s > 302s > # - Spaces with punctuation ---------------------------------------------------- 302s > 302s > all.equal( 302s + capture.output(show(diffStr(list(a=1), list(a=1, cabera=3), format='raw'))), 302s + txtf(100) 302s + ) 302s [1] TRUE 302s > 302s > 302s PASS 302s Begin testing test-file.R 302s 302s R version 4.4.3 (2025-02-28) -- "Trophy Case" 302s Copyright (C) 2025 The R Foundation for Statistical Computing 302s Platform: arm-unknown-linux-gnueabihf (32-bit) 302s 302s R is free software and comes with ABSOLUTELY NO WARRANTY. 302s You are welcome to redistribute it under certain conditions. 302s Type 'license()' or 'licence()' for distribution details. 302s 302s R is a collaborative project with many contributors. 302s Type 'contributors()' for more information and 302s 'citation()' on how to cite R or R packages in publications. 302s 302s Type 'demo()' for some demos, 'help()' for on-line help, or 302s 'help.start()' for an HTML browser interface to help. 302s Type 'q()' to quit R. 302s 302s > NAME <- "diffFile" 302s > source(file.path('_helper', 'init.R')) 303s > 303s > # - Code File ------------------------------------------------------------------ 303s > 303s > # # compare two crayon file versions 303s > # # These should eventually just be downloaded and made into diffFile tests 303s > 303s > f.p.1 <- file.path("_helper", "objs", "diffFile", "s.o.3f1f68.R") 303s > f.p.2 <- file.path("_helper", "objs", "diffFile", "s.o.30dbe0.R") 303s > 303s > # url.1 <- "https://raw.githubusercontent.com/gaborcsardi/crayon/3f1f68ab177b82a27e754a58264af801f7194820/R/string_operations.r" 303s > # url.2 <- "https://raw.githubusercontent.com/gaborcsardi/crayon/30dbe0d4d92157350af3cb3aeebd6d9a9cdf5c0e/R/string_operations.r" 303s > # f.1 <- readLines(url.1) 303s > # f.2 <- readLines(url.2) 303s > # writeLines(f.1, f.p.1) 303s > # writeLines(f.2, f.p.2) 303s > 303s > all.equal(as.character(diffFile(f.p.1, f.p.2)), rdsf(100)) 303s [1] TRUE 303s > 303s > # - RDS ------------------------------------------------------------------------ 303s > 303s > f1 <- tempfile() 303s > f2 <- tempfile() 303s > 303s > mx1 <- mx2 <- matrix(1:9, 3) 303s > mx2[5] <- 99 303s > saveRDS(mx1, f1) 303s > saveRDS(mx2, f2) 303s > 303s > is(diffobj:::get_rds(f1), "matrix") 303s [1] TRUE 303s > is(diffobj:::get_rds(f2), "matrix") 303s [1] TRUE 303s > 303s > ref <- as.character(diffPrint(mx1, mx2)) 303s > identical(as.character(diffPrint(mx1, f2, cur.banner="mx2")), ref) 303s [1] TRUE 303s > identical(as.character(diffPrint(f1, mx2, tar.banner="mx1")), ref) 303s [1] TRUE 303s > identical( 303s + as.character(diffPrint(f1, f2, tar.banner="mx1", cur.banner="mx2")), ref 303s + ) 303s [1] TRUE 303s > isTRUE(!identical(as.character(diffPrint(mx1, f2, rds=FALSE)), ref)) 303s [1] TRUE 303s > unlink(c(f1, f2)) 303s > 303s > # - file ----------------------------------------------------------------------- 303s > 303s > f1 <- tempfile() 303s > f2 <- tempfile() 303s > letters2 <- letters 303s > letters2[15] <- "HELLO" 303s > 303s > writeLines(letters, f1) 303s > writeLines(letters2, f2) 303s > 303s > identical( 303s + as.character(diffChr(letters, letters2, tar.banner="f1", cur.banner="f2")), 303s + as.character(diffFile(f1, f2)) 303s + ) 303s [1] TRUE 303s > unlink(c(f1, f2)) 303s > 303s > # issue 133 h/t Noam Ross, thanks for the test 303s > 303s > x <- tempfile() 303s > y <- tempfile() 303s > cat("Hello\nthere\n", file = x) 303s > file.copy(x, y) 303s [1] TRUE 303s > identical( 303s + as.character(diffFile(x, y, format = "raw")), 303s + structure( 303s + c("No visible differences between objects.", 303s + "< x > y ", 303s + "@@ 1,2 @@ @@ 1,2 @@ ", 303s + " Hello Hello ", 303s + " there there "), len = 5L) 303s + ) 303s [1] TRUE 303s > unlink(c(x, y)) 303s > 303s > # - CSV ------------------------------------------------------------------------ 303s > 303s > f1 <- tempfile() 303s > f2 <- tempfile() 303s > 303s > iris2 <- iris 303s > iris2$Sepal.Length[25] <- 9.9 303s > 303s > write.csv(iris, f1, row.names=FALSE) 303s > write.csv(iris2, f2, row.names=FALSE) 303s > 303s > identical( 303s + as.character(diffPrint(iris, iris2, tar.banner="f1", cur.banner="f2")), 303s + as.character(diffCsv(f1, f2)) 303s + ) 303s [1] TRUE 303s > unlink(c(f1, f2)) 303s > 303s > 303s PASS 303s Begin testing test-guide.R 303s 303s R version 4.4.3 (2025-02-28) -- "Trophy Case" 303s Copyright (C) 2025 The R Foundation for Statistical Computing 303s Platform: arm-unknown-linux-gnueabihf (32-bit) 303s 303s R is free software and comes with ABSOLUTELY NO WARRANTY. 303s You are welcome to redistribute it under certain conditions. 303s Type 'license()' or 'licence()' for distribution details. 303s 303s R is a collaborative project with many contributors. 303s Type 'contributors()' for more information and 303s 'citation()' on how to cite R or R packages in publications. 303s 303s Type 'demo()' for some demos, 'help()' for on-line help, or 303s 'help.start()' for an HTML browser interface to help. 303s Type 'q()' to quit R. 303s 304s > NAME <- "guides" 304s > source(file.path('_helper', 'init.R')) 304s > 304s > # - detect_2d_guides ----------------------------------------------------------- 304s > 304s > iris.dply <- c("Source: local data frame [150 x 5]", "Groups: Species [3]", "", " Sepal.Length Sepal.Width", " (dbl) (dbl)", "1 5.1 3.5", "2 4.9 3.0", "3 4.7 3.2", "4 4.6 3.1", "5 5.0 3.6", "6 5.4 3.9", "7 4.6 3.4", "8 5.0 3.4", "9 4.4 2.9", "10 4.9 3.1", ".. ... ...", "Variables not shown: Petal.Length", " (dbl), Petal.Width (dbl), Species", " (fctr)") 304s > 304s > all.equal(diffobj:::detect_2d_guides(iris.dply), 4:5) 304s [1] TRUE 304s > # wrapping data table with separator (#96) 304s > 304s > DT.txt <- c( 304s + " V1 V2 V3", 304s + " 1: 0.3201122 0.6907066 0.5004968", 304s + " --- ", 304s + "1000: 0.3547379 0.2836985 0.8121208", 304s + " V4 V5", 304s + " 1: 0.331665 0.6788726", 304s + " --- ", 304s + "1000: 0.553012 0.7789110" 304s + ) 304s > all.equal( 304s + diffobj:::detect_2d_guides(DT.txt), 304s + c(1L, 5L) 304s + ) 304s [1] TRUE 304s > # Narrow width 304s > 304s > old.opt <- options(width=40) 304s > all.equal(diffobj:::detect_2d_guides(capture.output(iris)), c(1, 152)) 304s [1] TRUE 304s > all.equal( 304s + diffobj:::detect_2d_guides(capture.output(USAccDeaths)), c(1, 8, 15) 304s + ) 304s [1] TRUE 304s > # Time series 304s > all.equal(diffobj:::detect_2d_guides(capture.output(UKgas)), 1) 304s [1] TRUE 304s > # no row.names (#111) 304s > 304s > df1 <- capture.output(print(data.frame(a=1:3), row.names=FALSE)) 304s > no.rn.guide <- diffobj:::detect_2d_guides(df1) # no warning 304s > all.equal(no.rn.guide, 1L) 304s [1] TRUE 304s > 304s > df2 <- capture.output(print(data.frame(x="A"), row.names=FALSE)) 304s > no.rn.guide.2 <- diffobj:::detect_2d_guides(df2) # no warning 304s > all.equal(no.rn.guide.2, 1L) 304s [1] TRUE 304s > options(old.opt) 304s > 304s > # - detect_list_guides --------------------------------------------------------- 304s > 304s > l.1 <- list(1, 1:3, matrix(1:3, 1)) 304s > l.2 <- list(a=1, list(1:3, b=4, c=list(1, b=2)), matrix(1:3, 1)) 304s > c.l.1 <- capture.output(l.1) 304s > c.l.2 <- capture.output(l.2) 304s > # cbind(c.l.2, seq_along(c.l.2) %in% diffobj:::detect_list_guides(c.l.2)) 304s > all.equal(diffobj:::detect_list_guides(capture.output(l.1)), c(1, 4, 7)) 304s [1] TRUE 304s > all.equal( 304s + diffobj:::detect_list_guides(capture.output(l.2)), 304s + c(1, 5, 8, 12, 15, 20) 304s + ) 304s [1] TRUE 304s > 304s > # - detect_matrix_guides ------------------------------------------------------- 304s > mx3 <- mx4 <- mx5 <- mx5a <- mx11 <- matrix( 304s + c( 304s + "averylongwordthatcanlahblah", "causeasinglewidecolumnblah", 304s + "matrixtowrapseveraltimes", "inarrowscreen", "onceuponatime", 304s + "agreenduckflew", "overthemountains", "inalongofantelopes", 304s + "ineedthreemore", "entriesactually", "nowonlytwomore", "iwaswrongearlier" 304s + ), 304s + nrow=3, ncol=4 304s + ) 304s > mx3.c <- capture.output(mx3) 304s > all.equal(diffobj:::detect_matrix_guides(mx3.c, NULL), c(1, 5)) 304s [1] TRUE 304s > 304s > dimnames(mx4) <- list(A=NULL, B=NULL) 304s > mx4.c <- capture.output(mx4) 304s > all.equal( 304s + diffobj:::detect_matrix_guides(mx4.c, dimnames(mx4)), c(1, 2, 6, 7) 304s + ) 304s [1] TRUE 304s > attr(mx5, "blah") <- letters[1:10] 304s > mx5.c <- capture.output(mx5) 304s > all.equal( 304s + diffobj:::detect_matrix_guides(mx5.c, dimnames(mx5)), c(1, 5) 304s + ) 304s [1] TRUE 304s > # Simple matrices that don't wrap 304s > 304s > mx6 <- mx7 <- mx7.1 <- matrix(1:4, 2) 304s > 304s > mx6.c <- capture.output(mx6) 304s > all.equal(diffobj:::detect_matrix_guides(mx6.c, dimnames(mx6)), 1) 304s [1] TRUE 304s > 304s > dimnames(mx7) <- list(A=letters[1:2], B=LETTERS[25:26]) 304s > mx7.c <- capture.output(mx7) 304s > all.equal(diffobj:::detect_matrix_guides(mx7.c, dimnames(mx7)), c(1, 2)) 304s [1] TRUE 304s > 304s > dimnames(mx7.1) <- list(letters[1:2], B=LETTERS[25:26]) 304s > mx7.1.c <- capture.output(mx7.1) 304s > all.equal(diffobj:::detect_matrix_guides(mx7.1.c, dimnames(mx7.1)), c(1, 2)) 304s [1] TRUE 304s > 304s > # Single col matrix 304s > 304s > mx8 <- matrix(1:2, 2) 304s > 304s > mx8.c <- capture.output(mx8) 304s > all.equal(diffobj:::detect_matrix_guides(mx8.c, dimnames(mx8)), 1) 304s [1] TRUE 304s > 304s > # Wrapping matrices with colnames 304s > 304s > mx9 <- mx3 304s > dimnames(mx9) <- list(A=letters[1:3], B=LETTERS[20:23]) 304s > mx9.c <- capture.output(mx9) 304s > all.equal( 304s + diffobj:::detect_matrix_guides(mx9.c, dimnames(mx9)), c(1:2, 6:7) 304s + ) 304s [1] TRUE 304s > 304s > mx10 <- mx9 304s > attr(mx10, "blah") <- matrix(1:4, 2) 304s > mx10.c <- capture.output(mx10) 304s > all.equal( 304s + diffobj:::detect_matrix_guides(mx10.c, dimnames(mx10)), c(1:2, 6:7) 304s + ) 304s [1] TRUE 304s > local({ 304s + old.opt <- options(width=30L) 304s + on.exit(options(old.opt)) 304s + attr(mx11, "blah") <- letters[1:15] 304s + mx11.c <- capture.output(mx11) 304s + 304s + all.equal( 304s + diffobj:::detect_matrix_guides(mx11.c, dimnames(mx11)), c(1, 5, 9, 13) 304s + ) 304s + }) 304s [1] TRUE 304s > # - detect_array_guides -------------------------------------------------------- 304s > 304s > a.1 <- array(1:6, dim=c(2, 1, 3)) 304s > a.2 <- array(1:6, dim=c(2, 1, 3), dimnames=list(NULL, "X", LETTERS[1:3])) 304s > a.3 <- array( 304s + 1:6, dim=c(2, 1, 3), 304s + dimnames=list(rows=NULL, cols="X", LETTERS[1:3]) 304s + ) 304s > a.4 <- `attr<-`(a.3, "hello", "random attribute") 304s > a.5 <- array(1:36, dim=c(6, 2, 3)) 304s > a.6 <- array(1:2, c(2, 1, 1)) 304s > c.a.1 <- capture.output(a.1) 304s > c.a.2 <- capture.output(a.2) 304s > c.a.3 <- capture.output(a.3) 304s > c.a.4 <- capture.output(a.4) 304s > c.a.5 <- capture.output(a.5) 304s > c.a.6 <- capture.output(a.6) 304s > # helper funs to vizualize the guide line detection 304s > # viz_dag <- function(capt, obj) 304s > # cbind( 304s > # capt, 304s > # seq_along(capt) %in% diffobj:::detect_array_guides(capt, dimnames(obj)) 304s > # ) 304s > # viz_dag(c.a.1, a.1) 304s > # viz_dag(c.a.2, a.2) 304s > # viz_dag(c.a.3, a.3) 304s > # viz_dag(c.a.4, a.4) 304s > # viz_dag(c.a.5, a.5) 304s > # viz_dag(c.a.6, a.6) 304s > all.equal( 304s + diffobj:::detect_array_guides(c.a.1, dimnames(a.1)), 304s + c(1L, 2L, 7L, 8L, 13L, 14L) 304s + ) 304s [1] TRUE 304s > all.equal( 304s + diffobj:::detect_array_guides(c.a.2, dimnames(a.2)), 304s + c(1L, 2L, 7L, 8L, 13L, 14L) 304s + ) 304s [1] TRUE 304s > all.equal( 304s + diffobj:::detect_array_guides(c.a.3, dimnames(a.3)), 304s + c(1L, 2L, 8L, 9L, 15L, 16L) 304s + ) 304s [1] TRUE 304s > all.equal( 304s + diffobj:::detect_array_guides(c.a.4, dimnames(a.4)), 304s + c(1L, 2L, 8L, 9L, 15L, 16L) 304s + ) 304s [1] TRUE 304s > all.equal( 304s + diffobj:::detect_array_guides(c.a.5, dimnames(a.5)), 304s + c(1L, 2L, 11L, 12L, 21L, 22L) 304s + ) 304s [1] TRUE 304s > all.equal( 304s + diffobj:::detect_array_guides(c.a.6, dimnames(a.6)), 304s + c(1L, 2L) 304s + ) 304s [1] TRUE 304s > # - detect_s4_guides ----------------------------------------------------------- 304s > 304s > setClass("gtest2", slots=c(hello="integer", `good bye`="list")) 304s > setClass("gtest1", 304s + slots=c( 304s + sub.class="gtest2", blah="character", gah="list", sub.class.2="gtest2" 304s + ) ) 304s > obj <- new( 304s + "gtest1", 304s + sub.class=new( 304s + "gtest2", hello=1:3, `good bye`=list("a", list(l1=5, l2="wow")) 304s + ), 304s + blah=letters, gah=list(one=1:10, two=LETTERS), 304s + sub.class.2=new( 304s + "gtest2", hello=3:1, `good bye`=list("B", list(l1=5, l2="wow")) 304s + ) 304s + ) 304s > # note at this point the nested stuff doesn't work, so we're just shooting for 304s > # the simple match 304s > 304s > c.1 <- capture.output(obj) 304s > identical( 304s + diffobj:::detect_s4_guides(c.1, obj), 304s + c(1L, 2L, 21L, 25L, 34L) 304s + ) 304s [1] TRUE 304s > # small diff as that has a non-default show method 304s > 304s > diff <- diffChr("a", "b", format='raw') 304s > diff.out <- capture.output(show(diff)) 304s > all.equal( 304s + diffobj:::detect_s4_guides(diff.out, diff), 304s + integer() 304s + ) 304s [1] TRUE 304s > # - custom guide fun ----------------------------------------------------------- 304s > 304s > a <- b <- matrix(1:100) 304s > b[50] <- -99L 304s > 304s > fun1 <- function(x, y) c(1L, 14L, 53L) 304s > 304s > all.equal(as.character(diffPrint(a, b, guides=fun1)), rdsf(100)) 304s [1] TRUE 304s > if(getRversion() >= "3.2.2") { 304s + capture.output( # warn: "If you did not specify a `guides`" 304s + trim.err <- 304s + as.character(diffPrint(a, b, guides=function(x, y) stop("boom"))), 304s + type="message" 304s + ) 304s + all.equal(trim.err, rdsf(200)) 304s + } 304s [1] TRUE 304s Warning message: 304s In apply_guides(current, cur.capt, guide_fun) : 304s `guides*` method produced an error when attempting to compute guide lines ; If you did not specify a `guides` function or define custom `guides*` methods contact maintainer (see `?guides`). Proceeding without guides. 304s > # "must produce an integer vector" 304s > try(diffobj:::apply_guides(1:26, LETTERS, function(x, y) 35L)) 304s Error in diffobj:::apply_guides(1:26, LETTERS, function(x, y) 35L) : 304s `guides*` method must produce an integer vector containing unique index values for the `obj.as.chr` vector; If you did not specify a `guides` function or define custom `guides*` methods contact maintainer (see `?guides`). Proceeding without guides. 304s > 304s > # - errors --------------------------------------------------------------------- 304s > 304s > try(guidesStr(1:26, rep(NA_character_, 26)))# "Cannot compute guides" 304s Error in guidesStr(1:26, rep(NA_character_, 26)) : 304s Cannot compute guides if `obj.as.chr` contains NAs 304s > try(guidesPrint(1:26, rep(NA_character_, 26)))# "Cannot compute guides" 304s Error in guidesPrint(1:26, rep(NA_character_, 26)) : 304s Cannot compute guides if `obj.as.chr` contains NAs 304s > 304s > # - corner cases --------------------------------------------------------------- 304s > 304s > all.equal( 304s + diffobj:::split_by_guides(letters, integer()), 304s + list(structure(letters, idx=seq_along(letters))) 304s + ) 304s [1] TRUE 304s > try(guidesStr(1:26, rep(NA_character_, 26))) # "Cannot compute guides" 304s Error in guidesStr(1:26, rep(NA_character_, 26)) : 304s Cannot compute guides if `obj.as.chr` contains NAs 304s > try(guidesPrint(1:26, rep(NA_character_, 26))) # "Cannot compute guides" 304s Error in guidesPrint(1:26, rep(NA_character_, 26)) : 304s Cannot compute guides if `obj.as.chr` contains NAs 304s > 304s > # - issue 117 - 2d guide failure ----------------------------------------------- 304s > 304s > # Thanks to Sebastian Meyer (@bastician) for MRE 304s > a <- b <- data.frame(ID = 0, value = 1) 304s > b$value <- 2 304s > a <- a[c(rep(1, 86), 2)] 304s > b <- b[c(rep(1, 86), 2)] 304s > diffPrint(a, b, mode = "unified", format='raw', context=0) 304s < a 304s > b 304s @@ 16 / 16 @@ 304s ~ value 304s < 1 1 304s > 1 2 304s > 304s PASS 304s Begin testing test-html.R 304s 304s R version 4.4.3 (2025-02-28) -- "Trophy Case" 304s Copyright (C) 2025 The R Foundation for Statistical Computing 304s Platform: arm-unknown-linux-gnueabihf (32-bit) 304s 304s R is free software and comes with ABSOLUTELY NO WARRANTY. 304s You are welcome to redistribute it under certain conditions. 304s Type 'license()' or 'licence()' for distribution details. 304s 304s R is a collaborative project with many contributors. 304s Type 'contributors()' for more information and 304s 'citation()' on how to cite R or R packages in publications. 304s 304s Type 'demo()' for some demos, 'help()' for on-line help, or 304s 'help.start()' for an HTML browser interface to help. 304s Type 'q()' to quit R. 304s 304s > NAME <- "html" 304s > source(file.path('_helper', 'init.R')) 305s > 305s > # Verify that internal css works 305s > 305s > # - HTML Output Modes ---------------------------------------------------------- 305s > 305s > all.equal( 305s + as.character( 305s + diffPrint( 305s + letters[1:3], LETTERS[1:3], 305s + style=StyleHtmlLightYb(html.output="diff.only") 305s + ) ), 305s + rdsf(100) 305s + ) 305s [1] TRUE 305s > all.equal( 305s + as.character( 305s + diffPrint( 305s + letters[1:6], LETTERS[1:6], 305s + style=StyleHtmlLightYb(html.output="diff.w.style") 305s + ) ), 305s + rdsf(200) 305s + ) 305s [1] TRUE 305s > all.equal( 305s + as.character( 305s + diffPrint( 305s + letters[1:6], LETTERS[1:6], 305s + style=StyleHtmlLightYb(html.output="page") 305s + ) ), 305s + rdsf(300) 305s + ) 305s [1] TRUE 305s > all.equal( 305s + as.character( 305s + diffPrint( 305s + letters[1:6], LETTERS[1:6], mode="unified", 305s + style=StyleHtmlLightYb(html.output="page") 305s + ) ), 305s + rdsf(350) 305s + ) 305s [1] TRUE 305s > # - Sub CSS -------------------------------------------------------------------- 305s > 305s > # Mess up the CSS to test that we can change CSS file 305s > 305s > local({ 305s + f <- tempfile() 305s + on.exit(unlink(f)) 305s + cat("div.row {background-color: red;}\n", file=f) 305s + all.equal( 305s + as.character( 305s + diffPrint( 305s + letters, LETTERS, 305s + style=StyleHtmlLightYb(css=f, html.output="diff.w.style") 305s + ) 305s + ), 305s + rdsf(400) 305s + ) 305s + }) 305s [1] TRUE 305s > # - Tag funs ------------------------------------------------------------------- 305s > 305s > div_a <- div_f("A", c(color="red")) 305s > all.equal( 305s + div_a(c("a", "b")), 305s + c( 305s + "
a
", 305s + "
b
" 305s + ) 305s + ) 305s [1] TRUE 305s > span_a <- span_f() 305s > all.equal(span_a(c("a", "b")), c("a", "b")) 305s [1] TRUE 305s > 305s > try(div_a(TRUE)) # "must be character" 305s Error in div_a(TRUE) : Argument `x` must be character. 305s > all.equal(div_a(character()),character()) 305s [1] TRUE 305s > 305s > # - nchar ---------------------------------------------------------------------- 305s > 305s > all.equal(nchar_html("25"), 2) 305s [1] TRUE 305s > all.equal(nchar_html("25 "), 3) 305s [1] TRUE 305s > 305s > # - cont_f --------------------------------------------------------------------- 305s > 305s > try(cont_f("hello")(1:3)) # "must be character" 305s Error in cont_f("hello")(1:3) : Argument `x` must be character. 305s > 305s PASS 305s Begin testing test-limit.R 305s 305s R version 4.4.3 (2025-02-28) -- "Trophy Case" 305s Copyright (C) 2025 The R Foundation for Statistical Computing 305s Platform: arm-unknown-linux-gnueabihf (32-bit) 305s 305s R is free software and comes with ABSOLUTELY NO WARRANTY. 305s You are welcome to redistribute it under certain conditions. 305s Type 'license()' or 'licence()' for distribution details. 305s 305s R is a collaborative project with many contributors. 305s Type 'contributors()' for more information and 305s 'citation()' on how to cite R or R packages in publications. 305s 305s Type 'demo()' for some demos, 'help()' for on-line help, or 305s 'help.start()' for an HTML browser interface to help. 305s Type 'q()' to quit R. 305s 305s > NAME <- "limit" 305s > source(file.path('_helper', 'init.R')) 305s > 305s > # - Simple limit --------------------------------------------------------------- 305s > 305s > A <- B <- letters[1:5] 305s > B[2] <- "B" 305s > B[6] <- "F" 305s > # diffChr(A, B) 305s > all.equal(as.character(diffChr(A, B, line.limit=2)), rdsf(100)) 306s [1] TRUE 306s > all.equal(as.character(diffChr(A, B, line.limit=3)), rdsf(200)) 306s [1] TRUE 306s > 306s > # - More Extensive Limits ------------------------------------------------------ 306s > 306s > Puromycin2 <- Puromycin 306s > set.seed(1) 306s > Puromycin2$conc[c(8, 15:19, 22)] <- round(runif(7), 2) 306s > Puromycin2$state[17] <- "treated" 306s > 306s > all.equal( 306s + as.character( 306s + diffPrint(Puromycin, Puromycin2, line.limit=15, mode="sidebyside") 306s + ), 306s + rdsf(300) 306s + ) 306s [1] TRUE 306s > 306s > # # Not working right 306s > # diffPrint(Puromycin, Puromycin2, line.limit=15, mode="context") 306s > all.equal( 306s + as.character( 306s + diffPrint(Puromycin, Puromycin2, line.limit=15, mode="unified") 306s + ), 306s + rdsf(500) 306s + ) 306s [1] TRUE 306s > 306s > all.equal( 306s + as.character( 306s + diffPrint(Puromycin, Puromycin2, line.limit=5, mode="sidebyside") 306s + ), 306s + rdsf(600) 306s + ) 306s [1] TRUE 306s > all.equal( 306s + as.character( 306s + diffPrint(Puromycin, Puromycin2, line.limit=5, mode="context") 306s + ), 306s + rdsf(700) 306s + ) 306s [1] TRUE 306s > all.equal( 306s + as.character( 306s + diffPrint(Puromycin, Puromycin2, line.limit=5, mode="unified") 306s + ), 306s + rdsf(800) 306s + ) 306s [1] TRUE 306s > 306s > Puromycin3 <- Puromycin2 306s > names(Puromycin3)[3L] <- "blargh" 306s > all.equal( 306s + as.character( 306s + diffPrint(Puromycin, Puromycin3, line.limit=7, mode="sidebyside") 306s + ), 306s + rdsf(900) 306s + ) 306s [1] TRUE 306s > all.equal( 306s + as.character( 306s + diffPrint(Puromycin, Puromycin3, line.limit=6, mode="context") 306s + ), 306s + rdsf(1000) 306s + ) 306s [1] TRUE 306s > # - Dual limit values ---------------------------------------------------------- 306s > 306s > A <- letters[1:10] 306s > B <- LETTERS[1:10] 306s > all.equal( 306s + as.character(diffChr(A, B, line.limit=c(10, 3))), rdsf(1100) 306s + ) 306s [1] TRUE 306s > all.equal( 306s + as.character(diffChr(A, B, line.limit=c(13, 3))), rdsf(1200) 306s + ) 306s [1] TRUE 306s > try(diffChr(A, B, line.limit=c(3, 13))) # "larger than or" 306s Error in diffChr(target = A, current = B, line.limit = c(3, 13)) : 306s Argument `line.limit` must be an integer vector of length 1 or 2 and if length 2, with the first value larger than or equal to the second, or "auto" or the result of calling `auto_line_limit` 306s > 306s > # - Cause errors --------------------------------------------------------------- 306s > 306s > try(diffChr(letters, LETTERS, line.limit=1:3)) # "vector of length" 306s Error in diffChr(target = letters, current = LETTERS, line.limit = 1:3) : 306s Argument `line.limit` must be an integer vector of length 1 or 2 and if length 2, with the first value larger than or equal to the second, or "auto" or the result of calling `auto_line_limit` 306s > 306s > # - Vanishing header ----------------------------------------------------------- 306s > 306s > # issue 64 306s > all.equal( 306s + as.character( 306s + diffChr( 306s + letters, letters[-13], context=auto_context(0, 10), line.limit=1L, 306s + pager="off" 306s + ) ), 306s + rdsf(1300) 306s + ) 306s [1] TRUE 306s > 306s > 306s PASS 306s Begin testing test-methods.R 306s 306s R version 4.4.3 (2025-02-28) -- "Trophy Case" 306s Copyright (C) 2025 The R Foundation for Statistical Computing 306s Platform: arm-unknown-linux-gnueabihf (32-bit) 306s 306s R is free software and comes with ABSOLUTELY NO WARRANTY. 306s You are welcome to redistribute it under certain conditions. 306s Type 'license()' or 'licence()' for distribution details. 306s 306s R is a collaborative project with many contributors. 306s Type 'contributors()' for more information and 306s 'citation()' on how to cite R or R packages in publications. 306s 306s Type 'demo()' for some demos, 'help()' for on-line help, or 306s 'help.start()' for an HTML browser interface to help. 306s Type 'q()' to quit R. 306s 306s > NAME <- "methods" 306s > source(file.path('_helper', 'init.R')) 307s > 307s > # try implementing methods that change default behavior outside of package 307s > 307s > # - Force unified -------------------------------------------------------------- 307s > 307s > par.env <- new.env() 307s > local( 307s + envir=par.env, { 307s + suppressWarnings( 307s + setClass( 307s + "testdiffobj", slots=c(a="integer"), where=par.env 307s + ) ) 307s + # First check that we do actually output in side by side mode 307s + 307s + print( 307s + all.equal( 307s + as.character(diffObj(new("testdiffobj", a=1L), new("testdiffobj", a=2L))), 307s + rdsf(100) 307s + ) ) 307s + # Now verify that with our new method, we get unified 307s + 307s + setMethod("diffObj", c("testdiffobj", "testdiffobj"), 307s + function(target, current, ...) { 307s + dots <- match.call(expand.dots=FALSE)[["..."]] 307s + if("mode" %in% names(dots)) 307s + callNextMethod() 307s + else 307s + callNextMethod(target=target, current=current, ..., mode="unified") 307s + }, 307s + where=par.env 307s + ) 307s + on.exit( 307s + removeMethod("diffObj", c("testdiffobj", "testdiffobj"), where=par.env) 307s + ) 307s + print( 307s + all.equal( 307s + as.character(diffObj(new("testdiffobj", a=1L), new("testdiffobj", a=2L))), 307s + rdsf(200) 307s + ) ) 307s + # Make sure we can still get side by side? 307s + print( 307s + all.equal( 307s + as.character( 307s + diffObj( 307s + new("testdiffobj", a=1L), new("testdiffobj", a=2L), mode="sidebyside" 307s + ) ), 307s + rdsf(100) 307s + ) ) 307s + try( #"Argument `mode` must be" 307s + diffObj(new("testdiffobj", a=1L), new("testdiffobj", a=2L), mode="hello") 307s + ) 307s + }) 307s [1] TRUE 307s [1] TRUE 307s [1] TRUE 307s Error in diffObj(target = new("testdiffobj", a = 1L), current = new("testdiffobj", : 307s Error in calling `diffStr`: Argument `mode` must be character(1L) and in `c("auto", "unified", "context", "sidebyside")`. 307s > 307s PASS 307s Begin testing test-misc.R 307s 307s R version 4.4.3 (2025-02-28) -- "Trophy Case" 307s Copyright (C) 2025 The R Foundation for Statistical Computing 307s Platform: arm-unknown-linux-gnueabihf (32-bit) 307s 307s R is free software and comes with ABSOLUTELY NO WARRANTY. 307s You are welcome to redistribute it under certain conditions. 307s Type 'license()' or 'licence()' for distribution details. 307s 307s R is a collaborative project with many contributors. 307s Type 'contributors()' for more information and 307s 'citation()' on how to cite R or R packages in publications. 307s 307s Type 'demo()' for some demos, 'help()' for on-line help, or 307s 'help.start()' for an HTML browser interface to help. 307s Type 'q()' to quit R. 307s 307s > NAME <- "misc" 307s > source(file.path('_helper', 'init.R')) 307s > 307s > # - trim_str ------------------------------------------------------------------- 307s > 307s > a <- structure("hello", class="A", xx="B") 307s > b <- structure(1:10, yy=a) 307s > long.string <- "I'm a string long enough to force wrapping under most cases so that I may be useful for tests andiamareallylongwordtoseehowwrappingbreakslongwordsthatexceed" 307s > obj <- list( 307s + a=a, b=b, c=1:50, 307s + d=long.string, 307s + e=list(1, structure(2, zz=list(a=1, b=list("a", ls=long.string))), e=letters) 307s + ) 307s > # conditional because of issue113 307s > str.txt <- capture.output(str(obj)) 307s > str.txt.w <- capture.output(str(obj, width=30L, strict.width="wrap")) 308s > 308s > if( 308s + getRversion() >= '3.5.0' && as.numeric(R.Version()[['svn rev']]) >= 73780 308s + ) { 308s + c( 308s + all.equal( 308s + diffobj:::str_levels(str.txt, wrap=FALSE), 308s + c(0L, 1L, 2L, 1L, 2L, 3L, 1L, 1L, 1L, 2L, 2L, 3L, 4L, 4L, 5L, 5L, 2L) 308s + ), 308s + all.equal( 308s + diffobj:::str_levels(str.txt.w, wrap=TRUE), 308s + c(0L, 1L, 2L, 1L, 1L, 2L, 2L, 3L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 308s + 1L, 1L, 2L, 2L, 3L, 3L, 4L, 4L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 308s + 2L, 2L 308s + ) 308s + ) ) 308s + } else { 308s + c( 308s + all.equal( 308s + diffobj:::str_levels(str.txt, wrap=FALSE), 308s + c(0L, 1L, 3L, 1L, 2L, 4L, 1L, 1L, 1L, 2L, 2L, 3L, 4L, 4L, 5L, 5L, 2L) 308s + ), 308s + all.equal( 308s + diffobj:::str_levels(str.txt.w, wrap=TRUE), 308s + c(0L, 1L, 1L, 3L, 1L, 1L, 2L, 2L, 4L, 4L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L, 2L, 3L, 3L, 4L, 4L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 2L, 2L) 308s + ) ) 308s + } 308s [1] TRUE TRUE 308s > # cat( 308s > # paste( 308s > # format(substr(str.txt.w, 1, 20)), diffobj:::str_levels(str.txt.w, TRUE), 308s > # sep=": " 308s > # ), 308s > # sep="\n" 308s > # ) 308s > 308s > # - rle_sub -------------------------------------------------------------------- 308s > 308s > x <- c(1, 1, 1, 2, 2, 1, 1, 3, 3, 4, 4, 4, 5, 2, 2) 308s > r <- rle(x) 308s > all.equal(diffobj:::rle_sub(r, r$values == 1L), list(1:3, 6:7)) 308s [1] TRUE 308s > all.equal(diffobj:::rle_sub(r, r$values == 2L), list(4:5, 14:15)) 308s [1] TRUE 308s > isTRUE(all(x[unlist(diffobj:::rle_sub(r, r$values == 1L))] == 1)) 308s [1] TRUE 308s > isTRUE(all(x[unlist(diffobj:::rle_sub(r, r$values == 2L))] == 2)) 308s [1] TRUE 308s > isTRUE(all(x[unlist(diffobj:::rle_sub(r, r$values == 3L))] == 3)) 308s [1] TRUE 308s > 308s > # - call funs ------------------------------------------------------------------ 308s > 308s > # Failure case; assumes no S4 dispatch in testthat 308s > calls <- list(quote(a()), quote(b()), quote(notafunctionblah())) 308s > all.equal(diffobj:::which_top(calls), length(calls)) 308s [1] TRUE 308s > diffobj:::extract_call(calls, new.env()) # warn: "Unable to find") 308s $call 308s NULL 308s 308s $tar 308s NULL 308s 308s $cur 308s NULL 308s 308s Warning message: 308s In get_fun(found.call[[1L]], env = par.env) : 308s Unable to find function `notafunctionblah` to match call with. 308s > 308s > # missing param works 308s > 308s > calls2 <- pairlist( 308s + quote(diffChr("a")), quote(diffChr("a")), quote(.local(target, current, ...)) 308s + ) 308s > all.equal( 308s + diffobj:::extract_call(calls2, new.env()), 308s + list(call = quote(diffChr(target = "a", NULL)), tar = "a", cur = NULL) 308s + ) 308s [1] TRUE 308s > # fallback parent frame; can't think of a good way to actually cause this to 308s > # happen 308s > 308s > # all.equal(diffobj:::par_frame(), .GlobalEnv) 308s > 308s > # - lines ---------------------------------------------------------------------- 308s > 308s > old.val <- Sys.getenv("LINES", unset=NA) 308s > Sys.setenv(LINES="25") 308s > all.equal(console_lines(), 25L) 308s [1] TRUE 308s > Sys.setenv(LINES="-25") 308s > all.equal(console_lines(), 48L) 308s [1] TRUE 308s > Sys.unsetenv("LINES") 308s > all.equal(console_lines(), 48L) 308s [1] TRUE 308s > 308s > # - get_funs ------------------------------------------------------------------- 308s > 308s > identical( 308s + diffobj:::get_fun(quote(diffobj::diffPrint), .BaseNamespaceEnv), 308s + diffobj::diffPrint 308s + ) 308s [1] TRUE 308s > identical( 308s + diffobj:::get_fun(quote(diffobj:::diffPrint), .BaseNamespaceEnv), 308s + diffobj::diffPrint 308s + ) 308s [1] TRUE 308s > identical( 308s + diffobj:::get_fun(quote(diffPrint), getNamespace("diffobj")), 308s + diffobj::diffPrint 308s + ) 308s [1] TRUE 308s > gf <- diffobj:::get_fun(quote(notAFunction), getNamespace("diffobj")) # warn 308s Warning message: 308s In diffobj:::get_fun(quote(notAFunction), getNamespace("diffobj")) : 308s Unable to find function `notAFunction` to match call with. 308s > 308s > identical(gf, NULL) 308s [1] TRUE 308s > 308s > # - trimws2 -------------------------------------------------------------------- 308s > 308s > all.equal(diffobj:::trimws2("hello world"), "hello world") 308s [1] TRUE 308s > all.equal(diffobj:::trimws2(" hello world"), "hello world") 308s [1] TRUE 308s > all.equal(diffobj:::trimws2(" hello world "), "hello world") 308s [1] TRUE 308s > all.equal(diffobj:::trimws2(" hello world ", 'left'), "hello world ") 308s [1] TRUE 308s > all.equal(diffobj:::trimws2(" hello world ", 'right'), " hello world") 308s [1] TRUE 308s > 308s > try(diffobj:::trimws2(" hello world ", 'banana')) # "is wrong" 308s Error in diffobj:::trimws2(" hello world ", "banana") : 308s Argument which is wrong 308s > 308s > # - string --------------------------------------------------------------------- 308s > 308s > try(diffobj:::substr2("hello world", 1, 1:2)) # "same length" 308s Error in diffobj:::substr2("hello world", 1, 1:2) : 308s `start` and `stop` must be length 1 or the same length as `x`. 308s > 308s > # - Gutters -------------------------------------------------------------------- 308s > 308s > etc <- new("Settings") 308s > etc@style <- StyleRaw() 308s > etc@style@funs@gutter <- function(x) stop("bad gutters") 308s > try(diffobj:::gutter_dat(etc)) # "Failed attempting to apply gutter." 308s Error in funs@gutter(paste0(gutt.dat.format, funs@gutter.pad(text@gutter.pad))) : 308s bad gutters 308s Error in diffobj:::gutter_dat(etc) : 308s Failed attempting to apply gutter formatting functions; if you did not customize them, contact maintainer. See `?StyleFuns`. 308s > 308s > # - Finalizer error handling --------------------------------------------------- 308s > 308s > try(finalizeHtml(letters, NULL)) # "must be character" 308s Error in .local(x, ...) : Argument `x.chr` must be character 308s > try(finalizeHtml(letters, letters, letters)) # "must be character\\(1L" 308s Error in .local(x, ...) : Argument `js` must be character(1L) and not NA. 308s > 308s > # - c.factor ------------------------------------------------------------------- 308s > 308s > all.equal(diffobj:::c.factor(), factor(character())) 308s [1] TRUE 308s > 308s > # - strip_hz ------------------------------------------------------------------- 308s > 308s > # Can't trigger this directly because wrapper doesn't let this case through 308s > diffobj:::strip_hz_c_int(character(), 8L, TRUE) 308s character(0) 308s > 308s > 308s > 308s PASS 308s Begin testing test-pager.R 308s 308s R version 4.4.3 (2025-02-28) -- "Trophy Case" 308s Copyright (C) 2025 The R Foundation for Statistical Computing 308s Platform: arm-unknown-linux-gnueabihf (32-bit) 308s 308s R is free software and comes with ABSOLUTELY NO WARRANTY. 308s You are welcome to redistribute it under certain conditions. 308s Type 'license()' or 'licence()' for distribution details. 308s 308s R is a collaborative project with many contributors. 308s Type 'contributors()' for more information and 308s 'citation()' on how to cite R or R packages in publications. 308s 308s Type 'demo()' for some demos, 'help()' for on-line help, or 308s 'help.start()' for an HTML browser interface to help. 308s Type 'q()' to quit R. 308s 308s > NAME <- "pager" 308s > source(file.path('_helper', 'init.R')) 308s > source(file.path('_helper', 'tools.R')) 308s > 308s > # void pager, doesn't do anything, just to test side effect of writing to file 308s > 308s > void <- function(x) NULL 308s > 308s > # - Specifying pager ----------------------------------------------------------- 308s > 308s > style <- gdo("diffobj.style") 308s > if(is.null(style)) style <- StyleAnsi8NeutralYb() 308s > style@pager@file.ext <- "xyz" # make pager identifiable 308s > all.equal( 308s + diffChr( 308s + letters, LETTERS, style=style, pager="auto", interactive=TRUE 308s + )@etc@style@pager@file.ext, 308s + "xyz" 308s + ) 308s [1] TRUE 308s > all.equal( 308s + diffChr( 308s + letters, LETTERS, style=style, pager="off", interactive=TRUE 308s + )@etc@style@pager, 308s + PagerOff() 308s + ) 308s [1] TRUE 308s > identical( 308s + diffChr( 308s + letters, LETTERS, style=style, pager="auto", interactive=FALSE 308s + )@etc@style@pager, 308s + PagerOff() 308s + ) 308s [1] TRUE 308s > 308s > # - System Pagers -------------------------------------------------------------- 308s > 308s > less.orig <- Sys.getenv("LESS") 308s > pager_mock <- function(...) { 308s + warning(Sys.getenv("LESS")) 308s + 42 308s + } 308s > is(PagerSystem(), "PagerSystem") 308s [1] TRUE 308s > is( 308s + pg.less <- PagerSystemLess(pager=pager_mock, flags="VWF"), 308s + "PagerSystemLess" 308s + ) 308s [1] TRUE 308s > res <- pg.less@pager() # warning: "VWF$" 308s Warning message: 308s In pager.old(x) : -VWF 308s > all.equal(res, 42) 308s [1] TRUE 308s > all.equal(less.orig, Sys.getenv("LESS")) 308s [1] TRUE 308s > all.equal(PagerSystemLess(pager=pager_mock)@flags, "R") 308s [1] TRUE 308s > 308s > try(PagerSystemLess(pager=pager_mock, flags=letters)) 308s Error in initialize(value, ...) : 308s Argument `flags` must be character(1L) and not NA 308s > 308s > # - use_pager ------------------------------------------------------------------ 308s > 308s > local({ 308s + suppressMessages(mock(diffobj:::console_lines, 10L)) 308s + on.exit(suppressMessages(untrace(diffobj:::console_lines))) 308s + c( 308s + isTRUE(diffobj:::use_pager(PagerSystem(threshold=0L), 1L)), 308s + identical(diffobj:::use_pager(PagerSystem(threshold=50L), 25L), FALSE), 308s + isTRUE(diffobj:::use_pager(PagerSystem(threshold=-1L), 25L)) 308s + ) 308s + }) 308s [1] TRUE TRUE TRUE 308s > 308s > # - Setting LESS var ----------------------------------------------------------- 308s > 308s > local({ 308s + less.orig <- Sys.getenv("LESS", unset=NA) 308s + old.opt <- options(crayon.enabled=FALSE) # problems with crayon and LESS 308s + on.exit({ 308s + diffobj:::reset_less_var(less.orig) # should be tested..., but super simple 308s + options(old.opt) 308s + }) 308s + 308s + # Here we change the LESS variable even though we're mocking getenv 308s + 308s + Sys.unsetenv("LESS") 308s + a0 <- isTRUE(is.na(diffobj:::set_less_var("XF"))) 308s + a <- all.equal(Sys.getenv("LESS"), "-XF") 308s + Sys.setenv(LESS="-X -F") 308s + b <- all.equal(diffobj:::set_less_var("VP"), "-X -F") 308s + c <- all.equal(Sys.getenv("LESS"), "-X -FVP") 308s + diffobj:::reset_less_var("-XF") 308s + d <- all.equal(Sys.getenv("LESS"), "-XF") 308s + diffobj:::reset_less_var(NA_character_) 308s + e <- all.equal(Sys.getenv("LESS"), "") 308s + Sys.setenv(LESS="-XF") 308s + f <- all.equal(diffobj:::set_less_var("V"), "-XF") 308s + g <- all.equal(Sys.getenv("LESS"), "-XFV") 308s + c(a0, a, b, c, d, e, f, g) 308s + }) 308s [1] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE 308s > 308s > # - viewer vs browser ---------------------------------------------------------- 308s > 308s > local({ 308s + viewer <- function(x) "viewer" 308s + old.external <- options(viewer=viewer, browser=function(url) "browser") 308s + on.exit(options(old.external)) 308s + suppressMessages(mock(diffobj::make_blocking, quote(fun))) 308s + on.exit(suppressMessages(untrace(diffobj::make_blocking)), add=TRUE) 308s + pager <- PagerBrowser() 308s + a <- all.equal(pager@pager("blah"), "viewer") 308s + options(viewer=NULL) 308s + b <- all.equal(pager@pager("blah"), "browser") 308s + options(viewer=function(x) stop("viewer error")) 308s + res <- pager@pager("blah") # warning: "IDE viewer" 308s + c <- all.equal(res, "browser") 308s + c(a, b, c) 308s + }) 308s [1] TRUE TRUE TRUE 308s Warning message: 308s In pager@pager("blah") : 308s IDE viewer failed with error viewer error; falling back to `browseURL` 308s > 308s > # - blocking ------------------------------------------------------------------- 308s > 308s > # Note that readline just proceeds in non-interactive mode, which is why we 308s > # need the mock here 308s > 308s > local({ 308s + suppressMessages(mock(diffobj:::interactive, FALSE)) 308s + on.exit(suppressMessages(untrace(diffobj:::interactive))) 308s + suppressMessages(mock(diffobj:::readline, quote(warning("readline")))) 308s + on.exit(suppressMessages(untrace(diffobj:::readline)), add=TRUE) 308s + try(make_blocking("hello")) # "must be a function" 308s + try(make_blocking(identity, letters)) # "must be character\\(1L") 308s + try(make_blocking(identity, "a", "a")) # "must be TRUE" 308s + 308s + res <- make_blocking(sum)(1:10) # warn: "readline" 308s + a <- all.equal(sum(1:10), res) 308s + b <- isTRUE( 308s + withVisible( 308s + suppressWarnings(make_blocking(sum, invisible=FALSE)(1:10)) 308s + )[['visible']] 308s + ) 308s + c(a, b) 308s + }) 308s Error in make_blocking("hello") : Argument `fun` must be a function 308s Error in make_blocking(identity, letters) : 308s Argument `msg` must be character(1L) and not NA 308s Error in make_blocking(identity, "a", "a") : 308s Argument `invisible.res` must be TRUE or FALSE 308s [1] TRUE TRUE 308s Warning message: 308s In readline(msg) : readline 308s > local({ 308s + suppressMessages(mock(diffobj:::interactive, TRUE)) 308s + on.exit(suppressMessages(untrace(diffobj:::interactive))) 308s + suppressMessages(mock(diffobj:::readline, quote(warning("readline")))) 308s + on.exit(suppressMessages(untrace(diffobj:::readline)), add=TRUE) 308s + show( # warn "readline" 308s + diffChr( 308s + "a", "b", format='raw', 308s + pager=list(pager=void, make.blocking=TRUE, threshold=0) 308s + ) 308s + ) 308s + show( # warn "readline" 308s + diffChr( 308s + "a", "b", format='html', 308s + pager=list(pager=void, make.blocking=NA, threshold=0) 308s + ) ) 308s + show(diffChr("a", "b", format='html', pager=list(pager=void))) 308s + }) 309s Warning messages: 309s 1: In readline(msg) : readline 309s 2: In readline(msg) : readline 309s 3: In readline(msg) : readline 309s > # There should be no warnings in this lot 309s > 309s > local({ 309s + suppressMessages(mock(diffobj:::interactive, TRUE)) 309s + on.exit(suppressMessages(untrace(diffobj:::interactive))) 309s + suppressMessages(mock(diffobj:::readline, quote(warning("readline")))) 309s + on.exit(suppressMessages(untrace(diffobj:::readline)), add=TRUE) 309s + f <- tempfile() 309s + on.exit(unlink(f), add=TRUE) 309s + show( # no warning 309s + diffChr( 309s + "a", "b", format='html', 309s + pager=list(pager=void, make.blocking=NA, file.path=f) 309s + ) ) 309s + show( # no warning 309s + diffChr( 309s + "a", "b", format='html', 309s + pager=list(pager=void, make.blocking=FALSE, file.path=f) 309s + ) ) 309s + show( # no warning 309s + diffChr("a", "b", format='html', pager=list(pager=void, file.path=f)) 309s + ) 309s + }) 309s > 309s > # - html page output ----------------------------------------------------------- 309s > 309s > pager <- PagerBrowser( 309s + pager=function(x) cat(readLines(x), sep="\n"), make.blocking=FALSE 309s + ) 309s > all.equal( 309s + capture.output(show(diffChr("A", "B", pager=pager, style=StyleRaw()))), 309s + c("< \"A\" > \"B\" ", "@@ 1 @@ @@ 1 @@ ", "< A > B ") 309s + ) 309s [1] TRUE 309s > pager.warn <- PagerBrowser( 309s + pager=function(x) cat(readLines(x), sep="\n"), make.blocking=FALSE 309s + ) 309s > try( # "Unable to instantiate `Style` object: Argument `js` .* is not a file" 309s + diffChr( 309s + "A", "B", pager=pager.warn, format="html", style=list(js="notafile") 309s + ) ) 309s Error in diffChr(target = "A", current = "B", pager = pager.warn, format = "html", : 309s Unable to instantiate `Style` object: Argument `js` ("notafile") is not a file 309s > try( # "Unable to instantiate `Style` object: Argument `css` .* is not a file" 309s + diffChr( 309s + "A", "B", pager=pager.warn, format="html", style=list(css="notafile") 309s + ) 309s + ) 309s Error in diffChr(target = "A", current = "B", pager = pager.warn, format = "html", : 309s Unable to instantiate `Style` object: Argument `css` ("notafile") is not a file 309s > # Create objects that bypass the validation 309s > 309s > style.obj.1 <- style.obj.2 <- StyleHtmlLightYb() 309s > style.obj.1@css <- "notafile" 309s > style.obj.2@js <- "notafile" 309s > 309s > invisible( 309s + capture.output( # warn: "Unable to read provided css file" 309s + show(diffChr("A", "B", pager=pager.warn, style=style.obj.1)) 309s + ) ) 309s Warning messages: 309s 1: In file(con, "r") : 309s cannot open file 'notafile': No such file or directory 309s 2: In .local(x, ...) : 309s Unable to read provided css file "notafile" (error: cannot open the connection). 309s > invisible( 309s + capture.output( # "Unable to read provided js file" 309s + show(diffChr("A", "B", pager=pager.warn, style=style.obj.2)) 309s + ) ) 309s Warning messages: 309s 1: In file(con, "r") : 309s cannot open file 'notafile': No such file or directory 309s 2: In .local(x, ...) : 309s Unable to read provided js file "notafile" (error: cannot open the connection). 309s > # - pager_is_less -------------------------------------------------------------- 309s > 309s > is.less <- pager_is_less() 309s > isTRUE(diffobj:::is.TF(is.less)) 309s [1] TRUE 309s > 309s > less <- tryCatch( 309s + system2("which", "less", stdout=TRUE, stderr=TRUE), 309s + error=function(e) NULL, warning=function(e) NULL 309s + ) 309s > sys.cat <- tryCatch( 309s + system2("which", "cat", stdout=TRUE, stderr=TRUE), 309s + error=function(e) NULL, warning=function(e) NULL 309s + ) 309s > if(diffobj:::is.chr.1L(less) && file_test("-x", less)) { 309s + local({ 309s + old.opt <- options(pager=less) 309s + on.exit(options(old.opt)) 309s + 309s + # has to be stopifnot as we can't return TRUE for systems that don't 309s + # meet these requirements 309s + stopifnot( 309s + identical(diffobj:::pager_opt_default(), FALSE), 309s + isTRUE(pager_is_less()) 309s + ) 309s + }) 309s + } 309s > if(diffobj:::is.chr.1L(sys.cat) && file_test("-x", sys.cat)) { 309s + local({ 309s + old.opt <- options(pager=sys.cat) 309s + on.exit(options(old.opt)) 309s + 309s + # has to be stopifnot as we can't return TRUE for systems that don't 309s + # meet these requirements 309s + stopifnot( 309s + identical(diffobj:::pager_opt_default(), FALSE), 309s + identical(pager_is_less(), FALSE) 309s + ) 309s + }) 309s + } 309s > ## force some checks 309s > 309s > local({ 309s + old.opt <- options(pager=NULL) 309s + on.exit(options(old.opt)) 309s + identical(pager_is_less(), FALSE) 309s + }) 309s [1] TRUE 309s > identical(diffobj:::file_is_less(tempfile()), FALSE) 309s [1] TRUE 309s > 309s > # - file.path ------------------------------------------------------------------ 309s > 309s > f <- tempfile() 309s > show( 309s + diffChr( 309s + "A", "B", format='raw', 309s + pager=list(pager=void, file.path=f, threshold=0L) 309s + ) ) 309s > all.equal( 309s + readLines(f), 309s + c("< \"A\" > \"B\" ", "@@ 1 @@ @@ 1 @@ ", 309s + "< A > B ") 309s + ) 309s [1] TRUE 309s > show( # No error on this one 309s + diffChr( 309s + "A", "B", format='raw', 309s + pager=list(pager=void, file.path=NA, threshold=0L) 309s + ) ) 309s > try(Pager(file.path=letters)) # "must be length 1" 309s Error in initialize(value, ...) : Argument `file.path` must be length 1. 309s > try(Pager(file.path=1)) # "must be character" 309s Error in initialize(value, ...) : Argument `file.path` must be character. 309s > 309s > # - basic pager ---------------------------------------------------------------- 309s > 309s > local({ 309s + f <- tempfile() 309s + on.exit(unlink(f)) 309s + c( 309s + all.equal( 309s + capture.output( 309s + show( 309s + diffChr( 309s + 1, 2, pager=Pager(file.path=f, threshold=0L), 309s + format='raw' 309s + ) 309s + ) ), 309s + txtf(100) 309s + ), 309s + all.equal(txtf(100), readLines(f)) 309s + ) 309s + }) 309s [1] TRUE TRUE 309s > 309s > # - format-pager interaction --------------------------------------------------- 309s > 309s > local({ 309s + old.opt <- options(crayon.colors=7) 309s + crayon::num_colors(TRUE) 309s + on.exit({ 309s + options(old.opt) 309s + crayon::num_colors(TRUE) 309s + }) 309s + c( 309s + is( 309s + diffChr(1, 2, format='auto', pager="on", interactive=TRUE)@etc@style, 309s + "StyleHtml" 309s + ), 309s + is( 309s + diffChr(1, 2, format='auto', pager="on", interactive=FALSE)@etc@style, 309s + "StyleRaw" 309s + ), 309s + is( 309s + diffChr( 309s + 1, 2, format='auto', pager=PagerBrowser(), interactive=FALSE 309s + )@etc@style, 309s + "StyleHtml" 309s + ) 309s + ) 309s + }) 309s [1] TRUE TRUE TRUE 309s > # - format-pager interaction 2 ------------------------------------------------- 309s > 309s > local({ 309s + old.rs <- Sys.getenv('RSTUDIO', unset=NA) 309s + old.rsterm <- Sys.getenv('RSTUDIO_TERM', unset=NA) 309s + on.exit({ 309s + if(is.na(old.rs)) { 309s + Sys.unsetenv('RSTUDIO') 309s + } else Sys.setenv('RSTUDIO'=old.rs) 309s + 309s + if(is.na(old.rsterm)) { 309s + Sys.unsetenv('RSTUDIO_TERM') 309s + } else Sys.setenv('RSTUDIO_TERM'=old.rsterm) 309s + }) 309s + Sys.unsetenv('RSTUDIO') 309s + Sys.unsetenv('RSTUDIO_TERM') 309s + old.opt <- options(crayon.colors=8) 309s + crayon::num_colors(TRUE) 309s + on.exit({options(old.opt); crayon::num_colors(TRUE)}, add=TRUE) 309s + 309s + Sys.setenv(RSTUDIO='1') 309s + 309s + a <- c( 309s + is( 309s + diffChr(1, 2, format='auto', pager='on', interactive=TRUE)@etc@style, 309s + "StyleHtml" 309s + ), 309s + is( 309s + diffChr(1, 2, format='auto', interactive=FALSE)@etc@style, 309s + "StyleAnsi" 309s + ) ) 309s + Sys.setenv(RSTUDIO_TERM='HELLO') 309s + crayon::num_colors(TRUE) 309s + 309s + c( 309s + a, 309s + is( 309s + diffChr(1, 2, format='auto', pager='on', interactive=TRUE)@etc@style, 309s + "StyleAnsi" 309s + ) ) 309s + }) 309s [1] TRUE TRUE TRUE 309s > 309s > # - format-pager interaction 3 ------------------------------------------------- 309s > 309s > is( 309s + diffPrint(1:3, 3:1, format='auto', interactive=FALSE, term.colors=1)@etc@style, 309s + "StyleRaw" 309s + ) 309s [1] TRUE 309s > is( 309s + diffPrint(1:3, 3:1, format='auto', interactive=FALSE, term.colors=8)@etc@style, 309s + "StyleAnsi" 309s + ) 309s [1] TRUE 309s > 309s > # - Default pager writes to screen --------------------------------------------- 309s > 309s > # issue132 thanks Bill Dunlap 309s > 309s > local({ 309s + f <- tempfile() 309s + on.exit(unlink(f)) 309s + writeLines("hello world", f) 309s + 309s + all.equal(capture.output(new("Pager")@pager(f)), "hello world") 309s + }) 309s [1] TRUE 309s > 309s > 309s PASS 309s Begin testing test-rdiff.R 309s 309s R version 4.4.3 (2025-02-28) -- "Trophy Case" 309s Copyright (C) 2025 The R Foundation for Statistical Computing 309s Platform: arm-unknown-linux-gnueabihf (32-bit) 309s 309s R is free software and comes with ABSOLUTELY NO WARRANTY. 309s You are welcome to redistribute it under certain conditions. 309s Type 'license()' or 'licence()' for distribution details. 309s 309s R is a collaborative project with many contributors. 309s Type 'contributors()' for more information and 309s 'citation()' on how to cite R or R packages in publications. 309s 309s Type 'demo()' for some demos, 'help()' for on-line help, or 309s 'help.start()' for an HTML browser interface to help. 309s Type 'q()' to quit R. 309s 309s > NAME <- "rdiff" 309s > source(file.path('_helper', 'init.R')) 309s > 309s > # - diff util detection -------------------------------------------------------- 309s > 309s > identical(has_Rdiff(function(...) warning("test warning")), FALSE) 309s [1] TRUE 309s > isTRUE(has_Rdiff(function(...) NULL)) 309s [1] TRUE 309s > 309s > # - errors --------------------------------------------------------------------- 309s > 309s > try(Rdiff_chr(stop('hello'), 'goodbye')) # "Unable to coerce" 309s Error in try(as.character(from)) : hello 309s Error in Rdiff_chr(stop("hello"), "goodbye") : 309s Unable to coerce `target` to character. 309s > try(Rdiff_chr('hello', stop('goodbye'))) # "Unable to coerce" 309s Error in try(as.character(to)) : goodbye 309s Error in Rdiff_chr("hello", stop("goodbye")) : 309s Unable to coerce `current` to character. 309s > try(Rdiff_obj(stop('hello'), 'goodbye')) # "Unable to store" 309s Error in vapply(list(from, to), function(x) { : hello 309s Error in Rdiff_obj(stop("hello"), "goodbye") : 309s Unable to store text representation of objects 309s > 309s > # - Rdiff_chr/obj -------------------------------------------------------------- 309s > 309s > # Only run tests on machines that are likely to have diff utility 309s > 309s > if(identical(.Platform$OS.type, "unix") && has_Rdiff()) { 309s + local({ 309s + A2 <- c("A", "B", "C") 309s + B2 <- c("X", "A", "Y", "C") 309s + A3 <- 1:3 309s + B3 <- c(100L, 1L, 200L, 3L) 309s + 309s + # Rdiff_chr 309s + 309s + ref.res <- c("0a1", "2c3") 309s + ref.res.1 <- c("0a1", "> X", "2c3", "< B", "---", "> Y") 309s + 309s + a <- identical(Rdiff_chr(A2, B2, silent=TRUE, minimal=TRUE), ref.res) 309s + capt <- capture.output(res <- Rdiff_chr(A2, B2, silent=FALSE, minimal=TRUE)) 309s + b <- identical(res, ref.res) 309s + c <- identical(capt, res) 309s + capt.1 <- capture.output( 309s + res.1 <- Rdiff_chr(A2, B2, silent=FALSE, minimal=FALSE) 309s + ) 309s + d <- identical(capt.1, ref.res.1) 309s + e <- identical(res.1, ref.res.1) 309s + 309s + # test coersion 309s + f <- identical(Rdiff_chr(A3, B3, minimal=TRUE, silent=TRUE), ref.res) 309s + 309s + # Rdiff_obj 309s + 309s + ref.res2 <- c("1c1", "< [1] \"A\" \"B\" \"C\"", "---", "> [1] \"X\" \"A\" \"Y\" \"C\"" ) 309s + ref.res3 <- c("1c1") 309s + 309s + g <- identical(Rdiff_obj(A2, B2, silent=TRUE), ref.res2) 309s + h <- identical(Rdiff_obj(A2, B2, minimal=TRUE, silent=TRUE), ref.res3) 309s + 309s + # with rds 309s + f1 <- tempfile() 309s + f2 <- tempfile() 309s + saveRDS(A2, f1) 309s + saveRDS(B2, f2) 309s + on.exit(unlink(c(f1, f2))) 309s + 309s + i <- identical(Rdiff_obj(f1, B2, silent=TRUE), ref.res2) 309s + j <- identical(Rdiff_obj(A2, f2, silent=TRUE), ref.res2) 309s + k <- identical(Rdiff_obj(f1, f2, silent=TRUE), ref.res2) 309s + 309s + res <- c(a, b, c, d, e, f, g, h, i, k) 309s + if(!all(res)) stop("Failed: ", deparse(which(!res))) 309s + }) 309s + } 310s > 310s PASS 310s Begin testing test-s4.R 310s 310s R version 4.4.3 (2025-02-28) -- "Trophy Case" 310s Copyright (C) 2025 The R Foundation for Statistical Computing 310s Platform: arm-unknown-linux-gnueabihf (32-bit) 310s 310s R is free software and comes with ABSOLUTELY NO WARRANTY. 310s You are welcome to redistribute it under certain conditions. 310s Type 'license()' or 'licence()' for distribution details. 310s 310s R is a collaborative project with many contributors. 310s Type 'contributors()' for more information and 310s 'citation()' on how to cite R or R packages in publications. 310s 310s Type 'demo()' for some demos, 'help()' for on-line help, or 310s 'help.start()' for an HTML browser interface to help. 310s Type 'q()' to quit R. 310s 310s > NAME <- "s4" 310s > source(file.path('_helper', 'init.R')) 310s > 310s > # - diff data validation works 310s > # 310s > # These are not currently in use 310s > # expect_match(diffobj:::valid_dat("hello"), "should be a list") 310s > # D0 <- D1 <- D2 <- D3 <- D4 <- D5 <- D6 <- D7 <- 310s > # diffPrint(letters, LETTERS)@tar.dat 310s > 310s > # expect_match(diffobj:::valid_dat(unname(D0)), "should have names") 310s > 310s > # length(D1[[1L]]) <- 1L 310s > # expect_match(diffobj:::valid_dat(D1), "should have equal length") 310s > 310s > # D2$orig <- integer(length(D2$orig)) 310s > # expect_match(diffobj:::valid_dat(D2), "should be character") 310s > 310s > # D3$trim.ind.start <- character(length(D3$trim.ind.start)) 310s > # expect_match(diffobj:::valid_dat(D3), "should be integer") 310s > 310s > # D4$word.ind <- integer(length(D4$word.ind)) 310s > # expect_match(diffobj:::valid_dat(D4), "should be list") 310s > 310s > # D5$word.ind <- vector("list", length(D5$word.ind)) 310s > # expect_match(diffobj:::valid_dat(D5), "not in expected format") 310s > 310s > # D6$tok.rat <- D6$tok.rat + 2 310s > # expect_match(diffobj:::valid_dat(D6), "with all values between") 310s > 310s > # D7$fill <- integer(length(D7$fill)) 310s > # expect_match(diffobj:::valid_dat(D7), "should be logical") 310s > 310s > # - any ------------------------------------------------------------------------ 310s > 310s > isTRUE(any(diffChr('a', 'b'))) 310s [1] TRUE 310s > identical(any(diffChr('a', 'a')), FALSE) 310s [1] TRUE 310s > try(any(diffChr('a', 'a'), 2)) # "supports only one argument" 310s Error : `any` method for `Diff` supports only one argument 310s > 310s PASS 310s Begin testing test-scaling.R 310s 310s R version 4.4.3 (2025-02-28) -- "Trophy Case" 310s Copyright (C) 2025 The R Foundation for Statistical Computing 310s Platform: arm-unknown-linux-gnueabihf (32-bit) 310s 310s R is free software and comes with ABSOLUTELY NO WARRANTY. 310s You are welcome to redistribute it under certain conditions. 310s Type 'license()' or 'licence()' for distribution details. 310s 310s R is a collaborative project with many contributors. 310s Type 'contributors()' for more information and 310s 'citation()' on how to cite R or R packages in publications. 310s 310s Type 'demo()' for some demos, 'help()' for on-line help, or 310s 'help.start()' for an HTML browser interface to help. 310s Type 'q()' to quit R. 310s 310s > NAME <- "scaling" 310s > source(file.path('_helper', 'init.R')) 311s > 311s > # These tests are not actually run since they require manual intervention to 311s > # check for browser rendering 311s > 311s > # These tests should be run on as many browsers as possible as well as in 311s > # RStudio, and consist of running the code and resizing the windows to see 311s > # what happens 311s > 311s > if(FALSE) { # prevent running 311s + # Text should be allowed to unfurl beyond native width 311s + 311s + diffStr(mdl1, mdl2, format="html") 311s + diffStr(mdl1, mdl2, format="html", style=list(scale=FALSE)) 311s + 311s + diffPrint(c(mdl1), c(mdl2), format="html") 311s + 311s + # Revealed problems with pixel rounding in scaling 311s + 311s + diffPrint(letters[1:6], LETTERS[1:6], format="html") 311s + diffPrint(letters[1:6], LETTERS[1:6], format="html", style=list(scale=FALSE)) 311s + 311s + # Revealed problems with gutter width computations; and scaling 311s + 311s + mx.2 <- matrix(1:100, ncol=4) 311s + mx.4 <- mx.3 <- mx.2 311s + mx.3[15, 2] <- 111L 311s + mx.3a <- mx.3[-5, ] 311s + diffPrint(mx.2, mx.3a, format="html") 311s + 311s + # summary stuff 311s + 311s + summary(diffPrint(letters, LETTERS, format="html")) 311s + summary(diffStr(mdl1, mdl2, format="html")) 311s + summary(diffPrint(c(mdl1), c(mdl2), format="html")) 311s + 311s + # Long banners 311s + 311s + diffPrint( 311s + 1:20 + 100 + 100 + 100 + 100 + 100 + 100 + 100, 311s + 2:20 + 100 + 100 + 100 + 100 + 100 + 100 + 100, 311s + format="html", style=list(scale=FALSE) 311s + ) 311s + diffPrint( 311s + 1:20 + 100 + 100 + 100 + 100 + 100 + 100 + 100, 311s + 2:20 + 100 + 100 + 100 + 100 + 100 + 100 + 100, 311s + format="html" 311s + ) 311s + # context 311s + 311s + diffPrint( 311s + 1:20 + 100 + 100 + 100 + 100 + 100 + 100 + 100, 311s + 2:20 + 100 + 100 + 100 + 100 + 100 + 100 + 100, 311s + format="html", mode="context" 311s + ) 311s + } 311s > 311s PASS 311s Begin testing test-ses.R 311s 311s R version 4.4.3 (2025-02-28) -- "Trophy Case" 311s Copyright (C) 2025 The R Foundation for Statistical Computing 311s Platform: arm-unknown-linux-gnueabihf (32-bit) 311s 311s R is free software and comes with ABSOLUTELY NO WARRANTY. 311s You are welcome to redistribute it under certain conditions. 311s Type 'license()' or 'licence()' for distribution details. 311s 311s R is a collaborative project with many contributors. 311s Type 'contributors()' for more information and 311s 'citation()' on how to cite R or R packages in publications. 311s 311s Type 'demo()' for some demos, 'help()' for on-line help, or 311s 'help.start()' for an HTML browser interface to help. 311s Type 'q()' to quit R. 311s 311s > NAME <- "ses" 311s > source(file.path('_helper', 'init.R')) 311s > 311s > # Any tests added here should also be added to the valgrind test file 311s > 311s > # - basic ---------------------------------------------------------------------- 311s > 311s > all.equal(ses(letters[1:10], letters[1:10]), character()) 311s [1] TRUE 311s > all.equal(ses(letters[1:10], LETTERS[1:10]), "1,10c1,10") 311s [1] TRUE 311s > all.equal(ses(letters[1:5], LETTERS[1:10]), "1,5c1,10") 311s [1] TRUE 311s > all.equal(ses(letters[1:10], LETTERS[1:5]), "1,10c1,5") 311s [1] TRUE 311s > all.equal(ses(letters[2:10], letters[1:7]), c("0a1", "7,9d7")) 311s [1] TRUE 311s > all.equal( 311s + ses(letters[c(1:5, 1:5, 1:5)], c("e", "d", "a", "b", "c")), 311s + c("1,4d0", "6,8d1", "10d2", "14,15d5") 311s + ) 311s [1] TRUE 311s > all.equal( 311s + ses(c("e", "d", "a", "b", "c"), letters[c(1:5, 1:5, 1:5)]), 311s + c("0a1,4", "1a6,8", "2a10", "5a14,15") 311s + ) 311s [1] TRUE 311s > # edit distance = 1 311s > 311s > # - trigger edit distance 1 branches ------------------------------------------- 311s > 311s > all.equal(ses("a", c("a", "b")), "1a2") 311s [1] TRUE 311s > all.equal(ses(c("a", "b"), "a"), "2d1") 311s [1] TRUE 311s > all.equal(ses("c", c("b", "c")), "0a1") 311s [1] TRUE 311s > all.equal(ses(c("b", "c"), "c"), "1d0") 311s [1] TRUE 311s > 311s > all.equal(ses("a", character()), "1d0") 311s [1] TRUE 311s > all.equal(ses(character(), "a"), "0a1") 311s [1] TRUE 311s > all.equal(ses(character(), character()), character()) 311s [1] TRUE 311s > 311s > ## this is from the atomic tests, haven't dug into why they actually trigger 311s > ## the desired branches, but it is fairly complex 311s > set.seed(2) 311s > w1 <- sample( 311s + c( 311s + "carrot", "cat", "cake", "eat", "rabbit", "holes", "the", "a", "pasta", 311s + "boom", "noon", "sky", "hat", "blah", "paris", "dog", "snake" 311s + ), 25, replace=TRUE 311s + ) 311s > w4 <- w3 <- w2 <- w1 311s > w2[sample(seq_along(w1), 5)] <- LETTERS[1:5] 311s > w3 <- w1[8:15] 311s > w4 <- c(w1[1:5], toupper(w1[1:5]), w1[6:15], toupper(w1[1:5])) 311s > 311s > all.equal(ses(w1, w4), c("5a6,10", "15,21d19", "23,25c21,25")) 311s [1] TRUE 311s > 311s > # - longer strings ------------------------------------------------------------- 311s > 311s > # A bigger string 311s > 311s > string <- do.call(paste0, expand.grid(LETTERS, LETTERS, LETTERS)) 311s > 311s > all.equal( 311s + ses(string, c("hello", string[-c(5, 500, 1000)], "goodbye")), 311s + c("0a1", "5d5", "500d499", "1000d998", "17576a17575") 311s + ) 311s [1] TRUE 311s > all.equal( 311s + ses(c(string[200:500], "hello", string[-(1:400)][-c(5, 500, 1000)]), string), 311s + c("0a1,199", "207,306d405", "800a900", "1299a1400") 311s + ) 311s [1] TRUE 311s > 311s > # - max diffs ------------------------------------------------------------------ 311s > 311s > ses(letters[1:10], LETTERS[1:10], max.diffs=5) # "Exceeded `max.diffs`" 311s [1] "1,10c1,10" 311s Warning message: 311s In diff_myers(args[["a"]], args[["b"]], max.diffs = args[["max.diffs"]], : 311s Exceeded `max.diffs`: 20 vs 5 allowed. Diff is probably suboptimal. 311s > all.equal( 311s + ses(letters[1:10], LETTERS[1:10], max.diffs=5, warn=FALSE), 311s + "1,10c1,10" 311s + ) 311s [1] TRUE 311s > all.equal( 311s + ses( 311s + letters[1:10], 311s + c(letters[1], LETTERS[2:5], letters[6:10]), max.diffs=5, warn=FALSE 311s + ), 311s + "2,5c2,5" 311s + ) 311s [1] TRUE 311s > all.equal( 311s + ses( 311s + letters[1:10], 311s + c(letters[1], LETTERS[2:5], letters[6:8], LETTERS[9], letters[10]), 311s + max.diffs=5, warn=FALSE 311s + ), 311s + c("2,5c2,5", "9c9") 311s + ) 311s [1] TRUE 311s > # - Issue 152 -------------------------------------------------------------- 311s > 311s > # h/t @hadley, used to error, now warns 311s > 311s > all.equal(ses(letters[1:4], letters[1:3]), "4d3") 311s [1] TRUE 311s > all.equal(ses(letters[1:3], letters[1:4]), "3a4") 311s [1] TRUE 311s > ses(1, 2:9, max.diffs = 8) 311s [1] "1c1,8" 311s Warning message: 311s In diff_myers(args[["a"]], args[["b"]], max.diffs = args[["max.diffs"]], : 311s Exceeded `max.diffs`: 9 vs 8 allowed. Diff is probably suboptimal. 311s > 311s > # h/t @gadenbui, data is extracted from palmerpenguins@0.1.0::penguins 311s > # 311s > # comparison <- subset(penguins, year == 2007 | flipper_length_mm > 220) 311s > # test <- subset(penguins, year == 2008) 311s > # a <- test$bill_length_mm 311s > # b <- comparison$bill_length_mm 311s > 311s > a <- c(39.6, 40.1, 35, 42, 34.5, 41.4, 39, 40.6, 36.5, 37.6, 35.7, 311s + 41.3, 37.6, 41.1, 36.4, 41.6, 35.5, 41.1, 35.9, 41.8, 33.5, 39.7, 311s + 39.6, 45.8, 35.5, 42.8, 40.9, 37.2, 36.2, 42.1, 34.6, 42.9, 36.7, 311s + 35.1, 37.3, 41.3, 36.3, 36.9, 38.3, 38.9, 35.7, 41.1, 34, 39.6, 311s + 36.2, 40.8, 38.1, 40.3, 33.1, 43.2, 49.1, 48.4, 42.6, 44.4, 44, 311s + 48.7, 42.7, 49.6, 45.3, 49.6, 50.5, 43.6, 45.5, 50.5, 44.9, 45.2, 311s + 46.6, 48.5, 45.1, 50.1, 46.5, 45, 43.8, 45.5, 43.2, 50.4, 45.3, 311s + 46.2, 45.7, 54.3, 45.8, 49.8, 46.2, 49.5, 43.5, 50.7, 47.7, 46.4, 311s + 48.2, 46.5, 46.4, 48.6, 47.5, 51.1, 45.2, 45.2, 50.5, 49.5, 46.4, 311s + 52.8, 40.9, 54.2, 42.5, 51, 49.7, 47.5, 47.6, 52, 46.9, 53.5, 311s + 49, 46.2, 50.9, 45.5) 311s > b <- c(39.1, 39.5, 40.3, NA, 36.7, 39.3, 38.9, 39.2, 34.1, 42, 37.8, 311s + 37.8, 41.1, 38.6, 34.6, 36.6, 38.7, 42.5, 34.4, 46, 37.8, 37.7, 311s + 35.9, 38.2, 38.8, 35.3, 40.6, 40.5, 37.9, 40.5, 39.5, 37.2, 39.5, 311s + 40.9, 36.4, 39.2, 38.8, 42.2, 37.6, 39.8, 36.5, 40.8, 36, 44.1, 311s + 37, 39.6, 41.1, 37.5, 36, 42.3, 46.1, 50, 48.7, 50, 47.6, 46.5, 311s + 45.4, 46.7, 43.3, 46.8, 40.9, 49, 45.5, 48.4, 45.8, 49.3, 42, 311s + 49.2, 46.2, 48.7, 50.2, 45.1, 46.5, 46.3, 42.9, 46.1, 44.5, 47.8, 311s + 48.2, 50, 47.3, 42.8, 45.1, 59.6, 49.6, 50.5, 50.5, 50.1, 50.4, 311s + 46.2, 54.3, 49.8, 49.5, 50.7, 46.4, 48.2, 48.6, 45.2, 52.5, 50, 311s + 50.8, 52.1, 52.2, 49.5, 50.8, 46.9, 51.1, 55.9, 49.1, 49.8, 51.5, 311s + 55.1, 48.8, 50.4, 46.5, 50, 51.3, 45.4, 52.7, 45.2, 46.1, 51.3, 311s + 46, 51.3, 46.6, 51.7, 47, 52, 45.9, 50.5, 50.3, 58, 46.4, 49.2, 311s + 42.4, 48.5, 43.2, 50.6, 46.7, 52) 311s > 311s > # In <0.3.4: Exceeded buffer for finding fake snake 311s > ses(a[-c(15:38, 50:90)], b[-c(40:85, 100:125)], max.diffs=80) 311s [1] "1,3c1,9" "5,13c11,12" "15,25c14,48" "26a50" "28,29d51" 311s [6] "31c53,57" "33c59,60" "35,42c62,67" "44,49d68" 311s Warning message: 311s In diff_myers(args[["a"]], args[["b"]], max.diffs = args[["max.diffs"]], : 311s Exceeded `max.diffs`: 101 vs 80 allowed. Diff is probably suboptimal. 311s > 311s > # In <0.3.4: Faux Snake Process Failed 311s > ses(a[-(18:38)], b[-(50:80)], max.diffs=115) 311s [1] "1,3c1,9" "5,7c11,26" "9,12c28,38" "13a40,46" 311s [5] "15,54c48,82" "56,68d83" "70,74c85,88" "75a90,98" 311s [9] "77c100,101" "79,86c103,108" "88,93d109" 311s Warning message: 311s In diff_myers(args[["a"]], args[["b"]], max.diffs = args[["max.diffs"]], : 311s Exceeded `max.diffs`: 182 vs 115 allowed. Diff is probably suboptimal. 311s > 311s > # - issue 157 ------------------------------------------------------------------ 311s > 311s > # Arguably could match on 'A' instead of 'X' and be more compact 311s > a <- c('a', 'b', 'c', 'A', 'X', 'Y', 'Z', 'W') 311s > b <- c('X', 'C', 'A', 'U', 1, 2, 3) 311s > ses(a, b, max.diffs=13) 311s [1] "1,4d0" "6,8c2,7" 311s > 311s > # segfault (but may have beend debugging code) 311s > ses(letters[1:2], LETTERS[1:2], max.diffs = 4) 311s [1] "1,2c1,2" 311s > 311s > # snake overrun 311s > ses(c("G", "C", "T", "C", "A", "C", "G", "C"), c("T", "G"), max.diffs=2) 311s [1] "0a1" "2,8d2" 311s Warning message: 311s In diff_myers(args[["a"]], args[["b"]], max.diffs = args[["max.diffs"]], : 311s Exceeded `max.diffs`: 8 vs 2 allowed. Diff is probably suboptimal. 311s > 311s > # effect of max.diffs on compactness (waldo logical comparison) 311s > ses(c('A','A','A','A','A'), c('B','A','B','A','B'), max.diffs=0) 311s [1] "1c1" "3c3" "5c5" 311s Warning message: 311s In diff_myers(args[["a"]], args[["b"]], max.diffs = args[["max.diffs"]], : 311s Exceeded `max.diffs`: 6 vs 0 allowed. Diff is probably suboptimal. 311s > ses(c('A','A','A','A','A'), c('B','A','B','A','B'), max.diffs=1) 311s [1] "0a1" "2c3" "4,5c5" 311s Warning message: 311s In diff_myers(args[["a"]], args[["b"]], max.diffs = args[["max.diffs"]], : 311s Exceeded `max.diffs`: 6 vs 1 allowed. Diff is probably suboptimal. 311s > ses(c('A','A','A','A','A'), c('B','A','B','A','B'), max.diffs=2) 311s [1] "0a1" "2,4c3" "5a5" 311s Warning message: 311s In diff_myers(args[["a"]], args[["b"]], max.diffs = args[["max.diffs"]], : 311s Exceeded `max.diffs`: 6 vs 2 allowed. Diff is probably suboptimal. 311s > 311s > # back snake all matches before faux snake triggered 311s > ses_dat( 311s + a=c("T", "A", "A", "C", "C", "A"), 311s + b=c("A", "G", "A", "A"), max.diffs = 0 311s + ) 311s "ses_dat" object (Match: 3, Delete: 3, Insert: 1): 311s 311s D: T C C 311s M: A A A 311s I: G 311s Warning message: 311s In diff_myers(args[["a"]], args[["b"]], max.diffs = args[["max.diffs"]], : 311s Exceeded `max.diffs`: 4 vs 0 allowed. Diff is probably suboptimal. 311s > 311s > # - errors --------------------------------------------------------------------- 311s > 311s > try(ses('a', 'b', max.diffs='hello')) # "must be scalar integer" 311s Error in ses_prep(a = a, b = b, max.diffs = max.diffs, warn = warn) : 311s Argument `max.diffs` must be scalar integer. 311s > try(ses('a', 'b', warn='hello')) # "must be TRUE or FALSE" 311s Error in ses_prep(a = a, b = b, max.diffs = max.diffs, warn = warn) : 311s Argument `warn` must be TRUE or FALSE. 311s > 311s > a <- structure(1, class='diffobj_ogewlhgiadfl2') 311s > try(ses(a, 1)) # "could not be coerced") 311s Error in as.character.diffobj_ogewlhgiadfl2(a) : failure2 311s Error in ses_prep(a = a, b = b, max.diffs = max.diffs, warn = warn) : 311s Argument `a` is not character and could not be coerced to such 311s > try(ses(1, a)) # "could not be coerced" 311s Error in as.character.diffobj_ogewlhgiadfl2(b) : failure2 311s Error in ses_prep(a = a, b = b, max.diffs = max.diffs, warn = warn) : 311s Argument `b` is not character and could not be coerced to such 311s > 311s > # We want to have a test file that fully covers the C code in order to run 311s > # valgrind with just that one. We were unable to isolate simple diffs that 311s > # triggered all the code, but we were able to do it with the below in addition 311s > # to the above. 311s > 311s > # - Repeat tests for full coverage in SES file --------------------------------- 311s > # From test.diffStr.R 311s > # formula display changed 311s > if( 311s + R.Version()$major >= 3 && R.Version()$minor >= "3.1" || 311s + R.Version()$major >= 4) { 311s + rdsf1 <- function(x) 311s + readRDS(file.path("_helper", "objs", "diffStr", sprintf("%s.rds", x))) 311s + all.equal( 311s + as.character( 311s + diffStr(mdl1, mdl2, extra=list(strict.width="wrap"), line.limit=30) 311s + ), 311s + rdsf1(500) 311s + ) 311s + } 312s [1] TRUE 312s > # from testthat.warnings.R 312s > 312s > A3 <- c("a b c", "d e f A B C D", "g h i", "f") 312s > B3 <- c("a b c", "xd e f E Q L S", "g h i", "q") 312s > 312s > diffChr(A3, B3, max.diffs=2) # warn: "Exceeded diff" 312s < A3 > B3 312s @@ 1,4 @@  @@ 1,4 @@  312s a b c a b c 312s < d e f A B C D > xd e f E Q L S 312s < g h i > g h i 312s < f > q 312s Warning message: 312s Exceeded diff limit during diff computation (6 vs. 2 allowed); overall diff is likely not optimal 312s > 312s > # - ses_dat -------------------------------------------------------------------- 312s > 312s > a <- b <- do.call(paste0, expand.grid(LETTERS, LETTERS)) 312s > set.seed(2) 312s > b <- b[-sample(length(b), 100)] 312s > a <- a[-sample(length(b), 100)] 312s > 312s > dat <- ses_dat(a, b) 312s > all.equal(dat[['val']][dat[['op']] != 'Delete'], b) 312s [1] TRUE 312s > all.equal(dat[['val']][dat[['op']] != 'Insert'], a) 312s [1] TRUE 312s > all.equal(a[dat[['id.a']][!is.na(dat[['id.a']])]], a) 312s [1] TRUE 312s > 312s > dat2 <- ses_dat(a, b, extra=FALSE) 312s > all.equal(dat[1:2], dat2) 312s [1] TRUE 312s > all.equal(length(dat2), 2L) 312s [1] TRUE 312s > 312s > try(ses_dat(a, b, extra=NA)) # 'TRUE or FALSE' 312s Error in ses_dat(a, b, extra = NA) : 312s Argument `extra` must be TRUE or FALSE. 312s > 312s > # - encoding agnostic #144 ----------------------------------------------------- 312s > 312s > # h/t @hadley, these are different in string cache, but should compare equal 312s > # as per ?identical 312s > x <- c("fa\xE7ile", "fa\ue7ile") 312s > Encoding(x) <- c("latin1", "UTF-8") 312s > y <- rev(x) 312s > all.equal(diffobj::ses(x, y), character()) 312s [1] TRUE 312s > 312s PASS 312s Begin testing test-style.R 312s 312s R version 4.4.3 (2025-02-28) -- "Trophy Case" 312s Copyright (C) 2025 The R Foundation for Statistical Computing 312s Platform: arm-unknown-linux-gnueabihf (32-bit) 312s 312s R is free software and comes with ABSOLUTELY NO WARRANTY. 312s You are welcome to redistribute it under certain conditions. 312s Type 'license()' or 'licence()' for distribution details. 312s 312s R is a collaborative project with many contributors. 312s Type 'contributors()' for more information and 312s 'citation()' on how to cite R or R packages in publications. 312s 312s Type 'demo()' for some demos, 'help()' for on-line help, or 312s 'help.start()' for an HTML browser interface to help. 312s Type 'q()' to quit R. 312s 312s > NAME <- "style" 312s > source(file.path('_helper', 'init.R')) 312s > 312s > ## - Style Palette ------------------------------------------------------------ 312s > 312s > all.equal( 312s + capture.output(diffobj:::display_ansi_256_styles()), 312s + rdsf(100) 312s + ) 313s [1] TRUE 313s > ## - crayon settings ----------------------------------------------------------- 313s > 313s > # make sure crayon options are appropriately overriden 313s > local({ 313s + old.opt <- options(crayon.enabled=FALSE) 313s + on.exit(options(old.opt)) 313s + print(identical(crayon::green("green"), "green")) 313s + # should have ANSI coloring despite crayon disabled 313s + print( 313s + all.equal( 313s + as.character(diffChr(letters[1:3], LETTERS[1:3])), rdsf(200) 313s + ) 313s + ) 313s + identical(crayon::green("green"), "green") 313s + }) 313s [1] TRUE 313s [1] TRUE 313s [1] TRUE 313s > ## - Palette of Styles --------------------------------------------------------- 313s > 313s > pos <- PaletteOfStyles() 313s > identical( 313s + pos[["ansi256", "light", "rgb"]], 313s + getClassDef("StyleAnsi256LightRgb", package="diffobj", inherits=FALSE) 313s + ) 313s [1] TRUE 313s > all.equal( 313s + capture.output(show(pos)), rdsf(300) 313s + ) 314s [1] TRUE 314s > all.equal( 314s + capture.output(summary(pos)), rdsf(400) 314s + ) 314s [1] TRUE 314s > 314s > pos["ansi256", "light", "yb"] <- list(StyleRaw()) 314s > all.equal( 314s + c(pos["ansi256", "light", "yb"]@data), list(StyleRaw()), 314s + check.environment=FALSE 314s + ) 314s [1] TRUE 314s > all.equal( 314s + pos[["ansi256", "light", "yb"]], StyleRaw(), 314s + check.environment=FALSE 314s + ) 314s [1] TRUE 314s > 314s > ## - Auto Styles --------------------------------------------------------------- 314s > 314s > try(diffChr(letters, LETTERS, style="auto", format="xml")) 314s Error in diffChr(target = letters, current = LETTERS, style = "auto", : 314s Argument `format` must be one of `c("auto", "raw", "ansi8", "ansi256", "html")`. 314s > is( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="auto", brightness="light", 314s + term.colors=256 314s + )@etc@style, 314s + "StyleAnsi256LightYb" 314s + ) 314s [1] TRUE 314s > is( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="auto", brightness="light", 314s + term.colors=8 314s + )@etc@style, 314s + "StyleAnsi8NeutralYb" 314s + ) 314s [1] TRUE 314s > is( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="auto", interactive=FALSE, 314s + term.colors=1 314s + )@etc@style, 314s + "StyleRaw" 314s + ) 314s [1] TRUE 314s > is( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="auto", interactive=TRUE, 314s + term.colors=1 # note pager off by default in tests 314s + )@etc@style, 314s + "StyleRaw" 314s + ) 314s [1] TRUE 314s > is( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="auto", interactive=TRUE, 314s + pager="auto", term.colors=1 314s + )@etc@style, 314s + "StyleHtml" 314s + ) 314s [1] TRUE 314s > is( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="auto", interactive=TRUE, 314s + pager="auto", term.colors=9 314s + )@etc@style, 314s + "StyleAnsi8NeutralYb" 314s + ) 314s [1] TRUE 314s > is( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="auto", interactive=TRUE, 314s + pager="auto", brightness='light', term.colors=500 314s + )@etc@style, 314s + "StyleAnsi256LightYb" 314s + ) 314s [1] TRUE 314s > is( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="html", interactive=TRUE, 314s + pager="auto", color.mode=c("rgb", ansi8="yb") 314s + )@etc@style, 314s + "StyleHtmlLightRgb" 314s + ) 314s [1] TRUE 314s > is( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="html", interactive=TRUE, 314s + pager="auto", color.mode=c("rgb", html="yb") 314s + )@etc@style, 314s + "StyleHtmlLightYb" 314s + ) 314s [1] TRUE 314s > ## - Palette Params ------------------------------------------------------------ 314s > 314s > all.equal( 314s + as.character( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="ansi256", 314s + brightness=c("light", ansi256="dark") 314s + ) ), 314s + rdsf(500) 314s + ) 314s [1] TRUE 314s > all.equal( 314s + as.character( 314s + diffChr( 314s + letters, LETTERS, style="auto", format="ansi256", brightness=c("dark") 314s + ) ), 314s + rdsf(500) 314s + ) 314s [1] TRUE 314s > ## - Style Validation ---------------------------------------------------------- 314s > 314s > s.f <- StyleFuns() 314s > isTRUE(validObject(s.f)) 314s [1] TRUE 314s > s.f@word.insert <- function(x, y) NULL 314s > try(validObject(s.f)) # word.insert 314s Error in validObject(s.f) : 314s invalid class "StyleFuns" object: Argument `word.insert` may not have non-default formals argument after the first. 314s > 314s > try(diffChr(1,2, format='html', style=list(scale=1:3))) 314s Error in diffChr(target = 1, current = 2, format = "html", style = list(scale = 1:3)) : 314s Unable to instantiate `Style` object: Argument `scale` must be TRUE or FALSE 314s > try(diffChr(1,2, format='html', style=list(html.output="a"))) 314s Error in diffChr(target = 1, current = 2, format = "html", style = list(html.output = "a")) : 314s Unable to instantiate `Style` object: Argument `html.output` must be in `c("auto", "page", "diff.only", "diff.w.style")`. 314s > 314s > ## - Pallette w/ Objs ---------------------------------------------------------- 314s > 314s > pal <- PaletteOfStyles() 314s > pal["raw", "neutral", "rgb"] <- list(new(pal[["raw", "neutral", "rgb"]])) 314s > 314s > suppressWarnings( 314s + withCallingHandlers( 314s + invisible(diffChr( 314s + letters, LETTERS, format="raw", brightness="neutral", color.mode="rgb", 314s + palette.of.styles=pal, style=list(na.sub="NA") 314s + )), 314s + warning=function(e) writeLines(conditionMessage(e)) 314s + ) 314s + ) 314s Extra `style` arguments cannot be applied because selected object `palette.of.styles` is a `Style` instance rather than a `Style` "classRepresentation". See documentation for the `style` parameter for details. 314s > ## - External Files ------------------------------------------------------------ 314s > 314s > isTRUE(file_test("-f", diffobj_css())) 314s [1] TRUE 314s > isTRUE(file_test("-f", diffobj_js())) 314s [1] TRUE 314s > 314s PASS 314s Begin testing test-subset.R 314s 314s R version 4.4.3 (2025-02-28) -- "Trophy Case" 314s Copyright (C) 2025 The R Foundation for Statistical Computing 314s Platform: arm-unknown-linux-gnueabihf (32-bit) 314s 314s R is free software and comes with ABSOLUTELY NO WARRANTY. 314s You are welcome to redistribute it under certain conditions. 314s Type 'license()' or 'licence()' for distribution details. 314s 314s R is a collaborative project with many contributors. 314s Type 'contributors()' for more information and 314s 'citation()' on how to cite R or R packages in publications. 314s 314s Type 'demo()' for some demos, 'help()' for on-line help, or 314s 'help.start()' for an HTML browser interface to help. 314s Type 'q()' to quit R. 314s 314s > NAME <- "subset" 314s > source(file.path('_helper', 'init.R')) 314s > 314s > A <- B <- letters[1:5] 314s > B[2] <- "B" 314s > B[6] <- "F" 314s > 314s > # - subset --------------------------------------------------------------------- 314s > 314s > local({ 314s + old.opt <- options(diffobj.style=StyleRaw()) 314s + on.exit(options(old.opt)) 314s + a0 <- all.equal( 314s + c(as.character(diffChr(A, B)[1:3])), 314s + c("< A > B ", "@@ 1,5 @@ @@ 1,6 @@ ", " a a ") 314s + 314s + ) 314s + a <- all.equal( 314s + c(as.character(diffChr(A, B)[1])), c(as.character(head(diffChr(A, B), 1))) 314s + ) 314s + b <- all.equal( 314s + c(as.character(diffChr(A, B)[7:8])), c(as.character(tail(diffChr(A, B), 2))) 314s + ) 314s + c(a0, a, b) 314s + }) 315s [1] TRUE TRUE TRUE 315s > # - subset errors -------------------------------------------------------------- 315s > 315s > diff <- diffChr(A, B) 315s > try(diff[NA_real_]) # "contain NAs or both positive" 315s Error in .local(x, i, ...) : 315s `i` may not contain NAs or both positive and negative indices 315s > try(diff[c(-1, 1)]) # "contain NAs or both positive" 315s Error in .local(x, i, ...) : 315s `i` may not contain NAs or both positive and negative indices 315s > try(head(diff, 1, 2)) # "does not support arguments" 315s Error in .local(x, ...) : 315s This method does not support arguments other than `x` or `n` 315s > try(head(diff, NA)) # "must be integer" 315s Error in .local(x, ...) : `n` must be integer(1L) and not NA 315s > try(head(diff, 1:3)) # "must be integer" 315s Error in .local(x, ...) : `n` must be integer(1L) and not NA 315s > try(tail(diff, 1:3)) # "must be integer" 315s Error in .local(x, ...) : `n` must be integer(1L) and not NA 315s > try(tail(diff, 1, 2)) # "does not support arguments" 315s Error in .local(x, ...) : 315s This method does not support arguments other than `x` or `n` 315s > 315s > 315s > 315s PASS 315s Begin testing test-summary.R 315s 315s R version 4.4.3 (2025-02-28) -- "Trophy Case" 315s Copyright (C) 2025 The R Foundation for Statistical Computing 315s Platform: arm-unknown-linux-gnueabihf (32-bit) 315s 315s R is free software and comes with ABSOLUTELY NO WARRANTY. 315s You are welcome to redistribute it under certain conditions. 315s Type 'license()' or 'licence()' for distribution details. 315s 315s R is a collaborative project with many contributors. 315s Type 'contributors()' for more information and 315s 'citation()' on how to cite R or R packages in publications. 315s 315s Type 'demo()' for some demos, 'help()' for on-line help, or 315s 'help.start()' for an HTML browser interface to help. 315s Type 'q()' to quit R. 315s 315s > NAME <- "summary" 315s > source(file.path('_helper', 'init.R')) 315s > 315s > # Note, atomic prints happen in different test file 315s > 315s > # - Any ------------------------------------------------------------------------ 315s > 315s > identical(any(diffPrint(iris.s, iris.s)), FALSE) 315s [1] TRUE 315s > res <- any(diffPrint(iris.s, iris.c)) # warn: "objects are NOT" 315s Warning message: 315s No visible differences, but objects are NOT `all.equal`. 315s > identical(res, FALSE) 315s [1] TRUE 315s > isTRUE(any(diffPrint(iris.s, iris.4))) 315s [1] TRUE 315s > 315s > 315s > # - Small Summary -------------------------------------------------------------- 315s > 315s > all.equal( 315s + as.character(summary(diffPrint(iris.s, iris.4))), rdsf(100) 315s + ) 315s [1] TRUE 315s > all.equal( 315s + as.character(summary(diffPrint(iris.s, iris.2))), rdsf(200) 315s + ) 315s [1] TRUE 315s > all.equal( 315s + as.character(summary(diffPrint(iris.s, iris.3))), rdsf(300) 315s + ) 315s [1] TRUE 315s > all.equal( 315s + as.character(summary(diffPrint(iris.s, iris.c))), rdsf(400) 315s + ) 315s [1] TRUE 315s > # All equal 315s > 315s > all.equal( 315s + as.character(summary(diffChr(letters, letters))), rdsf(450) 315s + ) 316s [1] TRUE 316s > 316s > # - Big Summary ---------------------------------------------------------------- 316s > 316s > # Make sure we test summary reduction, wrapping 316s > 316s > all.equal( 316s + as.character(summary(diffChr(chr.7, chr.8))), rdsf(500) 316s + ) 316s [1] TRUE 316s > all.equal( 316s + as.character(summary(diffChr(chr.7, chr.8), scale.threshold=1)), rdsf(600) 316s + ) 316s [1] TRUE 316s > all.equal( 316s + as.character(summary(diffChr(chr.7, chr.8), scale.threshold=0)), rdsf(700) 316s + ) 316s [1] TRUE 316s > # Force truncation of summary 316s > all.equal( 316s + as.character( 316s + summary(diffChr(chr.7, chr.8), scale.threshold=0, max.lines=2) 316s + ), 316s + rdsf(800) 316s + ) 316s [1] TRUE 316s > 316s > # - Show ----------------------------------------------------------------------- 316s > 316s > isTRUE( 316s + paste0(capture.output(summary(diffChr(chr.7, chr.8))), collapse="\n") == 316s + as.character(summary(diffChr(chr.7, chr.8))) 316s + ) 316s [1] TRUE 316s > 316s > # - HTML summary --------------------------------------------------------------- 316s > 316s > all.equal( 316s + as.character( 316s + summary( 316s + diffPrint( 316s + iris.s, iris.4, format="html", style=list(html.output="page") 316s + ) ) ), 316s + rdsf(900) 316s + ) 316s [1] TRUE 316s > 316s > # - errors --------------------------------------------------------------------- 316s > 316s > diff <- diffChr("hello green world", "hello red world") 317s > try(summary(diff, max.lines=0)) # "strictly positive" 317s Error in .local(object, ...) : 317s Argument `max.lines` must be integer(1L) and strictly positive 317s > try(summary(diff, width=1:3)) # "integer\\(1L\\)" 317s Error in .local(object, ...) : 317s Argument `width` must be integer(1L) and positive 317s > try(summary(diff, scale.threshold=5)) # "between 0 and 1" 317s Error in .local(object, ...) : 317s Argument `scale.threshold` must be numeric(1L) between 0 and 1 317s > 317s > # - width wrap ----------------------------------------------------------------- 317s > 317s > diff <- diffChr("hello green world", "hello red world", format='raw') 317s > all.equal(capture.output(show(summary(diff, width=5))), txtf(100)) 317s [1] TRUE 317s > 317s > 317s PASS 317s Begin testing test-text.R 317s 317s R version 4.4.3 (2025-02-28) -- "Trophy Case" 317s Copyright (C) 2025 The R Foundation for Statistical Computing 317s Platform: arm-unknown-linux-gnueabihf (32-bit) 317s 317s R is free software and comes with ABSOLUTELY NO WARRANTY. 317s You are welcome to redistribute it under certain conditions. 317s Type 'license()' or 'licence()' for distribution details. 317s 317s R is a collaborative project with many contributors. 317s Type 'contributors()' for more information and 317s 'citation()' on how to cite R or R packages in publications. 317s 317s Type 'demo()' for some demos, 'help()' for on-line help, or 317s 'help.start()' for an HTML browser interface to help. 317s Type 'q()' to quit R. 317s 317s > NAME <- "text" 317s > source(file.path('_helper', 'init.R')) 317s > 317s > # - simple wrap 317s > 317s > txt1 <- c( 317s + "humpty dumpty sat on a wall and had a big fall", 317s + "humpty sat on a wall and dumped a big fall" 317s + ) 317s > res1 <- diffobj:::wrap(txt1, 10, TRUE, sgr.supported=TRUE) 317s > 317s > identical( 317s + gsub(" *$", "", vapply(res1, paste0, character(1L), collapse="")), txt1 317s + ) 317s [1] TRUE 317s > all.equal(lapply(res1, nchar), list(rep(10L, 5L), rep(10L, 5L))) 317s [1] TRUE 317s > 317s > txt2 <- "hello world!" 317s > identical( 317s + unlist(diffobj:::wrap(txt2, nchar(txt2), TRUE, sgr.supported=TRUE)), 317s + txt2 317s + ) 317s [1] TRUE 317s > identical( 317s + paste0( 317s + unlist(diffobj:::wrap(txt2, nchar(txt2) / 2, TRUE, sgr.supported=TRUE)), 317s + collapse="" 317s + ), 317s + txt2 317s + ) 317s [1] TRUE 317s > 317s > # - wrap with escape sequences 317s > 317s > txt3 <- c( 317s + paste0( 317s + "humpty dumpty ", crayon::style("sat on a wall", "red"), 317s + " and had a big fall", 317s + crayon::style( 317s + crayon::style( 317s + "humpty sat on a wall and dumped a big fall", 317s + "green" 317s + ), 317s + "bgRed" 317s + ), "woohoo" 317s + ), 317s + paste0( 317s + crayon::style("hello ", "inverse"), "beautiful ", 317s + crayon::style("world", "blue") 317s + ) 317s + ) 317s > res3 <- diffobj:::wrap(txt3, 10, TRUE, sgr.supported=TRUE) 317s > 317s > identical( 317s + crayon::strip_style( 317s + gsub(" *$", "", vapply(res3, paste0, character(1L), collapse="")) 317s + ), 317s + crayon::strip_style(txt3) 317s + ) 317s [1] TRUE 317s > all.equal( 317s + lapply(res3, crayon::col_nchar), 317s + list(rep(10L, 10L), rep(10L, 3L)) 317s + ) 317s [1] TRUE 317s > 317s > # - strip hz whitespace 317s > 317s > options(crayon.enabled=FALSE) 317s > all.equal( 317s + diffobj:::strip_hz_control("a\tb", stops=4L, sgr.supported=TRUE), "a b") 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_hz_control("ab\t", stops=4L, sgr.supported=TRUE), "ab ") 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_hz_control("a\tb\t", stops=4L, sgr.supported=TRUE), "a b ") 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_hz_control("\ta\tb\t", stops=4L, sgr.supported=TRUE), 317s + " a b " 317s + ) 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_hz_control("\ta\tb\t", stops=c(2L, 4L), sgr.supported=TRUE), 317s + " a b " 317s + ) 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_hz_control( 317s + c("ab\t", "\ta\tb\t"), sgr.supported=TRUE, stops=4L 317s + ), 317s + c("ab ", " a b ") 317s + ) 317s [1] TRUE 317s > # recall that nchar("\033") == 1 317s > all.equal( 317s + diffobj:::strip_hz_control( 317s + "\033[31ma\t\033[39mhello\tb", stops=10L, sgr.supported=FALSE 317s + ), 317s + "\033[31ma \033[39mhello b" 317s + ) 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_hz_control( 317s + "\033[31ma\t\033[39mhello\tb", stops=10L, sgr.supported=TRUE 317s + ), 317s + "\033[31ma\033[39m \033[31m\033[39mhello \033[31m\033[39mb" 317s + ) 317s [1] TRUE 317s > # carriage returns 317s > 317s > all.equal( 317s + diffobj:::strip_hz_control("hellothere\rHELLO", sgr.supported=TRUE), 317s + "HELLOthere" 317s + ) 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_hz_control( 317s + c("hellothere\rHELLO", "000\r12345678\rabcdef\rABC"), sgr.supported=TRUE 317s + ), 317s + c("HELLOthere", "ABCdef78") 317s + ) 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_hz_control("hellothere\r", sgr.supported=TRUE), 317s + "hellothere" 317s + ) 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_hz_control(character(), sgr.supported=TRUE), character() 317s + ) 317s [1] TRUE 317s > # newlines 317s > 317s > all.equal( 317s + diffobj:::strip_hz_control(c("a", "", "\n", "a\nb"), sgr.supported=TRUE), 317s + c("a", "", "", "a", "b") 317s + ) 317s [1] TRUE 317s > # with colors 317s > 317s > options(crayon.enabled=TRUE) 317s > 317s > all.equal( 317s + crayon::strip_style( 317s + diffobj:::strip_hz_control( 317s + "\033[31ma\t\033[39mhello\tb", stops=10L, sgr.supported=TRUE) 317s + ), 317s + "a hello b" 317s + ) 317s [1] TRUE 317s > test.chr <- paste0( 317s + crayon::red(crayon::`%+%`("000", crayon::bgBlue("\r12345678"))), 317s + "\rabcdef", crayon::green("\rABC") 317s + ) 317s > # visually inspect these 317s > 317s > # cat("\n") 317s > # cat(test.chr, sep="\n") 317s > res <- diffobj:::strip_hz_control(test.chr, sgr.supported=TRUE) 317s > # cat(res, sep="\n") 317s > all.equal(crayon::strip_style(res), "ABCdef78") 317s [1] TRUE 317s > 317s > # Mix tabs and carriage returns, visual inspection assumes terminal tab 317s > # stops at 8L; note output not exactly the same since it seems tabs don't 317s > # ovewrite prior screen state whereas spaces do 317s > 317s > test.chr.2 <- paste0( 317s + crayon::red(crayon::`%+%`("000", crayon::bgBlue("\r123\t456\t78"))), 317s + "\rab\tcd f", crayon::green("\rABC") 317s + ) 317s > # cat("\n") 317s > # cat(test.chr.2, sep="\n") 317s > res.2 <- diffobj:::strip_hz_control(test.chr.2, stops=8L, sgr.supported=TRUE) 317s > # cat(res.2, sep="\n") 317s > 317s > all.equal(crayon::strip_style(res.2), "ABC cd f 78") 317s [1] TRUE 317s > 317s > # multi line 317s > 317s > test.chr.3 <- c(test.chr, test.chr.2) 317s > # cat("\n") 317s > res.3 <- diffobj:::strip_hz_control(test.chr.3, sgr.supported=TRUE) 317s > # cat(res.3, sep="\n") 317s > # cat(test.chr.3, sep="\n") 317s > 317s > all.equal(crayon::strip_style(res.3), c("ABCdef78", "ABC cd f 78")) 317s [1] TRUE 317s > 317s > 317s PASS 317s Begin testing test-trim.R 317s 317s R version 4.4.3 (2025-02-28) -- "Trophy Case" 317s Copyright (C) 2025 The R Foundation for Statistical Computing 317s Platform: arm-unknown-linux-gnueabihf (32-bit) 317s 317s R is free software and comes with ABSOLUTELY NO WARRANTY. 317s You are welcome to redistribute it under certain conditions. 317s Type 'license()' or 'licence()' for distribution details. 317s 317s R is a collaborative project with many contributors. 317s Type 'contributors()' for more information and 317s 'citation()' on how to cite R or R packages in publications. 317s 317s Type 'demo()' for some demos, 'help()' for on-line help, or 317s 'help.start()' for an HTML browser interface to help. 317s Type 'q()' to quit R. 317s 317s > NAME <- "trim" 317s > source(file.path('_helper', 'init.R')) 317s > 317s > .mx.base <- matrix( 317s + c( 317s + "averylongwordthatcanlahblah", "causeasinglewidecolumnblah", 317s + "matrixtowrapseveraltimes", "inarrowscreen", "onceuponatime", 317s + "agreenduckflew", "overthemountains", "inalongofantelopes", 317s + "ineedthreemore", "entriesactually", "nowonlytwomore", "iwaswrongearlier" 317s + ), 317s + nrow=3, ncol=4 317s + ) 317s > 317s > # - Atomic --------------------------------------------------------------------- 317s > 317s > set.seed(1) 317s > x <- capture.output(1:50) 317s > y <- capture.output(factor(sample(letters, 50, replace=TRUE))) 317s > 317s > all.equal( 317s + diffobj:::strip_atomic_rh(x), 317s + c(" 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25", "26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50") 317s + ) 317s [1] TRUE 317s > all.equal( 317s + diffobj:::strip_atomic_rh(y), 317s + c("g j o x f x y r q b f e r j u m s z j u y f q d g k a j w i m p m e v r u c", "s k v q u o n u a m t s", "Levels: a b c d e f g i j k m n o p q r s t u v w x y z") 317s + ) 317s [1] TRUE 317s > all.equal(diffobj:::which_atomic_rh(capture.output(1:5)), 1) 317s [1] TRUE 317s > 317s > all.equal(as.character(diffPrint(1:3, 2:6, trim=FALSE)), rdsf(50)) 318s [1] TRUE 318s > 318s > # bad headers 318s > 318s > bh <- c("[1] a b c", "[4] d e f", "[5] h") 318s > all.equal(diffobj:::which_atomic_rh(bh), integer()) 318s [1] TRUE 318s > 318s > # - Matrix 318s > mx1 <- mx2 <- matrix(1:3, 3) 318s > all.equal( 318s + diffobj:::strip_matrix_rh(capture.output(mx1), dimnames(mx1)), 318s + c(" [,1]", " 1", " 2", " 3") 318s + ) 318s [1] TRUE 318s > # shouldn't strip headers from attributes 318s > attr(mx2, "blah") <- matrix(1:2, 2) 318s > all.equal( 318s + diffobj:::strip_matrix_rh(capture.output(mx2), dimnames(mx2)), 318s + c(" [,1]", " 1", " 2", " 3", "attr(,\"blah\")", " [,1]", "[1,] 1", "[2,] 2") 318s + ) 318s [1] TRUE 318s > # Matrices that wrap 318s > 318s > mx3 <- mx4 <- mx5 <- mx6 <- .mx.base 318s > old.opt <- options(width=30) 318s > 318s > all.equal( 318s + diffobj:::strip_matrix_rh(capture.output(mx3), dimnames(mx3)), 318s + c(" [,1] ", "\"averylongwordthatcanlahblah\"", "\"causeasinglewidecolumnblah\" ", "\"matrixtowrapseveraltimes\" ", " [,2] ", "\"inarrowscreen\" ", "\"onceuponatime\" ", "\"agreenduckflew\"", " [,3] ", "\"overthemountains\" ", "\"inalongofantelopes\"", "\"ineedthreemore\" ", " [,4] ", "\"entriesactually\" ", "\"nowonlytwomore\" ", "\"iwaswrongearlier\"") 318s + ) 318s [1] TRUE 318s > # Add rownames; should no longer strip 318s > 318s > rownames(mx4) <- 2:4 318s > all.equal( 318s + diffobj:::strip_matrix_rh(capture.output(mx4), dimnames(mx4)), 318s + capture.output(mx4) 318s + ) 318s [1] TRUE 318s > # Attributes don't have stuff stripped 318s > 318s > attr(mx6, "blah") <- letters[1:15] 318s > 318s > all.equal( 318s + diffobj:::strip_matrix_rh(capture.output(mx6), dimnames(mx6)), 318s + c(" [,1] ", "\"averylongwordthatcanlahblah\"", "\"causeasinglewidecolumnblah\" ", "\"matrixtowrapseveraltimes\" ", " [,2] ", "\"inarrowscreen\" ", "\"onceuponatime\" ", "\"agreenduckflew\"", " [,3] ", "\"overthemountains\" ", "\"inalongofantelopes\"", "\"ineedthreemore\" ", " [,4] ", "\"entriesactually\" ", "\"nowonlytwomore\" ", "\"iwaswrongearlier\"", "attr(,\"blah\")", " [1] \"a\" \"b\" \"c\" \"d\" \"e\" \"f\"", " [7] \"g\" \"h\" \"i\" \"j\" \"k\" \"l\"", "[13] \"m\" \"n\" \"o\"") 318s + ) 318s [1] TRUE 318s > # Single row matrix 318s > 318s > all.equal( 318s + diffobj:::which_matrix_rh(capture.output(matrix(1:2, nrow=1)), NULL), 2 318s + ) 318s [1] TRUE 318s > options(width=80) 318s > 318s > # - Table ---------------------------------------------------------------------- 318s > 318s > old.opt <- options(width=30) 318s > 318s > # Data frames 318s > 318s > df1 <- as.data.frame(.mx.base) 318s > all.equal( 318s + diffobj:::strip_table_rh(capture.output(df1)), 318s + c(" V1", "averylongwordthatcanlahblah", " causeasinglewidecolumnblah", " matrixtowrapseveraltimes", " V2", " inarrowscreen", " onceuponatime", "agreenduckflew", " V3", " overthemountains", "inalongofantelopes", " ineedthreemore", " V4", " entriesactually", " nowonlytwomore", "iwaswrongearlier") 318s + ) 318s [1] TRUE 318s > df2 <- df1[c(2, 1, 3), ] 318s > 318s > all.equal( 318s + diffobj:::strip_table_rh(capture.output(df2)), 318s + capture.output(df2) 318s + ) 318s [1] TRUE 318s > # Rownames that start from one and sequential, should get stripped; also, 318s > # colon allowed 318s > 318s > df3 <- df1 318s > rownames(df3) <- paste0(1:3, ":") 318s > all.equal( 318s + diffobj:::strip_table_rh(capture.output(df3)), 318s + c(" V1", "averylongwordthatcanlahblah", " causeasinglewidecolumnblah", " matrixtowrapseveraltimes", " V2", " inarrowscreen", " onceuponatime", "agreenduckflew", " V3", " overthemountains", "inalongofantelopes", " ineedthreemore", " V4", " entriesactually", " nowonlytwomore", "iwaswrongearlier") 318s + ) 318s [1] TRUE 318s > # Try ts 318s > 318s > all.equal( 318s + diffobj:::strip_table_rh(capture.output(USAccDeaths)), 318s + capture.output(USAccDeaths) 318s + ) 318s [1] TRUE 318s > # Set it so first year is 1 318s > 318s > USAD2 <- USAccDeaths 318s > tsp(USAD2)[1:2] <- tsp(USAD2)[1:2] - 1972 318s > 318s > all.equal( 318s + diffobj:::strip_table_rh(capture.output(USAD2)), 318s + c(" Jan Feb Mar Apr", " 9007 8106 8928 9137", " 7750 6981 8038 8422", " 8162 7306 8124 7870", " 7717 7461 7767 7925", " 7792 6957 7726 8106", " 7836 6892 7791 8192", " May Jun Jul Aug", "10017 10826 11317 10744", " 8714 9512 10120 9823", " 9387 9556 10093 9620", " 8623 8945 10078 9179", " 8890 9299 10625 9302", " 9115 9434 10484 9827", " Sep Oct Nov Dec", " 9713 9938 9161 8927", " 8743 9129 8710 8680", " 8285 8466 8160 8034", " 8037 8488 7874 8647", " 8314 8850 8265 8796", " 9110 9070 8633 9240") 318s + ) 318s [1] TRUE 318s > # single row data frame 318s > 318s > all.equal(c(diffobj:::which_table_rh(capture.output(data.frame(1, 2)))), 2) 318s [1] TRUE 318s > 318s > # More than 10 rows data.frame 318s > 318s > all.equal( 318s + c(diffobj:::which_table_rh(capture.output(head(Puromycin, 10L)))), 318s + 2:11 318s + ) 318s [1] TRUE 318s > # Bad wrap 318s > 318s > bw <- c( 318s + " bad", "1 123", "2 456", 318s + " dab", "1 123", "2 456", 318s + " abd", "1 123") 318s > 318s > all.equal( 318s + diffobj:::wtr_help(bw, diffobj:::.pat.tbl), 318s + c(2L, 3L, 5L, 6L) 318s + ) 318s [1] TRUE 318s > 318s > # - Array 318s > a <- array(1:6, c(3, 1, 2)) 318s > a.c <- capture.output(a) 318s > all.equal( 318s + diffobj:::strip_array_rh(a.c, dimnames(a)), 318s + c(", , 1", "", " [,1]", " 1", " 2", " 3", "", ", , 2", "", " [,1]", " 4", " 5", " 6", "") 318s + ) 318s [1] TRUE 318s > viz_sarh <- function(capt, obj) 318s + cbind( 318s + capt, 318s + as.integer( 318s + seq_along(capt) %in% diffobj:::which_array_rh(capt, dimnames(obj)) 318s + ) 318s + ) 318s > a1 <- a2 <- a3 <- a4 <- array( 318s + "averylongphrasethatwillforcemytwocolumnarraytowrapblahblah", c(2, 2, 2) 318s + ) 318s > ca1 <- capture.output(a1) 318s > viz_sarh(ca1, a1) 318s capt 318s [1,] ", , 1" 318s [2,] "" 318s [3,] " [,1] " 318s [4,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [5,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [6,] " [,2] " 318s [7,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [8,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [9,] "" 318s [10,] ", , 2" 318s [11,] "" 318s [12,] " [,1] " 318s [13,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [14,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [15,] " [,2] " 318s [16,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [17,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [18,] "" 318s 318s [1,] "0" 318s [2,] "0" 318s [3,] "0" 318s [4,] "1" 318s [5,] "1" 318s [6,] "0" 318s [7,] "1" 318s [8,] "1" 318s [9,] "0" 318s [10,] "0" 318s [11,] "0" 318s [12,] "0" 318s [13,] "1" 318s [14,] "1" 318s [15,] "0" 318s [16,] "1" 318s [17,] "1" 318s [18,] "0" 318s > all.equal( 318s + diffobj:::which_array_rh(ca1, dimnames(a1)), 318s + c(4L, 5L, 7L, 8L, 13L, 14L, 16L, 17L) 318s + ) 318s [1] TRUE 318s > colnames(a2) <- c("ABC", "DEF") 318s > ca2 <- capture.output(a2) 318s > viz_sarh(ca2, a2) 318s capt 318s [1,] ", , 1" 318s [2,] "" 318s [3,] " ABC " 318s [4,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [5,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [6,] " DEF " 318s [7,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [8,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [9,] "" 318s [10,] ", , 2" 318s [11,] "" 318s [12,] " ABC " 318s [13,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [14,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [15,] " DEF " 318s [16,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [17,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [18,] "" 318s 318s [1,] "0" 318s [2,] "0" 318s [3,] "0" 318s [4,] "1" 318s [5,] "1" 318s [6,] "0" 318s [7,] "1" 318s [8,] "1" 318s [9,] "0" 318s [10,] "0" 318s [11,] "0" 318s [12,] "0" 318s [13,] "1" 318s [14,] "1" 318s [15,] "0" 318s [16,] "1" 318s [17,] "1" 318s [18,] "0" 318s > all.equal( 318s + diffobj:::which_array_rh(ca2, dimnames(a2)), 318s + c(4L, 5L, 7L, 8L, 13L, 14L, 16L, 17L) 318s + ) 318s [1] TRUE 318s > rownames(a3) <- 1:2 318s > ca3 <- capture.output(a3) 318s > viz_sarh(ca3, a3) 318s capt 318s [1,] ", , 1" 318s [2,] "" 318s [3,] " [,1] " 318s [4,] "1 \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [5,] "2 \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [6,] " [,2] " 318s [7,] "1 \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [8,] "2 \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [9,] "" 318s [10,] ", , 2" 318s [11,] "" 318s [12,] " [,1] " 318s [13,] "1 \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [14,] "2 \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [15,] " [,2] " 318s [16,] "1 \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [17,] "2 \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [18,] "" 318s 318s [1,] "0" 318s [2,] "0" 318s [3,] "0" 318s [4,] "0" 318s [5,] "0" 318s [6,] "0" 318s [7,] "0" 318s [8,] "0" 318s [9,] "0" 318s [10,] "0" 318s [11,] "0" 318s [12,] "0" 318s [13,] "0" 318s [14,] "0" 318s [15,] "0" 318s [16,] "0" 318s [17,] "0" 318s [18,] "0" 318s > all.equal(diffobj:::which_array_rh(ca3, dimnames(a3)), integer(0L)) 318s [1] TRUE 318s > 318s > attr(a4, "blahblah") <- matrix(1:4, 2) 318s > ca4 <- capture.output(a4) 318s > viz_sarh(ca4, a4) 318s capt 318s [1,] ", , 1" 318s [2,] "" 318s [3,] " [,1] " 318s [4,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [5,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [6,] " [,2] " 318s [7,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [8,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [9,] "" 318s [10,] ", , 2" 318s [11,] "" 318s [12,] " [,1] " 318s [13,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [14,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [15,] " [,2] " 318s [16,] "[1,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [17,] "[2,] \"averylongphrasethatwillforcemytwocolumnarraytowrapblahblah\"" 318s [18,] "" 318s [19,] "attr(,\"blahblah\")" 318s [20,] " [,1] [,2]" 318s [21,] "[1,] 1 3" 318s [22,] "[2,] 2 4" 318s 318s [1,] "0" 318s [2,] "0" 318s [3,] "0" 318s [4,] "1" 318s [5,] "1" 318s [6,] "0" 318s [7,] "1" 318s [8,] "1" 318s [9,] "0" 318s [10,] "0" 318s [11,] "0" 318s [12,] "0" 318s [13,] "1" 318s [14,] "1" 318s [15,] "0" 318s [16,] "1" 318s [17,] "1" 318s [18,] "0" 318s [19,] "0" 318s [20,] "0" 318s [21,] "0" 318s [22,] "0" 318s > all.equal( 318s + diffobj:::which_array_rh(ca4, dimnames(a4)), 318s + c(4L, 5L, 7L, 8L, 13L, 14L, 16L, 17L) 318s + ) 318s [1] TRUE 318s > options(width=80) 318s > 318s > # - List ----------------------------------------------------------------------- 318s > 318s > l1 <- list( 318s + matrix(1:4, 2), b=list(abc=c(letters, LETTERS), list(matrix(4:1, 2))) 318s + ) 318s > l1.c <- capture.output(l1) 318s > all.equal( 318s + diffobj:::strip_list_rh(l1.c, l1), 318s + c("[[1]]", " [,1] [,2]", " 1 3", " 2 4", "", "$b", "$b$abc", "\"a\" \"b\" \"c\" \"d\" \"e\" \"f\" \"g\" \"h\" \"i\" \"j\" \"k\" \"l\" \"m\" \"n\" \"o\" \"p\" \"q\" \"r\" \"s\"", "\"t\" \"u\" \"v\" \"w\" \"x\" \"y\" \"z\" \"A\" \"B\" \"C\" \"D\" \"E\" \"F\" \"G\" \"H\" \"I\" \"J\" \"K\" \"L\"", "\"M\" \"N\" \"O\" \"P\" \"Q\" \"R\" \"S\" \"T\" \"U\" \"V\" \"W\" \"X\" \"Y\" \"Z\"", "", "$b[[2]]", "$b[[2]][[1]]", " [,1] [,2]", " 4 2", " 3 1", "", "", "") 318s + ) 318s [1] TRUE 318s > 318s > a <- list(list()) 318s > aa <- list(list(), "a") 318s > b <- list("a", list()) 318s > c <- list(list("a"), "b") 318s > d <- list("a", "b", "c") 318s > 318s > identical( 318s + diffobj:::strip_list_rh(capture.output(d), d), 318s + c("[[1]]", "\"a\"", "", "[[2]]", "\"b\"", "", "[[3]]", "\"c\"", "") 318s + ) 318s [1] TRUE 318s > identical( 318s + diffobj:::strip_list_rh(capture.output(a), a), 318s + c("[[1]]", "list()", "") 318s + ) 318s [1] TRUE 318s > identical( 318s + diffobj:::strip_list_rh(capture.output(aa), aa), 318s + c("[[1]]", "list()", "", "[[2]]", "\"a\"", "") 318s + ) 318s [1] TRUE 318s > identical( 318s + diffobj:::strip_list_rh(capture.output(b), b), 318s + c("[[1]]", "\"a\"", "", "[[2]]", "list()", "") 318s + ) 318s [1] TRUE 318s > identical( 318s + diffobj:::strip_list_rh(capture.output(c), c), 318s + c("[[1]]", "[[1]][[1]]", "\"a\"", "", "", "[[2]]", "\"b\"", "") 318s + ) 318s [1] TRUE 318s > 318s > # - custom trim fun ------------------------------------------------------------ 318s > 318s > a <- matrix(100:102) 318s > b <- matrix(101:103) 318s > fun1 <- function(x, y) cbind(rep(1L, 4), rep(5L, 4)) 318s > 318s > all.equal(as.character(diffPrint(a, b, trim=fun1)), rdsf(100)) 318s [1] TRUE 318s > if(getRversion() >= "3.2.2") { 318s + capture.output( 318s + trim.err <- as.character(diffPrint(a, b, trim=function(x, y) stop("boom"))), 318s + type="message" 318s + ) # warn: "If you did not specify a `trim`" 318s + all.equal(trim.err, rdsf(200)) 318s + } 318s [1] TRUE 318s Warning message: 318s In apply_trim(current, cur.capt.p, etc@trim) : 318s `trim*` method produced an error when attempting to trim ; If you did not specify a `trim` function or define custom `trim*` methods contact maintainer (see `?trim`). Proceeding without trimming. 318s > # purposefully bad trim fun 318s > 318s > try( # "method return value must be a two " 318s + diffPrint(1:100, 2:100, trim=function(x, y) TRUE) 318s + ) 318s Error in apply_trim(target, tar.capt.p, etc@trim) : 318s `trim*` method return value must be a two column integer matrix with no NAs; If you did not specify a `trim` function or define custom `trim*` methods contact maintainer (see `?trim`). Proceeding without trimming. 318s > try( # "Invalid trim function" 318s + diffobj:::apply_trim(letters, letters, function(x) TRUE), 318s + ) 318s Error in diffobj:::apply_trim(letters, letters, function(x) TRUE) : 318s Invalid trim function (does not have at least two arguments). If you did not customize the trim function contact maintainer; see `?trim` 318s > try(# "must have as many rows" 318s + diffobj:::apply_trim( 318s + letters, letters, function(x, y) cbind(1:25, 1:25) 318s + ) 318s + ) 318s Error in diffobj:::apply_trim(letters, letters, function(x, y) cbind(1:25, : 318s `trim*` method output matrix must have as many rows as object character representation has elements; If you did not specify a `trim` function or define custom `trim*` methods contact maintainer (see `?trim`). Proceeding without trimming. 318s > 318s > # - s4 ------------------------------------------------------------------------- 318s > 318s > setClass("DOTrimTest", slots=c(a="numeric", b="list", c="matrix")) 318s > obj <- new( 318s + "DOTrimTest", a=1:40, b=list(a=1, letters, NULL), c=matrix(1:9, 3) 318s + ) 318s > all.equal( 318s + diffobj:::strip_s4_rh(capture.output(obj), obj), rdsf(300) 318s + ) 318s [1] TRUE 318s > 318s > 318s PASS 318s Begin testing test-warnings.R 318s 318s R version 4.4.3 (2025-02-28) -- "Trophy Case" 318s Copyright (C) 2025 The R Foundation for Statistical Computing 318s Platform: arm-unknown-linux-gnueabihf (32-bit) 318s 318s R is free software and comes with ABSOLUTELY NO WARRANTY. 318s You are welcome to redistribute it under certain conditions. 318s Type 'license()' or 'licence()' for distribution details. 318s 318s R is a collaborative project with many contributors. 318s Type 'contributors()' for more information and 318s 'citation()' on how to cite R or R packages in publications. 318s 318s Type 'demo()' for some demos, 'help()' for on-line help, or 318s 'help.start()' for an HTML browser interface to help. 318s Type 'q()' to quit R. 318s 318s > NAME <- "warnings" 318s > source(file.path('_helper', 'init.R')) 318s > 318s > # tests designed to produce warnings 318s > 318s > # - Extra args for `str` ------------------------------------------------------- 318s > 318s > a <- "hello" 318s > b <- "goodbye" 318s > 318s > invisible(diffStr(a, b, extra=list(comp.str="^"))) # "Specifying" 318s Warning message: 318s In capt_fun(target, current, etc = etc.proc, err = err, extra) : 318s Specifying `comp.str` may cause `str` output level folding to be incorrect 318s > invisible(diffStr(a, b, extra=list(comp="^"))) # "Specifying") 318s Warning messages: 318s 1: In match.call(definition, call, expand.dots, envir) : 318s partial argument match of 'comp' to 'comp.str' 318s 2: In capt_fun(target, current, etc = etc.proc, err = err, extra) : 318s Specifying `comp.str` may cause `str` output level folding to be incorrect 318s > invisible(diffStr(a, b, extra=list(indent.str="..."))) # "Specifying" 319s Warning message: 319s In capt_fun(target, current, etc = etc.proc, err = err, extra) : 319s Specifying `indent.str` may cause `str` output level folding to be incorrect 319s > invisible(diffStr(a, b, extra=list(indent="..."))) # "Specifying" 319s Warning messages: 319s 1: In match.call(definition, call, expand.dots, envir) : 319s partial argument match of 'indent' to 'indent.str' 319s 2: In capt_fun(target, current, etc = etc.proc, err = err, extra) : 319s Specifying `indent.str` may cause `str` output level folding to be incorrect 319s > 319s > # - Max diffs ------------------------------------------------------------------ 319s > 319s > # Max limit warnings work properly; these are not fully fleshed out 319s > 319s > A3 <- c("a b c", "d e f A B C D", "g h i", "f") 319s > B3 <- c("a b c", "xd e f E Q L S", "g h i", "q") 319s > 319s > invisible(diffChr(A3, B3, max.diffs=2)) # warn: "Exceeded diff" 319s Warning message: 319s Exceeded diff limit during diff computation (6 vs. 2 allowed); overall diff is likely not optimal 319s > 319s > # - Overriden formals ---------------------------------------------------------- 319s > 319s > # warn "Provided `style` argument will override the provided `format` argument" 319s > invisible(diffChr(letters, LETTERS, style=StyleRaw(), format="ansi8")) 319s Warning message: 319s In diffChr(target = letters, current = LETTERS, style = StyleRaw(), : 319s Provided `style` argument will override the provided `format` argument 319s > 319s > # warn: "Provided `style` .* `format` and `color.mode` arguments" 319s > invisible( 319s + diffChr(letters, LETTERS, style=StyleRaw(), format="ansi8", color.mode="rgb") 319s + ) 319s Warning message: 319s In diffChr(target = letters, current = LETTERS, style = StyleRaw(), : 319s Provided `style` argument will override the provided `format` and `color.mode` arguments. 319s > 319s > 319s PASS 319s autopkgtest [16:09:14]: test run-unit-test: -----------------------] 323s autopkgtest [16:09:18]: test run-unit-test: - - - - - - - - - - results - - - - - - - - - - 323s run-unit-test PASS 326s autopkgtest [16:09:21]: test pkg-r-autopkgtest: preparing testbed 350s autopkgtest [16:09:45]: testbed dpkg architecture: armhf 352s autopkgtest [16:09:47]: testbed apt version: 2.9.33 356s autopkgtest [16:09:51]: @@@@@@@@@@@@@@@@@@@@ test bed setup 358s autopkgtest [16:09:53]: testbed release detected to be: plucky 365s autopkgtest [16:10:00]: updating testbed package index (apt update) 367s Get:1 http://ftpmaster.internal/ubuntu plucky-proposed InRelease [126 kB] 367s Get:2 http://ftpmaster.internal/ubuntu plucky InRelease [257 kB] 368s Get:3 http://ftpmaster.internal/ubuntu plucky-updates InRelease [126 kB] 368s Get:4 http://ftpmaster.internal/ubuntu plucky-security InRelease [126 kB] 368s Get:5 http://ftpmaster.internal/ubuntu plucky-proposed/main Sources [99.7 kB] 369s Get:6 http://ftpmaster.internal/ubuntu plucky-proposed/multiverse Sources [15.8 kB] 369s Get:7 http://ftpmaster.internal/ubuntu plucky-proposed/universe Sources [379 kB] 369s Get:8 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf Packages [114 kB] 369s Get:9 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf c-n-f Metadata [1832 B] 369s Get:10 http://ftpmaster.internal/ubuntu plucky-proposed/restricted armhf c-n-f Metadata [116 B] 369s Get:11 http://ftpmaster.internal/ubuntu plucky-proposed/universe armhf Packages [312 kB] 370s Get:12 http://ftpmaster.internal/ubuntu plucky-proposed/universe armhf c-n-f Metadata [11.1 kB] 370s Get:13 http://ftpmaster.internal/ubuntu plucky-proposed/multiverse armhf Packages [3472 B] 370s Get:14 http://ftpmaster.internal/ubuntu plucky-proposed/multiverse armhf c-n-f Metadata [240 B] 370s Get:15 http://ftpmaster.internal/ubuntu plucky/universe Sources [21.0 MB] 396s Get:16 http://ftpmaster.internal/ubuntu plucky/multiverse Sources [299 kB] 396s Get:17 http://ftpmaster.internal/ubuntu plucky/main Sources [1394 kB] 398s Get:18 http://ftpmaster.internal/ubuntu plucky/main armhf Packages [1378 kB] 400s Get:19 http://ftpmaster.internal/ubuntu plucky/main armhf c-n-f Metadata [29.4 kB] 400s Get:20 http://ftpmaster.internal/ubuntu plucky/restricted armhf c-n-f Metadata [108 B] 400s Get:21 http://ftpmaster.internal/ubuntu plucky/universe armhf Packages [15.1 MB] 419s Get:22 http://ftpmaster.internal/ubuntu plucky/multiverse armhf Packages [172 kB] 421s Fetched 41.0 MB in 54s (766 kB/s) 422s Reading package lists... 427s autopkgtest [16:11:02]: upgrading testbed (apt dist-upgrade and autopurge) 429s Reading package lists... 429s Building dependency tree... 429s Reading state information... 430s Calculating upgrade...Starting pkgProblemResolver with broken count: 0 430s Starting 2 pkgProblemResolver with broken count: 0 430s Done 431s Entering ResolveByKeep 431s 431s Calculating upgrade... 432s The following packages will be upgraded: 432s libc-bin libc6 locales pinentry-curses python3-jinja2 sos strace 432s 7 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. 432s Need to get 8683 kB of archives. 432s After this operation, 23.6 kB of additional disk space will be used. 432s Get:1 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf libc6 armhf 2.41-1ubuntu2 [2932 kB] 436s Get:2 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf libc-bin armhf 2.41-1ubuntu2 [545 kB] 437s Get:3 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf locales all 2.41-1ubuntu2 [4246 kB] 442s Get:4 http://ftpmaster.internal/ubuntu plucky/main armhf strace armhf 6.13+ds-1ubuntu1 [445 kB] 443s Get:5 http://ftpmaster.internal/ubuntu plucky/main armhf pinentry-curses armhf 1.3.1-2ubuntu3 [40.6 kB] 443s Get:6 http://ftpmaster.internal/ubuntu plucky/main armhf python3-jinja2 all 3.1.5-2ubuntu1 [109 kB] 443s Get:7 http://ftpmaster.internal/ubuntu plucky/main armhf sos all 4.9.0-5 [365 kB] 444s Preconfiguring packages ... 444s Fetched 8683 kB in 11s (765 kB/s) 444s (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 ... 64655 files and directories currently installed.) 444s Preparing to unpack .../libc6_2.41-1ubuntu2_armhf.deb ... 444s Unpacking libc6:armhf (2.41-1ubuntu2) over (2.41-1ubuntu1) ... 445s Setting up libc6:armhf (2.41-1ubuntu2) ... 445s (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 ... 64655 files and directories currently installed.) 445s Preparing to unpack .../libc-bin_2.41-1ubuntu2_armhf.deb ... 445s Unpacking libc-bin (2.41-1ubuntu2) over (2.41-1ubuntu1) ... 445s Setting up libc-bin (2.41-1ubuntu2) ... 446s (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 ... 64655 files and directories currently installed.) 446s Preparing to unpack .../locales_2.41-1ubuntu2_all.deb ... 446s Unpacking locales (2.41-1ubuntu2) over (2.41-1ubuntu1) ... 446s Preparing to unpack .../strace_6.13+ds-1ubuntu1_armhf.deb ... 446s Unpacking strace (6.13+ds-1ubuntu1) over (6.11-0ubuntu1) ... 446s Preparing to unpack .../pinentry-curses_1.3.1-2ubuntu3_armhf.deb ... 446s Unpacking pinentry-curses (1.3.1-2ubuntu3) over (1.3.1-2ubuntu2) ... 446s Preparing to unpack .../python3-jinja2_3.1.5-2ubuntu1_all.deb ... 446s Unpacking python3-jinja2 (3.1.5-2ubuntu1) over (3.1.5-2) ... 446s Preparing to unpack .../archives/sos_4.9.0-5_all.deb ... 447s Unpacking sos (4.9.0-5) over (4.9.0-4) ... 447s Setting up sos (4.9.0-5) ... 447s Setting up pinentry-curses (1.3.1-2ubuntu3) ... 447s Setting up locales (2.41-1ubuntu2) ... 448s Generating locales (this might take a while)... 450s en_US.UTF-8... done 450s Generation complete. 450s Setting up python3-jinja2 (3.1.5-2ubuntu1) ... 451s Setting up strace (6.13+ds-1ubuntu1) ... 451s Processing triggers for man-db (2.13.0-1) ... 452s Processing triggers for systemd (257.3-1ubuntu3) ... 455s Reading package lists... 455s Building dependency tree... 455s Reading state information... 455s Starting pkgProblemResolver with broken count: 0 455s Starting 2 pkgProblemResolver with broken count: 0 455s Done 456s Solving dependencies... 456s 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. 458s autopkgtest [16:11:33]: rebooting testbed after setup commands that affected boot 522s Reading package lists... 522s Building dependency tree... 522s Reading state information... 523s Starting pkgProblemResolver with broken count: 0 523s Starting 2 pkgProblemResolver with broken count: 0 523s Done 524s The following NEW packages will be installed: 524s build-essential cpp cpp-14 cpp-14-arm-linux-gnueabihf 524s cpp-arm-linux-gnueabihf dctrl-tools fontconfig fontconfig-config 524s fonts-dejavu-core fonts-dejavu-mono fonts-font-awesome 524s fonts-glyphicons-halflings fonts-mathjax g++ g++-14 524s g++-14-arm-linux-gnueabihf g++-arm-linux-gnueabihf gcc gcc-14 524s gcc-14-arm-linux-gnueabihf gcc-arm-linux-gnueabihf gfortran gfortran-14 524s gfortran-14-arm-linux-gnueabihf gfortran-arm-linux-gnueabihf icu-devtools 524s javascript-common libasan8 libblas-dev libblas3 libbz2-dev libc-dev-bin 524s libc6-dev libcairo2 libcc1-0 libcrypt-dev libdatrie1 libdeflate-dev 524s libdeflate0 libfontconfig1 libfreetype6 libgcc-14-dev libgfortran-14-dev 524s libgfortran5 libgomp1 libgraphite2-3 libharfbuzz0b libice6 libicu-dev 524s libisl23 libjbig0 libjpeg-dev libjpeg-turbo8 libjpeg-turbo8-dev libjpeg8 524s libjpeg8-dev libjs-bootstrap libjs-bootstrap4 libjs-d3 libjs-es5-shim 524s libjs-highlight.js libjs-jquery libjs-jquery-datatables 524s libjs-jquery-selectize.js libjs-jquery-ui libjs-json libjs-mathjax 524s libjs-microplugin.js libjs-modernizr libjs-popper.js libjs-prettify 524s libjs-sifter.js libjs-twitter-bootstrap-datepicker liblapack-dev liblapack3 524s liblerc4 liblua5.4-0 liblzma-dev libmpc3 libncurses-dev libpango-1.0-0 524s libpangocairo-1.0-0 libpangoft2-1.0-0 libpaper-utils libpaper2 libpcre2-16-0 524s libpcre2-32-0 libpcre2-dev libpcre2-posix3 libpixman-1-0 libpkgconf3 524s libpng-dev libreadline-dev libsharpyuv0 libsm6 libstdc++-14-dev libtcl8.6 524s libthai-data libthai0 libtiff6 libtirpc-dev libtk8.6 libubsan1 libwebp7 524s libxcb-render0 libxcb-shm0 libxft2 libxrender1 libxss1 libxt6t64 524s linux-libc-dev littler node-bootstrap-sass node-html5shiv node-normalize.css 524s pandoc pandoc-data pkg-r-autopkgtest pkgconf pkgconf-bin r-base-core 524s r-base-dev r-cran-base64enc r-cran-bslib r-cran-cachem r-cran-cli 524s r-cran-commonmark r-cran-crayon r-cran-diffobj r-cran-digest r-cran-evaluate 524s r-cran-fastmap r-cran-fontawesome r-cran-fs r-cran-glue r-cran-highr 524s r-cran-htmltools r-cran-httpuv r-cran-jquerylib r-cran-jsonlite r-cran-knitr 524s r-cran-later r-cran-lifecycle r-cran-littler r-cran-magrittr r-cran-memoise 524s r-cran-mime r-cran-pkgkitten r-cran-promises r-cran-r6 r-cran-rappdirs 524s r-cran-rcpp r-cran-rlang r-cran-rmarkdown r-cran-sass r-cran-shiny 524s r-cran-sourcetools r-cran-tinytex r-cran-withr r-cran-xfun r-cran-xtable 524s r-cran-yaml rpcsvc-proto unzip x11-common xdg-utils zip zlib1g-dev 524s 0 upgraded, 168 newly installed, 0 to remove and 0 not upgraded. 524s Need to get 187 MB of archives. 524s After this operation, 677 MB of additional disk space will be used. 524s Get:1 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf libc-dev-bin armhf 2.41-1ubuntu2 [23.0 kB] 524s Get:2 http://ftpmaster.internal/ubuntu plucky/main armhf linux-libc-dev armhf 6.14.0-10.10 [1683 kB] 526s Get:3 http://ftpmaster.internal/ubuntu plucky/main armhf libcrypt-dev armhf 1:4.4.38-1 [120 kB] 526s Get:4 http://ftpmaster.internal/ubuntu plucky/main armhf rpcsvc-proto armhf 1.4.2-0ubuntu7 [62.2 kB] 526s Get:5 http://ftpmaster.internal/ubuntu plucky-proposed/main armhf libc6-dev armhf 2.41-1ubuntu2 [1396 kB] 528s Get:6 http://ftpmaster.internal/ubuntu plucky/main armhf libisl23 armhf 0.27-1 [546 kB] 529s Get:7 http://ftpmaster.internal/ubuntu plucky/main armhf libmpc3 armhf 1.3.1-1build2 [47.1 kB] 529s Get:8 http://ftpmaster.internal/ubuntu plucky/main armhf cpp-14-arm-linux-gnueabihf armhf 14.2.0-17ubuntu3 [9220 kB] 539s Get:9 http://ftpmaster.internal/ubuntu plucky/main armhf cpp-14 armhf 14.2.0-17ubuntu3 [1030 B] 539s Get:10 http://ftpmaster.internal/ubuntu plucky/main armhf cpp-arm-linux-gnueabihf armhf 4:14.2.0-1ubuntu1 [5578 B] 539s Get:11 http://ftpmaster.internal/ubuntu plucky/main armhf cpp armhf 4:14.2.0-1ubuntu1 [22.4 kB] 539s Get:12 http://ftpmaster.internal/ubuntu plucky/main armhf libcc1-0 armhf 15-20250222-0ubuntu1 [38.9 kB] 539s Get:13 http://ftpmaster.internal/ubuntu plucky/main armhf libgomp1 armhf 15-20250222-0ubuntu1 [128 kB] 539s Get:14 http://ftpmaster.internal/ubuntu plucky/main armhf libasan8 armhf 15-20250222-0ubuntu1 [2955 kB] 542s Get:15 http://ftpmaster.internal/ubuntu plucky/main armhf libubsan1 armhf 15-20250222-0ubuntu1 [1191 kB] 543s Get:16 http://ftpmaster.internal/ubuntu plucky/main armhf libgcc-14-dev armhf 14.2.0-17ubuntu3 [897 kB] 544s Get:17 http://ftpmaster.internal/ubuntu plucky/main armhf gcc-14-arm-linux-gnueabihf armhf 14.2.0-17ubuntu3 [18.0 MB] 564s Get:18 http://ftpmaster.internal/ubuntu plucky/main armhf gcc-14 armhf 14.2.0-17ubuntu3 [506 kB] 565s Get:19 http://ftpmaster.internal/ubuntu plucky/main armhf gcc-arm-linux-gnueabihf armhf 4:14.2.0-1ubuntu1 [1218 B] 565s Get:20 http://ftpmaster.internal/ubuntu plucky/main armhf gcc armhf 4:14.2.0-1ubuntu1 [5004 B] 565s Get:21 http://ftpmaster.internal/ubuntu plucky/main armhf libstdc++-14-dev armhf 14.2.0-17ubuntu3 [2573 kB] 568s Get:22 http://ftpmaster.internal/ubuntu plucky/main armhf g++-14-arm-linux-gnueabihf armhf 14.2.0-17ubuntu3 [10.5 MB] 579s Get:23 http://ftpmaster.internal/ubuntu plucky/main armhf g++-14 armhf 14.2.0-17ubuntu3 [21.8 kB] 579s Get:24 http://ftpmaster.internal/ubuntu plucky/main armhf g++-arm-linux-gnueabihf armhf 4:14.2.0-1ubuntu1 [966 B] 579s Get:25 http://ftpmaster.internal/ubuntu plucky/main armhf g++ armhf 4:14.2.0-1ubuntu1 [1084 B] 579s Get:26 http://ftpmaster.internal/ubuntu plucky/main armhf build-essential armhf 12.10ubuntu1 [4928 B] 579s Get:27 http://ftpmaster.internal/ubuntu plucky/main armhf dctrl-tools armhf 2.24-3build3 [94.7 kB] 579s Get:28 http://ftpmaster.internal/ubuntu plucky/main armhf libfreetype6 armhf 2.13.3+dfsg-1 [330 kB] 580s Get:29 http://ftpmaster.internal/ubuntu plucky/main armhf fonts-dejavu-mono all 2.37-8 [502 kB] 580s Get:30 http://ftpmaster.internal/ubuntu plucky/main armhf fonts-dejavu-core all 2.37-8 [835 kB] 581s Get:31 http://ftpmaster.internal/ubuntu plucky/main armhf fontconfig-config armhf 2.15.0-2ubuntu1 [37.5 kB] 581s Get:32 http://ftpmaster.internal/ubuntu plucky/main armhf libfontconfig1 armhf 2.15.0-2ubuntu1 [114 kB] 581s Get:33 http://ftpmaster.internal/ubuntu plucky/main armhf fontconfig armhf 2.15.0-2ubuntu1 [190 kB] 581s Get:34 http://ftpmaster.internal/ubuntu plucky/main armhf fonts-font-awesome all 5.0.10+really4.7.0~dfsg-4.1 [516 kB] 582s Get:35 http://ftpmaster.internal/ubuntu plucky/universe armhf fonts-glyphicons-halflings all 1.009~3.4.1+dfsg-3 [118 kB] 582s Get:36 http://ftpmaster.internal/ubuntu plucky/main armhf fonts-mathjax all 2.7.9+dfsg-1 [2208 kB] 584s Get:37 http://ftpmaster.internal/ubuntu plucky/main armhf libgfortran5 armhf 15-20250222-0ubuntu1 [330 kB] 585s Get:38 http://ftpmaster.internal/ubuntu plucky/main armhf libgfortran-14-dev armhf 14.2.0-17ubuntu3 [370 kB] 585s Get:39 http://ftpmaster.internal/ubuntu plucky/main armhf gfortran-14-arm-linux-gnueabihf armhf 14.2.0-17ubuntu3 [9763 kB] 596s Get:40 http://ftpmaster.internal/ubuntu plucky/main armhf gfortran-14 armhf 14.2.0-17ubuntu3 [13.6 kB] 596s Get:41 http://ftpmaster.internal/ubuntu plucky/main armhf gfortran-arm-linux-gnueabihf armhf 4:14.2.0-1ubuntu1 [1026 B] 596s Get:42 http://ftpmaster.internal/ubuntu plucky/main armhf gfortran armhf 4:14.2.0-1ubuntu1 [1166 B] 596s Get:43 http://ftpmaster.internal/ubuntu plucky/main armhf icu-devtools armhf 76.1-1ubuntu2 [206 kB] 596s Get:44 http://ftpmaster.internal/ubuntu plucky/main armhf javascript-common all 12 [5216 B] 597s Get:45 http://ftpmaster.internal/ubuntu plucky/main armhf libblas3 armhf 3.12.1-2 [132 kB] 597s Get:46 http://ftpmaster.internal/ubuntu plucky/main armhf libblas-dev armhf 3.12.1-2 [141 kB] 597s Get:47 http://ftpmaster.internal/ubuntu plucky/main armhf libbz2-dev armhf 1.0.8-6 [30.9 kB] 597s Get:48 http://ftpmaster.internal/ubuntu plucky/main armhf libpixman-1-0 armhf 0.44.0-3 [183 kB] 597s Get:49 http://ftpmaster.internal/ubuntu plucky/main armhf libxcb-render0 armhf 1.17.0-2 [15.3 kB] 597s Get:50 http://ftpmaster.internal/ubuntu plucky/main armhf libxcb-shm0 armhf 1.17.0-2 [5774 B] 597s Get:51 http://ftpmaster.internal/ubuntu plucky/main armhf libxrender1 armhf 1:0.9.10-1.1build1 [16.0 kB] 597s Get:52 http://ftpmaster.internal/ubuntu plucky/main armhf libcairo2 armhf 1.18.2-2 [484 kB] 598s Get:53 http://ftpmaster.internal/ubuntu plucky/main armhf libdatrie1 armhf 0.2.13-3build1 [15.7 kB] 598s Get:54 http://ftpmaster.internal/ubuntu plucky/main armhf libdeflate0 armhf 1.23-1 [38.5 kB] 598s Get:55 http://ftpmaster.internal/ubuntu plucky/main armhf libdeflate-dev armhf 1.23-1 [45.0 kB] 598s Get:56 http://ftpmaster.internal/ubuntu plucky/main armhf libgraphite2-3 armhf 1.3.14-2ubuntu1 [64.8 kB] 598s Get:57 http://ftpmaster.internal/ubuntu plucky/main armhf libharfbuzz0b armhf 10.2.0-1 [464 kB] 598s Get:58 http://ftpmaster.internal/ubuntu plucky/main armhf x11-common all 1:7.7+23ubuntu3 [21.7 kB] 598s Get:59 http://ftpmaster.internal/ubuntu plucky/main armhf libice6 armhf 2:1.1.1-1 [36.5 kB] 598s Get:60 http://ftpmaster.internal/ubuntu plucky/main armhf libicu-dev armhf 76.1-1ubuntu2 [12.0 MB] 611s Get:61 http://ftpmaster.internal/ubuntu plucky/main armhf libjpeg-turbo8 armhf 2.1.5-3ubuntu2 [127 kB] 611s Get:62 http://ftpmaster.internal/ubuntu plucky/main armhf libjpeg-turbo8-dev armhf 2.1.5-3ubuntu2 [265 kB] 611s Get:63 http://ftpmaster.internal/ubuntu plucky/main armhf libjpeg8 armhf 8c-2ubuntu11 [2148 B] 611s Get:64 http://ftpmaster.internal/ubuntu plucky/main armhf libjpeg8-dev armhf 8c-2ubuntu11 [1484 B] 611s Get:65 http://ftpmaster.internal/ubuntu plucky/main armhf libjpeg-dev armhf 8c-2ubuntu11 [1482 B] 611s Get:66 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-bootstrap all 3.4.1+dfsg-3 [129 kB] 611s Get:67 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-popper.js all 1.16.1+ds-6 [54.1 kB] 611s Get:68 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-bootstrap4 all 4.6.1+dfsg1-4 [537 kB] 612s Get:69 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-d3 all 3.5.17-4 [132 kB] 612s Get:70 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-es5-shim all 4.6.7-2 [39.8 kB] 612s Get:71 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-highlight.js all 9.18.5+dfsg1-2 [385 kB] 613s Get:72 http://ftpmaster.internal/ubuntu plucky/main armhf libjs-jquery all 3.6.1+dfsg+~3.5.14-1 [328 kB] 613s Get:73 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-jquery-datatables all 1.11.5+dfsg-2 [146 kB] 613s Get:74 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-sifter.js all 0.6.0+dfsg-3 [12.6 kB] 613s Get:75 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-microplugin.js all 0.0.3+dfsg-1.1 [3712 B] 613s Get:76 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-jquery-selectize.js all 0.12.6+dfsg-1.1 [51.0 kB] 613s Get:77 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-jquery-ui all 1.13.2+dfsg-1 [252 kB] 613s Get:78 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-json all 0~20221030+~1.0.8-1 [20.6 kB] 613s Get:79 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-prettify all 2015.12.04+dfsg-1.1 [39.3 kB] 613s Get:80 http://ftpmaster.internal/ubuntu plucky/main armhf liblapack3 armhf 3.12.1-2 [2091 kB] 616s Get:81 http://ftpmaster.internal/ubuntu plucky/main armhf liblapack-dev armhf 3.12.1-2 [2207 kB] 618s Get:82 http://ftpmaster.internal/ubuntu plucky/main armhf liblerc4 armhf 4.0.0+ds-5ubuntu1 [160 kB] 619s Get:83 http://ftpmaster.internal/ubuntu plucky/main armhf liblua5.4-0 armhf 5.4.7-1 [134 kB] 619s Get:84 http://ftpmaster.internal/ubuntu plucky/main armhf libncurses-dev armhf 6.5+20250216-2 [345 kB] 619s Get:85 http://ftpmaster.internal/ubuntu plucky/main armhf libthai-data all 0.1.29-2build1 [158 kB] 619s Get:86 http://ftpmaster.internal/ubuntu plucky/main armhf libthai0 armhf 0.1.29-2build1 [15.2 kB] 619s Get:87 http://ftpmaster.internal/ubuntu plucky/main armhf libpango-1.0-0 armhf 1.56.2-1 [216 kB] 620s Get:88 http://ftpmaster.internal/ubuntu plucky/main armhf libpangoft2-1.0-0 armhf 1.56.2-1 [43.6 kB] 620s Get:89 http://ftpmaster.internal/ubuntu plucky/main armhf libpangocairo-1.0-0 armhf 1.56.2-1 [25.1 kB] 620s Get:90 http://ftpmaster.internal/ubuntu plucky/main armhf libpaper2 armhf 2.2.5-0.3 [16.3 kB] 620s Get:91 http://ftpmaster.internal/ubuntu plucky/main armhf libpaper-utils armhf 2.2.5-0.3 [14.2 kB] 620s Get:92 http://ftpmaster.internal/ubuntu plucky/main armhf libpcre2-16-0 armhf 10.45-1 [207 kB] 620s Get:93 http://ftpmaster.internal/ubuntu plucky/main armhf libpcre2-32-0 armhf 10.45-1 [197 kB] 620s Get:94 http://ftpmaster.internal/ubuntu plucky/main armhf libpcre2-posix3 armhf 10.45-1 [6300 B] 620s Get:95 http://ftpmaster.internal/ubuntu plucky/main armhf libpcre2-dev armhf 10.45-1 [752 kB] 621s Get:96 http://ftpmaster.internal/ubuntu plucky/main armhf libpkgconf3 armhf 1.8.1-4 [26.6 kB] 621s Get:97 http://ftpmaster.internal/ubuntu plucky/main armhf zlib1g-dev armhf 1:1.3.dfsg+really1.3.1-1ubuntu1 [880 kB] 622s Get:98 http://ftpmaster.internal/ubuntu plucky/main armhf libpng-dev armhf 1.6.47-1 [251 kB] 622s Get:99 http://ftpmaster.internal/ubuntu plucky/main armhf libreadline-dev armhf 8.2-6 [153 kB] 622s Get:100 http://ftpmaster.internal/ubuntu plucky/main armhf libsharpyuv0 armhf 1.5.0-0.1 [16.4 kB] 622s Get:101 http://ftpmaster.internal/ubuntu plucky/main armhf libsm6 armhf 2:1.2.4-1 [15.1 kB] 622s Get:102 http://ftpmaster.internal/ubuntu plucky/main armhf libtcl8.6 armhf 8.6.16+dfsg-1 [909 kB] 623s Get:103 http://ftpmaster.internal/ubuntu plucky/main armhf libjbig0 armhf 2.1-6.1ubuntu2 [24.9 kB] 623s Get:104 http://ftpmaster.internal/ubuntu plucky/main armhf libwebp7 armhf 1.5.0-0.1 [188 kB] 624s Get:105 http://ftpmaster.internal/ubuntu plucky/main armhf libtiff6 armhf 4.5.1+git230720-4ubuntu4 [179 kB] 624s Get:106 http://ftpmaster.internal/ubuntu plucky/main armhf libxft2 armhf 2.3.6-1build1 [37.4 kB] 624s Get:107 http://ftpmaster.internal/ubuntu plucky/main armhf libxss1 armhf 1:1.2.3-1build3 [6500 B] 624s Get:108 http://ftpmaster.internal/ubuntu plucky/main armhf libtk8.6 armhf 8.6.16-1 [686 kB] 624s Get:109 http://ftpmaster.internal/ubuntu plucky/main armhf libxt6t64 armhf 1:1.2.1-1.2build1 [145 kB] 625s Get:110 http://ftpmaster.internal/ubuntu plucky/main armhf zip armhf 3.0-14ubuntu2 [164 kB] 625s Get:111 http://ftpmaster.internal/ubuntu plucky/main armhf unzip armhf 6.0-28ubuntu6 [167 kB] 625s Get:112 http://ftpmaster.internal/ubuntu plucky/main armhf xdg-utils all 1.2.1-2ubuntu1 [66.0 kB] 625s Get:113 http://ftpmaster.internal/ubuntu plucky/universe armhf r-base-core armhf 4.4.3-1 [28.2 MB] 655s Get:114 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-littler armhf 0.3.20-2 [90.9 kB] 655s Get:115 http://ftpmaster.internal/ubuntu plucky/universe armhf littler all 0.3.20-2 [2554 B] 655s Get:116 http://ftpmaster.internal/ubuntu plucky/universe armhf node-bootstrap-sass all 3.4.3-2 [187 kB] 655s Get:117 http://ftpmaster.internal/ubuntu plucky/universe armhf node-html5shiv all 3.7.3+dfsg-5 [13.5 kB] 655s Get:118 http://ftpmaster.internal/ubuntu plucky/universe armhf node-normalize.css all 8.0.1-5 [10.8 kB] 655s Get:119 http://ftpmaster.internal/ubuntu plucky/universe armhf pandoc-data all 3.1.11.1-3build1 [78.8 kB] 655s Get:120 http://ftpmaster.internal/ubuntu plucky/universe armhf pandoc armhf 3.1.11.1+ds-2 [36.7 MB] 696s Get:121 http://ftpmaster.internal/ubuntu plucky/main armhf liblzma-dev armhf 5.6.4-1 [166 kB] 697s Get:122 http://ftpmaster.internal/ubuntu plucky/main armhf pkgconf-bin armhf 1.8.1-4 [21.2 kB] 697s Get:123 http://ftpmaster.internal/ubuntu plucky/main armhf pkgconf armhf 1.8.1-4 [16.8 kB] 697s Get:124 http://ftpmaster.internal/ubuntu plucky/main armhf libtirpc-dev armhf 1.3.4+ds-1.3 [184 kB] 697s Get:125 http://ftpmaster.internal/ubuntu plucky/universe armhf r-base-dev all 4.4.3-1 [4176 B] 697s Get:126 http://ftpmaster.internal/ubuntu plucky/universe armhf pkg-r-autopkgtest all 20231212ubuntu1 [6448 B] 697s Get:127 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-base64enc armhf 0.1-3-3 [27.3 kB] 697s Get:128 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-rlang armhf 1.1.5-1 [1701 kB] 699s Get:129 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-fastmap armhf 1.2.0-1 [69.8 kB] 699s Get:130 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-cachem armhf 1.1.0-1 [73.8 kB] 699s Get:131 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-digest armhf 0.6.37-1 [207 kB] 699s Get:132 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-htmltools armhf 0.5.8.1-1 [372 kB] 700s Get:133 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-jquerylib all 0.1.4+dfsg-4 [13.5 kB] 700s Get:134 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-jsonlite armhf 1.9.1+dfsg-1 [440 kB] 700s Get:135 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-cli armhf 3.6.4-1 [1377 kB] 702s Get:136 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-glue armhf 1.8.0-1 [162 kB] 702s Get:137 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-lifecycle all 1.0.4+dfsg-1 [110 kB] 702s Get:138 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-memoise all 2.0.1-1 [53.9 kB] 702s Get:139 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-mime armhf 0.12-2 [35.5 kB] 702s Get:140 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-fs armhf 1.6.5+dfsg-1 [242 kB] 702s Get:141 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-r6 all 2.6.1-1 [101 kB] 703s Get:142 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-rappdirs armhf 0.3.3-1 [47.4 kB] 703s Get:143 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-sass armhf 0.4.9+dfsg-1 [926 kB] 704s Get:144 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-bslib all 0.8.0+dfsg-1 [4294 kB] 709s Get:145 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-commonmark armhf 1.9.2-2 [112 kB] 709s Get:146 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-crayon all 1.5.3-1 [165 kB] 709s Get:147 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-diffobj armhf 0.3.5-1 [1115 kB] 710s Get:148 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-evaluate all 1.0.3-1 [114 kB] 711s Get:149 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-fontawesome all 0.5.3-1 [1331 kB] 712s Get:150 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-xfun armhf 0.51+dfsg-1 [573 kB] 713s Get:151 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-highr all 0.11+dfsg-1 [38.5 kB] 713s Get:152 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-pkgkitten all 0.2.4-1 [27.2 kB] 713s Get:153 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-rcpp armhf 1.0.14-1 [1976 kB] 715s Get:154 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-later armhf 1.4.1+dfsg-1 [141 kB] 715s Get:155 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-magrittr armhf 2.0.3-1 [154 kB] 715s Get:156 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-promises armhf 1.3.2+dfsg-1 [288 kB] 716s Get:157 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-httpuv armhf 1.6.15+dfsg-1 [480 kB] 716s Get:158 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-yaml armhf 2.3.10-1 [101 kB] 716s Get:159 http://ftpmaster.internal/ubuntu plucky/main armhf libjs-mathjax all 2.7.9+dfsg-1 [5665 kB] 723s Get:160 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-knitr all 1.49+dfsg-1 [859 kB] 724s Get:161 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-tinytex all 0.56-1 [148 kB] 724s Get:162 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-modernizr all 3.13.0-0.1 [101 kB] 724s Get:163 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-xtable all 1:1.8-4-2 [689 kB] 725s Get:164 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-sourcetools armhf 0.1.7-1-1 [45.7 kB] 725s Get:165 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-withr all 3.0.2+dfsg-1 [214 kB] 725s Get:166 http://ftpmaster.internal/ubuntu plucky/universe armhf libjs-twitter-bootstrap-datepicker all 1.3.1+dfsg1-4.1 [28.5 kB] 725s Get:167 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-shiny all 1.10.0+dfsg-2 [3124 kB] 729s Get:168 http://ftpmaster.internal/ubuntu plucky/universe armhf r-cran-rmarkdown all 2.29+dfsg-1 [1501 kB] 731s Preconfiguring packages ... 731s Fetched 187 MB in 3min 27s (904 kB/s) 731s Selecting previously unselected package libc-dev-bin. 732s (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 ... 64655 files and directories currently installed.) 732s Preparing to unpack .../000-libc-dev-bin_2.41-1ubuntu2_armhf.deb ... 732s Unpacking libc-dev-bin (2.41-1ubuntu2) ... 732s Selecting previously unselected package linux-libc-dev:armhf. 732s Preparing to unpack .../001-linux-libc-dev_6.14.0-10.10_armhf.deb ... 732s Unpacking linux-libc-dev:armhf (6.14.0-10.10) ... 732s Selecting previously unselected package libcrypt-dev:armhf. 732s Preparing to unpack .../002-libcrypt-dev_1%3a4.4.38-1_armhf.deb ... 732s Unpacking libcrypt-dev:armhf (1:4.4.38-1) ... 732s Selecting previously unselected package rpcsvc-proto. 732s Preparing to unpack .../003-rpcsvc-proto_1.4.2-0ubuntu7_armhf.deb ... 732s Unpacking rpcsvc-proto (1.4.2-0ubuntu7) ... 732s Selecting previously unselected package libc6-dev:armhf. 732s Preparing to unpack .../004-libc6-dev_2.41-1ubuntu2_armhf.deb ... 732s Unpacking libc6-dev:armhf (2.41-1ubuntu2) ... 732s Selecting previously unselected package libisl23:armhf. 732s Preparing to unpack .../005-libisl23_0.27-1_armhf.deb ... 732s Unpacking libisl23:armhf (0.27-1) ... 732s Selecting previously unselected package libmpc3:armhf. 732s Preparing to unpack .../006-libmpc3_1.3.1-1build2_armhf.deb ... 732s Unpacking libmpc3:armhf (1.3.1-1build2) ... 732s Selecting previously unselected package cpp-14-arm-linux-gnueabihf. 732s Preparing to unpack .../007-cpp-14-arm-linux-gnueabihf_14.2.0-17ubuntu3_armhf.deb ... 732s Unpacking cpp-14-arm-linux-gnueabihf (14.2.0-17ubuntu3) ... 732s Selecting previously unselected package cpp-14. 732s Preparing to unpack .../008-cpp-14_14.2.0-17ubuntu3_armhf.deb ... 732s Unpacking cpp-14 (14.2.0-17ubuntu3) ... 732s Selecting previously unselected package cpp-arm-linux-gnueabihf. 732s Preparing to unpack .../009-cpp-arm-linux-gnueabihf_4%3a14.2.0-1ubuntu1_armhf.deb ... 732s Unpacking cpp-arm-linux-gnueabihf (4:14.2.0-1ubuntu1) ... 733s Selecting previously unselected package cpp. 733s Preparing to unpack .../010-cpp_4%3a14.2.0-1ubuntu1_armhf.deb ... 733s Unpacking cpp (4:14.2.0-1ubuntu1) ... 733s Selecting previously unselected package libcc1-0:armhf. 733s Preparing to unpack .../011-libcc1-0_15-20250222-0ubuntu1_armhf.deb ... 733s Unpacking libcc1-0:armhf (15-20250222-0ubuntu1) ... 733s Selecting previously unselected package libgomp1:armhf. 733s Preparing to unpack .../012-libgomp1_15-20250222-0ubuntu1_armhf.deb ... 733s Unpacking libgomp1:armhf (15-20250222-0ubuntu1) ... 733s Selecting previously unselected package libasan8:armhf. 733s Preparing to unpack .../013-libasan8_15-20250222-0ubuntu1_armhf.deb ... 733s Unpacking libasan8:armhf (15-20250222-0ubuntu1) ... 733s Selecting previously unselected package libubsan1:armhf. 733s Preparing to unpack .../014-libubsan1_15-20250222-0ubuntu1_armhf.deb ... 733s Unpacking libubsan1:armhf (15-20250222-0ubuntu1) ... 733s Selecting previously unselected package libgcc-14-dev:armhf. 733s Preparing to unpack .../015-libgcc-14-dev_14.2.0-17ubuntu3_armhf.deb ... 733s Unpacking libgcc-14-dev:armhf (14.2.0-17ubuntu3) ... 733s Selecting previously unselected package gcc-14-arm-linux-gnueabihf. 733s Preparing to unpack .../016-gcc-14-arm-linux-gnueabihf_14.2.0-17ubuntu3_armhf.deb ... 733s Unpacking gcc-14-arm-linux-gnueabihf (14.2.0-17ubuntu3) ... 733s Selecting previously unselected package gcc-14. 733s Preparing to unpack .../017-gcc-14_14.2.0-17ubuntu3_armhf.deb ... 733s Unpacking gcc-14 (14.2.0-17ubuntu3) ... 733s Selecting previously unselected package gcc-arm-linux-gnueabihf. 733s Preparing to unpack .../018-gcc-arm-linux-gnueabihf_4%3a14.2.0-1ubuntu1_armhf.deb ... 733s Unpacking gcc-arm-linux-gnueabihf (4:14.2.0-1ubuntu1) ... 733s Selecting previously unselected package gcc. 733s Preparing to unpack .../019-gcc_4%3a14.2.0-1ubuntu1_armhf.deb ... 733s Unpacking gcc (4:14.2.0-1ubuntu1) ... 733s Selecting previously unselected package libstdc++-14-dev:armhf. 733s Preparing to unpack .../020-libstdc++-14-dev_14.2.0-17ubuntu3_armhf.deb ... 733s Unpacking libstdc++-14-dev:armhf (14.2.0-17ubuntu3) ... 734s Selecting previously unselected package g++-14-arm-linux-gnueabihf. 734s Preparing to unpack .../021-g++-14-arm-linux-gnueabihf_14.2.0-17ubuntu3_armhf.deb ... 734s Unpacking g++-14-arm-linux-gnueabihf (14.2.0-17ubuntu3) ... 734s Selecting previously unselected package g++-14. 734s Preparing to unpack .../022-g++-14_14.2.0-17ubuntu3_armhf.deb ... 734s Unpacking g++-14 (14.2.0-17ubuntu3) ... 734s Selecting previously unselected package g++-arm-linux-gnueabihf. 734s Preparing to unpack .../023-g++-arm-linux-gnueabihf_4%3a14.2.0-1ubuntu1_armhf.deb ... 734s Unpacking g++-arm-linux-gnueabihf (4:14.2.0-1ubuntu1) ... 734s Selecting previously unselected package g++. 734s Preparing to unpack .../024-g++_4%3a14.2.0-1ubuntu1_armhf.deb ... 734s Unpacking g++ (4:14.2.0-1ubuntu1) ... 734s Selecting previously unselected package build-essential. 734s Preparing to unpack .../025-build-essential_12.10ubuntu1_armhf.deb ... 734s Unpacking build-essential (12.10ubuntu1) ... 734s Selecting previously unselected package dctrl-tools. 734s Preparing to unpack .../026-dctrl-tools_2.24-3build3_armhf.deb ... 734s Unpacking dctrl-tools (2.24-3build3) ... 734s Selecting previously unselected package libfreetype6:armhf. 734s Preparing to unpack .../027-libfreetype6_2.13.3+dfsg-1_armhf.deb ... 734s Unpacking libfreetype6:armhf (2.13.3+dfsg-1) ... 734s Selecting previously unselected package fonts-dejavu-mono. 734s Preparing to unpack .../028-fonts-dejavu-mono_2.37-8_all.deb ... 734s Unpacking fonts-dejavu-mono (2.37-8) ... 734s Selecting previously unselected package fonts-dejavu-core. 734s Preparing to unpack .../029-fonts-dejavu-core_2.37-8_all.deb ... 734s Unpacking fonts-dejavu-core (2.37-8) ... 734s Selecting previously unselected package fontconfig-config. 734s Preparing to unpack .../030-fontconfig-config_2.15.0-2ubuntu1_armhf.deb ... 735s Unpacking fontconfig-config (2.15.0-2ubuntu1) ... 735s Selecting previously unselected package libfontconfig1:armhf. 735s Preparing to unpack .../031-libfontconfig1_2.15.0-2ubuntu1_armhf.deb ... 735s Unpacking libfontconfig1:armhf (2.15.0-2ubuntu1) ... 735s Selecting previously unselected package fontconfig. 735s Preparing to unpack .../032-fontconfig_2.15.0-2ubuntu1_armhf.deb ... 735s Unpacking fontconfig (2.15.0-2ubuntu1) ... 735s Selecting previously unselected package fonts-font-awesome. 735s Preparing to unpack .../033-fonts-font-awesome_5.0.10+really4.7.0~dfsg-4.1_all.deb ... 735s Unpacking fonts-font-awesome (5.0.10+really4.7.0~dfsg-4.1) ... 735s Selecting previously unselected package fonts-glyphicons-halflings. 735s Preparing to unpack .../034-fonts-glyphicons-halflings_1.009~3.4.1+dfsg-3_all.deb ... 735s Unpacking fonts-glyphicons-halflings (1.009~3.4.1+dfsg-3) ... 735s Selecting previously unselected package fonts-mathjax. 735s Preparing to unpack .../035-fonts-mathjax_2.7.9+dfsg-1_all.deb ... 735s Unpacking fonts-mathjax (2.7.9+dfsg-1) ... 735s Selecting previously unselected package libgfortran5:armhf. 735s Preparing to unpack .../036-libgfortran5_15-20250222-0ubuntu1_armhf.deb ... 735s Unpacking libgfortran5:armhf (15-20250222-0ubuntu1) ... 735s Selecting previously unselected package libgfortran-14-dev:armhf. 735s Preparing to unpack .../037-libgfortran-14-dev_14.2.0-17ubuntu3_armhf.deb ... 735s Unpacking libgfortran-14-dev:armhf (14.2.0-17ubuntu3) ... 735s Selecting previously unselected package gfortran-14-arm-linux-gnueabihf. 735s Preparing to unpack .../038-gfortran-14-arm-linux-gnueabihf_14.2.0-17ubuntu3_armhf.deb ... 735s Unpacking gfortran-14-arm-linux-gnueabihf (14.2.0-17ubuntu3) ... 736s Selecting previously unselected package gfortran-14. 736s Preparing to unpack .../039-gfortran-14_14.2.0-17ubuntu3_armhf.deb ... 736s Unpacking gfortran-14 (14.2.0-17ubuntu3) ... 736s Selecting previously unselected package gfortran-arm-linux-gnueabihf. 736s Preparing to unpack .../040-gfortran-arm-linux-gnueabihf_4%3a14.2.0-1ubuntu1_armhf.deb ... 736s Unpacking gfortran-arm-linux-gnueabihf (4:14.2.0-1ubuntu1) ... 736s Selecting previously unselected package gfortran. 736s Preparing to unpack .../041-gfortran_4%3a14.2.0-1ubuntu1_armhf.deb ... 736s Unpacking gfortran (4:14.2.0-1ubuntu1) ... 736s Selecting previously unselected package icu-devtools. 736s Preparing to unpack .../042-icu-devtools_76.1-1ubuntu2_armhf.deb ... 736s Unpacking icu-devtools (76.1-1ubuntu2) ... 736s Selecting previously unselected package javascript-common. 736s Preparing to unpack .../043-javascript-common_12_all.deb ... 736s Unpacking javascript-common (12) ... 736s Selecting previously unselected package libblas3:armhf. 736s Preparing to unpack .../044-libblas3_3.12.1-2_armhf.deb ... 736s Unpacking libblas3:armhf (3.12.1-2) ... 736s Selecting previously unselected package libblas-dev:armhf. 736s Preparing to unpack .../045-libblas-dev_3.12.1-2_armhf.deb ... 736s Unpacking libblas-dev:armhf (3.12.1-2) ... 736s Selecting previously unselected package libbz2-dev:armhf. 736s Preparing to unpack .../046-libbz2-dev_1.0.8-6_armhf.deb ... 736s Unpacking libbz2-dev:armhf (1.0.8-6) ... 736s Selecting previously unselected package libpixman-1-0:armhf. 736s Preparing to unpack .../047-libpixman-1-0_0.44.0-3_armhf.deb ... 736s Unpacking libpixman-1-0:armhf (0.44.0-3) ... 736s Selecting previously unselected package libxcb-render0:armhf. 736s Preparing to unpack .../048-libxcb-render0_1.17.0-2_armhf.deb ... 736s Unpacking libxcb-render0:armhf (1.17.0-2) ... 736s Selecting previously unselected package libxcb-shm0:armhf. 736s Preparing to unpack .../049-libxcb-shm0_1.17.0-2_armhf.deb ... 736s Unpacking libxcb-shm0:armhf (1.17.0-2) ... 737s Selecting previously unselected package libxrender1:armhf. 737s Preparing to unpack .../050-libxrender1_1%3a0.9.10-1.1build1_armhf.deb ... 737s Unpacking libxrender1:armhf (1:0.9.10-1.1build1) ... 737s Selecting previously unselected package libcairo2:armhf. 737s Preparing to unpack .../051-libcairo2_1.18.2-2_armhf.deb ... 737s Unpacking libcairo2:armhf (1.18.2-2) ... 737s Selecting previously unselected package libdatrie1:armhf. 737s Preparing to unpack .../052-libdatrie1_0.2.13-3build1_armhf.deb ... 737s Unpacking libdatrie1:armhf (0.2.13-3build1) ... 737s Selecting previously unselected package libdeflate0:armhf. 737s Preparing to unpack .../053-libdeflate0_1.23-1_armhf.deb ... 737s Unpacking libdeflate0:armhf (1.23-1) ... 737s Selecting previously unselected package libdeflate-dev:armhf. 737s Preparing to unpack .../054-libdeflate-dev_1.23-1_armhf.deb ... 737s Unpacking libdeflate-dev:armhf (1.23-1) ... 737s Selecting previously unselected package libgraphite2-3:armhf. 737s Preparing to unpack .../055-libgraphite2-3_1.3.14-2ubuntu1_armhf.deb ... 737s Unpacking libgraphite2-3:armhf (1.3.14-2ubuntu1) ... 737s Selecting previously unselected package libharfbuzz0b:armhf. 737s Preparing to unpack .../056-libharfbuzz0b_10.2.0-1_armhf.deb ... 737s Unpacking libharfbuzz0b:armhf (10.2.0-1) ... 737s Selecting previously unselected package x11-common. 737s Preparing to unpack .../057-x11-common_1%3a7.7+23ubuntu3_all.deb ... 737s Unpacking x11-common (1:7.7+23ubuntu3) ... 737s Selecting previously unselected package libice6:armhf. 737s Preparing to unpack .../058-libice6_2%3a1.1.1-1_armhf.deb ... 737s Unpacking libice6:armhf (2:1.1.1-1) ... 737s Selecting previously unselected package libicu-dev:armhf. 737s Preparing to unpack .../059-libicu-dev_76.1-1ubuntu2_armhf.deb ... 737s Unpacking libicu-dev:armhf (76.1-1ubuntu2) ... 738s Selecting previously unselected package libjpeg-turbo8:armhf. 738s Preparing to unpack .../060-libjpeg-turbo8_2.1.5-3ubuntu2_armhf.deb ... 738s Unpacking libjpeg-turbo8:armhf (2.1.5-3ubuntu2) ... 738s Selecting previously unselected package libjpeg-turbo8-dev:armhf. 738s Preparing to unpack .../061-libjpeg-turbo8-dev_2.1.5-3ubuntu2_armhf.deb ... 738s Unpacking libjpeg-turbo8-dev:armhf (2.1.5-3ubuntu2) ... 738s Selecting previously unselected package libjpeg8:armhf. 738s Preparing to unpack .../062-libjpeg8_8c-2ubuntu11_armhf.deb ... 738s Unpacking libjpeg8:armhf (8c-2ubuntu11) ... 738s Selecting previously unselected package libjpeg8-dev:armhf. 738s Preparing to unpack .../063-libjpeg8-dev_8c-2ubuntu11_armhf.deb ... 738s Unpacking libjpeg8-dev:armhf (8c-2ubuntu11) ... 738s Selecting previously unselected package libjpeg-dev:armhf. 738s Preparing to unpack .../064-libjpeg-dev_8c-2ubuntu11_armhf.deb ... 738s Unpacking libjpeg-dev:armhf (8c-2ubuntu11) ... 738s Selecting previously unselected package libjs-bootstrap. 738s Preparing to unpack .../065-libjs-bootstrap_3.4.1+dfsg-3_all.deb ... 738s Unpacking libjs-bootstrap (3.4.1+dfsg-3) ... 738s Selecting previously unselected package libjs-popper.js. 738s Preparing to unpack .../066-libjs-popper.js_1.16.1+ds-6_all.deb ... 738s Unpacking libjs-popper.js (1.16.1+ds-6) ... 738s Selecting previously unselected package libjs-bootstrap4. 738s Preparing to unpack .../067-libjs-bootstrap4_4.6.1+dfsg1-4_all.deb ... 738s Unpacking libjs-bootstrap4 (4.6.1+dfsg1-4) ... 738s Selecting previously unselected package libjs-d3. 738s Preparing to unpack .../068-libjs-d3_3.5.17-4_all.deb ... 738s Unpacking libjs-d3 (3.5.17-4) ... 738s Selecting previously unselected package libjs-es5-shim. 738s Preparing to unpack .../069-libjs-es5-shim_4.6.7-2_all.deb ... 738s Unpacking libjs-es5-shim (4.6.7-2) ... 738s Selecting previously unselected package libjs-highlight.js. 738s Preparing to unpack .../070-libjs-highlight.js_9.18.5+dfsg1-2_all.deb ... 738s Unpacking libjs-highlight.js (9.18.5+dfsg1-2) ... 738s Selecting previously unselected package libjs-jquery. 738s Preparing to unpack .../071-libjs-jquery_3.6.1+dfsg+~3.5.14-1_all.deb ... 738s Unpacking libjs-jquery (3.6.1+dfsg+~3.5.14-1) ... 738s Selecting previously unselected package libjs-jquery-datatables. 738s Preparing to unpack .../072-libjs-jquery-datatables_1.11.5+dfsg-2_all.deb ... 738s Unpacking libjs-jquery-datatables (1.11.5+dfsg-2) ... 739s Selecting previously unselected package libjs-sifter.js. 739s Preparing to unpack .../073-libjs-sifter.js_0.6.0+dfsg-3_all.deb ... 739s Unpacking libjs-sifter.js (0.6.0+dfsg-3) ... 739s Selecting previously unselected package libjs-microplugin.js. 739s Preparing to unpack .../074-libjs-microplugin.js_0.0.3+dfsg-1.1_all.deb ... 739s Unpacking libjs-microplugin.js (0.0.3+dfsg-1.1) ... 739s Selecting previously unselected package libjs-jquery-selectize.js. 739s Preparing to unpack .../075-libjs-jquery-selectize.js_0.12.6+dfsg-1.1_all.deb ... 739s Unpacking libjs-jquery-selectize.js (0.12.6+dfsg-1.1) ... 739s Selecting previously unselected package libjs-jquery-ui. 739s Preparing to unpack .../076-libjs-jquery-ui_1.13.2+dfsg-1_all.deb ... 739s Unpacking libjs-jquery-ui (1.13.2+dfsg-1) ... 739s Selecting previously unselected package libjs-json. 739s Preparing to unpack .../077-libjs-json_0~20221030+~1.0.8-1_all.deb ... 739s Unpacking libjs-json (0~20221030+~1.0.8-1) ... 739s Selecting previously unselected package libjs-prettify. 739s Preparing to unpack .../078-libjs-prettify_2015.12.04+dfsg-1.1_all.deb ... 739s Unpacking libjs-prettify (2015.12.04+dfsg-1.1) ... 739s Selecting previously unselected package liblapack3:armhf. 739s Preparing to unpack .../079-liblapack3_3.12.1-2_armhf.deb ... 739s Unpacking liblapack3:armhf (3.12.1-2) ... 739s Selecting previously unselected package liblapack-dev:armhf. 739s Preparing to unpack .../080-liblapack-dev_3.12.1-2_armhf.deb ... 739s Unpacking liblapack-dev:armhf (3.12.1-2) ... 739s Selecting previously unselected package liblerc4:armhf. 739s Preparing to unpack .../081-liblerc4_4.0.0+ds-5ubuntu1_armhf.deb ... 739s Unpacking liblerc4:armhf (4.0.0+ds-5ubuntu1) ... 739s Selecting previously unselected package liblua5.4-0:armhf. 739s Preparing to unpack .../082-liblua5.4-0_5.4.7-1_armhf.deb ... 739s Unpacking liblua5.4-0:armhf (5.4.7-1) ... 739s Selecting previously unselected package libncurses-dev:armhf. 739s Preparing to unpack .../083-libncurses-dev_6.5+20250216-2_armhf.deb ... 739s Unpacking libncurses-dev:armhf (6.5+20250216-2) ... 739s Selecting previously unselected package libthai-data. 740s Preparing to unpack .../084-libthai-data_0.1.29-2build1_all.deb ... 740s Unpacking libthai-data (0.1.29-2build1) ... 740s Selecting previously unselected package libthai0:armhf. 740s Preparing to unpack .../085-libthai0_0.1.29-2build1_armhf.deb ... 740s Unpacking libthai0:armhf (0.1.29-2build1) ... 740s Selecting previously unselected package libpango-1.0-0:armhf. 740s Preparing to unpack .../086-libpango-1.0-0_1.56.2-1_armhf.deb ... 740s Unpacking libpango-1.0-0:armhf (1.56.2-1) ... 740s Selecting previously unselected package libpangoft2-1.0-0:armhf. 740s Preparing to unpack .../087-libpangoft2-1.0-0_1.56.2-1_armhf.deb ... 740s Unpacking libpangoft2-1.0-0:armhf (1.56.2-1) ... 740s Selecting previously unselected package libpangocairo-1.0-0:armhf. 740s Preparing to unpack .../088-libpangocairo-1.0-0_1.56.2-1_armhf.deb ... 740s Unpacking libpangocairo-1.0-0:armhf (1.56.2-1) ... 740s Selecting previously unselected package libpaper2:armhf. 740s Preparing to unpack .../089-libpaper2_2.2.5-0.3_armhf.deb ... 740s Unpacking libpaper2:armhf (2.2.5-0.3) ... 740s Selecting previously unselected package libpaper-utils. 740s Preparing to unpack .../090-libpaper-utils_2.2.5-0.3_armhf.deb ... 740s Unpacking libpaper-utils (2.2.5-0.3) ... 740s Selecting previously unselected package libpcre2-16-0:armhf. 740s Preparing to unpack .../091-libpcre2-16-0_10.45-1_armhf.deb ... 740s Unpacking libpcre2-16-0:armhf (10.45-1) ... 740s Selecting previously unselected package libpcre2-32-0:armhf. 740s Preparing to unpack .../092-libpcre2-32-0_10.45-1_armhf.deb ... 740s Unpacking libpcre2-32-0:armhf (10.45-1) ... 740s Selecting previously unselected package libpcre2-posix3:armhf. 740s Preparing to unpack .../093-libpcre2-posix3_10.45-1_armhf.deb ... 740s Unpacking libpcre2-posix3:armhf (10.45-1) ... 740s Selecting previously unselected package libpcre2-dev:armhf. 740s Preparing to unpack .../094-libpcre2-dev_10.45-1_armhf.deb ... 740s Unpacking libpcre2-dev:armhf (10.45-1) ... 740s Selecting previously unselected package libpkgconf3:armhf. 740s Preparing to unpack .../095-libpkgconf3_1.8.1-4_armhf.deb ... 740s Unpacking libpkgconf3:armhf (1.8.1-4) ... 740s Selecting previously unselected package zlib1g-dev:armhf. 740s Preparing to unpack .../096-zlib1g-dev_1%3a1.3.dfsg+really1.3.1-1ubuntu1_armhf.deb ... 740s Unpacking zlib1g-dev:armhf (1:1.3.dfsg+really1.3.1-1ubuntu1) ... 740s Selecting previously unselected package libpng-dev:armhf. 740s Preparing to unpack .../097-libpng-dev_1.6.47-1_armhf.deb ... 740s Unpacking libpng-dev:armhf (1.6.47-1) ... 740s Selecting previously unselected package libreadline-dev:armhf. 741s Preparing to unpack .../098-libreadline-dev_8.2-6_armhf.deb ... 741s Unpacking libreadline-dev:armhf (8.2-6) ... 741s Selecting previously unselected package libsharpyuv0:armhf. 741s Preparing to unpack .../099-libsharpyuv0_1.5.0-0.1_armhf.deb ... 741s Unpacking libsharpyuv0:armhf (1.5.0-0.1) ... 741s Selecting previously unselected package libsm6:armhf. 741s Preparing to unpack .../100-libsm6_2%3a1.2.4-1_armhf.deb ... 741s Unpacking libsm6:armhf (2:1.2.4-1) ... 741s Selecting previously unselected package libtcl8.6:armhf. 741s Preparing to unpack .../101-libtcl8.6_8.6.16+dfsg-1_armhf.deb ... 741s Unpacking libtcl8.6:armhf (8.6.16+dfsg-1) ... 741s Selecting previously unselected package libjbig0:armhf. 741s Preparing to unpack .../102-libjbig0_2.1-6.1ubuntu2_armhf.deb ... 741s Unpacking libjbig0:armhf (2.1-6.1ubuntu2) ... 741s Selecting previously unselected package libwebp7:armhf. 741s Preparing to unpack .../103-libwebp7_1.5.0-0.1_armhf.deb ... 741s Unpacking libwebp7:armhf (1.5.0-0.1) ... 741s Selecting previously unselected package libtiff6:armhf. 741s Preparing to unpack .../104-libtiff6_4.5.1+git230720-4ubuntu4_armhf.deb ... 741s Unpacking libtiff6:armhf (4.5.1+git230720-4ubuntu4) ... 741s Selecting previously unselected package libxft2:armhf. 741s Preparing to unpack .../105-libxft2_2.3.6-1build1_armhf.deb ... 741s Unpacking libxft2:armhf (2.3.6-1build1) ... 741s Selecting previously unselected package libxss1:armhf. 741s Preparing to unpack .../106-libxss1_1%3a1.2.3-1build3_armhf.deb ... 741s Unpacking libxss1:armhf (1:1.2.3-1build3) ... 741s Selecting previously unselected package libtk8.6:armhf. 741s Preparing to unpack .../107-libtk8.6_8.6.16-1_armhf.deb ... 741s Unpacking libtk8.6:armhf (8.6.16-1) ... 741s Selecting previously unselected package libxt6t64:armhf. 741s Preparing to unpack .../108-libxt6t64_1%3a1.2.1-1.2build1_armhf.deb ... 741s Unpacking libxt6t64:armhf (1:1.2.1-1.2build1) ... 741s Selecting previously unselected package zip. 741s Preparing to unpack .../109-zip_3.0-14ubuntu2_armhf.deb ... 741s Unpacking zip (3.0-14ubuntu2) ... 742s Selecting previously unselected package unzip. 742s Preparing to unpack .../110-unzip_6.0-28ubuntu6_armhf.deb ... 742s Unpacking unzip (6.0-28ubuntu6) ... 742s Selecting previously unselected package xdg-utils. 742s Preparing to unpack .../111-xdg-utils_1.2.1-2ubuntu1_all.deb ... 742s Unpacking xdg-utils (1.2.1-2ubuntu1) ... 742s Selecting previously unselected package r-base-core. 742s Preparing to unpack .../112-r-base-core_4.4.3-1_armhf.deb ... 742s Unpacking r-base-core (4.4.3-1) ... 743s Selecting previously unselected package r-cran-littler. 743s Preparing to unpack .../113-r-cran-littler_0.3.20-2_armhf.deb ... 743s Unpacking r-cran-littler (0.3.20-2) ... 743s Selecting previously unselected package littler. 743s Preparing to unpack .../114-littler_0.3.20-2_all.deb ... 743s Unpacking littler (0.3.20-2) ... 743s Selecting previously unselected package node-bootstrap-sass. 743s Preparing to unpack .../115-node-bootstrap-sass_3.4.3-2_all.deb ... 743s Unpacking node-bootstrap-sass (3.4.3-2) ... 743s Selecting previously unselected package node-html5shiv. 743s Preparing to unpack .../116-node-html5shiv_3.7.3+dfsg-5_all.deb ... 743s Unpacking node-html5shiv (3.7.3+dfsg-5) ... 743s Selecting previously unselected package node-normalize.css. 743s Preparing to unpack .../117-node-normalize.css_8.0.1-5_all.deb ... 743s Unpacking node-normalize.css (8.0.1-5) ... 743s Selecting previously unselected package pandoc-data. 743s Preparing to unpack .../118-pandoc-data_3.1.11.1-3build1_all.deb ... 743s Unpacking pandoc-data (3.1.11.1-3build1) ... 743s Selecting previously unselected package pandoc. 743s Preparing to unpack .../119-pandoc_3.1.11.1+ds-2_armhf.deb ... 743s Unpacking pandoc (3.1.11.1+ds-2) ... 745s Selecting previously unselected package liblzma-dev:armhf. 745s Preparing to unpack .../120-liblzma-dev_5.6.4-1_armhf.deb ... 745s Unpacking liblzma-dev:armhf (5.6.4-1) ... 746s Selecting previously unselected package pkgconf-bin. 746s Preparing to unpack .../121-pkgconf-bin_1.8.1-4_armhf.deb ... 746s Unpacking pkgconf-bin (1.8.1-4) ... 746s Selecting previously unselected package pkgconf:armhf. 746s Preparing to unpack .../122-pkgconf_1.8.1-4_armhf.deb ... 746s Unpacking pkgconf:armhf (1.8.1-4) ... 746s Selecting previously unselected package libtirpc-dev:armhf. 746s Preparing to unpack .../123-libtirpc-dev_1.3.4+ds-1.3_armhf.deb ... 746s Unpacking libtirpc-dev:armhf (1.3.4+ds-1.3) ... 746s Selecting previously unselected package r-base-dev. 746s Preparing to unpack .../124-r-base-dev_4.4.3-1_all.deb ... 746s Unpacking r-base-dev (4.4.3-1) ... 746s Selecting previously unselected package pkg-r-autopkgtest. 746s Preparing to unpack .../125-pkg-r-autopkgtest_20231212ubuntu1_all.deb ... 746s Unpacking pkg-r-autopkgtest (20231212ubuntu1) ... 746s Selecting previously unselected package r-cran-base64enc. 746s Preparing to unpack .../126-r-cran-base64enc_0.1-3-3_armhf.deb ... 746s Unpacking r-cran-base64enc (0.1-3-3) ... 746s Selecting previously unselected package r-cran-rlang. 746s Preparing to unpack .../127-r-cran-rlang_1.1.5-1_armhf.deb ... 746s Unpacking r-cran-rlang (1.1.5-1) ... 746s Selecting previously unselected package r-cran-fastmap. 746s Preparing to unpack .../128-r-cran-fastmap_1.2.0-1_armhf.deb ... 746s Unpacking r-cran-fastmap (1.2.0-1) ... 746s Selecting previously unselected package r-cran-cachem. 746s Preparing to unpack .../129-r-cran-cachem_1.1.0-1_armhf.deb ... 746s Unpacking r-cran-cachem (1.1.0-1) ... 746s Selecting previously unselected package r-cran-digest. 746s Preparing to unpack .../130-r-cran-digest_0.6.37-1_armhf.deb ... 746s Unpacking r-cran-digest (0.6.37-1) ... 746s Selecting previously unselected package r-cran-htmltools. 746s Preparing to unpack .../131-r-cran-htmltools_0.5.8.1-1_armhf.deb ... 746s Unpacking r-cran-htmltools (0.5.8.1-1) ... 747s Selecting previously unselected package r-cran-jquerylib. 747s Preparing to unpack .../132-r-cran-jquerylib_0.1.4+dfsg-4_all.deb ... 747s Unpacking r-cran-jquerylib (0.1.4+dfsg-4) ... 747s Selecting previously unselected package r-cran-jsonlite. 747s Preparing to unpack .../133-r-cran-jsonlite_1.9.1+dfsg-1_armhf.deb ... 747s Unpacking r-cran-jsonlite (1.9.1+dfsg-1) ... 747s Selecting previously unselected package r-cran-cli. 747s Preparing to unpack .../134-r-cran-cli_3.6.4-1_armhf.deb ... 747s Unpacking r-cran-cli (3.6.4-1) ... 747s Selecting previously unselected package r-cran-glue. 747s Preparing to unpack .../135-r-cran-glue_1.8.0-1_armhf.deb ... 747s Unpacking r-cran-glue (1.8.0-1) ... 747s Selecting previously unselected package r-cran-lifecycle. 747s Preparing to unpack .../136-r-cran-lifecycle_1.0.4+dfsg-1_all.deb ... 747s Unpacking r-cran-lifecycle (1.0.4+dfsg-1) ... 747s Selecting previously unselected package r-cran-memoise. 747s Preparing to unpack .../137-r-cran-memoise_2.0.1-1_all.deb ... 747s Unpacking r-cran-memoise (2.0.1-1) ... 747s Selecting previously unselected package r-cran-mime. 747s Preparing to unpack .../138-r-cran-mime_0.12-2_armhf.deb ... 747s Unpacking r-cran-mime (0.12-2) ... 747s Selecting previously unselected package r-cran-fs. 747s Preparing to unpack .../139-r-cran-fs_1.6.5+dfsg-1_armhf.deb ... 747s Unpacking r-cran-fs (1.6.5+dfsg-1) ... 747s Selecting previously unselected package r-cran-r6. 747s Preparing to unpack .../140-r-cran-r6_2.6.1-1_all.deb ... 747s Unpacking r-cran-r6 (2.6.1-1) ... 747s Selecting previously unselected package r-cran-rappdirs. 747s Preparing to unpack .../141-r-cran-rappdirs_0.3.3-1_armhf.deb ... 747s Unpacking r-cran-rappdirs (0.3.3-1) ... 747s Selecting previously unselected package r-cran-sass. 747s Preparing to unpack .../142-r-cran-sass_0.4.9+dfsg-1_armhf.deb ... 747s Unpacking r-cran-sass (0.4.9+dfsg-1) ... 747s Selecting previously unselected package r-cran-bslib. 748s Preparing to unpack .../143-r-cran-bslib_0.8.0+dfsg-1_all.deb ... 748s Unpacking r-cran-bslib (0.8.0+dfsg-1) ... 748s Selecting previously unselected package r-cran-commonmark. 748s Preparing to unpack .../144-r-cran-commonmark_1.9.2-2_armhf.deb ... 748s Unpacking r-cran-commonmark (1.9.2-2) ... 748s Selecting previously unselected package r-cran-crayon. 748s Preparing to unpack .../145-r-cran-crayon_1.5.3-1_all.deb ... 748s Unpacking r-cran-crayon (1.5.3-1) ... 748s Selecting previously unselected package r-cran-diffobj. 748s Preparing to unpack .../146-r-cran-diffobj_0.3.5-1_armhf.deb ... 748s Unpacking r-cran-diffobj (0.3.5-1) ... 748s Selecting previously unselected package r-cran-evaluate. 748s Preparing to unpack .../147-r-cran-evaluate_1.0.3-1_all.deb ... 748s Unpacking r-cran-evaluate (1.0.3-1) ... 748s Selecting previously unselected package r-cran-fontawesome. 748s Preparing to unpack .../148-r-cran-fontawesome_0.5.3-1_all.deb ... 748s Unpacking r-cran-fontawesome (0.5.3-1) ... 748s Selecting previously unselected package r-cran-xfun. 748s Preparing to unpack .../149-r-cran-xfun_0.51+dfsg-1_armhf.deb ... 748s Unpacking r-cran-xfun (0.51+dfsg-1) ... 748s Selecting previously unselected package r-cran-highr. 749s Preparing to unpack .../150-r-cran-highr_0.11+dfsg-1_all.deb ... 749s Unpacking r-cran-highr (0.11+dfsg-1) ... 749s Selecting previously unselected package r-cran-pkgkitten. 749s Preparing to unpack .../151-r-cran-pkgkitten_0.2.4-1_all.deb ... 749s Unpacking r-cran-pkgkitten (0.2.4-1) ... 749s Selecting previously unselected package r-cran-rcpp. 749s Preparing to unpack .../152-r-cran-rcpp_1.0.14-1_armhf.deb ... 749s Unpacking r-cran-rcpp (1.0.14-1) ... 749s Selecting previously unselected package r-cran-later. 749s Preparing to unpack .../153-r-cran-later_1.4.1+dfsg-1_armhf.deb ... 749s Unpacking r-cran-later (1.4.1+dfsg-1) ... 749s Selecting previously unselected package r-cran-magrittr. 749s Preparing to unpack .../154-r-cran-magrittr_2.0.3-1_armhf.deb ... 749s Unpacking r-cran-magrittr (2.0.3-1) ... 749s Selecting previously unselected package r-cran-promises. 749s Preparing to unpack .../155-r-cran-promises_1.3.2+dfsg-1_armhf.deb ... 749s Unpacking r-cran-promises (1.3.2+dfsg-1) ... 749s Selecting previously unselected package r-cran-httpuv. 749s Preparing to unpack .../156-r-cran-httpuv_1.6.15+dfsg-1_armhf.deb ... 749s Unpacking r-cran-httpuv (1.6.15+dfsg-1) ... 749s Selecting previously unselected package r-cran-yaml. 749s Preparing to unpack .../157-r-cran-yaml_2.3.10-1_armhf.deb ... 749s Unpacking r-cran-yaml (2.3.10-1) ... 749s Selecting previously unselected package libjs-mathjax. 749s Preparing to unpack .../158-libjs-mathjax_2.7.9+dfsg-1_all.deb ... 749s Unpacking libjs-mathjax (2.7.9+dfsg-1) ... 750s Selecting previously unselected package r-cran-knitr. 750s Preparing to unpack .../159-r-cran-knitr_1.49+dfsg-1_all.deb ... 750s Unpacking r-cran-knitr (1.49+dfsg-1) ... 750s Selecting previously unselected package r-cran-tinytex. 750s Preparing to unpack .../160-r-cran-tinytex_0.56-1_all.deb ... 750s Unpacking r-cran-tinytex (0.56-1) ... 751s Selecting previously unselected package libjs-modernizr. 751s Preparing to unpack .../161-libjs-modernizr_3.13.0-0.1_all.deb ... 751s Unpacking libjs-modernizr (3.13.0-0.1) ... 751s Selecting previously unselected package r-cran-xtable. 751s Preparing to unpack .../162-r-cran-xtable_1%3a1.8-4-2_all.deb ... 751s Unpacking r-cran-xtable (1:1.8-4-2) ... 751s Selecting previously unselected package r-cran-sourcetools. 751s Preparing to unpack .../163-r-cran-sourcetools_0.1.7-1-1_armhf.deb ... 751s Unpacking r-cran-sourcetools (0.1.7-1-1) ... 751s Selecting previously unselected package r-cran-withr. 751s Preparing to unpack .../164-r-cran-withr_3.0.2+dfsg-1_all.deb ... 751s Unpacking r-cran-withr (3.0.2+dfsg-1) ... 751s Selecting previously unselected package libjs-twitter-bootstrap-datepicker. 751s Preparing to unpack .../165-libjs-twitter-bootstrap-datepicker_1.3.1+dfsg1-4.1_all.deb ... 751s Unpacking libjs-twitter-bootstrap-datepicker (1.3.1+dfsg1-4.1) ... 751s Selecting previously unselected package r-cran-shiny. 751s Preparing to unpack .../166-r-cran-shiny_1.10.0+dfsg-2_all.deb ... 751s Unpacking r-cran-shiny (1.10.0+dfsg-2) ... 751s Selecting previously unselected package r-cran-rmarkdown. 751s Preparing to unpack .../167-r-cran-rmarkdown_2.29+dfsg-1_all.deb ... 751s Unpacking r-cran-rmarkdown (2.29+dfsg-1) ... 751s Setting up libjs-json (0~20221030+~1.0.8-1) ... 751s Setting up javascript-common (12) ... 751s Setting up libgraphite2-3:armhf (1.3.14-2ubuntu1) ... 751s Setting up libpixman-1-0:armhf (0.44.0-3) ... 751s Setting up libsharpyuv0:armhf (1.5.0-0.1) ... 751s Setting up fonts-mathjax (2.7.9+dfsg-1) ... 751s Setting up liblerc4:armhf (4.0.0+ds-5ubuntu1) ... 751s Setting up libjs-mathjax (2.7.9+dfsg-1) ... 751s Setting up libxrender1:armhf (1:0.9.10-1.1build1) ... 751s Setting up libdatrie1:armhf (0.2.13-3build1) ... 751s Setting up libjs-popper.js (1.16.1+ds-6) ... 751s Setting up libxcb-render0:armhf (1.17.0-2) ... 751s Setting up libjs-sifter.js (0.6.0+dfsg-3) ... 751s Setting up fonts-glyphicons-halflings (1.009~3.4.1+dfsg-3) ... 751s Setting up unzip (6.0-28ubuntu6) ... 751s Setting up x11-common (1:7.7+23ubuntu3) ... 752s Setting up node-html5shiv (3.7.3+dfsg-5) ... 752s Setting up libdeflate0:armhf (1.23-1) ... 752s Setting up linux-libc-dev:armhf (6.14.0-10.10) ... 752s Setting up libjs-microplugin.js (0.0.3+dfsg-1.1) ... 752s Setting up libxcb-shm0:armhf (1.17.0-2) ... 752s Setting up libgomp1:armhf (15-20250222-0ubuntu1) ... 752s Setting up libjs-modernizr (3.13.0-0.1) ... 752s Setting up libjbig0:armhf (2.1-6.1ubuntu2) ... 752s Setting up libpcre2-16-0:armhf (10.45-1) ... 752s Setting up libjs-es5-shim (4.6.7-2) ... 752s Setting up zip (3.0-14ubuntu2) ... 752s Setting up libpcre2-32-0:armhf (10.45-1) ... 752s Setting up libblas3:armhf (3.12.1-2) ... 752s update-alternatives: using /usr/lib/arm-linux-gnueabihf/blas/libblas.so.3 to provide /usr/lib/arm-linux-gnueabihf/libblas.so.3 (libblas.so.3-arm-linux-gnueabihf) in auto mode 752s Setting up libtirpc-dev:armhf (1.3.4+ds-1.3) ... 752s Setting up libpkgconf3:armhf (1.8.1-4) ... 752s Setting up rpcsvc-proto (1.4.2-0ubuntu7) ... 752s Setting up libfreetype6:armhf (2.13.3+dfsg-1) ... 752s Setting up libjs-d3 (3.5.17-4) ... 752s Setting up fonts-dejavu-mono (2.37-8) ... 752s Setting up libmpc3:armhf (1.3.1-1build2) ... 752s Setting up libtcl8.6:armhf (8.6.16+dfsg-1) ... 752s Setting up icu-devtools (76.1-1ubuntu2) ... 752s Setting up fonts-dejavu-core (2.37-8) ... 752s Setting up pkgconf-bin (1.8.1-4) ... 752s Setting up libjpeg-turbo8:armhf (2.1.5-3ubuntu2) ... 752s Setting up libgfortran5:armhf (15-20250222-0ubuntu1) ... 752s Setting up libwebp7:armhf (1.5.0-0.1) ... 752s Setting up liblzma-dev:armhf (5.6.4-1) ... 752s Setting up libubsan1:armhf (15-20250222-0ubuntu1) ... 752s Setting up libpcre2-posix3:armhf (10.45-1) ... 752s Setting up libjs-highlight.js (9.18.5+dfsg1-2) ... 752s Setting up libcrypt-dev:armhf (1:4.4.38-1) ... 752s Setting up libasan8:armhf (15-20250222-0ubuntu1) ... 752s Setting up liblua5.4-0:armhf (5.4.7-1) ... 752s Setting up libharfbuzz0b:armhf (10.2.0-1) ... 752s Setting up libthai-data (0.1.29-2build1) ... 752s Setting up node-bootstrap-sass (3.4.3-2) ... 752s Setting up libjs-prettify (2015.12.04+dfsg-1.1) ... 752s Setting up libxss1:armhf (1:1.2.3-1build3) ... 752s Setting up libjs-bootstrap4 (4.6.1+dfsg1-4) ... 752s Setting up libpaper2:armhf (2.2.5-0.3) ... 752s Setting up pandoc-data (3.1.11.1-3build1) ... 752s Setting up libjs-jquery (3.6.1+dfsg+~3.5.14-1) ... 752s Setting up libgcc-14-dev:armhf (14.2.0-17ubuntu3) ... 752s Setting up libisl23:armhf (0.27-1) ... 752s Setting up libc-dev-bin (2.41-1ubuntu2) ... 752s Setting up libdeflate-dev:armhf (1.23-1) ... 752s Setting up node-normalize.css (8.0.1-5) ... 752s Setting up fonts-font-awesome (5.0.10+really4.7.0~dfsg-4.1) ... 752s Setting up xdg-utils (1.2.1-2ubuntu1) ... 752s update-alternatives: using /usr/bin/xdg-open to provide /usr/bin/open (open) in auto mode 752s Setting up libcc1-0:armhf (15-20250222-0ubuntu1) ... 752s Setting up libblas-dev:armhf (3.12.1-2) ... 752s update-alternatives: using /usr/lib/arm-linux-gnueabihf/blas/libblas.so to provide /usr/lib/arm-linux-gnueabihf/libblas.so (libblas.so-arm-linux-gnueabihf) in auto mode 752s Setting up dctrl-tools (2.24-3build3) ... 752s Setting up libjs-bootstrap (3.4.1+dfsg-3) ... 752s Setting up cpp-14-arm-linux-gnueabihf (14.2.0-17ubuntu3) ... 752s Setting up libjs-jquery-selectize.js (0.12.6+dfsg-1.1) ... 752s Setting up libjpeg8:armhf (8c-2ubuntu11) ... 752s Setting up libgfortran-14-dev:armhf (14.2.0-17ubuntu3) ... 753s Setting up libice6:armhf (2:1.1.1-1) ... 753s Setting up liblapack3:armhf (3.12.1-2) ... 753s update-alternatives: using /usr/lib/arm-linux-gnueabihf/lapack/liblapack.so.3 to provide /usr/lib/arm-linux-gnueabihf/liblapack.so.3 (liblapack.so.3-arm-linux-gnueabihf) in auto mode 753s Setting up fontconfig-config (2.15.0-2ubuntu1) ... 753s Setting up libjs-twitter-bootstrap-datepicker (1.3.1+dfsg1-4.1) ... 753s Setting up gcc-14-arm-linux-gnueabihf (14.2.0-17ubuntu3) ... 753s Setting up libpaper-utils (2.2.5-0.3) ... 753s Setting up libjs-jquery-datatables (1.11.5+dfsg-2) ... 753s Setting up pkgconf:armhf (1.8.1-4) ... 753s Setting up libthai0:armhf (0.1.29-2build1) ... 753s Setting up libjs-jquery-ui (1.13.2+dfsg-1) ... 753s Setting up pandoc (3.1.11.1+ds-2) ... 753s Setting up liblapack-dev:armhf (3.12.1-2) ... 753s update-alternatives: using /usr/lib/arm-linux-gnueabihf/lapack/liblapack.so to provide /usr/lib/arm-linux-gnueabihf/liblapack.so (liblapack.so-arm-linux-gnueabihf) in auto mode 753s Setting up cpp-14 (14.2.0-17ubuntu3) ... 753s Setting up libtiff6:armhf (4.5.1+git230720-4ubuntu4) ... 753s Setting up libc6-dev:armhf (2.41-1ubuntu2) ... 753s Setting up libfontconfig1:armhf (2.15.0-2ubuntu1) ... 753s Setting up libstdc++-14-dev:armhf (14.2.0-17ubuntu3) ... 753s Setting up libsm6:armhf (2:1.2.4-1) ... 753s Setting up libicu-dev:armhf (76.1-1ubuntu2) ... 753s Setting up cpp-arm-linux-gnueabihf (4:14.2.0-1ubuntu1) ... 753s Setting up gfortran-14-arm-linux-gnueabihf (14.2.0-17ubuntu3) ... 753s Setting up libbz2-dev:armhf (1.0.8-6) ... 753s Setting up gcc-arm-linux-gnueabihf (4:14.2.0-1ubuntu1) ... 753s Setting up g++-14-arm-linux-gnueabihf (14.2.0-17ubuntu3) ... 753s Setting up fontconfig (2.15.0-2ubuntu1) ... 755s Regenerating fonts cache... done. 755s Setting up libjpeg-turbo8-dev:armhf (2.1.5-3ubuntu2) ... 755s Setting up libxft2:armhf (2.3.6-1build1) ... 755s Setting up libncurses-dev:armhf (6.5+20250216-2) ... 755s Setting up libpcre2-dev:armhf (10.45-1) ... 755s Setting up libtk8.6:armhf (8.6.16-1) ... 755s Setting up libpango-1.0-0:armhf (1.56.2-1) ... 755s Setting up libreadline-dev:armhf (8.2-6) ... 755s Setting up libcairo2:armhf (1.18.2-2) ... 755s Setting up gcc-14 (14.2.0-17ubuntu3) ... 755s Setting up gfortran-arm-linux-gnueabihf (4:14.2.0-1ubuntu1) ... 755s Setting up libxt6t64:armhf (1:1.2.1-1.2build1) ... 755s Setting up zlib1g-dev:armhf (1:1.3.dfsg+really1.3.1-1ubuntu1) ... 755s Setting up cpp (4:14.2.0-1ubuntu1) ... 755s Setting up g++-14 (14.2.0-17ubuntu3) ... 755s Setting up libpangoft2-1.0-0:armhf (1.56.2-1) ... 755s Setting up libjpeg8-dev:armhf (8c-2ubuntu11) ... 755s Setting up gfortran-14 (14.2.0-17ubuntu3) ... 755s Setting up libpangocairo-1.0-0:armhf (1.56.2-1) ... 755s Setting up g++-arm-linux-gnueabihf (4:14.2.0-1ubuntu1) ... 755s Setting up libpng-dev:armhf (1.6.47-1) ... 755s Setting up libjpeg-dev:armhf (8c-2ubuntu11) ... 755s Setting up gcc (4:14.2.0-1ubuntu1) ... 755s Setting up r-base-core (4.4.3-1) ... 755s Creating config file /etc/R/Renviron with new version 756s Setting up r-cran-crayon (1.5.3-1) ... 756s Setting up r-cran-sourcetools (0.1.7-1-1) ... 756s Setting up g++ (4:14.2.0-1ubuntu1) ... 756s update-alternatives: using /usr/bin/g++ to provide /usr/bin/c++ (c++) in auto mode 756s Setting up build-essential (12.10ubuntu1) ... 756s Setting up r-cran-commonmark (1.9.2-2) ... 756s Setting up r-cran-r6 (2.6.1-1) ... 756s Setting up r-cran-pkgkitten (0.2.4-1) ... 756s Setting up r-cran-magrittr (2.0.3-1) ... 756s Setting up r-cran-rappdirs (0.3.3-1) ... 756s Setting up r-cran-littler (0.3.20-2) ... 756s Setting up r-cran-fs (1.6.5+dfsg-1) ... 756s Setting up r-cran-rcpp (1.0.14-1) ... 756s Setting up r-cran-diffobj (0.3.5-1) ... 756s Setting up r-cran-rlang (1.1.5-1) ... 756s Setting up littler (0.3.20-2) ... 756s Setting up r-cran-xfun (0.51+dfsg-1) ... 756s Setting up r-cran-withr (3.0.2+dfsg-1) ... 756s Setting up r-cran-mime (0.12-2) ... 756s Setting up r-cran-base64enc (0.1-3-3) ... 756s Setting up r-cran-digest (0.6.37-1) ... 756s Setting up r-cran-yaml (2.3.10-1) ... 756s Setting up r-cran-evaluate (1.0.3-1) ... 756s Setting up r-cran-highr (0.11+dfsg-1) ... 756s Setting up r-cran-glue (1.8.0-1) ... 756s Setting up r-cran-xtable (1:1.8-4-2) ... 756s Setting up r-cran-cli (3.6.4-1) ... 756s Setting up gfortran (4:14.2.0-1ubuntu1) ... 756s update-alternatives: using /usr/bin/gfortran to provide /usr/bin/f95 (f95) in auto mode 756s update-alternatives: warning: skip creation of /usr/share/man/man1/f95.1.gz because associated file /usr/share/man/man1/gfortran.1.gz (of link group f95) doesn't exist 756s update-alternatives: using /usr/bin/gfortran to provide /usr/bin/f77 (f77) in auto mode 756s update-alternatives: warning: skip creation of /usr/share/man/man1/f77.1.gz because associated file /usr/share/man/man1/gfortran.1.gz (of link group f77) doesn't exist 756s Setting up r-cran-lifecycle (1.0.4+dfsg-1) ... 756s Setting up r-cran-fastmap (1.2.0-1) ... 756s Setting up r-cran-jsonlite (1.9.1+dfsg-1) ... 756s Setting up r-cran-later (1.4.1+dfsg-1) ... 756s Setting up r-cran-htmltools (0.5.8.1-1) ... 756s Setting up r-cran-tinytex (0.56-1) ... 756s Setting up r-cran-knitr (1.49+dfsg-1) ... 756s Setting up r-cran-cachem (1.1.0-1) ... 756s Setting up r-cran-sass (0.4.9+dfsg-1) ... 756s Setting up r-base-dev (4.4.3-1) ... 756s Setting up r-cran-fontawesome (0.5.3-1) ... 756s Setting up r-cran-jquerylib (0.1.4+dfsg-4) ... 756s Setting up r-cran-memoise (2.0.1-1) ... 756s Setting up r-cran-promises (1.3.2+dfsg-1) ... 756s Setting up pkg-r-autopkgtest (20231212ubuntu1) ... 756s Setting up r-cran-httpuv (1.6.15+dfsg-1) ... 756s Setting up r-cran-bslib (0.8.0+dfsg-1) ... 756s Setting up r-cran-shiny (1.10.0+dfsg-2) ... 756s Setting up r-cran-rmarkdown (2.29+dfsg-1) ... 756s Processing triggers for libc-bin (2.41-1ubuntu2) ... 756s Processing triggers for man-db (2.13.0-1) ... 757s Processing triggers for install-info (7.1.1-1) ... 771s autopkgtest [16:16:46]: test pkg-r-autopkgtest: /usr/share/dh-r/pkg-r-autopkgtest 771s autopkgtest [16:16:46]: test pkg-r-autopkgtest: [----------------------- 773s Test: Try to load the R library diffobj 773s 773s R version 4.4.3 (2025-02-28) -- "Trophy Case" 773s Copyright (C) 2025 The R Foundation for Statistical Computing 773s Platform: arm-unknown-linux-gnueabihf (32-bit) 773s 773s R is free software and comes with ABSOLUTELY NO WARRANTY. 773s You are welcome to redistribute it under certain conditions. 773s Type 'license()' or 'licence()' for distribution details. 773s 773s R is a collaborative project with many contributors. 773s Type 'contributors()' for more information and 773s 'citation()' on how to cite R or R packages in publications. 773s 773s Type 'demo()' for some demos, 'help()' for on-line help, or 773s 'help.start()' for an HTML browser interface to help. 773s Type 'q()' to quit R. 773s 773s > library('diffobj') 773s > 773s > 773s Other tests are currently unsupported! 773s They will be progressively added. 774s autopkgtest [16:16:49]: test pkg-r-autopkgtest: -----------------------] 777s autopkgtest [16:16:52]: test pkg-r-autopkgtest: - - - - - - - - - - results - - - - - - - - - - 777s pkg-r-autopkgtest PASS 781s autopkgtest [16:16:56]: @@@@@@@@@@@@@@@@@@@@ summary 781s run-unit-test PASS 781s pkg-r-autopkgtest PASS