I: pbuilder: network access will be disabled during build I: Current time: Tue May 14 19:46:06 +14 2024 I: pbuilder-time-stamp: 1715665566 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/bookworm-reproducible-base.tgz] I: copying local configuration W: --override-config is not set; not updating apt.conf Read the manpage for details. I: mounting /proc filesystem I: mounting /sys filesystem I: creating /{dev,run}/shm I: mounting /dev/pts filesystem I: redirecting /dev/ptmx to /dev/pts/ptmx I: policy-rc.d already exists I: Copying source file I: copying [scm_5f3-4.dsc] I: copying [./scm_5f3.orig.tar.xz] I: copying [./scm_5f3-4.debian.tar.xz] I: Extracting source gpgv: Signature made Thu Jan 19 01:51:26 2023 +14 gpgv: using RSA key 9236557B170C87F8821C0AC3C1E0D92E986F7C7E gpgv: Can't check signature: No public key dpkg-source: warning: cannot verify inline signature for ./scm_5f3-4.dsc: no acceptable signature found dpkg-source: info: extracting scm in scm-5f3 dpkg-source: info: unpacking scm_5f3.orig.tar.xz dpkg-source: info: unpacking scm_5f3-4.debian.tar.xz dpkg-source: info: using patch list from debian/patches/series dpkg-source: info: applying not-usr-local.patch dpkg-source: info: applying kfreebsd_support.patch dpkg-source: info: applying ppc64_short_int.patch dpkg-source: info: applying hurd_maxpathlen.patch dpkg-source: info: applying add-missing-edit-line-feature.patch dpkg-source: info: applying fix-argument-imm-being-ignored-in-m_letstar1.patch dpkg-source: info: applying fix-readline-related-bug.patch dpkg-source: info: applying use-compiler-flags.patch dpkg-source: info: applying disable-bigrecy.patch dpkg-source: info: applying support-rv64-mips64el-s390x.patch I: Not using root during the build. I: Installing the build-deps I: user script /srv/workspace/pbuilder/28981/tmp/hooks/D01_modify_environment starting debug: Running on codethink13-arm64. I: Changing host+domainname to test build reproducibility I: Adding a custom variable just for the fun of it... I: Changing /bin/sh to bash lrwxrwxrwx 1 root root 4 Jan 6 2023 /bin/sh -> dash I: Setting pbuilder2's login shell to /bin/bash I: Setting pbuilder2's GECOS to second user,second room,second work-phone,second home-phone,second other I: user script /srv/workspace/pbuilder/28981/tmp/hooks/D01_modify_environment finished I: user script /srv/workspace/pbuilder/28981/tmp/hooks/D02_print_environment starting I: set BUILDDIR='/build' BUILDUSERGECOS='second user,second room,second work-phone,second home-phone,second other' BUILDUSERNAME='pbuilder2' BUILD_ARCH='arm64' DEBIAN_FRONTEND='noninteractive' DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=8' DISTRIBUTION='bookworm' HOME='/var/lib/jenkins' HOST_ARCH='arm64' IFS=' ' LANG='C' LANGUAGE='nl_BE:nl' LC_ALL='C' MAIL='/var/mail/root' OPTIND='1' PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path' PBCURRENTCOMMANDLINEOPERATION='build' PBUILDER_OPERATION='build' PBUILDER_PKGDATADIR='/usr/share/pbuilder' PBUILDER_PKGLIBDIR='/usr/lib/pbuilder' PBUILDER_SYSCONFDIR='/etc' PPID='28981' PS1='# ' PS2='> ' PS4='+ ' PWD='/' SHELL='/bin/bash' SHLVL='2' SUDO_COMMAND='/usr/bin/timeout -k 24.1h 24h /usr/bin/ionice -c 3 /usr/bin/nice -n 11 /usr/bin/unshare --uts -- /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.BJQMF4ru/pbuilderrc_6Vh3 --distribution bookworm --hookdir /etc/pbuilder/rebuild-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/bookworm-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.BJQMF4ru/b2 --logfile b2/build.log --extrapackages usrmerge scm_5f3-4.dsc' SUDO_GID='117' SUDO_UID='110' SUDO_USER='jenkins' TERM='unknown' TZ='/usr/share/zoneinfo/Etc/GMT-14' USER='root' USERNAME='root' _='/usr/bin/systemd-run' http_proxy='http://192.168.101.16:3128' I: uname -a Linux i-capture-the-hostname 4.15.0-208-generic #220-Ubuntu SMP Mon Mar 20 14:28:12 UTC 2023 aarch64 GNU/Linux I: ls -l /bin lrwxrwxrwx 1 root root 7 May 14 06:48 /bin -> usr/bin I: user script /srv/workspace/pbuilder/28981/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy Version: 0.invalid.0 Architecture: arm64 Maintainer: Debian Pbuilder Team Description: Dummy package to satisfy dependencies with aptitude - created by pbuilder This package was created automatically by pbuilder to satisfy the build-dependencies of the package being currently built. Depends: debhelper-compat (= 13), slib, libncurses-dev, libreadline-dev, texinfo, libx11-dev dpkg-deb: building package 'pbuilder-satisfydepends-dummy' in '/tmp/satisfydepends-aptitude/pbuilder-satisfydepends-dummy.deb'. Selecting previously unselected package pbuilder-satisfydepends-dummy. (Reading database ... 19616 files and directories currently installed.) Preparing to unpack .../pbuilder-satisfydepends-dummy.deb ... Unpacking pbuilder-satisfydepends-dummy (0.invalid.0) ... dpkg: pbuilder-satisfydepends-dummy: dependency problems, but configuring anyway as you requested: pbuilder-satisfydepends-dummy depends on debhelper-compat (= 13); however: Package debhelper-compat is not installed. pbuilder-satisfydepends-dummy depends on slib; however: Package slib is not installed. pbuilder-satisfydepends-dummy depends on libncurses-dev; however: Package libncurses-dev is not installed. pbuilder-satisfydepends-dummy depends on libreadline-dev; however: Package libreadline-dev is not installed. pbuilder-satisfydepends-dummy depends on texinfo; however: Package texinfo is not installed. pbuilder-satisfydepends-dummy depends on libx11-dev; however: Package libx11-dev is not installed. Setting up pbuilder-satisfydepends-dummy (0.invalid.0) ... Reading package lists... Building dependency tree... Reading state information... Initializing package states... Writing extended state information... Building tag database... pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) The following NEW packages will be installed: autoconf{a} automake{a} autopoint{a} autotools-dev{a} bsdextrautils{a} debhelper{a} dh-autoreconf{a} dh-strip-nondeterminism{a} dwz{a} file{a} gettext{a} gettext-base{a} groff-base{a} intltool-debian{a} libarchive-zip-perl{a} libbsd0{a} libdebhelper-perl{a} libelf1{a} libfile-stripnondeterminism-perl{a} libicu72{a} libmagic-mgc{a} libmagic1{a} libncurses-dev{a} libncurses6{a} libpipeline1{a} libpthread-stubs0-dev{a} libreadline-dev{a} libreadline8{a} libsub-override-perl{a} libtext-unidecode-perl{a} libtool{a} libuchardet0{a} libx11-6{a} libx11-data{a} libx11-dev{a} libxau-dev{a} libxau6{a} libxcb1{a} libxcb1-dev{a} libxdmcp-dev{a} libxdmcp6{a} libxml-libxml-perl{a} libxml-namespacesupport-perl{a} libxml-sax-base-perl{a} libxml-sax-perl{a} libxml2{a} m4{a} man-db{a} po-debconf{a} readline-common{a} sensible-utils{a} slib{a} tex-common{a} texinfo{a} ucf{a} x11proto-dev{a} xorg-sgml-doctools{a} xtrans-dev{a} The following packages are RECOMMENDED but will NOT be installed: curl libarchive-cpio-perl libgpm2 libltdl-dev libmail-sendmail-perl libwww-perl libxml-sax-expat-perl lynx wget 0 packages upgraded, 58 newly installed, 0 to remove and 0 not upgraded. Need to get 25.5 MB of archives. After unpacking 108 MB will be used. Writing extended state information... Get: 1 http://deb.debian.org/debian bookworm/main arm64 readline-common all 8.2-1.3 [69.0 kB] Get: 2 http://deb.debian.org/debian bookworm/main arm64 sensible-utils all 0.0.17+nmu1 [19.0 kB] Get: 3 http://deb.debian.org/debian bookworm/main arm64 libmagic-mgc arm64 1:5.44-3 [305 kB] Get: 4 http://deb.debian.org/debian bookworm/main arm64 libmagic1 arm64 1:5.44-3 [98.5 kB] Get: 5 http://deb.debian.org/debian bookworm/main arm64 file arm64 1:5.44-3 [42.5 kB] Get: 6 http://deb.debian.org/debian bookworm/main arm64 gettext-base arm64 0.21-12 [159 kB] Get: 7 http://deb.debian.org/debian bookworm/main arm64 libuchardet0 arm64 0.0.7-1 [67.9 kB] Get: 8 http://deb.debian.org/debian bookworm/main arm64 groff-base arm64 1.22.4-10 [861 kB] Get: 9 http://deb.debian.org/debian bookworm/main arm64 bsdextrautils arm64 2.38.1-5+b1 [86.9 kB] Get: 10 http://deb.debian.org/debian bookworm/main arm64 libpipeline1 arm64 1.5.7-1 [36.4 kB] Get: 11 http://deb.debian.org/debian bookworm/main arm64 man-db arm64 2.11.2-2 [1369 kB] Get: 12 http://deb.debian.org/debian bookworm/main arm64 ucf all 3.0043+nmu1 [55.2 kB] Get: 13 http://deb.debian.org/debian bookworm/main arm64 m4 arm64 1.4.19-3 [276 kB] Get: 14 http://deb.debian.org/debian bookworm/main arm64 autoconf all 2.71-3 [332 kB] Get: 15 http://deb.debian.org/debian bookworm/main arm64 autotools-dev all 20220109.1 [51.6 kB] Get: 16 http://deb.debian.org/debian bookworm/main arm64 automake all 1:1.16.5-1.3 [823 kB] Get: 17 http://deb.debian.org/debian bookworm/main arm64 autopoint all 0.21-12 [495 kB] Get: 18 http://deb.debian.org/debian bookworm/main arm64 libdebhelper-perl all 13.11.4 [81.2 kB] Get: 19 http://deb.debian.org/debian bookworm/main arm64 libtool all 2.4.7-5 [517 kB] Get: 20 http://deb.debian.org/debian bookworm/main arm64 dh-autoreconf all 20 [17.1 kB] Get: 21 http://deb.debian.org/debian bookworm/main arm64 libarchive-zip-perl all 1.68-1 [104 kB] Get: 22 http://deb.debian.org/debian bookworm/main arm64 libsub-override-perl all 0.09-4 [9304 B] Get: 23 http://deb.debian.org/debian bookworm/main arm64 libfile-stripnondeterminism-perl all 1.13.1-1 [19.4 kB] Get: 24 http://deb.debian.org/debian bookworm/main arm64 dh-strip-nondeterminism all 1.13.1-1 [8620 B] Get: 25 http://deb.debian.org/debian bookworm/main arm64 libelf1 arm64 0.188-2.1 [173 kB] Get: 26 http://deb.debian.org/debian bookworm/main arm64 dwz arm64 0.15-1 [101 kB] Get: 27 http://deb.debian.org/debian bookworm/main arm64 libicu72 arm64 72.1-3 [9204 kB] Get: 28 http://deb.debian.org/debian bookworm/main arm64 libxml2 arm64 2.9.14+dfsg-1.1+b3 [619 kB] Get: 29 http://deb.debian.org/debian bookworm/main arm64 gettext arm64 0.21-12 [1248 kB] Get: 30 http://deb.debian.org/debian bookworm/main arm64 intltool-debian all 0.35.0+20060710.6 [22.9 kB] Get: 31 http://deb.debian.org/debian bookworm/main arm64 po-debconf all 1.0.21+nmu1 [248 kB] Get: 32 http://deb.debian.org/debian bookworm/main arm64 debhelper all 13.11.4 [942 kB] Get: 33 http://deb.debian.org/debian bookworm/main arm64 libbsd0 arm64 0.11.7-2 [115 kB] Get: 34 http://deb.debian.org/debian bookworm/main arm64 libncurses6 arm64 6.4-2 [94.0 kB] Get: 35 http://deb.debian.org/debian bookworm/main arm64 libncurses-dev arm64 6.4-2 [335 kB] Get: 36 http://deb.debian.org/debian bookworm/main arm64 libpthread-stubs0-dev arm64 0.4-1 [5336 B] Get: 37 http://deb.debian.org/debian bookworm/main arm64 libreadline8 arm64 8.2-1.3 [155 kB] Get: 38 http://deb.debian.org/debian bookworm/main arm64 libreadline-dev arm64 8.2-1.3 [151 kB] Get: 39 http://deb.debian.org/debian bookworm/main arm64 libtext-unidecode-perl all 1.30-3 [101 kB] Get: 40 http://deb.debian.org/debian bookworm/main arm64 libxau6 arm64 1:1.0.9-1 [19.7 kB] Get: 41 http://deb.debian.org/debian bookworm/main arm64 libxdmcp6 arm64 1:1.1.2-3 [25.4 kB] Get: 42 http://deb.debian.org/debian bookworm/main arm64 libxcb1 arm64 1.15-1 [143 kB] Get: 43 http://deb.debian.org/debian bookworm/main arm64 libx11-data all 2:1.8.4-2 [292 kB] Get: 44 http://deb.debian.org/debian bookworm/main arm64 libx11-6 arm64 2:1.8.4-2 [736 kB] Get: 45 http://deb.debian.org/debian bookworm/main arm64 xorg-sgml-doctools all 1:1.11-1.1 [22.1 kB] Get: 46 http://deb.debian.org/debian bookworm/main arm64 x11proto-dev all 2022.1-1 [599 kB] Get: 47 http://deb.debian.org/debian bookworm/main arm64 libxau-dev arm64 1:1.0.9-1 [23.2 kB] Get: 48 http://deb.debian.org/debian bookworm/main arm64 libxdmcp-dev arm64 1:1.1.2-3 [41.2 kB] Get: 49 http://deb.debian.org/debian bookworm/main arm64 xtrans-dev all 1.4.0-1 [98.7 kB] Get: 50 http://deb.debian.org/debian bookworm/main arm64 libxcb1-dev arm64 1.15-1 [182 kB] Get: 51 http://deb.debian.org/debian bookworm/main arm64 libx11-dev arm64 2:1.8.4-2 [817 kB] Get: 52 http://deb.debian.org/debian bookworm/main arm64 libxml-namespacesupport-perl all 1.12-2 [15.1 kB] Get: 53 http://deb.debian.org/debian bookworm/main arm64 libxml-sax-base-perl all 1.09-3 [20.6 kB] Get: 54 http://deb.debian.org/debian bookworm/main arm64 libxml-sax-perl all 1.02+dfsg-3 [59.4 kB] Get: 55 http://deb.debian.org/debian bookworm/main arm64 libxml-libxml-perl arm64 2.0207+dfsg+really+2.0134-1+b1 [309 kB] Get: 56 http://deb.debian.org/debian bookworm/main arm64 slib all 3b6-3 [837 kB] Get: 57 http://deb.debian.org/debian bookworm/main arm64 tex-common all 6.18 [32.5 kB] Get: 58 http://deb.debian.org/debian bookworm/main arm64 texinfo arm64 6.8-6+b1 [1808 kB] Fetched 25.5 MB in 1s (45.2 MB/s) debconf: delaying package configuration, since apt-utils is not installed Selecting previously unselected package readline-common. (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 ... 19616 files and directories currently installed.) Preparing to unpack .../00-readline-common_8.2-1.3_all.deb ... Unpacking readline-common (8.2-1.3) ... Selecting previously unselected package sensible-utils. Preparing to unpack .../01-sensible-utils_0.0.17+nmu1_all.deb ... Unpacking sensible-utils (0.0.17+nmu1) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../02-libmagic-mgc_1%3a5.44-3_arm64.deb ... Unpacking libmagic-mgc (1:5.44-3) ... Selecting previously unselected package libmagic1:arm64. Preparing to unpack .../03-libmagic1_1%3a5.44-3_arm64.deb ... Unpacking libmagic1:arm64 (1:5.44-3) ... Selecting previously unselected package file. Preparing to unpack .../04-file_1%3a5.44-3_arm64.deb ... Unpacking file (1:5.44-3) ... Selecting previously unselected package gettext-base. Preparing to unpack .../05-gettext-base_0.21-12_arm64.deb ... Unpacking gettext-base (0.21-12) ... Selecting previously unselected package libuchardet0:arm64. Preparing to unpack .../06-libuchardet0_0.0.7-1_arm64.deb ... Unpacking libuchardet0:arm64 (0.0.7-1) ... Selecting previously unselected package groff-base. Preparing to unpack .../07-groff-base_1.22.4-10_arm64.deb ... Unpacking groff-base (1.22.4-10) ... Selecting previously unselected package bsdextrautils. Preparing to unpack .../08-bsdextrautils_2.38.1-5+b1_arm64.deb ... Unpacking bsdextrautils (2.38.1-5+b1) ... Selecting previously unselected package libpipeline1:arm64. Preparing to unpack .../09-libpipeline1_1.5.7-1_arm64.deb ... Unpacking libpipeline1:arm64 (1.5.7-1) ... Selecting previously unselected package man-db. Preparing to unpack .../10-man-db_2.11.2-2_arm64.deb ... Unpacking man-db (2.11.2-2) ... Selecting previously unselected package ucf. Preparing to unpack .../11-ucf_3.0043+nmu1_all.deb ... Moving old data out of the way Unpacking ucf (3.0043+nmu1) ... Selecting previously unselected package m4. Preparing to unpack .../12-m4_1.4.19-3_arm64.deb ... Unpacking m4 (1.4.19-3) ... Selecting previously unselected package autoconf. Preparing to unpack .../13-autoconf_2.71-3_all.deb ... Unpacking autoconf (2.71-3) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../14-autotools-dev_20220109.1_all.deb ... Unpacking autotools-dev (20220109.1) ... Selecting previously unselected package automake. Preparing to unpack .../15-automake_1%3a1.16.5-1.3_all.deb ... Unpacking automake (1:1.16.5-1.3) ... Selecting previously unselected package autopoint. Preparing to unpack .../16-autopoint_0.21-12_all.deb ... Unpacking autopoint (0.21-12) ... Selecting previously unselected package libdebhelper-perl. Preparing to unpack .../17-libdebhelper-perl_13.11.4_all.deb ... Unpacking libdebhelper-perl (13.11.4) ... Selecting previously unselected package libtool. Preparing to unpack .../18-libtool_2.4.7-5_all.deb ... Unpacking libtool (2.4.7-5) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../19-dh-autoreconf_20_all.deb ... Unpacking dh-autoreconf (20) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../20-libarchive-zip-perl_1.68-1_all.deb ... Unpacking libarchive-zip-perl (1.68-1) ... Selecting previously unselected package libsub-override-perl. Preparing to unpack .../21-libsub-override-perl_0.09-4_all.deb ... Unpacking libsub-override-perl (0.09-4) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../22-libfile-stripnondeterminism-perl_1.13.1-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (1.13.1-1) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../23-dh-strip-nondeterminism_1.13.1-1_all.deb ... Unpacking dh-strip-nondeterminism (1.13.1-1) ... Selecting previously unselected package libelf1:arm64. Preparing to unpack .../24-libelf1_0.188-2.1_arm64.deb ... Unpacking libelf1:arm64 (0.188-2.1) ... Selecting previously unselected package dwz. Preparing to unpack .../25-dwz_0.15-1_arm64.deb ... Unpacking dwz (0.15-1) ... Selecting previously unselected package libicu72:arm64. Preparing to unpack .../26-libicu72_72.1-3_arm64.deb ... Unpacking libicu72:arm64 (72.1-3) ... Selecting previously unselected package libxml2:arm64. Preparing to unpack .../27-libxml2_2.9.14+dfsg-1.1+b3_arm64.deb ... Unpacking libxml2:arm64 (2.9.14+dfsg-1.1+b3) ... Selecting previously unselected package gettext. Preparing to unpack .../28-gettext_0.21-12_arm64.deb ... Unpacking gettext (0.21-12) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../29-intltool-debian_0.35.0+20060710.6_all.deb ... Unpacking intltool-debian (0.35.0+20060710.6) ... Selecting previously unselected package po-debconf. Preparing to unpack .../30-po-debconf_1.0.21+nmu1_all.deb ... Unpacking po-debconf (1.0.21+nmu1) ... Selecting previously unselected package debhelper. Preparing to unpack .../31-debhelper_13.11.4_all.deb ... Unpacking debhelper (13.11.4) ... Selecting previously unselected package libbsd0:arm64. Preparing to unpack .../32-libbsd0_0.11.7-2_arm64.deb ... Unpacking libbsd0:arm64 (0.11.7-2) ... Selecting previously unselected package libncurses6:arm64. Preparing to unpack .../33-libncurses6_6.4-2_arm64.deb ... Unpacking libncurses6:arm64 (6.4-2) ... Selecting previously unselected package libncurses-dev:arm64. Preparing to unpack .../34-libncurses-dev_6.4-2_arm64.deb ... Unpacking libncurses-dev:arm64 (6.4-2) ... Selecting previously unselected package libpthread-stubs0-dev:arm64. Preparing to unpack .../35-libpthread-stubs0-dev_0.4-1_arm64.deb ... Unpacking libpthread-stubs0-dev:arm64 (0.4-1) ... Selecting previously unselected package libreadline8:arm64. Preparing to unpack .../36-libreadline8_8.2-1.3_arm64.deb ... Unpacking libreadline8:arm64 (8.2-1.3) ... Selecting previously unselected package libreadline-dev:arm64. Preparing to unpack .../37-libreadline-dev_8.2-1.3_arm64.deb ... Unpacking libreadline-dev:arm64 (8.2-1.3) ... Selecting previously unselected package libtext-unidecode-perl. Preparing to unpack .../38-libtext-unidecode-perl_1.30-3_all.deb ... Unpacking libtext-unidecode-perl (1.30-3) ... Selecting previously unselected package libxau6:arm64. Preparing to unpack .../39-libxau6_1%3a1.0.9-1_arm64.deb ... Unpacking libxau6:arm64 (1:1.0.9-1) ... Selecting previously unselected package libxdmcp6:arm64. Preparing to unpack .../40-libxdmcp6_1%3a1.1.2-3_arm64.deb ... Unpacking libxdmcp6:arm64 (1:1.1.2-3) ... Selecting previously unselected package libxcb1:arm64. Preparing to unpack .../41-libxcb1_1.15-1_arm64.deb ... Unpacking libxcb1:arm64 (1.15-1) ... Selecting previously unselected package libx11-data. Preparing to unpack .../42-libx11-data_2%3a1.8.4-2_all.deb ... Unpacking libx11-data (2:1.8.4-2) ... Selecting previously unselected package libx11-6:arm64. Preparing to unpack .../43-libx11-6_2%3a1.8.4-2_arm64.deb ... Unpacking libx11-6:arm64 (2:1.8.4-2) ... Selecting previously unselected package xorg-sgml-doctools. Preparing to unpack .../44-xorg-sgml-doctools_1%3a1.11-1.1_all.deb ... Unpacking xorg-sgml-doctools (1:1.11-1.1) ... Selecting previously unselected package x11proto-dev. Preparing to unpack .../45-x11proto-dev_2022.1-1_all.deb ... Unpacking x11proto-dev (2022.1-1) ... Selecting previously unselected package libxau-dev:arm64. Preparing to unpack .../46-libxau-dev_1%3a1.0.9-1_arm64.deb ... Unpacking libxau-dev:arm64 (1:1.0.9-1) ... Selecting previously unselected package libxdmcp-dev:arm64. Preparing to unpack .../47-libxdmcp-dev_1%3a1.1.2-3_arm64.deb ... Unpacking libxdmcp-dev:arm64 (1:1.1.2-3) ... Selecting previously unselected package xtrans-dev. Preparing to unpack .../48-xtrans-dev_1.4.0-1_all.deb ... Unpacking xtrans-dev (1.4.0-1) ... Selecting previously unselected package libxcb1-dev:arm64. Preparing to unpack .../49-libxcb1-dev_1.15-1_arm64.deb ... Unpacking libxcb1-dev:arm64 (1.15-1) ... Selecting previously unselected package libx11-dev:arm64. Preparing to unpack .../50-libx11-dev_2%3a1.8.4-2_arm64.deb ... Unpacking libx11-dev:arm64 (2:1.8.4-2) ... Selecting previously unselected package libxml-namespacesupport-perl. Preparing to unpack .../51-libxml-namespacesupport-perl_1.12-2_all.deb ... Unpacking libxml-namespacesupport-perl (1.12-2) ... Selecting previously unselected package libxml-sax-base-perl. Preparing to unpack .../52-libxml-sax-base-perl_1.09-3_all.deb ... Unpacking libxml-sax-base-perl (1.09-3) ... Selecting previously unselected package libxml-sax-perl. Preparing to unpack .../53-libxml-sax-perl_1.02+dfsg-3_all.deb ... Unpacking libxml-sax-perl (1.02+dfsg-3) ... Selecting previously unselected package libxml-libxml-perl. Preparing to unpack .../54-libxml-libxml-perl_2.0207+dfsg+really+2.0134-1+b1_arm64.deb ... Unpacking libxml-libxml-perl (2.0207+dfsg+really+2.0134-1+b1) ... Selecting previously unselected package slib. Preparing to unpack .../55-slib_3b6-3_all.deb ... Unpacking slib (3b6-3) ... Selecting previously unselected package tex-common. Preparing to unpack .../56-tex-common_6.18_all.deb ... Unpacking tex-common (6.18) ... Selecting previously unselected package texinfo. Preparing to unpack .../57-texinfo_6.8-6+b1_arm64.deb ... Unpacking texinfo (6.8-6+b1) ... Setting up libpipeline1:arm64 (1.5.7-1) ... Setting up libxau6:arm64 (1:1.0.9-1) ... Setting up libicu72:arm64 (72.1-3) ... Setting up bsdextrautils (2.38.1-5+b1) ... Setting up libmagic-mgc (1:5.44-3) ... Setting up libarchive-zip-perl (1.68-1) ... Setting up libdebhelper-perl (13.11.4) ... Setting up libmagic1:arm64 (1:5.44-3) ... Setting up libxml-namespacesupport-perl (1.12-2) ... Setting up gettext-base (0.21-12) ... Setting up m4 (1.4.19-3) ... Setting up file (1:5.44-3) ... Setting up libpthread-stubs0-dev:arm64 (0.4-1) ... Setting up libxml-sax-base-perl (1.09-3) ... Setting up xtrans-dev (1.4.0-1) ... Setting up autotools-dev (20220109.1) ... Setting up libx11-data (2:1.8.4-2) ... Setting up libncurses6:arm64 (6.4-2) ... Setting up autopoint (0.21-12) ... Setting up autoconf (2.71-3) ... Setting up sensible-utils (0.0.17+nmu1) ... Setting up libuchardet0:arm64 (0.0.7-1) ... Setting up libsub-override-perl (0.09-4) ... Setting up xorg-sgml-doctools (1:1.11-1.1) ... Setting up libtext-unidecode-perl (1.30-3) ... Setting up libbsd0:arm64 (0.11.7-2) ... Setting up libelf1:arm64 (0.188-2.1) ... Setting up readline-common (8.2-1.3) ... Setting up libxml2:arm64 (2.9.14+dfsg-1.1+b3) ... Setting up automake (1:1.16.5-1.3) ... update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode Setting up x11proto-dev (2022.1-1) ... Setting up libfile-stripnondeterminism-perl (1.13.1-1) ... Setting up libxdmcp6:arm64 (1:1.1.2-3) ... Setting up libncurses-dev:arm64 (6.4-2) ... Setting up libxcb1:arm64 (1.15-1) ... Setting up gettext (0.21-12) ... Setting up libxau-dev:arm64 (1:1.0.9-1) ... Setting up libtool (2.4.7-5) ... Setting up libreadline8:arm64 (8.2-1.3) ... Setting up libreadline-dev:arm64 (8.2-1.3) ... Setting up intltool-debian (0.35.0+20060710.6) ... Setting up slib (3b6-3) ... Setting up dh-autoreconf (20) ... Setting up libxdmcp-dev:arm64 (1:1.1.2-3) ... Setting up ucf (3.0043+nmu1) ... Setting up dh-strip-nondeterminism (1.13.1-1) ... Setting up dwz (0.15-1) ... Setting up groff-base (1.22.4-10) ... Setting up libx11-6:arm64 (2:1.8.4-2) ... Setting up libxcb1-dev:arm64 (1.15-1) ... Setting up po-debconf (1.0.21+nmu1) ... Setting up libx11-dev:arm64 (2:1.8.4-2) ... Setting up man-db (2.11.2-2) ... Not building database; man-db/auto-update is not 'true'. Setting up libxml-sax-perl (1.02+dfsg-3) ... update-perl-sax-parsers: Registering Perl SAX parser XML::SAX::PurePerl with priority 10... update-perl-sax-parsers: Updating overall Perl SAX parser modules info file... Creating config file /etc/perl/XML/SAX/ParserDetails.ini with new version Setting up tex-common (6.18) ... update-language: texlive-base not installed and configured, doing nothing! Setting up libxml-libxml-perl (2.0207+dfsg+really+2.0134-1+b1) ... update-perl-sax-parsers: Registering Perl SAX parser XML::LibXML::SAX::Parser with priority 50... update-perl-sax-parsers: Registering Perl SAX parser XML::LibXML::SAX with priority 50... update-perl-sax-parsers: Updating overall Perl SAX parser modules info file... Replacing config file /etc/perl/XML/SAX/ParserDetails.ini with new version Setting up debhelper (13.11.4) ... Setting up texinfo (6.8-6+b1) ... Processing triggers for libc-bin (2.36-8) ... Reading package lists... Building dependency tree... Reading state information... Reading extended state information... Initializing package states... Writing extended state information... Building tag database... -> Finished parsing the build-deps Reading package lists... Building dependency tree... Reading state information... usrmerge is already the newest version (35). 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. I: Building the package I: user script /srv/workspace/pbuilder/28981/tmp/hooks/A99_set_merged_usr starting Re-configuring usrmerge... I: user script /srv/workspace/pbuilder/28981/tmp/hooks/A99_set_merged_usr finished hostname: Temporary failure in name resolution I: Running cd /build/scm-5f3/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/i/capture/the/path" HOME="/nonexistent/second-build" dpkg-genchanges -S > ../scm_5f3-4_source.changes dpkg-buildpackage: info: source package scm dpkg-buildpackage: info: source version 5f3-4 dpkg-buildpackage: info: source distribution unstable dpkg-buildpackage: info: source changed by Bo YU dpkg-source --before-build . dpkg-buildpackage: info: host architecture arm64 debian/rules clean dh clean debian/rules override_dh_testdir make[1]: Entering directory '/build/scm-5f3' dh_testdir test -e /usr/share/slib || \ (echo "Must have slib installed for compile" && exit 1) make[1]: Leaving directory '/build/scm-5f3' dh_auto_clean make -j8 distclean make[1]: Entering directory '/build/scm-5f3' rm -f core a.out ramap.o ramap.obj scm.o time.o repl.o scl.o sys.o eval.o subr.o unif.o rope.o continue.o findexec.o script.o debug.o scmmain.o lints rm -rf *temp rm -f *.o *.obj a.out TAGS implcat slibcat gdbscm make[1]: Leaving directory '/build/scm-5f3' dh_clean debian/rules binary dh binary debian/rules override_dh_testdir make[1]: Entering directory '/build/scm-5f3' dh_testdir test -e /usr/share/slib || \ (echo "Must have slib installed for compile" && exit 1) make[1]: Leaving directory '/build/scm-5f3' dh_update_autotools_config dh_autoreconf debian/rules override_dh_auto_configure make[1]: Entering directory '/build/scm-5f3' ./configure #! /bin/cat # Generated by configure for scm 5f3. # This file (config.status) is included by the (scm) Makefile. PACKAGE_NAME=scm PACKAGE_TARNAME=scm PACKAGE_VERSION=5f3 PACKAGE_STRING=scm 5f3 PACKAGE_BUGREPORT=scm-discuss@gnu.org srcdir=/build/scm-5f3/ prefix=/usr/local/ exec_prefix=${prefix} bindir=${exec_prefix}bin/ sbindir=${exec_prefix}sbin/ libexecdir=${exec_prefix}libexec/ datarootdir=${prefix}share/ datadir=${datarootdir} sysconfdir=${prefix}etc/ sharedstatedir=${prefix}com/ localstatedir=${prefix}var/ includedir=${prefix}include/ oldincludedir=/usr/include/ docdir=${datarootdir}doc/${PACKAGE_TARNAME}/ infodir=${datarootdir}info/ htmldir=${docdir} dvidir=${docdir} pdfdir=${docdir} psdir=${docdir} libdir=${exec_prefix}lib/ localedir=${datarootdir}locale/ mandir=${datarootdir}man/ distdir=${srcdir} snapdir=${srcdir} cp debian/require.scm.debian require.scm cp debian/scm.opt.debian libscm.opt make[1]: Leaving directory '/build/scm-5f3' debian/rules override_dh_auto_build make[1]: Entering directory '/build/scm-5f3' make scmlit make[2]: Entering directory '/build/scm-5f3' echo "#ifndef IMPLINIT" > newflags.h echo "#define IMPLINIT \"/build/scm-5f3/Init5f3.scm\"" >> newflags.h echo "#endif" >> newflags.h echo "#define CHEAP_CONTINUATIONS" >> newflags.h echo "#define CAUTIOUS" >> newflags.h if (cmp -s newflags.h scmflags.h) then rm newflags.h; \ else mv newflags.h scmflags.h; fi cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 scm.c -o scm.o scm.c: In function 'process_signals': scm.c:176:24: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 176 | wta(UNDEFINED, (char *)i, ""); | ^ scm.c: In function 'scmable_signal': scm.c:290:22: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 290 | wta(UNDEFINED, (char *)i, ""); | ^ cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 time.c -o time.o cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 repl.c -o repl.o repl.c: In function 'handle_it': repl.c:1270:20: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 1270 | wta(UNDEFINED, (char *)i, ""); /* sends it to def_err_response */ | ^ repl.c: In function 'def_err_response': repl.c:2077:47: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 2077 | lputc((long)err_pos <= ARGn ? ' ' : '1' + (int)err_pos - ARG1, cur_errp); | ^ repl.c:2080:23: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 2080 | else lputs(errmsgs[((int)err_pos)-WNA].msg, cur_errp); | ^ repl.c: In function 'everr': repl.c:2133:11: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 2133 | err_pos = pos; | ^ repl.c:2134:14: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 2134 | err_s_subr = s_subr; | ^ In file included from repl.c:21: repl.c:2139:31: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 2139 | COOKIE(1) : COOKIE((int)pos)); | ^ scm.h:260:21: note: in definition of macro 'COOKIE' 260 | # define COOKIE(n) (n) | ^ cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 scl.c -o scl.o cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 sys.c -o sys.o In file included from scm.h:55, from sys.c:21: sys.c: In function 'mark_locations': scmfig.h:419:22: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 419 | # define PTR2INT(x) ((int)(x)) | ^ scm.h:276:39: note: in expansion of macro 'PTR2INT' 276 | #define NCELLP(x) ((sizeof(cell)-1) & PTR2INT(x)) | ^~~~~~~ scm.h:275:20: note: in expansion of macro 'NCELLP' 275 | #define CELLP(x) (!NCELLP(x)) | ^~~~~~ sys.c:2630:29: note: in expansion of macro 'CELLP' 2630 | while(0 <= --m) if (CELLP(*(SCM **)&x[m])) { | ^~~~~ cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 eval.c -o eval.o cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 subr.c -o subr.o cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 unif.c -o unif.o cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 rope.c -o rope.o cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 continue.c -o continue.o cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 findexec.c -o findexec.o cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 script.c -o script.o script.c: In function 'script_find_executable': script.c:127:5: warning: case label value is less than minimum value for type [-Wswitch-outside-range] 127 | case EOF: | ^~~~ script.c: In function 'find_impl_file': script.c:149:18: warning: initialization discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 149 | char *extptr = exec_path + strlen(exec_path); | ^~~~~~~~~ script.c:165:10: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 165 | extptr = exec_path + strlen(exec_path); | ^ script.c: In function 'script_read_arg': script.c:304:5: warning: case label value is less than minimum value for type [-Wswitch-outside-range] 304 | case EOF: goto endarg; | ^~~~ script.c: In function 'script_process_argv': script.c:362:12: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 362 | nargv[0] = argv[0]; | ^ script.c:377:22: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 377 | nargv[nargi++] = argv[argi++]; | ^ script.c:380:39: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 380 | while (argi <= argc) nargv[nargi++] = argv[argi++]; | ^ cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 debug.c -o debug.o cc -c -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 scmmain.c -o scmmain.o scmmain.c: In function 'main': scmmain.c:109:32: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 109 | if (0==argc) {argc = 1; argv = generic_name;} /* for macintosh */ | ^ scmmain.c:119:16: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 119 | script_arg = argv[2]; /* Save for scm_find_execpath() call */ | ^ scmmain.c:120:31: warning: passing argument 1 of 'script_count_argv' from incompatible pointer type [-Wincompatible-pointer-types] 120 | nargc = script_count_argv(nargv); | ^~~~~ | | | char ** In file included from scmmain.c:30: scm.h:1081:51: note: expected 'const char **' but argument is of type 'char **' 1081 | SCM_EXPORT int script_count_argv P((const char **argv)); | ~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ scmmain.c:122:15: warning: assignment to 'char **' from incompatible pointer type 'const char **' [-Wincompatible-pointer-types] 122 | else {nargv = argv; nargc = argc;} | ^ scmmain.c:124:39: warning: passing argument 2 of 'scm_find_execpath' from incompatible pointer type [-Wincompatible-pointer-types] 124 | execpath = scm_find_execpath(nargc, nargv, script_arg); | ^~~~~ | | | char ** scm.h:776:69: note: expected 'const char * const*' but argument is of type 'char **' 776 | SCM_EXPORT char *scm_find_execpath P((int argc, const char * const *argv, const char *script_arg)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ scmmain.c:131:31: warning: passing argument 2 of 'scm_init_from_argv' from incompatible pointer type [-Wincompatible-pointer-types] 131 | scm_init_from_argv(nargc, nargv, script_arg, iverbose, buf0stdin); | ^~~~~ | | | char ** scm.h:769:69: note: expected 'const char * const*' but argument is of type 'char **' 769 | SCM_EXPORT void scm_init_from_argv P((int argc, const char * const *argv, char *script_arg, | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ cc -o scmlit scm.o time.o repl.o scl.o sys.o eval.o subr.o unif.o rope.o continue.o findexec.o script.o debug.o scmmain.o -Wl,-z,relro -Wl,-z,now /usr/bin/ld: sys.o: in function `ltmpnam': ././sys.c:267: warning: the use of `tmpnam' is dangerous, better use `mkstemp' make checklit make[3]: Entering directory '/build/scm-5f3' ./scmlit -fr4rstest.scm -e'(test-sc4)(test-delay)(gc)' \ -e '(or (null? errs) (quit 1))' < /dev/null SECTION(2 1) SECTION(3 4) # # # # # # # # # (#t #f #f #f #f #f #f #f #f)#t (#t #f #f #f #f #f #f #f #f)#f (#f #t #f #f #f #f #f #f #f)#\a (#f #f #t #f #f #f #f #f #f)() (#f #f #f #t #f #f #f #f #f)9739 (#f #f #f #f #t #f #f #f #f)(test) (#f #f #f #f #f #t #f #f #f)# (#f #f #f #f #f #f #t #f #f)"test" (#f #f #f #f #f #f #t #f #f)"" (#f #f #f #f #f #f #f #t #f)test (#f #f #f #f #f #f #f #f #t)#() (#f #f #f #f #f #f #f #f #t)#(a b c) SECTION(4 1 2) (quote (quote a)) ==> (quote a) (quote (quote a)) ==> (quote a) SECTION(4 1 3) (# 3 4) ==> 12 SECTION(4 1 4) (# "r4rstest.scm": (x) (+ x x)> 4) ==> 8 (# 7 10) ==> 3 (# "r4rstest.scm": (y) (+ x y)> 6) ==> 10 (# "r4rstest.scm": x x> 3 4 5 6) ==> (3 4 5 6) (# "r4rstest.scm": (x y . z) z> 3 4 5 6) ==> (5 6) SECTION(4 1 5) (if yes) ==> yes (if no) ==> no (if 1) ==> 1 SECTION(4 1 6) (define 3) ==> 3 (set! 5) ==> 5 SECTION(4 2 1) (cond greater) ==> greater (cond equal) ==> equal (cond 2) ==> 2 (case composite) ==> composite (case consonant) ==> consonant (and #t) ==> #t (and #f) ==> #f (and (f g)) ==> (f g) (and #t) ==> #t (or #t) ==> #t (or #t) ==> #t (or #f) ==> #f (or #f) ==> #f (or (b c)) ==> (b c) SECTION(4 2 2) (let 6) ==> 6 (let 35) ==> 35 (let* 70) ==> 70 (letrec #t) ==> #t (let 5) ==> 5 (let 34) ==> 34 (let 6) ==> 6 (let 34) ==> 34 (let 34) ==> 34 (let* 7) ==> 7 (let* 34) ==> 34 (let* 8) ==> 8 (let* 34) ==> 34 (letrec 9) ==> 9 (letrec 34) ==> 34 (letrec 10) ==> 10 (letrec 34) ==> 34 SECTION(4 2 3) (begin 6) ==> 6 SECTION(4 2 4) (do #(0 1 2 3 4)) ==> #(0 1 2 3 4) (do 25) ==> 25 (do 25) ==> 25 (let 1) ==> 1 (let ((6 1 3) (-5 -2))) ==> ((6 1 3) (-5 -2)) (let -1) ==> -1 SECTION(4 2 6) (quasiquote (list 3 4)) ==> (list 3 4) (quasiquote (list a (quote a))) ==> (list a (quote a)) (quasiquote (a 3 4 5 6 b)) ==> (a 3 4 5 6 b) (quasiquote ((foo 7) . cons)) ==> ((foo 7) . cons) (quasiquote #(10 5 2 4 3 8)) ==> #(10 5 2 4 3 8) (quasiquote 5) ==> 5 (quasiquote (a (quasiquote (b (unquote (+ 1 2)) (unquote (foo 4 d)) e)) f)) ==> (a (quasiquote (b (unquote (+ 1 2)) (unquote (foo 4 d)) e)) f) (quasiquote (a (quasiquote (b (unquote x) (unquote (quote y)) d)) e)) ==> (a (quasiquote (b (unquote x) (unquote (quote y)) d)) e) (quasiquote (list 3 4)) ==> (list 3 4) (quasiquote (quasiquote (list (unquote (+ 1 2)) 4))) ==> (quasiquote (list (unquote (+ 1 2)) 4)) SECTION(5 2 1) (tprint #t) ==> #t (define 6) ==> 6 (define 1) ==> 1 (define 9) ==> 9 (define 9) ==> 9 (define 10) ==> 10 (# 6) ==> (3 6) (# 6) ==> 9 SECTION(5 2 2) (define 45) ==> 45 (#) ==> 5 (define 34) ==> 34 (#) ==> 5 (define 34) ==> 34 (# 88) ==> 88 (# 4) ==> 4 (define 34) ==> 34 (internal-define 99) ==> 99 (internal-define 77) ==> 77 SECTION(6 1) (# #t) ==> #f (# 3) ==> #f (# (3)) ==> #f (# #f) ==> #t (# ()) ==> #f (# ()) ==> #f (# nil) ==> #f SECTION(6 2) (# a a) ==> #t (# a b) ==> #f (# 2 2) ==> #t (# () ()) ==> #t (# 10000 10000) ==> #t (# (1 . 2) (1 . 2)) ==> #f (# # "r4rstest.scm": () 1> # "r4rstest.scm": () 2>) ==> #f (# #f nil) ==> #f (# # #) ==> #t (# # "r4rstest.scm": () (set! n (+ n 1)) n> # "r4rstest.scm": () (set! n (+ n 1)) n>) ==> #t (# # "r4rstest.scm": () (set! n (+ n 1)) n> # "r4rstest.scm": () (set! n (+ n 1)) n>) ==> #f (# # #) ==> #f (# a a) ==> #t (# (a) (a)) ==> #f (# () ()) ==> #t (# # #) ==> #t (# (a) (a)) ==> #t (# #() #()) ==> #t (# # #) ==> #t (# a a) ==> #t (# (a) (a)) ==> #t (# (a (b) c) (a (b) c)) ==> #t (# "abc" "abc") ==> #t (# 2 2) ==> #t (# #(a a a a a) #(a a a a a)) ==> #t SECTION(6 3) (dot (a b c d e)) ==> (a b c d e) (# (a b c)) ==> #t (set-cdr! (a . 4)) ==> (a . 4) (# (a . 4) (a . 4)) ==> #t (dot (a b c . d)) ==> (a b c . d) (# (a . 4)) ==> #f (list? #f) ==> #f (# a ()) ==> (a) (# (a) (b c d)) ==> ((a) b c d) (# "a" (b c)) ==> ("a" b c) (# a 3) ==> (a . 3) (# (a b) c) ==> ((a b) . c) (# (a b c)) ==> a (# ((a) b c d)) ==> (a) (# (1 . 2)) ==> 1 (# ((a) b c d)) ==> (b c d) (# (1 . 2)) ==> 2 (# a 7 c) ==> (a 7 c) (#) ==> () (# (a b c)) ==> 3 (# (a (b) (c d e))) ==> 3 (# ()) ==> 0 (# (x) (y)) ==> (x y) (# (a) (b c d)) ==> (a b c d) (# (a (b)) ((c))) ==> (a (b) (c)) (#) ==> () (# (a b) (c . d)) ==> (a b c . d) (# () a) ==> a (# (a b c)) ==> (c b a) (# (a (b c) d (e (f)))) ==> ((e (f)) d (b c) a) (# (a b c d) 2) ==> c (# a (a b c)) ==> (a b c) (# b (a b c)) ==> (b c) (# a (b c d)) ==> #f (# (a) (b (a) c)) ==> #f (# (a) (b (a) c)) ==> ((a) c) (# 101 (100 101 102)) ==> (101 102) (# a ((a 1) (b 2) (c 3))) ==> (a 1) (# b ((a 1) (b 2) (c 3))) ==> (b 2) (# d ((a 1) (b 2) (c 3))) ==> #f (# (a) (((a)) ((b)) ((c)))) ==> #f (# (a) (((a)) ((b)) ((c)))) ==> ((a)) (# 5 ((2 3) (5 7) (11 13))) ==> (5 7) SECTION(6 4) (# a) ==> #t (standard-case #t) ==> #t (standard-case #t) ==> #t (#string> flying-fish) ==> "flying-fish" (#string> martin) ==> "martin" (#string> \Malvina) ==> "Malvina" (standard-case #t) ==> #t (string-set! "cb") ==> "cb" (#string> ab) ==> "ab" (#symbol> "ab") ==> ab (# mississippi mississippi) ==> #t (string->symbol #f) ==> #f (#symbol> "jollywog") ==> jollywog SECTION(6 5 5) (# 3) ==> #t (# 3) ==> #t (# 3) ==> #t (# 3) ==> #t (# 3) ==> #t (# 3) ==> #t (# 3) ==> #f (# 0 0) ==> 1 (# 0 1) ==> 0 (# 0 256) ==> 0 (# -1 256) ==> 1 (# -1 255) ==> -1 (# -1 -256) ==> 1 (# -1 -255) ==> -1 (# 256 0) ==> 1 (# -256 0) ==> 1 (# 256 1) ==> 256 (# -256 1) ==> -256 (# 2 3) ==> 8 (# -2 3) ==> -8 (# 3 2) ==> 9 (# -3 2) ==> 9 (# 22 22 22) ==> #t (# 22 22) ==> #t (# 34 34 35) ==> #f (# 34 35) ==> #f (#> 3 -6246) ==> #t (#> 9 9 -2424) ==> #f (#=> 3 -4 -6246) ==> #t (#=> 9 9) ==> #t (#=> 8 9) ==> #f (# -1 2 3 4 5 6 7 8) ==> #t (# -1 2 3 4 4 5 6 7) ==> #f (# -1 2 3 4 5 6 7 8) ==> #t (# -1 2 3 4 4 5 6 7) ==> #t (# 1 3 2) ==> #f (#=> 1 3 2) ==> #f (# 0) ==> #t (# 1) ==> #f (# -1) ==> #f (# -100) ==> #f (# 4) ==> #t (# -4) ==> #f (# 0) ==> #f (# 4) ==> #f (# -4) ==> #t (# 0) ==> #f (# 3) ==> #t (# 2) ==> #f (# -4) ==> #f (# -1) ==> #t (# 3) ==> #f (# 2) ==> #t (# -4) ==> #t (# -1) ==> #f (# 34 5 7 38 6) ==> 38 (# 3 5 5 330 4 -24) ==> -24 (# 3 4) ==> 7 (# 3) ==> 3 (#) ==> 0 (# 4) ==> 4 (#) ==> 1 (# 1) ==> 1 (# -1) ==> -1 (# 6 3) ==> 2 (# 6 -2) ==> -3 (# -6 2) ==> -3 (# -6 -2) ==> 3 (# 3 4) ==> -1 (# 3) ==> -3 (# -7) ==> 7 (# 7) ==> 7 (# 0) ==> 0 (# 35 7) ==> 5 (# -35 7) ==> -5 (# 35 -7) ==> -5 (# -35 -7) ==> 5 (# 13 4) ==> 1 (# 13 4) ==> 1 (# -13 4) ==> 3 (# -13 4) ==> -1 (# 13 -4) ==> -3 (# 13 -4) ==> 1 (# -13 -4) ==> -1 (# -13 -4) ==> -1 (# 0 86400) ==> 0 (# 0 -86400) ==> 0 (# 238 9) ==> #t (# -238 9) ==> #t (# 238 -9) ==> #t (# -238 -9) ==> #t (# 0 4) ==> 4 (# -4 0) ==> 4 (# 32 -36) ==> 4 (#) ==> 0 (# 32 -36) ==> 288 (#) ==> 1 SECTION(6 5 5) (#number "r4rstest.scm": (str) (#@define ((ans (string->number str))) (cond ((not ans) #t) ((number? ans) #t) (else ans)))> "+#.#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "-#.#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "#.#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "1/0") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "-1/0") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "0/0") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "+1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "-1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "0/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "0/0-0/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "1/0-1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "-1/0+1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "#i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "#e") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "#i0/0") ==> #t SECTION(6 5 9) (#string> 0) ==> "0" (#string> 100) ==> "100" (#string> 256 16) ==> "100" (#number> "100") ==> 100 (#number> "100" 16) ==> 256 (#number> "") ==> #f (#number> ".") ==> #f (#number> "d") ==> #f (#number> "D") ==> #f (#number> "i") ==> #f (#number> "I") ==> #f (#number> "3i") ==> #f (#number> "3I") ==> #f (#number> "33i") ==> #f (#number> "33I") ==> #f (#number> "3.3i") ==> #f (#number> "3.3I") ==> #f (#number> "-") ==> #f (#number> "+") ==> #f (string->number #t) ==> #t (string->number #t) ==> #t SECTION(6 6) (# #\space #\space) ==> #t (# #\space #\space) ==> #t (# #\a) ==> #t (# #\() ==> #t (# #\space) ==> #t (# #\nl) ==> #t (# #\A #\B) ==> #f (# #\a #\b) ==> #f (# #\9 #\0) ==> #f (# #\A #\A) ==> #t (# #\A #\B) ==> #t (# #\a #\b) ==> #t (# #\9 #\0) ==> #f (# #\A #\A) ==> #f (#?> #\A #\B) ==> #f (#?> #\a #\b) ==> #f (#?> #\9 #\0) ==> #t (#?> #\A #\A) ==> #f (# #\A #\B) ==> #t (# #\a #\b) ==> #t (# #\9 #\0) ==> #f (# #\A #\A) ==> #t (#=?> #\A #\B) ==> #f (#=?> #\a #\b) ==> #f (#=?> #\9 #\0) ==> #t (#=?> #\A #\A) ==> #t (# #\A #\B) ==> #f (# #\a #\B) ==> #f (# #\A #\b) ==> #f (# #\a #\b) ==> #f (# #\9 #\0) ==> #f (# #\A #\A) ==> #t (# #\A #\a) ==> #t (# #\A #\B) ==> #t (# #\a #\B) ==> #t (# #\A #\b) ==> #t (# #\a #\b) ==> #t (# #\9 #\0) ==> #f (# #\A #\A) ==> #f (# #\A #\a) ==> #f (#?> #\A #\B) ==> #f (#?> #\a #\B) ==> #f (#?> #\A #\b) ==> #f (#?> #\a #\b) ==> #f (#?> #\9 #\0) ==> #t (#?> #\A #\A) ==> #f (#?> #\A #\a) ==> #f (# #\A #\B) ==> #t (# #\a #\B) ==> #t (# #\A #\b) ==> #t (# #\a #\b) ==> #t (# #\9 #\0) ==> #f (# #\A #\A) ==> #t (# #\A #\a) ==> #t (#=?> #\A #\B) ==> #f (#=?> #\a #\B) ==> #f (#=?> #\A #\b) ==> #f (#=?> #\a #\b) ==> #f (#=?> #\9 #\0) ==> #t (#=?> #\A #\A) ==> #t (#=?> #\A #\a) ==> #t (# #\a) ==> #t (# #\A) ==> #t (# #\z) ==> #t (# #\Z) ==> #t (# #\0) ==> #f (# #\9) ==> #f (# #\space) ==> #f (# #\;) ==> #f (# #\a) ==> #f (# #\A) ==> #f (# #\z) ==> #f (# #\Z) ==> #f (# #\0) ==> #t (# #\9) ==> #t (# #\space) ==> #f (# #\;) ==> #f (# #\a) ==> #f (# #\A) ==> #f (# #\z) ==> #f (# #\Z) ==> #f (# #\0) ==> #f (# #\9) ==> #f (# #\space) ==> #t (# #\;) ==> #f (# #\0) ==> #f (# #\9) ==> #f (# #\space) ==> #f (# #\;) ==> #f (# #\0) ==> #f (# #\9) ==> #f (# #\space) ==> #f (# #\;) ==> #f (#char> 46) ==> #\. (#char> 65) ==> #\A (#char> 97) ==> #\a (# #\A) ==> #\A (# #\a) ==> #\A (# #\A) ==> #\a (# #\a) ==> #\a SECTION(6 7) (# "The word \"recursion\\\" has many meanings.") ==> #t (string-set! "?**") ==> "?**" (# #\a #\b #\c) ==> "abc" (#) ==> "" (# "abc") ==> 3 (# "abc" 0) ==> #\a (# "abc" 2) ==> #\c (# "") ==> 0 (# "ab" 0 0) ==> "" (# "ab" 1 1) ==> "" (# "ab" 2 2) ==> "" (# "ab" 0 1) ==> "a" (# "ab" 1 2) ==> "b" (# "ab" 0 2) ==> "ab" (# "foo" "bar") ==> "foobar" (# "foo") ==> "foo" (# "foo" "") ==> "foo" (# "" "foo") ==> "foo" (#) ==> "" (# 0) ==> "" (# "" "") ==> #t (# "" "") ==> #f (#?> "" "") ==> #f (# "" "") ==> #t (#=?> "" "") ==> #t (# "" "") ==> #t (# "" "") ==> #f (#?> "" "") ==> #f (# "" "") ==> #t (#=?> "" "") ==> #t (# "A" "B") ==> #f (# "a" "b") ==> #f (# "9" "0") ==> #f (# "A" "A") ==> #t (# "A" "B") ==> #t (# "a" "b") ==> #t (# "9" "0") ==> #f (# "A" "A") ==> #f (#?> "A" "B") ==> #f (#?> "a" "b") ==> #f (#?> "9" "0") ==> #t (#?> "A" "A") ==> #f (# "A" "B") ==> #t (# "a" "b") ==> #t (# "9" "0") ==> #f (# "A" "A") ==> #t (#=?> "A" "B") ==> #f (#=?> "a" "b") ==> #f (#=?> "9" "0") ==> #t (#=?> "A" "A") ==> #t (# "A" "B") ==> #f (# "a" "B") ==> #f (# "A" "b") ==> #f (# "a" "b") ==> #f (# "9" "0") ==> #f (# "A" "A") ==> #t (# "A" "a") ==> #t (# "A" "B") ==> #t (# "a" "B") ==> #t (# "A" "b") ==> #t (# "a" "b") ==> #t (# "9" "0") ==> #f (# "A" "A") ==> #f (# "A" "a") ==> #f (#?> "A" "B") ==> #f (#?> "a" "B") ==> #f (#?> "A" "b") ==> #f (#?> "a" "b") ==> #f (#?> "9" "0") ==> #t (#?> "A" "A") ==> #f (#?> "A" "a") ==> #f (# "A" "B") ==> #t (# "a" "B") ==> #t (# "A" "b") ==> #t (# "a" "b") ==> #t (# "9" "0") ==> #f (# "A" "A") ==> #t (# "A" "a") ==> #t (#=?> "A" "B") ==> #f (#=?> "a" "B") ==> #f (#=?> "A" "b") ==> #f (#=?> "a" "b") ==> #f (#=?> "9" "0") ==> #t (#=?> "A" "A") ==> #t (#=?> "A" "a") ==> #t SECTION(6 8) (# #(0 (2 2 2 2) "Anna")) ==> #t (# a b c) ==> #(a b c) (#) ==> #() (# #(0 (2 2 2 2) "Anna")) ==> 3 (# #()) ==> 0 (# #(1 1 2 3 5 8 13 21) 5) ==> 8 (vector-set #(0 ("Sue" "Sue") "Anna")) ==> #(0 ("Sue" "Sue") "Anna") (# 2 hi) ==> #(hi hi) (# 0) ==> #() (# 0 a) ==> #() SECTION(6 9) (# #) ==> #t (# car) ==> #f (# # "r4rstest.scm": (x) (* x x)>) ==> #t (# (lambda (x) (* x x))) ==> #f (# #) ==> #t (# #) ==> #t (# # (3 4)) ==> 7 (# # "r4rstest.scm": (a b) (+ a b)> (3 4)) ==> 7 (# # 10 (3 4)) ==> 17 (# # ()) ==> () (# "r4rstest.scm": args (f (apply g args))> 12 75) ==> 30 (# # ((a b) (d e) (g h))) ==> (b e h) (# # (1 2 3) (4 5 6)) ==> (5 7 9) (# # (1 2 3)) ==> (1 2 3) (# # (1 2 3)) ==> (1 2 3) (# # (1 2 3)) ==> (-1 -2 -3) (for-each #(0 1 4 9 16)) ==> #(0 1 4 9 16) (# # "r4rstest.scm": (exit) (for-each (lambda (x) (if (negative? x) (exit x))) (quote (54 0 37 -3 245 19))) #t>) ==> -3 (# (1 2 3 4)) ==> 4 (# (a b . c)) ==> #f (# # ()) ==> () SECTION(6 10 1) (# #) ==> #t (# #) ==> #t (# "r4rstest.scm" #) ==> #t (# #) ==> #t SECTION(6 10 2) (# #) ==> #\; (# #) ==> #\; (# #) ==> (define cur-section (quote ())) (# #) ==> #\( (# #) ==> (define errs (quote ())) SECTION(6 10 3) (# "tmp1" # "r4rstest.scm": (test-file) (write-char #\; test-file) (display #\; test-file) (display ";" test-file) (write write-test-obj test-file) (newline test-file) (write load-test-obj test-file) (output-port? test-file)>) ==> #t (# #) ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)))) (# #) ==> #t (# #) ==> #t (input-port? #t) ==> #t (# #) ==> #\; (# #) ==> #\; (# #) ==> #\; (# #) ==> (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)) (# #) ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)))) (# #) ==> #t (# #) ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)))) (# #) ==> #t (# #) ==> #t (input-port? #t) ==> #t (# #) ==> #\; (# #) ==> #\; (# #) ==> #\; (# #) ==> (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)) (# #) ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)))) Passed all tests To fully test continuations, Scheme 4, and DELAY/FORCE do: (test-cont) (test-sc4) (test-delay) ;testing scheme 4 functions; SECTION(6 7) (#list> "P l") ==> (#\P #\space #\l) (#list> "") ==> () (#string> (#\1 #\\ #\")) ==> "1\\\"" (#string> ()) ==> "" SECTION(6 8) (#list> #(dah dah didah)) ==> (dah dah didah) (#list> #()) ==> () (#vector> (dididit dah)) ==> #(dididit dah) (#vector> ()) ==> #() SECTION(6 10 4) (load (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c))) ==> (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)) Passed all tests ;testing DELAY and FORCE; SECTION(6 9) (delay 3) ==> 3 (delay (3 3)) ==> (3 3) (delay 2) ==> 2 (# # count x) count (force p)))>>) ==> 6 (# #) ==> 6 (force 3) ==> 3 Passed all tests make[3]: Leaving directory '/build/scm-5f3' make[2]: Leaving directory '/build/scm-5f3' # Use the same options for both static library and executable ./build -p linux -hsystem -f libscm.opt ; Scheme (linux) script created by SLIB/batch ; [-p linux] ; used options from: libscm.opt ; ================ Write file with C defines (delete-file "scmflags.h") (call-with-output-file "scmflags.h" (lambda (fp) (for-each (lambda (string) (write-line string fp)) '("#define IMPLINIT \"Init5f3.scm\"" "#define INITS init_sc2();init_ioext();" "#define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ();" "#define CAUTIOUS" "#define BIGNUMS" "#define ARRAYS" "#define FLOATS" "#define CCLO" "#define TICKS" "#define CAN_DUMP" "#define MACRO")))) ; ================ Compile C source files (system "gcc -c -I/usr/include/X11 -DX11 -DSUN_DL -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 sc2.c ramap.c record.c gsubr.c ioext.c edline.c rgx.c socket.c posix.c unix.c crs.c dynl.c x.c differ.c continue.c scm.c scmmain.c findexec.c script.c time.c repl.c scl.c eval.c sys.c subr.c debug.c unif.c rope.c unexelf.c gmalloc.c") socket.c: In function 'l_hostinfo': socket.c:147:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 147 | ve[ 1] = makfromstrs(-1, entry->h_aliases); | ~~~~~^~~~~~~~~~~ | | | char ** In file included from socket.c:24: scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ socket.c:152:13: warning: assignment to 'const char **' from incompatible pointer type 'char **' [-Wincompatible-pointer-types] 152 | for (argv = entry->h_addr_list; argv[i]; i++); | ^ socket.c: In function 'l_netinfo': socket.c:184:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 184 | ve[ 1] = makfromstrs(-1, entry->n_aliases); | ~~~~~^~~~~~~~~~~ | | | char ** scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ socket.c: In function 'l_protoinfo': socket.c:214:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 214 | ve[ 1] = makfromstrs(-1, entry->p_aliases); | ~~~~~^~~~~~~~~~~ | | | char ** scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ socket.c: In function 'l_servinfo': socket.c:247:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 247 | ve[ 1] = makfromstrs(-1, entry->s_aliases); | ~~~~~^~~~~~~~~~~ | | | char ** scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ posix.c: In function 'l_grinfo': posix.c:194:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 194 | ve[ 3] = makfromstrs(-1, entry->gr_mem); | ~~~~~^~~~~~~~ | | | char ** In file included from posix.c:21: scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ crs.c:72:3: warning: initialization of 'int (*)(FILE *)' from incompatible pointer type 'int (*)(WINDOW *)' {aka 'int (*)(struct _win_st *)'} [-Wincompatible-pointer-types] 72 | wrefresh, | ^~~~~~~~ crs.c:72:3: note: (near initialization for 'winptob.fflush') crs.c:73:3: warning: initialization of 'int (*)(FILE *)' from incompatible pointer type 'int (*)(WINDOW *)' {aka 'int (*)(struct _win_st *)'} [-Wincompatible-pointer-types] 73 | wgetch, | ^~~~~~ crs.c:73:3: note: (near initialization for 'winptob.fgetc') crs.c: In function 'lunctrl': crs.c:241:17: warning: initialization discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 241 | char *str = unctrl(ICHR(c)); | ^~~~~~ crs.c: In function 'init_crs': crs.c:390:13: warning: passing argument 1 of 'add_final' from incompatible pointer type [-Wincompatible-pointer-types] 390 | add_final(lendwin); | ^~~~~~~ | | | SCM (*)() {aka long int (*)()} In file included from crs.c:21: scm.h:1002:37: note: expected 'void (*)(void)' but argument is of type 'SCM (*)()' {aka 'long int (*)()'} 1002 | SCM_EXPORT void add_final P((void (*final)(void))); | ~~~~~~~^~~~~~~~~~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ x.c: In function 'make_xcolormap': x.c:337:51: warning: passing argument 4 of 'XSaveContext' makes pointer from integer without a cast [-Wint-conversion] 337 | XSaveContext(XDISPLAY(sdpy), (XID)cmp, xtc_cmp, z); | ^ | | | SCM {aka long int} In file included from /usr/include/X11/Xlib.h:47, from x.c:35: /usr/include/X11/Xutil.h:580:5: note: expected 'const char *' but argument is of type 'SCM' {aka 'long int'} 580 | _Xconst char* /* data */ | ^ x.c: In function 'CCC2SCM': x.c:585:47: warning: passing argument 4 of 'XSaveContext' makes pointer from integer without a cast [-Wint-conversion] 585 | XSaveContext(ccc->dpy, (XID)ccc, xtc_ccc, s_ccc); | ^~~~~ | | | SCM {aka long int} /usr/include/X11/Xutil.h:580:5: note: expected 'const char *' but argument is of type 'SCM' {aka 'long int'} 580 | _Xconst char* /* data */ | ^ x.c: In function 'x_draw_string': x.c:2070:35: warning: passing argument 4 of 'xldraw_string' from incompatible pointer type [-Wincompatible-pointer-types] 2070 | xldraw_string(sdbl, sgc, sargs, &XDrawString, s_x_draw_string); | ^~~~~~~~~~~~ | | | int (*)(Display *, Drawable, struct _XGC *, int, int, const char *, int) {aka int (*)(Display *, long unsigned int, struct _XGC *, int, int, const char *, int)} x.c:2053:12: note: expected 'int (*)(void)' but argument is of type 'int (*)(Display *, Drawable, struct _XGC *, int, int, const char *, int)' {aka 'int (*)(Display *, long unsigned int, struct _XGC *, int, int, const char *, int)'} 2053 | int (*proc)(); | ^~~~ x.c: In function 'x_image_string': x.c:2076:35: warning: passing argument 4 of 'xldraw_string' from incompatible pointer type [-Wincompatible-pointer-types] 2076 | xldraw_string(sdbl, sgc, sargs, &XDrawImageString, s_x_image_string); | ^~~~~~~~~~~~~~~~~ | | | int (*)(Display *, Drawable, struct _XGC *, int, int, const char *, int) {aka int (*)(Display *, long unsigned int, struct _XGC *, int, int, const char *, int)} x.c:2053:12: note: expected 'int (*)(void)' but argument is of type 'int (*)(Display *, Drawable, struct _XGC *, int, int, const char *, int)' {aka 'int (*)(Display *, long unsigned int, struct _XGC *, int, int, const char *, int)'} 2053 | int (*proc)(); | ^~~~ differ.c:122:4: warning: initialization of 'void * (*)()' from incompatible pointer type 'long int * (*)()' [-Wincompatible-pointer-types] 122 | {long_subarray, | ^~~~~~~~~~~~~ differ.c:122:4: note: (near initialization for 'long_procs.subarray') differ.c:126:4: warning: initialization of 'void * (*)()' from incompatible pointer type 'short int * (*)()' [-Wincompatible-pointer-types] 126 | {short_subarray, | ^~~~~~~~~~~~~~ differ.c:126:4: note: (near initialization for 'short_procs.subarray') differ.c:130:4: warning: initialization of 'void * (*)()' from incompatible pointer type 'char * (*)()' [-Wincompatible-pointer-types] 130 | {char_subarray, | ^~~~~~~~~~~~~ differ.c:130:4: note: (near initialization for 'char_procs.subarray') In file included from scmfig.h:71, from scm.h:55, from scm.c:26: scm.c: In function 'scm_init_extensions': scmflags.h:3:116: warning: implicit declaration of function 'init_unix'; did you mean 'init_unif'? [-Wimplicit-function-declaration] 3 | #define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ(); | ^~~~~~~~~ scm.c:110:3: note: in expansion of macro 'COMPILED_INITS' 110 | COMPILED_INITS; /* initialize statically linked add-ons */ | ^~~~~~~~~~~~~~ scmflags.h:3:128: warning: implicit declaration of function 'init_crs'; did you mean 'init_subrs'? [-Wimplicit-function-declaration] 3 | #define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ(); | ^~~~~~~~ scm.c:110:3: note: in expansion of macro 'COMPILED_INITS' 110 | COMPILED_INITS; /* initialize statically linked add-ons */ | ^~~~~~~~~~~~~~ scmflags.h:3:139: warning: implicit declaration of function 'init_x'; did you mean 'init_rgx'? [-Wimplicit-function-declaration] 3 | #define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ(); | ^~~~~~ scm.c:110:3: note: in expansion of macro 'COMPILED_INITS' 110 | COMPILED_INITS; /* initialize statically linked add-ons */ | ^~~~~~~~~~~~~~ scmflags.h:3:148: warning: implicit declaration of function 'init_differ' [-Wimplicit-function-declaration] 3 | #define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ(); | ^~~~~~~~~~~ scm.c:110:3: note: in expansion of macro 'COMPILED_INITS' 110 | COMPILED_INITS; /* initialize statically linked add-ons */ | ^~~~~~~~~~~~~~ scm.c: In function 'process_signals': scm.c:176:24: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 176 | wta(UNDEFINED, (char *)i, ""); | ^ scm.c: In function 'scmable_signal': scm.c:290:22: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 290 | wta(UNDEFINED, (char *)i, ""); | ^ scmmain.c: In function 'main': scmmain.c:109:32: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 109 | if (0==argc) {argc = 1; argv = generic_name;} /* for macintosh */ | ^ scmmain.c:119:16: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 119 | script_arg = argv[2]; /* Save for scm_find_execpath() call */ | ^ scmmain.c:120:31: warning: passing argument 1 of 'script_count_argv' from incompatible pointer type [-Wincompatible-pointer-types] 120 | nargc = script_count_argv(nargv); | ^~~~~ | | | char ** In file included from scmmain.c:30: scm.h:1081:51: note: expected 'const char **' but argument is of type 'char **' 1081 | SCM_EXPORT int script_count_argv P((const char **argv)); | ~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ scmmain.c:122:15: warning: assignment to 'char **' from incompatible pointer type 'const char **' [-Wincompatible-pointer-types] 122 | else {nargv = argv; nargc = argc;} | ^ scmmain.c:124:39: warning: passing argument 2 of 'scm_find_execpath' from incompatible pointer type [-Wincompatible-pointer-types] 124 | execpath = scm_find_execpath(nargc, nargv, script_arg); | ^~~~~ | | | char ** scm.h:776:69: note: expected 'const char * const*' but argument is of type 'char **' 776 | SCM_EXPORT char *scm_find_execpath P((int argc, const char * const *argv, const char *script_arg)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ scmmain.c:131:31: warning: passing argument 2 of 'scm_init_from_argv' from incompatible pointer type [-Wincompatible-pointer-types] 131 | scm_init_from_argv(nargc, nargv, script_arg, iverbose, buf0stdin); | ^~~~~ | | | char ** scm.h:769:69: note: expected 'const char * const*' but argument is of type 'char **' 769 | SCM_EXPORT void scm_init_from_argv P((int argc, const char * const *argv, char *script_arg, | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ script.c: In function 'script_find_executable': script.c:127:5: warning: case label value is less than minimum value for type [-Wswitch-outside-range] 127 | case EOF: | ^~~~ script.c: In function 'find_impl_file': script.c:149:18: warning: initialization discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 149 | char *extptr = exec_path + strlen(exec_path); | ^~~~~~~~~ script.c:165:10: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 165 | extptr = exec_path + strlen(exec_path); | ^ script.c: In function 'script_read_arg': script.c:304:5: warning: case label value is less than minimum value for type [-Wswitch-outside-range] 304 | case EOF: goto endarg; | ^~~~ script.c: In function 'script_process_argv': script.c:362:12: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 362 | nargv[0] = argv[0]; | ^ script.c:377:22: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 377 | nargv[nargi++] = argv[argi++]; | ^ script.c:380:39: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 380 | while (argi <= argc) nargv[nargi++] = argv[argi++]; | ^ repl.c: In function 'handle_it': repl.c:1270:20: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 1270 | wta(UNDEFINED, (char *)i, ""); /* sends it to def_err_response */ | ^ repl.c: In function 'def_err_response': repl.c:2077:47: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 2077 | lputc((long)err_pos <= ARGn ? ' ' : '1' + (int)err_pos - ARG1, cur_errp); | ^ repl.c:2080:23: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 2080 | else lputs(errmsgs[((int)err_pos)-WNA].msg, cur_errp); | ^ repl.c: In function 'everr': repl.c:2133:11: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 2133 | err_pos = pos; | ^ repl.c:2134:14: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 2134 | err_s_subr = s_subr; | ^ In file included from repl.c:21: repl.c:2139:31: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 2139 | COOKIE(1) : COOKIE((int)pos)); | ^ scm.h:260:21: note: in definition of macro 'COOKIE' 260 | # define COOKIE(n) (n) | ^ In file included from scl.c:21: scl.c: In function 'pmantexp2dbl': scm.h:1117:25: warning: passing argument 2 of 'num2dbl' makes pointer from integer without a cast [-Wint-conversion] 1117 | #define ARG1 2L | ^~ | | | long int scl.c:687:34: note: in expansion of macro 'ARG1' 687 | return ldexp(num2dbl(bmant,ARG1,s_str2number) * dpows5[point], point); | ^~~~ scm.h:1036:56: note: expected 'char *' but argument is of type 'long int' 1036 | SCM_EXPORT double num2dbl P((SCM num, char *pos, char *s_caller)); | ~~~~~~^~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ scm.h:1117:25: warning: passing argument 2 of 'num2dbl' makes pointer from integer without a cast [-Wint-conversion] 1117 | #define ARG1 2L | ^~ | | | long int scl.c:717:32: note: in expansion of macro 'ARG1' 717 | return ldexp(num2dbl(bmant,ARG1,s_str2number) / dpows5[-point], point); | ^~~~ scm.h:1036:56: note: expected 'char *' but argument is of type 'long int' 1036 | SCM_EXPORT double num2dbl P((SCM num, char *pos, char *s_caller)); | ~~~~~~^~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ In file included from scm.h:55, from sys.c:21: sys.c: In function 'mark_locations': scmfig.h:419:22: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 419 | # define PTR2INT(x) ((int)(x)) | ^ scm.h:276:39: note: in expansion of macro 'PTR2INT' 276 | #define NCELLP(x) ((sizeof(cell)-1) & PTR2INT(x)) | ^~~~~~~ scm.h:275:20: note: in expansion of macro 'NCELLP' 275 | #define CELLP(x) (!NCELLP(x)) | ^~~~~~ sys.c:2630:29: note: in expansion of macro 'CELLP' 2630 | while(0 <= --m) if (CELLP(*(SCM **)&x[m])) { | ^~~~~ unexelf.c: In function 'find_section': unexelf.c:406:51: warning: implicit declaration of function 'exit' [-Wimplicit-function-declaration] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:634:9: note: in expansion of macro 'fatal' 634 | fatal ("Can't find %s in %s.\n", name, file_name); | ^~~~~ unexelf.c:525:1: note: include '' or provide a declaration of 'exit' 524 | # include /* get ElfW etc */ +++ |+#include 525 | #endif unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:634:9: note: in expansion of macro 'fatal' 634 | fatal ("Can't find %s in %s.\n", name, file_name); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:634:9: note: in expansion of macro 'fatal' 634 | fatal ("Can't find %s in %s.\n", name, file_name); | ^~~~~ unexelf.c: In function 'unexec': unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:692:5: note: in expansion of macro 'fatal' 692 | fatal ("Can't open %s for reading: errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:692:5: note: in expansion of macro 'fatal' 692 | fatal ("Can't open %s for reading: errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:695:5: note: in expansion of macro 'fatal' 695 | fatal ("Can't fstat (%s): errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:695:5: note: in expansion of macro 'fatal' 695 | fatal ("Can't fstat (%s): errno %d\n", old_name, errno); | ^~~~~ unexelf.c:711:12: warning: too many arguments for format [-Wformat-extra-args] 711 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:711:5: note: in expansion of macro 'fatal' 711 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:711:5: note: in expansion of macro 'fatal' 711 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:714:5: note: in expansion of macro 'fatal' 714 | fatal ("Didn't read all of %s: errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:714:5: note: in expansion of macro 'fatal' 714 | fatal ("Didn't read all of %s: errno %d\n", old_name, errno); | ^~~~~ unexelf.c:782:12: warning: too many arguments for format [-Wformat-extra-args] 782 | fatal (".bss shrank when undumping???\n", 0, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:782:5: note: in expansion of macro 'fatal' 782 | fatal (".bss shrank when undumping???\n", 0, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:782:5: note: in expansion of macro 'fatal' 782 | fatal (".bss shrank when undumping???\n", 0, 0); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:790:5: note: in expansion of macro 'fatal' 790 | fatal ("Can't creat (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:790:5: note: in expansion of macro 'fatal' 790 | fatal ("Can't creat (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:795:5: note: in expansion of macro 'fatal' 795 | fatal ("Can't ftruncate (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:795:5: note: in expansion of macro 'fatal' 795 | fatal ("Can't ftruncate (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:800:12: warning: too many arguments for format [-Wformat-extra-args] 800 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:800:5: note: in expansion of macro 'fatal' 800 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:800:5: note: in expansion of macro 'fatal' 800 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~ unexelf.c:855:18: warning: too many arguments for format [-Wformat-extra-args] 855 | fatal ("Program segment above .bss in %s\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:855:11: note: in expansion of macro 'fatal' 855 | fatal ("Program segment above .bss in %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:855:11: note: in expansion of macro 'fatal' 855 | fatal ("Program segment above .bss in %s\n", old_name, 0); | ^~~~~ unexelf.c:865:12: warning: too many arguments for format [-Wformat-extra-args] 865 | fatal ("Couldn't find segment next to .bss in %s\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:865:5: note: in expansion of macro 'fatal' 865 | fatal ("Couldn't find segment next to .bss in %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:865:5: note: in expansion of macro 'fatal' 865 | fatal ("Couldn't find segment next to .bss in %s\n", old_name, 0); | ^~~~~ unexelf.c:895:12: warning: too many arguments for format [-Wformat-extra-args] 895 | fatal ("Can't find .data in %s.\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:895:5: note: in expansion of macro 'fatal' 895 | fatal ("Can't find .data in %s.\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:895:5: note: in expansion of macro 'fatal' 895 | fatal ("Can't find .data in %s.\n", old_name, 0); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1256:5: note: in expansion of macro 'fatal' 1256 | fatal ("Didn't write %d bytes: errno %d\n", | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1256:5: note: in expansion of macro 'fatal' 1256 | fatal ("Didn't write %d bytes: errno %d\n", | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1272:5: note: in expansion of macro 'fatal' 1272 | fatal ("Can't close (%s): errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1272:5: note: in expansion of macro 'fatal' 1272 | fatal ("Can't close (%s): errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1275:5: note: in expansion of macro 'fatal' 1275 | fatal ("Can't close (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1275:5: note: in expansion of macro 'fatal' 1275 | fatal ("Can't close (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1278:5: note: in expansion of macro 'fatal' 1278 | fatal ("Can't stat (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1278:5: note: in expansion of macro 'fatal' 1278 | fatal ("Can't stat (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1284:5: note: in expansion of macro 'fatal' 1284 | fatal ("Can't chmod (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1284:5: note: in expansion of macro 'fatal' 1284 | fatal ("Can't chmod (%s): errno %d\n", new_name, errno); | ^~~~~ gmalloc.c: In function '__malloc_initialize': gmalloc.c:56:33: warning: implicit declaration of function 'bzero' [-Wimplicit-function-declaration] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:486:3: note: in expansion of macro 'memset' 486 | memset (_heapinfo, 0, heapsize * sizeof (malloc_info)); | ^~~~~~ gmalloc.c:56:33: warning: incompatible implicit declaration of built-in function 'bzero' [-Wbuiltin-declaration-mismatch] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:486:3: note: in expansion of macro 'memset' 486 | memset (_heapinfo, 0, heapsize * sizeof (malloc_info)); | ^~~~~~ gmalloc.c: In function 'morecore': gmalloc.c:56:33: warning: incompatible implicit declaration of built-in function 'bzero' [-Wbuiltin-declaration-mismatch] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:556:15: note: in expansion of macro 'memset' 556 | memset (&newinfo[heapsize], 0, | ^~~~~~ gmalloc.c:59:33: warning: implicit declaration of function 'bcopy' [-Wimplicit-function-declaration] 59 | #define memcpy(d, s, n) bcopy ((s), (d), (n)) | ^~~~~ gmalloc.c:590:7: note: in expansion of macro 'memcpy' 590 | memcpy (newinfo, _heapinfo, heapsize * sizeof (malloc_info)); | ^~~~~~ gmalloc.c:59:33: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 59 | #define memcpy(d, s, n) bcopy ((s), (d), (n)) | ^~~~~ gmalloc.c:590:7: note: in expansion of macro 'memcpy' 590 | memcpy (newinfo, _heapinfo, heapsize * sizeof (malloc_info)); | ^~~~~~ gmalloc.c:56:33: warning: incompatible implicit declaration of built-in function 'bzero' [-Wbuiltin-declaration-mismatch] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:591:7: note: in expansion of macro 'memset' 591 | memset (&newinfo[heapsize], 0, | ^~~~~~ gmalloc.c: In function '__malloc_safe_bcopy': gmalloc.c:1211:5: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 1211 | bcopy (from, to, size); | ^~~~~ gmalloc.c:1241:15: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 1241 | bcopy (endf, endt, to - from); | ^~~~~ gmalloc.c:1247:11: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 1247 | bcopy (from, to, endt - from); | ^~~~~ gmalloc.c: In function '_realloc_internal': gmalloc.c:59:33: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 59 | #define memcpy(d, s, n) bcopy ((s), (d), (n)) | ^~~~~ gmalloc.c:1301:15: note: in expansion of macro 'memcpy' 1301 | memcpy (result, ptr, size); | ^~~~~~ gmalloc.c:59:33: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 59 | #define memcpy(d, s, n) bcopy ((s), (d), (n)) | ^~~~~ gmalloc.c:1376:11: note: in expansion of macro 'memcpy' 1376 | memcpy (result, ptr, min (size, (__malloc_size_t) 1 << type)); | ^~~~~~ gmalloc.c: In function 'calloc': gmalloc.c:56:33: warning: incompatible implicit declaration of built-in function 'bzero' [-Wbuiltin-declaration-mismatch] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:1431:12: note: in expansion of macro 'memset' 1431 | (void) memset (result, 0, nmemb * size); | ^~~~~~ gmalloc.c: In function 'valloc': gmalloc.c:1646:16: warning: implicit declaration of function '__getpagesize' [-Wimplicit-function-declaration] 1646 | pagesize = __getpagesize (); | ^~~~~~~~~~~~~ ; ================ Link C object files (system "gcc -rdynamic -o scm -Wl,-z,relro -Wl,-z,now sc2.o ramap.o record.o gsubr.o ioext.o edline.o rgx.o socket.o posix.o unix.o crs.o dynl.o x.o differ.o continue.o scm.o scmmain.o findexec.o script.o time.o repl.o scl.o eval.o sys.o subr.o debug.o unif.o rope.o unexelf.o gmalloc.o -lm -lreadline -ltermcap -lcurses -ldl -L/usr/X11R6/lib -lX11 -lc") /usr/bin/ld: sys.o: in function `ltmpnam': ././sys.c:267: warning: the use of `tmpnam' is dangerous, better use `mkstemp' ./build -p linux -hsystem -f libscm.opt -t lib ; Scheme (linux) script created by SLIB/batch ; [-p linux] ; used options from: libscm.opt ; ================ Write file with C defines (delete-file "scmflags.h") (call-with-output-file "scmflags.h" (lambda (fp) (for-each (lambda (string) (write-line string fp)) '("#define IMPLINIT \"Init5f3.scm\"" "#define INITS init_sc2();init_ioext();" "#define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ();" "#define CAUTIOUS" "#define BIGNUMS" "#define ARRAYS" "#define FLOATS" "#define CCLO" "#define TICKS" "#define CAN_DUMP" "#define MACRO")))) ; ================ Compile C source files (system "gcc -c -I/usr/include/X11 -DX11 -DSUN_DL -Wdate-time -D_FORTIFY_SOURCE=2 -g -O2 -ffile-prefix-map=/build/scm-5f3=. -fstack-protector-strong -Wformat -Werror=format-security -O0 sc2.c ramap.c record.c gsubr.c ioext.c edline.c rgx.c socket.c posix.c unix.c crs.c dynl.c x.c differ.c continue.c scm.c findexec.c script.c time.c repl.c scl.c eval.c sys.c subr.c debug.c unif.c rope.c unexelf.c gmalloc.c") socket.c: In function 'l_hostinfo': socket.c:147:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 147 | ve[ 1] = makfromstrs(-1, entry->h_aliases); | ~~~~~^~~~~~~~~~~ | | | char ** In file included from socket.c:24: scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ socket.c:152:13: warning: assignment to 'const char **' from incompatible pointer type 'char **' [-Wincompatible-pointer-types] 152 | for (argv = entry->h_addr_list; argv[i]; i++); | ^ socket.c: In function 'l_netinfo': socket.c:184:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 184 | ve[ 1] = makfromstrs(-1, entry->n_aliases); | ~~~~~^~~~~~~~~~~ | | | char ** scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ socket.c: In function 'l_protoinfo': socket.c:214:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 214 | ve[ 1] = makfromstrs(-1, entry->p_aliases); | ~~~~~^~~~~~~~~~~ | | | char ** scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ socket.c: In function 'l_servinfo': socket.c:247:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 247 | ve[ 1] = makfromstrs(-1, entry->s_aliases); | ~~~~~^~~~~~~~~~~ | | | char ** scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ posix.c: In function 'l_grinfo': posix.c:194:33: warning: passing argument 2 of 'makfromstrs' from incompatible pointer type [-Wincompatible-pointer-types] 194 | ve[ 3] = makfromstrs(-1, entry->gr_mem); | ~~~~~^~~~~~~~ | | | char ** In file included from posix.c:21: scm.h:1038:62: note: expected 'const char * const*' but argument is of type 'char **' 1038 | SCM_EXPORT SCM makfromstrs P((int argc, const char * const *argv)); | ~~~~~~~~~~~~~~~~~~~~^~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ crs.c:72:3: warning: initialization of 'int (*)(FILE *)' from incompatible pointer type 'int (*)(WINDOW *)' {aka 'int (*)(struct _win_st *)'} [-Wincompatible-pointer-types] 72 | wrefresh, | ^~~~~~~~ crs.c:72:3: note: (near initialization for 'winptob.fflush') crs.c:73:3: warning: initialization of 'int (*)(FILE *)' from incompatible pointer type 'int (*)(WINDOW *)' {aka 'int (*)(struct _win_st *)'} [-Wincompatible-pointer-types] 73 | wgetch, | ^~~~~~ crs.c:73:3: note: (near initialization for 'winptob.fgetc') crs.c: In function 'lunctrl': crs.c:241:17: warning: initialization discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 241 | char *str = unctrl(ICHR(c)); | ^~~~~~ crs.c: In function 'init_crs': crs.c:390:13: warning: passing argument 1 of 'add_final' from incompatible pointer type [-Wincompatible-pointer-types] 390 | add_final(lendwin); | ^~~~~~~ | | | SCM (*)() {aka long int (*)()} In file included from crs.c:21: scm.h:1002:37: note: expected 'void (*)(void)' but argument is of type 'SCM (*)()' {aka 'long int (*)()'} 1002 | SCM_EXPORT void add_final P((void (*final)(void))); | ~~~~~~~^~~~~~~~~~~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ x.c: In function 'make_xcolormap': x.c:337:51: warning: passing argument 4 of 'XSaveContext' makes pointer from integer without a cast [-Wint-conversion] 337 | XSaveContext(XDISPLAY(sdpy), (XID)cmp, xtc_cmp, z); | ^ | | | SCM {aka long int} In file included from /usr/include/X11/Xlib.h:47, from x.c:35: /usr/include/X11/Xutil.h:580:5: note: expected 'const char *' but argument is of type 'SCM' {aka 'long int'} 580 | _Xconst char* /* data */ | ^ x.c: In function 'CCC2SCM': x.c:585:47: warning: passing argument 4 of 'XSaveContext' makes pointer from integer without a cast [-Wint-conversion] 585 | XSaveContext(ccc->dpy, (XID)ccc, xtc_ccc, s_ccc); | ^~~~~ | | | SCM {aka long int} /usr/include/X11/Xutil.h:580:5: note: expected 'const char *' but argument is of type 'SCM' {aka 'long int'} 580 | _Xconst char* /* data */ | ^ x.c: In function 'x_draw_string': x.c:2070:35: warning: passing argument 4 of 'xldraw_string' from incompatible pointer type [-Wincompatible-pointer-types] 2070 | xldraw_string(sdbl, sgc, sargs, &XDrawString, s_x_draw_string); | ^~~~~~~~~~~~ | | | int (*)(Display *, Drawable, struct _XGC *, int, int, const char *, int) {aka int (*)(Display *, long unsigned int, struct _XGC *, int, int, const char *, int)} x.c:2053:12: note: expected 'int (*)(void)' but argument is of type 'int (*)(Display *, Drawable, struct _XGC *, int, int, const char *, int)' {aka 'int (*)(Display *, long unsigned int, struct _XGC *, int, int, const char *, int)'} 2053 | int (*proc)(); | ^~~~ x.c: In function 'x_image_string': x.c:2076:35: warning: passing argument 4 of 'xldraw_string' from incompatible pointer type [-Wincompatible-pointer-types] 2076 | xldraw_string(sdbl, sgc, sargs, &XDrawImageString, s_x_image_string); | ^~~~~~~~~~~~~~~~~ | | | int (*)(Display *, Drawable, struct _XGC *, int, int, const char *, int) {aka int (*)(Display *, long unsigned int, struct _XGC *, int, int, const char *, int)} x.c:2053:12: note: expected 'int (*)(void)' but argument is of type 'int (*)(Display *, Drawable, struct _XGC *, int, int, const char *, int)' {aka 'int (*)(Display *, long unsigned int, struct _XGC *, int, int, const char *, int)'} 2053 | int (*proc)(); | ^~~~ differ.c:122:4: warning: initialization of 'void * (*)()' from incompatible pointer type 'long int * (*)()' [-Wincompatible-pointer-types] 122 | {long_subarray, | ^~~~~~~~~~~~~ differ.c:122:4: note: (near initialization for 'long_procs.subarray') differ.c:126:4: warning: initialization of 'void * (*)()' from incompatible pointer type 'short int * (*)()' [-Wincompatible-pointer-types] 126 | {short_subarray, | ^~~~~~~~~~~~~~ differ.c:126:4: note: (near initialization for 'short_procs.subarray') differ.c:130:4: warning: initialization of 'void * (*)()' from incompatible pointer type 'char * (*)()' [-Wincompatible-pointer-types] 130 | {char_subarray, | ^~~~~~~~~~~~~ differ.c:130:4: note: (near initialization for 'char_procs.subarray') In file included from scmfig.h:71, from scm.h:55, from scm.c:26: scm.c: In function 'scm_init_extensions': scmflags.h:3:116: warning: implicit declaration of function 'init_unix'; did you mean 'init_unif'? [-Wimplicit-function-declaration] 3 | #define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ(); | ^~~~~~~~~ scm.c:110:3: note: in expansion of macro 'COMPILED_INITS' 110 | COMPILED_INITS; /* initialize statically linked add-ons */ | ^~~~~~~~~~~~~~ scmflags.h:3:128: warning: implicit declaration of function 'init_crs'; did you mean 'init_subrs'? [-Wimplicit-function-declaration] 3 | #define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ(); | ^~~~~~~~ scm.c:110:3: note: in expansion of macro 'COMPILED_INITS' 110 | COMPILED_INITS; /* initialize statically linked add-ons */ | ^~~~~~~~~~~~~~ scmflags.h:3:139: warning: implicit declaration of function 'init_x'; did you mean 'init_rgx'? [-Wimplicit-function-declaration] 3 | #define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ(); | ^~~~~~ scm.c:110:3: note: in expansion of macro 'COMPILED_INITS' 110 | COMPILED_INITS; /* initialize statically linked add-ons */ | ^~~~~~~~~~~~~~ scmflags.h:3:148: warning: implicit declaration of function 'init_differ' [-Wimplicit-function-declaration] 3 | #define COMPILED_INITS init_ramap();init_record();init_gsubr();init_edline();init_rgx();init_socket();init_posix();init_unix();init_crs();init_x();init_differ(); | ^~~~~~~~~~~ scm.c:110:3: note: in expansion of macro 'COMPILED_INITS' 110 | COMPILED_INITS; /* initialize statically linked add-ons */ | ^~~~~~~~~~~~~~ scm.c: In function 'process_signals': scm.c:176:24: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 176 | wta(UNDEFINED, (char *)i, ""); | ^ scm.c: In function 'scmable_signal': scm.c:290:22: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 290 | wta(UNDEFINED, (char *)i, ""); | ^ script.c: In function 'script_find_executable': script.c:127:5: warning: case label value is less than minimum value for type [-Wswitch-outside-range] 127 | case EOF: | ^~~~ script.c: In function 'find_impl_file': script.c:149:18: warning: initialization discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 149 | char *extptr = exec_path + strlen(exec_path); | ^~~~~~~~~ script.c:165:10: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 165 | extptr = exec_path + strlen(exec_path); | ^ script.c: In function 'script_read_arg': script.c:304:5: warning: case label value is less than minimum value for type [-Wswitch-outside-range] 304 | case EOF: goto endarg; | ^~~~ script.c: In function 'script_process_argv': script.c:362:12: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 362 | nargv[0] = argv[0]; | ^ script.c:377:22: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 377 | nargv[nargi++] = argv[argi++]; | ^ script.c:380:39: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 380 | while (argi <= argc) nargv[nargi++] = argv[argi++]; | ^ repl.c: In function 'handle_it': repl.c:1270:20: warning: cast to pointer from integer of different size [-Wint-to-pointer-cast] 1270 | wta(UNDEFINED, (char *)i, ""); /* sends it to def_err_response */ | ^ repl.c: In function 'def_err_response': repl.c:2077:47: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 2077 | lputc((long)err_pos <= ARGn ? ' ' : '1' + (int)err_pos - ARG1, cur_errp); | ^ repl.c:2080:23: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 2080 | else lputs(errmsgs[((int)err_pos)-WNA].msg, cur_errp); | ^ repl.c: In function 'everr': repl.c:2133:11: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 2133 | err_pos = pos; | ^ repl.c:2134:14: warning: assignment discards 'const' qualifier from pointer target type [-Wdiscarded-qualifiers] 2134 | err_s_subr = s_subr; | ^ In file included from repl.c:21: repl.c:2139:31: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 2139 | COOKIE(1) : COOKIE((int)pos)); | ^ scm.h:260:21: note: in definition of macro 'COOKIE' 260 | # define COOKIE(n) (n) | ^ In file included from scl.c:21: scl.c: In function 'pmantexp2dbl': scm.h:1117:25: warning: passing argument 2 of 'num2dbl' makes pointer from integer without a cast [-Wint-conversion] 1117 | #define ARG1 2L | ^~ | | | long int scl.c:687:34: note: in expansion of macro 'ARG1' 687 | return ldexp(num2dbl(bmant,ARG1,s_str2number) * dpows5[point], point); | ^~~~ scm.h:1036:56: note: expected 'char *' but argument is of type 'long int' 1036 | SCM_EXPORT double num2dbl P((SCM num, char *pos, char *s_caller)); | ~~~~~~^~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ scm.h:1117:25: warning: passing argument 2 of 'num2dbl' makes pointer from integer without a cast [-Wint-conversion] 1117 | #define ARG1 2L | ^~ | | | long int scl.c:717:32: note: in expansion of macro 'ARG1' 717 | return ldexp(num2dbl(bmant,ARG1,s_str2number) / dpows5[-point], point); | ^~~~ scm.h:1036:56: note: expected 'char *' but argument is of type 'long int' 1036 | SCM_EXPORT double num2dbl P((SCM num, char *pos, char *s_caller)); | ~~~~~~^~~ scm.h:80:15: note: in definition of macro 'P' 80 | # define P(s) s | ^ In file included from scm.h:55, from sys.c:21: sys.c: In function 'mark_locations': scmfig.h:419:22: warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] 419 | # define PTR2INT(x) ((int)(x)) | ^ scm.h:276:39: note: in expansion of macro 'PTR2INT' 276 | #define NCELLP(x) ((sizeof(cell)-1) & PTR2INT(x)) | ^~~~~~~ scm.h:275:20: note: in expansion of macro 'NCELLP' 275 | #define CELLP(x) (!NCELLP(x)) | ^~~~~~ sys.c:2630:29: note: in expansion of macro 'CELLP' 2630 | while(0 <= --m) if (CELLP(*(SCM **)&x[m])) { | ^~~~~ unexelf.c: In function 'find_section': unexelf.c:406:51: warning: implicit declaration of function 'exit' [-Wimplicit-function-declaration] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:634:9: note: in expansion of macro 'fatal' 634 | fatal ("Can't find %s in %s.\n", name, file_name); | ^~~~~ unexelf.c:525:1: note: include '' or provide a declaration of 'exit' 524 | # include /* get ElfW etc */ +++ |+#include 525 | #endif unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:634:9: note: in expansion of macro 'fatal' 634 | fatal ("Can't find %s in %s.\n", name, file_name); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:634:9: note: in expansion of macro 'fatal' 634 | fatal ("Can't find %s in %s.\n", name, file_name); | ^~~~~ unexelf.c: In function 'unexec': unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:692:5: note: in expansion of macro 'fatal' 692 | fatal ("Can't open %s for reading: errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:692:5: note: in expansion of macro 'fatal' 692 | fatal ("Can't open %s for reading: errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:695:5: note: in expansion of macro 'fatal' 695 | fatal ("Can't fstat (%s): errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:695:5: note: in expansion of macro 'fatal' 695 | fatal ("Can't fstat (%s): errno %d\n", old_name, errno); | ^~~~~ unexelf.c:711:12: warning: too many arguments for format [-Wformat-extra-args] 711 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:711:5: note: in expansion of macro 'fatal' 711 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:711:5: note: in expansion of macro 'fatal' 711 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:714:5: note: in expansion of macro 'fatal' 714 | fatal ("Didn't read all of %s: errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:714:5: note: in expansion of macro 'fatal' 714 | fatal ("Didn't read all of %s: errno %d\n", old_name, errno); | ^~~~~ unexelf.c:782:12: warning: too many arguments for format [-Wformat-extra-args] 782 | fatal (".bss shrank when undumping???\n", 0, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:782:5: note: in expansion of macro 'fatal' 782 | fatal (".bss shrank when undumping???\n", 0, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:782:5: note: in expansion of macro 'fatal' 782 | fatal (".bss shrank when undumping???\n", 0, 0); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:790:5: note: in expansion of macro 'fatal' 790 | fatal ("Can't creat (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:790:5: note: in expansion of macro 'fatal' 790 | fatal ("Can't creat (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:795:5: note: in expansion of macro 'fatal' 795 | fatal ("Can't ftruncate (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:795:5: note: in expansion of macro 'fatal' 795 | fatal ("Can't ftruncate (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:800:12: warning: too many arguments for format [-Wformat-extra-args] 800 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:800:5: note: in expansion of macro 'fatal' 800 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:800:5: note: in expansion of macro 'fatal' 800 | fatal ("Can't allocate buffer for %s\n", old_name, 0); | ^~~~~ unexelf.c:855:18: warning: too many arguments for format [-Wformat-extra-args] 855 | fatal ("Program segment above .bss in %s\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:855:11: note: in expansion of macro 'fatal' 855 | fatal ("Program segment above .bss in %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:855:11: note: in expansion of macro 'fatal' 855 | fatal ("Program segment above .bss in %s\n", old_name, 0); | ^~~~~ unexelf.c:865:12: warning: too many arguments for format [-Wformat-extra-args] 865 | fatal ("Couldn't find segment next to .bss in %s\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:865:5: note: in expansion of macro 'fatal' 865 | fatal ("Couldn't find segment next to .bss in %s\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:865:5: note: in expansion of macro 'fatal' 865 | fatal ("Couldn't find segment next to .bss in %s\n", old_name, 0); | ^~~~~ unexelf.c:895:12: warning: too many arguments for format [-Wformat-extra-args] 895 | fatal ("Can't find .data in %s.\n", old_name, 0); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~ unexelf.c:406:41: note: in definition of macro 'fatal' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:895:5: note: in expansion of macro 'fatal' 895 | fatal ("Can't find .data in %s.\n", old_name, 0); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:895:5: note: in expansion of macro 'fatal' 895 | fatal ("Can't find .data in %s.\n", old_name, 0); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1256:5: note: in expansion of macro 'fatal' 1256 | fatal ("Didn't write %d bytes: errno %d\n", | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1256:5: note: in expansion of macro 'fatal' 1256 | fatal ("Didn't write %d bytes: errno %d\n", | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1272:5: note: in expansion of macro 'fatal' 1272 | fatal ("Can't close (%s): errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1272:5: note: in expansion of macro 'fatal' 1272 | fatal ("Can't close (%s): errno %d\n", old_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1275:5: note: in expansion of macro 'fatal' 1275 | fatal ("Can't close (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1275:5: note: in expansion of macro 'fatal' 1275 | fatal ("Can't close (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1278:5: note: in expansion of macro 'fatal' 1278 | fatal ("Can't stat (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1278:5: note: in expansion of macro 'fatal' 1278 | fatal ("Can't stat (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: warning: incompatible implicit declaration of built-in function 'exit' [-Wbuiltin-declaration-mismatch] 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1284:5: note: in expansion of macro 'fatal' 1284 | fatal ("Can't chmod (%s): errno %d\n", new_name, errno); | ^~~~~ unexelf.c:406:51: note: include '' or provide a declaration of 'exit' 406 | #define fatal(a, b, c) fprintf (stderr, a, b, c), exit (1) | ^~~~ unexelf.c:1284:5: note: in expansion of macro 'fatal' 1284 | fatal ("Can't chmod (%s): errno %d\n", new_name, errno); | ^~~~~ gmalloc.c: In function '__malloc_initialize': gmalloc.c:56:33: warning: implicit declaration of function 'bzero' [-Wimplicit-function-declaration] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:486:3: note: in expansion of macro 'memset' 486 | memset (_heapinfo, 0, heapsize * sizeof (malloc_info)); | ^~~~~~ gmalloc.c:56:33: warning: incompatible implicit declaration of built-in function 'bzero' [-Wbuiltin-declaration-mismatch] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:486:3: note: in expansion of macro 'memset' 486 | memset (_heapinfo, 0, heapsize * sizeof (malloc_info)); | ^~~~~~ gmalloc.c: In function 'morecore': gmalloc.c:56:33: warning: incompatible implicit declaration of built-in function 'bzero' [-Wbuiltin-declaration-mismatch] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:556:15: note: in expansion of macro 'memset' 556 | memset (&newinfo[heapsize], 0, | ^~~~~~ gmalloc.c:59:33: warning: implicit declaration of function 'bcopy' [-Wimplicit-function-declaration] 59 | #define memcpy(d, s, n) bcopy ((s), (d), (n)) | ^~~~~ gmalloc.c:590:7: note: in expansion of macro 'memcpy' 590 | memcpy (newinfo, _heapinfo, heapsize * sizeof (malloc_info)); | ^~~~~~ gmalloc.c:59:33: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 59 | #define memcpy(d, s, n) bcopy ((s), (d), (n)) | ^~~~~ gmalloc.c:590:7: note: in expansion of macro 'memcpy' 590 | memcpy (newinfo, _heapinfo, heapsize * sizeof (malloc_info)); | ^~~~~~ gmalloc.c:56:33: warning: incompatible implicit declaration of built-in function 'bzero' [-Wbuiltin-declaration-mismatch] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:591:7: note: in expansion of macro 'memset' 591 | memset (&newinfo[heapsize], 0, | ^~~~~~ gmalloc.c: In function '__malloc_safe_bcopy': gmalloc.c:1211:5: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 1211 | bcopy (from, to, size); | ^~~~~ gmalloc.c:1241:15: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 1241 | bcopy (endf, endt, to - from); | ^~~~~ gmalloc.c:1247:11: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 1247 | bcopy (from, to, endt - from); | ^~~~~ gmalloc.c: In function '_realloc_internal': gmalloc.c:59:33: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 59 | #define memcpy(d, s, n) bcopy ((s), (d), (n)) | ^~~~~ gmalloc.c:1301:15: note: in expansion of macro 'memcpy' 1301 | memcpy (result, ptr, size); | ^~~~~~ gmalloc.c:59:33: warning: incompatible implicit declaration of built-in function 'bcopy' [-Wbuiltin-declaration-mismatch] 59 | #define memcpy(d, s, n) bcopy ((s), (d), (n)) | ^~~~~ gmalloc.c:1376:11: note: in expansion of macro 'memcpy' 1376 | memcpy (result, ptr, min (size, (__malloc_size_t) 1 << type)); | ^~~~~~ gmalloc.c: In function 'calloc': gmalloc.c:56:33: warning: incompatible implicit declaration of built-in function 'bzero' [-Wbuiltin-declaration-mismatch] 56 | #define memset(s, zero, n) bzero ((s), (n)) | ^~~~~ gmalloc.c:1431:12: note: in expansion of macro 'memset' 1431 | (void) memset (result, 0, nmemb * size); | ^~~~~~ gmalloc.c: In function 'valloc': gmalloc.c:1646:16: warning: implicit declaration of function '__getpagesize' [-Wimplicit-function-declaration] 1646 | pagesize = __getpagesize (); | ^~~~~~~~~~~~~ ; ================ Link C object files (system "ar rc libscm.a sc2.o ramap.o record.o gsubr.o ioext.o edline.o rgx.o socket.o posix.o unix.o crs.o dynl.o x.o differ.o continue.o scm.o findexec.o script.o time.o repl.o scl.o eval.o sys.o subr.o debug.o unif.o rope.o unexelf.o gmalloc.o") (system "ranlib libscm.a") makeinfo --html --no-split scm.texi makeinfo --html --no-split Xlibscm.texi cp XlibScm.html Xlibscm.html cp ChangeLog changelog make[1]: Leaving directory '/build/scm-5f3' dh_auto_test make -j8 check "TESTSUITEFLAGS=-j8 --verbose" VERBOSE=1 make[1]: Entering directory '/build/scm-5f3' ./scm -fr4rstest.scm -e'(test-sc4)(test-cont)(test-delay)(gc)' \ -e '(or (null? errs) (quit 1))' < /dev/null SECTION(2 1) SECTION(3 4) # # # # # # # # # (#t #f #f #f #f #f #f #f #f)#t (#t #f #f #f #f #f #f #f #f)#f (#f #t #f #f #f #f #f #f #f)#\a (#f #f #t #f #f #f #f #f #f)() (#f #f #f #t #f #f #f #f #f)9739 (#f #f #f #f #t #f #f #f #f)(test) (#f #f #f #f #f #t #f #f #f)# (#f #f #f #f #f #f #t #f #f)"test" (#f #f #f #f #f #f #t #f #f)"" (#f #f #f #f #f #f #f #t #f)test (#f #f #f #f #f #f #f #f #t)#() (#f #f #f #f #f #f #f #f #t)#(a b c) SECTION(4 1 2) (quote (quote a)) ==> (quote a) (quote (quote a)) ==> (quote a) SECTION(4 1 3) (# 3 4) ==> 12 SECTION(4 1 4) (# "r4rstest.scm": (x) (+ x x)> 4) ==> 8 (# 7 10) ==> 3 (# "r4rstest.scm": (y) (+ x y)> 6) ==> 10 (# "r4rstest.scm": x x> 3 4 5 6) ==> (3 4 5 6) (# "r4rstest.scm": (x y . z) z> 3 4 5 6) ==> (5 6) SECTION(4 1 5) (if yes) ==> yes (if no) ==> no (if 1) ==> 1 SECTION(4 1 6) (define 3) ==> 3 (set! 5) ==> 5 SECTION(4 2 1) (cond greater) ==> greater (cond equal) ==> equal (cond 2) ==> 2 (case composite) ==> composite (case consonant) ==> consonant (and #t) ==> #t (and #f) ==> #f (and (f g)) ==> (f g) (and #t) ==> #t (or #t) ==> #t (or #t) ==> #t (or #f) ==> #f (or #f) ==> #f (or (b c)) ==> (b c) SECTION(4 2 2) (let 6) ==> 6 (let 35) ==> 35 (let* 70) ==> 70 (letrec #t) ==> #t (let 5) ==> 5 (let 34) ==> 34 (let 6) ==> 6 (let 34) ==> 34 (let 34) ==> 34 (let* 7) ==> 7 (let* 34) ==> 34 (let* 8) ==> 8 (let* 34) ==> 34 (letrec 9) ==> 9 (letrec 34) ==> 34 (letrec 10) ==> 10 (letrec 34) ==> 34 SECTION(4 2 3) (begin 6) ==> 6 SECTION(4 2 4) (do #(0 1 2 3 4)) ==> #(0 1 2 3 4) (do 25) ==> 25 (do 25) ==> 25 (let 1) ==> 1 (let ((6 1 3) (-5 -2))) ==> ((6 1 3) (-5 -2)) (let -1) ==> -1 SECTION(4 2 6) (quasiquote (list 3 4)) ==> (list 3 4) (quasiquote (list a (quote a))) ==> (list a (quote a)) (quasiquote (a 3 4 5 6 b)) ==> (a 3 4 5 6 b) (quasiquote ((foo 7) . cons)) ==> ((foo 7) . cons) (quasiquote #(10 5 2 4 3 8)) ==> #(10 5 2 4 3 8) (quasiquote 5) ==> 5 (quasiquote (a (quasiquote (b (unquote (+ 1 2)) (unquote (foo 4 d)) e)) f)) ==> (a (quasiquote (b (unquote (+ 1 2)) (unquote (foo 4 d)) e)) f) (quasiquote (a (quasiquote (b (unquote x) (unquote (quote y)) d)) e)) ==> (a (quasiquote (b (unquote x) (unquote (quote y)) d)) e) (quasiquote (list 3 4)) ==> (list 3 4) (quasiquote (quasiquote (list (unquote (+ 1 2)) 4))) ==> (quasiquote (list (unquote (+ 1 2)) 4)) SECTION(5 2 1) (tprint #t) ==> #t (define 6) ==> 6 (define 1) ==> 1 (define 9) ==> 9 (define 9) ==> 9 (define 10) ==> 10 (# 6) ==> (3 6) (# 6) ==> 9 SECTION(5 2 2) (define 45) ==> 45 (#) ==> 5 (define 34) ==> 34 (#) ==> 5 (define 34) ==> 34 (# 88) ==> 88 (# 4) ==> 4 (define 34) ==> 34 (internal-define 99) ==> 99 (internal-define 77) ==> 77 SECTION(6 1) (# #t) ==> #f (# 3) ==> #f (# (3)) ==> #f (# #f) ==> #t (# ()) ==> #f (# ()) ==> #f (# nil) ==> #f SECTION(6 2) (# a a) ==> #t (# a b) ==> #f (# 2 2) ==> #t (# () ()) ==> #t (# 10000 10000) ==> #t (# (1 . 2) (1 . 2)) ==> #f (# # "r4rstest.scm": () 1> # "r4rstest.scm": () 2>) ==> #f (# #f nil) ==> #f (# # #) ==> #t (# # "r4rstest.scm": () (set! n (+ n 1)) n> # "r4rstest.scm": () (set! n (+ n 1)) n>) ==> #t (# # "r4rstest.scm": () (set! n (+ n 1)) n> # "r4rstest.scm": () (set! n (+ n 1)) n>) ==> #f (# # #) ==> #f (# a a) ==> #t (# (a) (a)) ==> #f (# () ()) ==> #t (# # #) ==> #t (# (a) (a)) ==> #t (# #() #()) ==> #t (# # #) ==> #t (# a a) ==> #t (# (a) (a)) ==> #t (# (a (b) c) (a (b) c)) ==> #t (# "abc" "abc") ==> #t (# 2 2) ==> #t (# #(a a a a a) #(a a a a a)) ==> #t SECTION(6 3) (dot (a b c d e)) ==> (a b c d e) (# (a b c)) ==> #t (set-cdr! (a . 4)) ==> (a . 4) (# (a . 4) (a . 4)) ==> #t (dot (a b c . d)) ==> (a b c . d) (# (a . 4)) ==> #f (list? #f) ==> #f (# a ()) ==> (a) (# (a) (b c d)) ==> ((a) b c d) (# "a" (b c)) ==> ("a" b c) (# a 3) ==> (a . 3) (# (a b) c) ==> ((a b) . c) (# (a b c)) ==> a (# ((a) b c d)) ==> (a) (# (1 . 2)) ==> 1 (# ((a) b c d)) ==> (b c d) (# (1 . 2)) ==> 2 (# a 7 c) ==> (a 7 c) (#) ==> () (# (a b c)) ==> 3 (# (a (b) (c d e))) ==> 3 (# ()) ==> 0 (# (x) (y)) ==> (x y) (# (a) (b c d)) ==> (a b c d) (# (a (b)) ((c))) ==> (a (b) (c)) (#) ==> () (# (a b) (c . d)) ==> (a b c . d) (# () a) ==> a (# (a b c)) ==> (c b a) (# (a (b c) d (e (f)))) ==> ((e (f)) d (b c) a) (# (a b c d) 2) ==> c (# a (a b c)) ==> (a b c) (# b (a b c)) ==> (b c) (# a (b c d)) ==> #f (# (a) (b (a) c)) ==> #f (# (a) (b (a) c)) ==> ((a) c) (# 101 (100 101 102)) ==> (101 102) (# a ((a 1) (b 2) (c 3))) ==> (a 1) (# b ((a 1) (b 2) (c 3))) ==> (b 2) (# d ((a 1) (b 2) (c 3))) ==> #f (# (a) (((a)) ((b)) ((c)))) ==> #f (# (a) (((a)) ((b)) ((c)))) ==> ((a)) (# 5 ((2 3) (5 7) (11 13))) ==> (5 7) SECTION(6 4) (# a) ==> #t (standard-case #t) ==> #t (standard-case #t) ==> #t (#string> flying-fish) ==> "flying-fish" (#string> martin) ==> "martin" (#string> \Malvina) ==> "Malvina" (standard-case #t) ==> #t (string-set! "cb") ==> "cb" (#string> ab) ==> "ab" (#symbol> "ab") ==> ab (# mississippi mississippi) ==> #t (string->symbol #f) ==> #f (#symbol> "jollywog") ==> jollywog SECTION(6 5 5) (# 3) ==> #t (# 3) ==> #t (# 3) ==> #t (# 3) ==> #t (# 3) ==> #t (# 3) ==> #t (# 3) ==> #f (# 0 0) ==> 1 (# 0 1) ==> 0 (# 0 256) ==> 0 (# -1 256) ==> 1 (# -1 255) ==> -1 (# -1 -256) ==> 1 (# -1 -255) ==> -1 (# 256 0) ==> 1 (# -256 0) ==> 1 (# 256 1) ==> 256 (# -256 1) ==> -256 (# 2 3) ==> 8 (# -2 3) ==> -8 (# 3 2) ==> 9 (# -3 2) ==> 9 (# 22 22 22) ==> #t (# 22 22) ==> #t (# 34 34 35) ==> #f (# 34 35) ==> #f (#> 3 -6246) ==> #t (#> 9 9 -2424) ==> #f (#=> 3 -4 -6246) ==> #t (#=> 9 9) ==> #t (#=> 8 9) ==> #f (# -1 2 3 4 5 6 7 8) ==> #t (# -1 2 3 4 4 5 6 7) ==> #f (# -1 2 3 4 5 6 7 8) ==> #t (# -1 2 3 4 4 5 6 7) ==> #t (# 1 3 2) ==> #f (#=> 1 3 2) ==> #f (# 0) ==> #t (# 1) ==> #f (# -1) ==> #f (# -100) ==> #f (# 4) ==> #t (# -4) ==> #f (# 0) ==> #f (# 4) ==> #f (# -4) ==> #t (# 0) ==> #f (# 3) ==> #t (# 2) ==> #f (# -4) ==> #f (# -1) ==> #t (# 3) ==> #f (# 2) ==> #t (# -4) ==> #t (# -1) ==> #f (# 34 5 7 38 6) ==> 38 (# 3 5 5 330 4 -24) ==> -24 (# 3 4) ==> 7 (# 3) ==> 3 (#) ==> 0 (# 4) ==> 4 (#) ==> 1 (# 1) ==> 1 (# -1) ==> -1 (# 6 3) ==> 2 (# 6 -2) ==> -3 (# -6 2) ==> -3 (# -6 -2) ==> 3 (# 3 4) ==> -1 (# 3) ==> -3 (# -7) ==> 7 (# 7) ==> 7 (# 0) ==> 0 (# 35 7) ==> 5 (# -35 7) ==> -5 (# 35 -7) ==> -5 (# -35 -7) ==> 5 (# 13 4) ==> 1 (# 13 4) ==> 1 (# -13 4) ==> 3 (# -13 4) ==> -1 (# 13 -4) ==> -3 (# 13 -4) ==> 1 (# -13 -4) ==> -1 (# -13 -4) ==> -1 (# 0 86400) ==> 0 (# 0 -86400) ==> 0 (# 238 9) ==> #t (# -238 9) ==> #t (# 238 -9) ==> #t (# -238 -9) ==> #t (# 0 4) ==> 4 (# -4 0) ==> 4 (# 32 -36) ==> 4 (#) ==> 0 (# 32 -36) ==> 288 (#) ==> 1 SECTION(6 5 5) (#number "r4rstest.scm": (str) (#@define ((ans (string->number str))) (cond ((not ans) #t) ((number? ans) #t) (else ans)))> "+#.#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "-#.#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "#.#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((number? ans) #t) (#t ans)))> "1/0") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "-1/0") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "0/0") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "+1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "-1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "0/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "0/0-0/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "1/0-1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "-1/0+1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "#i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "#e") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@cond ((#@not #@ans) #t) ((#@number? #@ans) #t) (#t ans)))> "#i0/0") ==> #t (# 0.-1.i) ==> #t (# 0.+1.i) ==> #t (# 2.+1.i) ==> #t SECTION(6 5 9) (#string> 0) ==> "0" (#string> 100) ==> "100" (#string> 256 16) ==> "100" (#number> "100") ==> 100 (#number> "100" 16) ==> 256 (#number> "") ==> #f (#number> ".") ==> #f (#number> "d") ==> #f (#number> "D") ==> #f (#number> "i") ==> #f (#number> "I") ==> #f (#number> "3i") ==> #f (#number> "3I") ==> #f (#number> "33i") ==> #f (#number> "33I") ==> #f (#number> "3.3i") ==> #f (#number> "3.3I") ==> #f (#number> "-") ==> #f (#number> "+") ==> #f (string->number #t) ==> #t (string->number #t) ==> #t SECTION(6 6) (# #\space #\space) ==> #t (# #\space #\space) ==> #t (# #\a) ==> #t (# #\() ==> #t (# #\space) ==> #t (# #\nl) ==> #t (# #\A #\B) ==> #f (# #\a #\b) ==> #f (# #\9 #\0) ==> #f (# #\A #\A) ==> #t (# #\A #\B) ==> #t (# #\a #\b) ==> #t (# #\9 #\0) ==> #f (# #\A #\A) ==> #f (#?> #\A #\B) ==> #f (#?> #\a #\b) ==> #f (#?> #\9 #\0) ==> #t (#?> #\A #\A) ==> #f (# #\A #\B) ==> #t (# #\a #\b) ==> #t (# #\9 #\0) ==> #f (# #\A #\A) ==> #t (#=?> #\A #\B) ==> #f (#=?> #\a #\b) ==> #f (#=?> #\9 #\0) ==> #t (#=?> #\A #\A) ==> #t (# #\A #\B) ==> #f (# #\a #\B) ==> #f (# #\A #\b) ==> #f (# #\a #\b) ==> #f (# #\9 #\0) ==> #f (# #\A #\A) ==> #t (# #\A #\a) ==> #t (# #\A #\B) ==> #t (# #\a #\B) ==> #t (# #\A #\b) ==> #t (# #\a #\b) ==> #t (# #\9 #\0) ==> #f (# #\A #\A) ==> #f (# #\A #\a) ==> #f (#?> #\A #\B) ==> #f (#?> #\a #\B) ==> #f (#?> #\A #\b) ==> #f (#?> #\a #\b) ==> #f (#?> #\9 #\0) ==> #t (#?> #\A #\A) ==> #f (#?> #\A #\a) ==> #f (# #\A #\B) ==> #t (# #\a #\B) ==> #t (# #\A #\b) ==> #t (# #\a #\b) ==> #t (# #\9 #\0) ==> #f (# #\A #\A) ==> #t (# #\A #\a) ==> #t (#=?> #\A #\B) ==> #f (#=?> #\a #\B) ==> #f (#=?> #\A #\b) ==> #f (#=?> #\a #\b) ==> #f (#=?> #\9 #\0) ==> #t (#=?> #\A #\A) ==> #t (#=?> #\A #\a) ==> #t (# #\a) ==> #t (# #\A) ==> #t (# #\z) ==> #t (# #\Z) ==> #t (# #\0) ==> #f (# #\9) ==> #f (# #\space) ==> #f (# #\;) ==> #f (# #\a) ==> #f (# #\A) ==> #f (# #\z) ==> #f (# #\Z) ==> #f (# #\0) ==> #t (# #\9) ==> #t (# #\space) ==> #f (# #\;) ==> #f (# #\a) ==> #f (# #\A) ==> #f (# #\z) ==> #f (# #\Z) ==> #f (# #\0) ==> #f (# #\9) ==> #f (# #\space) ==> #t (# #\;) ==> #f (# #\0) ==> #f (# #\9) ==> #f (# #\space) ==> #f (# #\;) ==> #f (# #\0) ==> #f (# #\9) ==> #f (# #\space) ==> #f (# #\;) ==> #f (#char> 46) ==> #\. (#char> 65) ==> #\A (#char> 97) ==> #\a (# #\A) ==> #\A (# #\a) ==> #\A (# #\A) ==> #\a (# #\a) ==> #\a SECTION(6 7) (# "The word \"recursion\\\" has many meanings.") ==> #t (string-set! "?**") ==> "?**" (# #\a #\b #\c) ==> "abc" (#) ==> "" (# "abc") ==> 3 (# "abc" 0) ==> #\a (# "abc" 2) ==> #\c (# "") ==> 0 (# "ab" 0 0) ==> "" (# "ab" 1 1) ==> "" (# "ab" 2 2) ==> "" (# "ab" 0 1) ==> "a" (# "ab" 1 2) ==> "b" (# "ab" 0 2) ==> "ab" (# "foo" "bar") ==> "foobar" (# "foo") ==> "foo" (# "foo" "") ==> "foo" (# "" "foo") ==> "foo" (#) ==> "" (# 0) ==> "" (# "" "") ==> #t (# "" "") ==> #f (#?> "" "") ==> #f (# "" "") ==> #t (#=?> "" "") ==> #t (# "" "") ==> #t (# "" "") ==> #f (#?> "" "") ==> #f (# "" "") ==> #t (#=?> "" "") ==> #t (# "A" "B") ==> #f (# "a" "b") ==> #f (# "9" "0") ==> #f (# "A" "A") ==> #t (# "A" "B") ==> #t (# "a" "b") ==> #t (# "9" "0") ==> #f (# "A" "A") ==> #f (#?> "A" "B") ==> #f (#?> "a" "b") ==> #f (#?> "9" "0") ==> #t (#?> "A" "A") ==> #f (# "A" "B") ==> #t (# "a" "b") ==> #t (# "9" "0") ==> #f (# "A" "A") ==> #t (#=?> "A" "B") ==> #f (#=?> "a" "b") ==> #f (#=?> "9" "0") ==> #t (#=?> "A" "A") ==> #t (# "A" "B") ==> #f (# "a" "B") ==> #f (# "A" "b") ==> #f (# "a" "b") ==> #f (# "9" "0") ==> #f (# "A" "A") ==> #t (# "A" "a") ==> #t (# "A" "B") ==> #t (# "a" "B") ==> #t (# "A" "b") ==> #t (# "a" "b") ==> #t (# "9" "0") ==> #f (# "A" "A") ==> #f (# "A" "a") ==> #f (#?> "A" "B") ==> #f (#?> "a" "B") ==> #f (#?> "A" "b") ==> #f (#?> "a" "b") ==> #f (#?> "9" "0") ==> #t (#?> "A" "A") ==> #f (#?> "A" "a") ==> #f (# "A" "B") ==> #t (# "a" "B") ==> #t (# "A" "b") ==> #t (# "a" "b") ==> #t (# "9" "0") ==> #f (# "A" "A") ==> #t (# "A" "a") ==> #t (#=?> "A" "B") ==> #f (#=?> "a" "B") ==> #f (#=?> "A" "b") ==> #f (#=?> "a" "b") ==> #f (#=?> "9" "0") ==> #t (#=?> "A" "A") ==> #t (#=?> "A" "a") ==> #t SECTION(6 8) (# #(0 (2 2 2 2) "Anna")) ==> #t (# a b c) ==> #(a b c) (#) ==> #() (# #(0 (2 2 2 2) "Anna")) ==> 3 (# #()) ==> 0 (# #(1 1 2 3 5 8 13 21) 5) ==> 8 (vector-set #(0 ("Sue" "Sue") "Anna")) ==> #(0 ("Sue" "Sue") "Anna") (# 2 hi) ==> #(hi hi) (# 0) ==> #() (# 0 a) ==> #() SECTION(6 9) (# #) ==> #t (# car) ==> #f (# # "r4rstest.scm": (x) (* x x)>) ==> #t (# (lambda (x) (* x x))) ==> #f (# #) ==> #t (# #) ==> #t (# # (3 4)) ==> 7 (# # "r4rstest.scm": (a b) (+ a b)> (3 4)) ==> 7 (# # 10 (3 4)) ==> 17 (# # ()) ==> () (# "r4rstest.scm": args (f (apply g args))> 12 75) ==> 30 (# # ((a b) (d e) (g h))) ==> (b e h) (# # (1 2 3) (4 5 6)) ==> (5 7 9) (# # (1 2 3)) ==> (1 2 3) (# # (1 2 3)) ==> (1 2 3) (# # (1 2 3)) ==> (-1 -2 -3) (for-each #(0 1 4 9 16)) ==> #(0 1 4 9 16) (# # "r4rstest.scm": (exit) (for-each (lambda (x) (if (negative? x) (exit x))) (quote (54 0 37 -3 245 19))) #t>) ==> -3 (# (1 2 3 4)) ==> 4 (# (a b . c)) ==> #f (# # ()) ==> () SECTION(6 10 1) (# #) ==> #t (# #) ==> #t (# "r4rstest.scm" #) ==> #t (# #) ==> #t SECTION(6 10 2) (# #) ==> #\; (# #) ==> #\; (# #) ==> (define cur-section (quote ())) (# #) ==> #\( (# #) ==> (define errs (quote ())) SECTION(6 10 3) (# "tmp1" # "r4rstest.scm": (test-file) (write-char #\; test-file) (display #\; test-file) (display ";" test-file) (write write-test-obj test-file) (newline test-file) (write load-test-obj test-file) (output-port? test-file)>) ==> #t (# #) ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)))) (# #) ==> #t (# #) ==> #t (input-port? #t) ==> #t (# #) ==> #\; (# #) ==> #\; (# #) ==> #\; (# #) ==> (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)) (# #) ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)))) (# #) ==> #t (# #) ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)))) (# #) ==> #t (# #) ==> #t (input-port? #t) ==> #t (# #) ==> #\; (# #) ==> #\; (# #) ==> #\; (# #) ==> (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)) (# #) ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)))) Passed all tests ;testing inexact numbers; SECTION(6 2) (# 1 1.) ==> #f (# 0 0.) ==> #f (# 0. 0.) ==> #t (# 0. 0.) ==> #t (# 0. 0.) ==> #t (# 0. 0.) ==> #t (# 0. 0.) ==> #t SECTION(6 5 5) (magnitude 1.) ==> 1. (# 1.e300+1.e300i 4.e300+4.e300i) ==> 2.5e-1 (magnitude 1.) ==> 1. (# 1.e-300+1.e-300i 4.e-300+4.e-300i) ==> 2.5e-1 (# 0. 0.) ==> #t (# 0. 0.) ==> #t (# 0. 0.) ==> #t (# 3.9) ==> #t (max #t) ==> #t (# 3.9 4) ==> 4. (#inexact> 4) ==> 4. (#inexact> 4.) ==> 4. (#exact> 4) ==> 4 (#exact> 4.) ==> 4 (# -4.5) ==> -4. (# -3.5) ==> -4. (# -3.9) ==> -4. (# 0.) ==> 0. (# 2.5e-1) ==> 0. (# 8.e-1) ==> 1. (# 3.5) ==> 4. (# 4.5) ==> 4. (# 0. 1.) ==> 0. (# 0. 1) ==> 0. (# 0 1.) ==> 0. (# -25 0.) ==> 1. (# -3.25 0.) ==> 1. (# -3.25 0) ==> 1. (# 1 1) ==> 7.853981633974483e-1 (# "tmp3" # "r4rstest.scm": (test-file) (write-char #\; test-file) (display #\; test-file) (display ";" test-file) (write write-test-obj test-file) (newline test-file) (write load-test-obj test-file) (output-port? test-file)>) ==> #t (# #) ==> (define foo (quote (2.5e-1 -3.25))) (# #) ==> #t (# #) ==> #t (input-port? #t) ==> #t (# #) ==> #\; (# #) ==> #\; (# #) ==> #\; (# #) ==> (2.5e-1 -3.25) (# #) ==> (define foo (quote (2.5e-1 -3.25))) (pentium-fdiv-bug #t) ==> #t Passed all tests SECTION(6 5 6) (float-print-test #t) ==> #t (mult-float-print-test #t) ==> #t (mult-float-print-test #t) ==> #t (mult-float-print-test #t) ==> #t (mult-float-print-test #t) ==> #t (mult-float-print-test #t) ==> #t (# cnt 308) success) (let* ((estr (string-append "1.e" (number->string cnt))) (num (string->number estr)) (str (number->string num))) (cond ((or (>= (string-length str) 10) (not (equal? (string->number str) num))) (set! success #f) (for-each write (list estr num str (string->number str))))))))>) ==> #t (#number (number->string xx)))) (cond ((not (= xx cnv)) (display "Number readback failure for ") (display (quasiquote (expt (unquote f2.0) (unquote p)))) (newline) (display xx) (newline) (set! all-ok? #f))))))>) ==> #t ;testing bignums; SECTION(6 5 7) (# 33333333333333333333 3) ==> 0 (# 33333333333333333333 -3) ==> 0 (# 33333333333333333333 3) ==> 0 (# 33333333333333333333 -3) ==> 0 (# 33333333333333333332 3) ==> 2 (# 33333333333333333332 -3) ==> -1 (# 33333333333333333332 3) ==> 2 (# 33333333333333333332 -3) ==> 2 (# -33333333333333333332 3) ==> 1 (# -33333333333333333332 -3) ==> -2 (# -33333333333333333332 3) ==> -2 (# -33333333333333333332 -3) ==> -2 (# 3 33333333333333333333) ==> 3 (# -3 33333333333333333333) ==> 33333333333333333330 (# 3 33333333333333333333) ==> 3 (# -3 33333333333333333333) ==> -3 (# 3 -33333333333333333333) ==> -33333333333333333330 (# -3 -33333333333333333333) ==> -3 (# 3 -33333333333333333333) ==> 3 (# -3 -33333333333333333333) ==> -3 (# -2177452800 86400) ==> 0 (# 2177452800 -86400) ==> 0 (# 2177452800 86400) ==> 0 (# -2177452800 -86400) ==> 0 (# 0 -2177452800) ==> 0 (remainder #t) ==> #t (remainder #t) ==> #t (# 33333333333333333333 11111111111111111111) ==> 11111111111111111111 (# 33333333333333333332 11111111111111111111) ==> 1 (# 33333333333333333330 11111111111111111111) ==> 1 (# 33333333333333333333 33333333333333333330) ==> 3 (# 33333333333333333333 11111111111111111111) ==> 33333333333333333333 (# -3 11111111111111111111) ==> 33333333333333333333 SECTION(6 5 8) (#string> 281474976710655325431) ==> "281474976710655325431" Passed all tests ;testing bignum-inexact comparisons; SECTION(6 5 5) (# 1427247692705959881058285969449495136382746625 1.42724769270596e45 1427247692705959881058285969449495136382746623) ==> #f (# 1.42724769270596e45 1427247692705959881058285969449495136382746625 1427247692705959881058285969449495136382746623) ==> #f (# 1427247692705959881058285969449495136382746623 1.42724769270596e45 1427247692705959881058285969449495136382746625) ==> #t To fully test continuations, Scheme 4, and DELAY/FORCE do: (test-cont) (test-sc4) (test-delay) ;testing scheme 4 functions; SECTION(6 7) (#list> "P l") ==> (#\P #\space #\l) (#list> "") ==> () (#string> (#\1 #\\ #\")) ==> "1\\\"" (#string> ()) ==> "" SECTION(6 8) (#list> #(dah dah didah)) ==> (dah dah didah) (#list> #()) ==> () (#vector> (dididit dah)) ==> #(dididit dah) (#vector> ()) ==> #() SECTION(6 10 4) (load (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c))) ==> (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c)) Passed all tests ;testing continuations; SECTION(6 9) (# (a (b (c))) ((a) b c)) ==> #t (# (a (b (c))) ((a) b c d)) ==> #f Passed all tests ;testing DELAY and FORCE; SECTION(6 9) (delay 3) ==> 3 (delay (3 3)) ==> (3 3) (delay 2) ==> 2 (# # count x) count (force p)))>>) ==> 6 (# #) ==> 6 (force 3) ==> 3 Passed all tests make[1]: Leaving directory '/build/scm-5f3' create-stamp debian/debhelper-build-stamp dh_prep debian/rules override_dh_auto_install make[1]: Entering directory '/build/scm-5f3' # Make .scm scheme library scripts non-executable... chmod a-x *.scm *.c # except compile.scm chmod a+x compile.scm # skip; files listed explicitly make[1]: Leaving directory '/build/scm-5f3' dh_install dh_installdocs dh_installchangelogs dh_installexamples dh_installman dh_installinfo dh_perl dh_link dh_strip_nondeterminism dh_compress dh_fixperms dh_missing dh_dwz -a debian/rules override_dh_strip make[1]: Entering directory '/build/scm-5f3' dh_strip --no-automatic-dbgsym make[1]: Leaving directory '/build/scm-5f3' dh_makeshlibs -a dh_shlibdeps -a dh_installdeb dh_gencontrol dh_md5sums dh_builddeb dpkg-deb: building package 'libscm-dev' in '../libscm-dev_5f3-4_arm64.deb'. dpkg-deb: building package 'scm' in '../scm_5f3-4_arm64.deb'. dpkg-genbuildinfo --build=binary -O../scm_5f3-4_arm64.buildinfo dpkg-genchanges --build=binary -O../scm_5f3-4_arm64.changes dpkg-genchanges: info: binary-only upload (no source code included) dpkg-source --after-build . dpkg-buildpackage: info: binary-only upload (no source included) dpkg-genchanges: info: not including original source code in upload I: copying local configuration I: user script /srv/workspace/pbuilder/28981/tmp/hooks/B01_cleanup starting I: user script /srv/workspace/pbuilder/28981/tmp/hooks/B01_cleanup finished I: unmounting dev/ptmx filesystem I: unmounting dev/pts filesystem I: unmounting dev/shm filesystem I: unmounting proc filesystem I: unmounting sys filesystem I: cleaning the build env I: removing directory /srv/workspace/pbuilder/28981 and its subdirectories I: Current time: Tue May 14 19:47:54 +14 2024 I: pbuilder-time-stamp: 1715665674