=>> Building lang/scm build started at Sun Nov 9 21:19:00 EST 2025 port directory: /usr/ports/lang/scm package name: scm-5f3_2 building for: FreeBSD pkg.DaveG.ca 15.0-ALPHA3 FreeBSD 15.0-ALPHA3 1500064 amd64 maintained by: ports@virtual-estates.net Makefile datestamp: -rw-r--r-- 1 root wheel 3250 Aug 27 2024 /usr/ports/lang/scm/Makefile Ports top last git commit: ec159283c191 Ports top unclean checkout: no Port dir last git commit: 2b92bd705775 Port dir unclean checkout: no Poudriere version: poudriere-git-3.4.2 Host OSVERSION: 1500068 Jail OSVERSION: 1500064 Job Id: 08 ---Begin Environment--- SHELL=/bin/sh OSVERSION=1500064 UNAME_v=FreeBSD 15.0-ALPHA3 1500064 UNAME_r=15.0-ALPHA3 BLOCKSIZE=K MAIL=/var/mail/root MM_CHARSET=UTF-8 LANG=C.UTF-8 STATUS=1 HOME=/root PATH=/sbin:/bin:/usr/sbin:/usr/bin:/usr/local/sbin:/usr/local/bin:/root/bin MAKE_OBJDIR_CHECK_WRITABLE=0 LOCALBASE=/usr/local USER=root POUDRIERE_NAME=poudriere-git LIBEXECPREFIX=/usr/local/libexec/poudriere POUDRIERE_VERSION=3.4.2 MASTERMNT=/usr/local/poudriere/data/.m/freebsd_15_c_x64-HEAD-ALL/ref LC_COLLATE=C POUDRIERE_BUILD_TYPE=bulk PACKAGE_BUILDING=yes SAVED_TERM=tmux-256color OUTPUT_REDIRECTED_STDERR=4 OUTPUT_REDIRECTED=1 PWD=/usr/local/poudriere/data/.m/freebsd_15_c_x64-HEAD-ALL/08/.p OUTPUT_REDIRECTED_STDOUT=3 P_PORTS_FEATURES=FLAVORS SUBPACKAGES SELECTED_OPTIONS MASTERNAME=freebsd_15_c_x64-HEAD-ALL SCRIPTPREFIX=/usr/local/share/poudriere SCRIPTNAME=bulk.sh OLDPWD=/usr/local/poudriere/data/.m/freebsd_15_c_x64-HEAD-ALL/ref/.p/pool POUDRIERE_PKGNAME=poudriere-git-3.4.2 SCRIPTPATH=/usr/local/share/poudriere/bulk.sh POUDRIEREPATH=/usr/local/bin/poudriere ---End Environment--- ---Begin Poudriere Port Flags/Env--- PORT_FLAGS= PKGENV= FLAVOR= MAKE_ARGS= ---End Poudriere Port Flags/Env--- ---Begin OPTIONS List--- ===> The following configuration options are available for scm-5f3_2: X11=off: X11 (graphics) support ===> Use 'make config' to modify these settings ---End OPTIONS List--- --MAINTAINER-- ports@virtual-estates.net --End MAINTAINER-- --CONFIGURE_ARGS-- --End CONFIGURE_ARGS-- --CONFIGURE_ENV-- --prefix=/usr/local XDG_DATA_HOME=/wrkdirs/usr/ports/lang/scm/work XDG_CONFIG_HOME=/wrkdirs/usr/ports/lang/scm/work XDG_CACHE_HOME=/wrkdirs/usr/ports/lang/scm/work/.cache HOME=/wrkdirs/usr/ports/lang/scm/work TMPDIR="/tmp" PATH=/wrkdirs/usr/ports/lang/scm/work/.bin:/sbin:/bin:/usr/sbin:/usr/bin:/usr/local/sbin:/usr/local/bin:/root/bin PKG_CONFIG_LIBDIR=/wrkdirs/usr/ports/lang/scm/work/.pkgconfig:/usr/local/libdata/pkgconfig:/usr/local/share/pkgconfig:/usr/libdata/pkgconfig SHELL=/bin/sh CONFIG_SHELL=/bin/sh --End CONFIGURE_ENV-- --MAKE_ENV-- XDG_DATA_HOME=/wrkdirs/usr/ports/lang/scm/work XDG_CONFIG_HOME=/wrkdirs/usr/ports/lang/scm/work XDG_CACHE_HOME=/wrkdirs/usr/ports/lang/scm/work/.cache HOME=/wrkdirs/usr/ports/lang/scm/work TMPDIR="/tmp" PATH=/wrkdirs/usr/ports/lang/scm/work/.bin:/sbin:/bin:/usr/sbin:/usr/bin:/usr/local/sbin:/usr/local/bin:/root/bin PKG_CONFIG_LIBDIR=/wrkdirs/usr/ports/lang/scm/work/.pkgconfig:/usr/local/libdata/pkgconfig:/usr/local/share/pkgconfig:/usr/libdata/pkgconfig MK_DEBUG_FILES=no MK_KERNEL_SYMBOLS=no SHELL=/bin/sh NO_LINT=YES PREFIX=/usr/local LOCALBASE=/usr/local CC="cc" CFLAGS="-pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing " CPP="cpp" CPPFLAGS="-I/usr/local/include" LDFLAGS=" -L/usr/local/lib " LIBS="" CXX="c++" CXXFLAGS="-pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing " BSD_INSTALL_PROGRAM="install -s -m 555" BSD_INSTALL_LIB="install -s -m 0644" BSD_INSTALL_SCRIPT="install -m 555" BSD_INSTALL_DATA="install -m 0644" BSD_INSTALL_MAN="install -m 444" --End MAKE_ENV-- --PLIST_SUB-- VERSION="5f3" X11="@comment " NO_X11="" OSREL=15.0 PREFIX=%D LOCALBASE=/usr/local RESETPREFIX=/usr/local LIB32DIR=lib DOCSDIR="share/doc/scm" EXAMPLESDIR="share/examples/scm" DATADIR="share/scm" WWWDIR="www/scm" ETCDIR="etc/scm" --End PLIST_SUB-- --SUB_LIST-- X11="@comment " NO_X11="" PREFIX=/usr/local LOCALBASE=/usr/local DATADIR=/usr/local/share/scm DOCSDIR=/usr/local/share/doc/scm EXAMPLESDIR=/usr/local/share/examples/scm WWWDIR=/usr/local/www/scm ETCDIR=/usr/local/etc/scm --End SUB_LIST-- ---Begin make.conf--- DEFAULT_VERSIONS+=pgsql=15 DEFAULT_VERSIONS+=php=82 DISABLE_LICENSES=yes SELECTED_OPTIONS+=OPENBLAS ARCHDEF=AMD64K10h64SSE3 USE_PACKAGE_DEPENDS=yes BATCH=yes WRKDIRPREFIX=/wrkdirs PORTSDIR=/usr/ports PACKAGES=/packages DISTDIR=/distfiles FORCE_PACKAGE=yes PACKAGE_BUILDING=yes PACKAGE_BUILDING_FLAVORS=yes #### #### DEFAULT_VERSIONS+=pgsql=15 DEFAULT_VERSIONS+=php=82 DISABLE_LICENSES=yes SELECTED_OPTIONS+=OPENBLAS ARCHDEF=AMD64K10h64SSE3 WITH_CCACHE_BUILD=yes CCACHE_DIR=/root/.ccache #### Misc Poudriere #### .include "/etc/make.conf.ports_env" GID=0 UID=0 ---End make.conf--- --Resource limits-- cpu time (seconds, -t) unlimited file size (512-blocks, -f) unlimited data seg size (kbytes, -d) 33554432 stack size (kbytes, -s) 524288 core file size (512-blocks, -c) unlimited max memory size (kbytes, -m) unlimited locked memory (kbytes, -l) unlimited max user processes (-u) 89999 open files (-n) 8192 virtual mem size (kbytes, -v) unlimited swap limit (kbytes, -w) unlimited socket buffer size (bytes, -b) unlimited pseudo-terminals (-p) unlimited kqueues (-k) unlimited umtx shared locks (-o) unlimited pipebuf (-y) unlimited --End resource limits-- =================================================== ===== env: NO_DEPENDS=yes USER=root UID=0 GID=0 =========================================================================== =================================================== ===== env: USE_PACKAGE_DEPENDS_ONLY=1 USER=root UID=0 GID=0 ===> scm-5f3_2 depends on file: /usr/local/sbin/pkg - not found ===> Installing existing package /packages/All/pkg-2.4.2_1.pkg [pkg.DaveG.ca] Installing pkg-2.4.2_1... [pkg.DaveG.ca] Extracting pkg-2.4.2_1: .......... done ===> scm-5f3_2 depends on file: /usr/local/sbin/pkg - found ===> Returning to build of scm-5f3_2 =========================================================================== =================================================== ===== env: USE_PACKAGE_DEPENDS_ONLY=1 USER=root UID=0 GID=0 =========================================================================== =================================================== ===== env: NO_DEPENDS=yes USER=root UID=0 GID=0 ===> Fetching all distfiles required by scm-5f3_2 for building =========================================================================== =================================================== ===== env: NO_DEPENDS=yes USER=root UID=0 GID=0 ===> Fetching all distfiles required by scm-5f3_2 for building => SHA256 Checksum OK for scm-5f3.tar.gz. => SHA256 Checksum OK for slib-psd1-3.tar.gz. =========================================================================== =================================================== ===== env: USE_PACKAGE_DEPENDS_ONLY=1 USER=root UID=0 GID=0 =========================================================================== =================================================== ===== env: NO_DEPENDS=yes USER=root UID=0 GID=0 ===> Fetching all distfiles required by scm-5f3_2 for building ===> Extracting for scm-5f3_2 => SHA256 Checksum OK for scm-5f3.tar.gz. => SHA256 Checksum OK for slib-psd1-3.tar.gz. /bin/ln -s /usr/local/share/slib /wrkdirs/usr/ports/lang/scm/work =========================================================================== =================================================== ===== env: USE_PACKAGE_DEPENDS_ONLY=1 USER=root UID=0 GID=0 =========================================================================== =================================================== ===== env: NO_DEPENDS=yes USER=root UID=0 GID=0 ===> Patching for scm-5f3_2 ===> Applying FreeBSD patches for scm-5f3_2 from /usr/ports/lang/scm/files /usr/bin/touch /wrkdirs/usr/ports/lang/scm/work/scm-5f3/scm.core =========================================================================== =================================================== ===== env: USE_PACKAGE_DEPENDS_ONLY=1 USER=root UID=0 GID=0 ===> scm-5f3_2 depends on file: /usr/local/share/slib/require.scm - not found ===> Installing existing package /packages/All/slib-3c1.pkg [pkg.DaveG.ca] Installing slib-3c1... [pkg.DaveG.ca] `-- Installing indexinfo-0.3.1_1... [pkg.DaveG.ca] `-- Extracting indexinfo-0.3.1_1: . done [pkg.DaveG.ca] Extracting slib-3c1: .......... done ===> scm-5f3_2 depends on file: /usr/local/share/slib/require.scm - found ===> Returning to build of scm-5f3_2 ===> scm-5f3_2 depends on file: /usr/local/bin/ccache - not found ===> Installing existing package /packages/All/ccache-3.7.12_8.pkg [pkg.DaveG.ca] Installing ccache-3.7.12_8... [pkg.DaveG.ca] Extracting ccache-3.7.12_8: ......... done Create compiler links... create symlink for cc create symlink for cc (world) create symlink for c++ create symlink for c++ (world) create symlink for CC create symlink for CC (world) create symlink for clang create symlink for clang (world) create symlink for clang++ create symlink for clang++ (world) ===== Message from ccache-3.7.12_8: -- NOTE: Please read /usr/local/share/doc/ccache/ccache-howto-freebsd.txt for information on using ccache with FreeBSD ports and src. ===> scm-5f3_2 depends on file: /usr/local/bin/ccache - found ===> Returning to build of scm-5f3_2 =========================================================================== =================================================== ===== env: USE_PACKAGE_DEPENDS_ONLY=1 USER=root UID=0 GID=0 ===> scm-5f3_2 depends on shared library: libgnuregex.so - not found ===> Installing existing package /packages/All/libgnuregex-6.0.pkg [pkg.DaveG.ca] Installing libgnuregex-6.0... [pkg.DaveG.ca] Extracting libgnuregex-6.0: ..... done ===> scm-5f3_2 depends on shared library: libgnuregex.so - found (/usr/local/lib/libgnuregex.so) ===> Returning to build of scm-5f3_2 ===> scm-5f3_2 depends on shared library: libreadline.so.8 - not found ===> Installing existing package /packages/All/readline-8.3.1.pkg [pkg.DaveG.ca] Installing readline-8.3.1... [pkg.DaveG.ca] Extracting readline-8.3.1: .......... done ===> scm-5f3_2 depends on shared library: libreadline.so.8 - found (/usr/local/lib/libreadline.so.8) ===> Returning to build of scm-5f3_2 =========================================================================== =================================================== ===== env: NO_DEPENDS=yes USER=root UID=0 GID=0 ===> Configuring for scm-5f3_2 #! /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=/wrkdirs/usr/ports/lang/scm/work/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} =========================================================================== =================================================== ===== env: NO_DEPENDS=yes USER=root UID=0 GID=0 ===> Building for scm-5f3_2 if [ -f udscm5.opt -o ! -f scm5.opt ]; then /usr/bin/make alld5; else /usr/bin/make all5; fi /usr/bin/make scm5.opt echo "-F cautious bignums arrays inexact" >> scm5.opt echo "-F engineering-notation dynamic-linking" >> scm5.opt echo "-F macro" >> scm5.opt cat scm5.opt > udscm5.opt echo "-F dump" >> udscm5.opt echo "#ifndef IMPLINIT" > newflags.h echo "#define IMPLINIT \"/wrkdirs/usr/ports/lang/scm/work/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 -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing scm.c -o scm.o scm.c:226:19: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 226 | static SIGRETTYPE err_signal(sig) | ^ scm.c:236:19: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 236 | static SIGRETTYPE scmable_signal(sig) | ^ scm.c:292:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 292 | static SCM lalarm(i) | ^ scm.c:306:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 306 | static SCM scm_setitimer(which, value, interval) | ^ scm.c:357:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 357 | static SCM l_sleep(i) | ^ scm.c:419:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 419 | static SCM l_raise(sig) | ^ scm.c:461:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 461 | void init_scm(iverbose, buf0stdin, init_heap_size) | ^ scm.c:499:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 499 | static void init_sig1(scm_err, signo, handler) | ^ scm.c:631:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 631 | void scm_init_from_argv(argc, argv, script_arg, iverbose, buf0stdin) | ^ scm.c:653:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 653 | void final_scm(freeall) | ^ scm.c:787:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 787 | int init_buf0(inport) | ^ scm.c:814:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 814 | static SCM scm_execpath(newpath) | ^ scm.c:833:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 833 | char *scm_find_execpath(argc, argv, script_arg) | ^ scm.c:873:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 873 | static SCM lsystem(cmd) | ^ scm.c:891:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 891 | static SCM scm_getenv(nam) | ^ scm.c:975:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 975 | void add_feature(str) | ^ 16 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing time.c -o time.o time.c:304:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 304 | static int scm_ftime(time_buffer) | ^ time.c:389:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 389 | long time_in_msec(x) | ^ 2 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing repl.c -o repl.o repl.c:143:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 143 | void scm_intprint(n, radix, port) | ^ repl.c:152:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 152 | void scm_ipruk(hdr, ptr, port) | ^ repl.c:171:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 171 | static void scm_iprlist(hdr, exp, tlr, port, writing) | ^ repl.c:194:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 194 | void scm_iprin1(exp, port, writing) | ^ repl.c:421:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 421 | static int input_waiting(f) | ^ repl.c:450:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 450 | static SCM char_readyp(port) | ^ repl.c:475:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 475 | static SCM wait_for_input(args) | ^ repl.c:568:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 568 | SCM eof_objectp(x) | ^ repl.c:576:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 576 | int scm_io_error(port, what) | ^ repl.c:606:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 606 | void lfflush(port) /* internal SCM call */ | ^ repl.c:615:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 615 | static SCM scm_force_output(port) | ^ repl.c:624:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 624 | static SCM scm_write(obj, port) | ^ repl.c:632:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 632 | SCM scm_display(obj, port) | ^ repl.c:640:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 640 | SCM scm_newline(port) | ^ repl.c:649:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 649 | SCM scm_write_char(chr, port) | ^ repl.c:658:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 658 | static SCM scm_freshline(port) | ^ repl.c:669:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 669 | void lputc(c, port) | ^ repl.c:689:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 689 | void lputs(s, port) | ^ repl.c:713:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 713 | sizet lfwrite(ptr, size, nitems, port) | ^ repl.c:740:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 740 | int lgetc(port) | ^ repl.c:776:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 776 | void lungetc(c, port) | ^ repl.c:790:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 790 | SCM scm_read_char(port) | ^ repl.c:800:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 800 | SCM scm_peek_char(port) | ^ repl.c:812:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 812 | char *grow_tok_buf(tok_buf) | ^ repl.c:821:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 821 | static int flush_ws(port) | ^ repl.c:847:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 847 | SCM scm_read(port) | ^ repl.c:853:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 853 | static SCM scm_read_for_load(port) | ^ repl.c:867:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 867 | static SCM scm_lread1(port, flgs, what) | ^ repl.c:885:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 885 | static SCM scm_lreadpr(tok_buf, port, flgs) | ^ repl.c:1042:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1042 | static SCM scm_lreadr(tok_buf, port, flgs) | ^ repl.c:1055:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1055 | static SCM scm_lread_rec(tok_buf, port) | ^ repl.c:1082:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1082 | static sizet scm_read_token(ic, tok_buf, port, flgs) | ^ repl.c:1128:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1128 | static SCM scm_lreadparen(tok_buf, port, flgs, name) | ^ repl.c:1161:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1161 | static SCM swapcar(pair, value) | ^ repl.c:1175:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1175 | static SCM tryarb(arb) | ^ repl.c:1189:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1189 | SCM relarb(arb) | ^ repl.c:1197:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1197 | SCM makarb(name) | ^ repl.c:1206:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1206 | static int prinarb(exp, port, writing) | ^ repl.c:1260:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1260 | int handle_it(i) | ^ repl.c:1319:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1319 | SCM scm_top_level(initpath, toplvl_fun) | ^ repl.c:1446:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1446 | SCM scm_port_line(port) | ^ repl.c:1464:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1464 | SCM scm_port_col(port) | ^ repl.c:1485:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1485 | SCM scm_file_position(port, pos) | ^ repl.c:1528:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1528 | static SCM scm_port_filename(port) | ^ repl.c:1545:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1545 | void growth_mon(obj, size, units, grewp) | ^ repl.c:1564:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1564 | void gc_start(what) | ^ repl.c:1668:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1668 | SCM lroom(opt) | ^ repl.c:1710:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1710 | SCM prolixity(arg) | ^ repl.c:1786:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1786 | SCM quit(n) | ^ repl.c:1866:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1866 | SCM tryload(filename, reader) | ^ repl.c:1903:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1903 | SCM scm_eval_string(str) | ^ repl.c:1916:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1916 | SCM scm_load_string(str) | ^ repl.c:1935:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1935 | void scm_line_msg(file, linum, port) | ^ repl.c:1945:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1945 | void scm_err_line(what, file, linum, port) | ^ repl.c:1964:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1964 | static void err_head(str) | ^ repl.c:1988:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1988 | void scm_warn(str1, str2, obj) | ^ repl.c:2006:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2006 | static SCM lerrno(arg) | ^ repl.c:2017:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2017 | static SCM lperror(arg) | ^ repl.c:2119:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2119 | void everr(exp, env, arg, pos, s_subr, codep) | ^ repl.c:2136:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2136 | void wta(arg, pos, s_subr) | ^ repl.c:2146:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2146 | void scm_experr(arg, pos, s_subr) | ^ repl.c:2171:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2171 | static SCM set_inp(port) | ^ repl.c:2182:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2182 | static SCM set_outp(port) | ^ repl.c:2193:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2193 | static SCM set_errp(port) | ^ repl.c:2205:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2205 | static SCM l_isatty(port) | ^ repl.c:2268:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2268 | void init_repl( iverbose ) | ^ 66 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing scl.c -o scl.o scl.c:409:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 409 | sizet iulong2str(num, rad, p) | ^ scl.c:427:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 427 | sizet ilong2str(num, rad, p) | ^ scl.c:479:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 479 | SCM number2string(x, radix) | ^ scl.c:516:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 516 | int floprint(sexp, port, writing) | ^ scl.c:531:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 531 | int bigprint(exp, port, writing) | ^ scl.c:608:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 608 | SCM istr2int(str, len, radix) | ^ scl.c:995:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 995 | SCM istring2number(str, len, radix) | ^ scl.c:1033:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1033 | SCM string2number(str, radix) | ^ scl.c:1133:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1133 | static SCM list_tail(lst, k) | ^ scl.c:1146:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1146 | SCM string2list(str) | ^ scl.c:1157:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1157 | SCM string_copy(str) | ^ scl.c:1163:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1163 | static SCM string_fill(str, chr) | ^ scl.c:1175:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1175 | SCM vector2list(v) | ^ scl.c:1186:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1186 | static SCM vector_fill(v, fill) | ^ scl.c:1196:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1196 | static SCM vector_equal(x, y) | ^ scl.c:1222:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1222 | SCM equal(x, y) | ^ scl.c:1253:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1253 | if (pred) return (*pred)(x, y); | ^ scl.c:1259:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1259 | SCM numberp(obj) | ^ scl.c:1376:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1376 | static SCM inexactp(x) | ^ scl.c:1385:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1385 | SCM eqp(x, y) | ^ scl.c:1459:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1459 | SCM lessp(x, y) | ^ scl.c:1528:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1528 | SCM greaterp(x, y) | ^ scl.c:1533:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1533 | SCM leqp(x, y) | ^ scl.c:1538:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1538 | SCM greqp(x, y) | ^ scl.c:1543:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1543 | SCM zerop(z) | ^ scl.c:1572:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1572 | SCM positivep(x) | ^ scl.c:1601:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1601 | SCM negativep(x) | ^ scl.c:1634:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1634 | static SCM scm_max(x, y) | ^ scl.c:1718:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1718 | static SCM scm_min(x, y) | ^ scl.c:1802:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1802 | SCM sum(x, y) | ^ scl.c:1917:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1917 | SCM difference(x, y) | ^ scl.c:2049:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2049 | SCM product(x, y) | ^ scl.c:2197:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2197 | SCM divide(x, y) | ^ scl.c:2408:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2408 | static SCM ilog(m, b, k, n) | ^ scl.c:2425:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2425 | static SCM scm_intlog(base, k) | ^ scl.c:2441:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2441 | static SCM scm_intexpt(z1, z2) | ^ scl.c:2545:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2545 | static SCM scm_cintlog(base, k) | ^ scl.c:2806:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2806 | static SCM numident(x) | ^ scl.c:2818:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2818 | SCM scm_iabs(x) | ^ scl.c:2991:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2991 | unsigned long hasher(obj, n, d) | ^ scl.c:3066:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3066 | SCM hash(obj, n) | ^ scl.c:3074:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3074 | SCM hashv(obj, n) | ^ scl.c:3084:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3084 | SCM hashq(obj, n) | ^ 43 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing sys.c -o sys.o sys.c:105:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 105 | SCM i_setbuf0(port) /* should be called with DEFER_INTS active */ | ^ sys.c:127:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 127 | long mode_bits(modes, cmodes) | ^ sys.c:152:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 152 | static SCM try_open_file(filename, modes) | ^ sys.c:181:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 181 | SCM open_file(filename, modes) | ^ sys.c:190:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 190 | SCM close_port(port) | ^ sys.c:215:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 215 | static SCM scm_portp(x) | ^ sys.c:221:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 221 | static SCM input_portp(x) | ^ sys.c:227:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 227 | static SCM output_portp(x) | ^ sys.c:233:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 233 | static SCM port_closedp(port) | ^ sys.c:240:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 240 | static SCM scm_port_type(port) | ^ sys.c:322:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 322 | static SCM del_fil(str) | ^ sys.c:335:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 335 | void prinport(exp, port, type) | ^ sys.c:384:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 384 | static int stputc(c, p) | ^ sys.c:393:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 393 | static sizet stwrite(str, siz, num, p) | ^ sys.c:407:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 407 | static int stputs(s, p) | ^ sys.c:413:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 413 | static int stgetc(p) | ^ sys.c:421:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 421 | static int stclose(p) | ^ sys.c:427:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 427 | static int stungetc(c, p) | ^ sys.c:439:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 439 | static int noop0(stream) | ^ sys.c:444:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 444 | SCM mkstrport(pos, str, modes, caller) | ^ sys.c:464:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 464 | static SCM cwos(proc) | ^ sys.c:473:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 473 | static SCM cwis(str, proc) | ^ sys.c:551:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 551 | static int sfputc(c, p) | ^ sys.c:559:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 559 | static sizet sfwrite(str, siz, num, p) | ^ sys.c:569:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 569 | static int sfputs(s, p) | ^ sys.c:575:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 575 | static int sfflush(stream) | ^ sys.c:584:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 584 | static int sfgetc(p) | ^ sys.c:594:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 594 | static int sfclose(p) | ^ sys.c:604:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 604 | static SCM mksfpt(pv, modes) | ^ sys.c:644:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 644 | static int clputc(c, p) | ^ sys.c:649:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 649 | static sizet clwrite(str, siz, num, p) | ^ sys.c:655:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 655 | static int clputs(s, p) | ^ sys.c:660:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 660 | static int clgetc(p) | ^ sys.c:689:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 689 | static sizet syswrite(str, siz, num, p) | ^ sys.c:722:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 722 | static int sysputs(s, p) | ^ sys.c:728:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 728 | static int sysputc(c, p) | ^ sys.c:735:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 735 | static int sysflush(p) | ^ sys.c:761:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 761 | SCM mksafeport(maxlen, port) | ^ sys.c:775:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 775 | int reset_safeport(sfp, maxlen, port) | ^ sys.c:787:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 787 | static sizet safewrite(str, siz, num, p) | ^ sys.c:806:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 806 | static int safeputs(s, p) | ^ sys.c:812:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 812 | static int safeputc(c, p) | ^ sys.c:819:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 819 | static int safeflush(p) | ^ sys.c:825:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 825 | static SCM marksafep(ptr) | ^ sys.c:830:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 830 | static int freesafep(ptr) | ^ sys.c:849:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 849 | static int freeprint(exp, port, writing) | ^ sys.c:943:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 943 | void add_final(final) | ^ sys.c:951:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 951 | SCM scm_add_finalizer(value, finalizer) | ^ sys.c:975:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 975 | static SCM make_stk_seg(size, contents) | ^ sys.c:1009:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1009 | void scm_estk_reset(size) | ^ sys.c:1062:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1062 | void scm_env_cons(x, y) | ^ sys.c:1080:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1080 | void scm_env_cons2(w, x, y) | ^ sys.c:1101:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1101 | void scm_env_cons3(v, w, x, y) | ^ sys.c:1125:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1125 | void scm_env_v2lst(argc, argv) | ^ sys.c:1238:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1238 | static void grew_lim(nm) | ^ sys.c:1252:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1252 | static char *igc_for_alloc(where, olen, size, what) | ^ sys.c:1280:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1280 | char *must_malloc(len, what) | ^ sys.c:1298:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1298 | SCM must_malloc_cell(len, c, what) | ^ sys.c:1321:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1321 | char *must_realloc(where, olen, len, what) | ^ sys.c:1342:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1342 | void must_realloc_cell(z, olen, len, what) | ^ sys.c:1362:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1362 | void must_free(obj, len) | ^ sys.c:1390:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1390 | SCM sym2vcell(sym) | ^ sys.c:1405:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1405 | SCM intern(name, len) | ^ sys.c:1437:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1437 | SCM sysintern(name, val) | ^ sys.c:1468:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1468 | SCM cons(x, y) | ^ sys.c:1477:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1477 | SCM cons2(w, x, y) | ^ sys.c:1490:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1490 | SCM acons(w, x, y) | ^ sys.c:1504:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1504 | SCM makstr(len) | ^ sys.c:1520:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1520 | SCM scm_maksubr(name, type, fcn) | ^ sys.c:1553:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1553 | SCM make_subr(name, type, fcn) | ^ sys.c:1608:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1608 | static SCM dynwind(thunk1, thunk2, thunk3) | ^ sys.c:1619:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1619 | static void downd(to, delta) | ^ sys.c:1637:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1637 | void dowinds(to) | ^ sys.c:1688:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1688 | void scm_dynthrow(tocont, arg1, arg2, rest) | ^ sys.c:1728:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1728 | SCM obhash(obj) | ^ sys.c:1739:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1739 | SCM obunhash(obj) | ^ sys.c:1782:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1782 | unsigned long strhash(str, len, n) | ^ sys.c:1802:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1802 | static void fixconfig(s1, s2, s) | ^ sys.c:1832:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1832 | static sizet init_heap_seg(seg_org, size) | ^ sys.c:1903:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1903 | void scm_init_gra(gra, eltsize, len, maxlen, what) | ^ sys.c:1925:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1925 | int scm_grow_gra(gra, elt) | ^ sys.c:1952:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1952 | void scm_trim_gra(gra) | ^ sys.c:1966:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1966 | void scm_free_gra(gra) | ^ sys.c:1973:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1973 | static void gra_report1(gra) | ^ sys.c:1994:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1994 | long newsmob(smob) | ^ sys.c:2000:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2000 | long newptob(ptob) | ^ sys.c:2008:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2008 | SCM scm_port_entry(stream, ptype, flags) | ^ sys.c:2066:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2066 | SCM markcdr(ptr) | ^ sys.c:2071:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2071 | sizet free0(ptr) | ^ sys.c:2076:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2076 | SCM equal0(ptr1, ptr2) | ^ sys.c:2088:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2088 | void init_storage(stack_start_ptr, init_heap_size) | ^ sys.c:2309:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2309 | SCM gc(arg) | ^ sys.c:2321:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2321 | void scm_run_finalizers(exiting) | ^ sys.c:2363:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2363 | void igc(what, basecont) | ^ sys.c:2494:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2494 | void scm_protect_temp(ptr) | ^ sys.c:2501:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2501 | void gc_mark(p) | ^ sys.c:2636:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2636 | void mark_locations(x, n) | ^ sys.c:2660:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2660 | static void gc_sweep(contin_bad) | ^ sys.c:2856:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2856 | static void mark_syms(v) | ^ sys.c:2888:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2888 | static void mark_sym_values(v) | ^ sys.c:2903:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2903 | static void sweep_symhash(v) | ^ sys.c:2928:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2928 | static void mark_finalizers(finalizers, pending) | ^ sys.c:2982:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2982 | static void mark_port_table(port) | ^ sys.c:3050:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3050 | static void egc_copy(px) | ^ sys.c:3076:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3076 | static void egc_copy_locations(ve, len) | ^ sys.c:3091:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3091 | static void egc_copy_stack(stk, len) | ^ 106 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing eval.c -o eval.o eval.c:377:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 377 | static SCM *ilookup(iloc) | ^ eval.c:398:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 398 | static SCM *farlookup(farloc) | ^ eval.c:433:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 433 | SCM scm_env_lookup(var, stenv) | ^ eval.c:512:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 512 | static SCM *lookupcar(vloc) | ^ eval.c:546:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 546 | static SCM scm_lookupval(vloc, memo) | ^ eval.c:579:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 579 | static SCM evalatomcar(x, no_error) | ^ eval.c:627:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 627 | SCM scm_multi_set(syms, vals) | ^ eval.c:655:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 655 | static SCM scm_case_selector(x) | ^ eval.c:703:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 703 | static SCM acro_call(x, env) | ^ eval.c:728:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 728 | static SCM toplevel_define(xorig, env) | ^ eval.c:747:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 747 | SCM eval_args(l) | ^ eval.c:765:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 765 | static void ecache_evalx(x) | ^ eval.c:787:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 787 | static void ecache_undefs(x) | ^ eval.c:812:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 812 | static int ecache_eval_args(proc, arg1, arg2, arg3, x) | ^ eval.c:838:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 838 | static SCM asubr_apply(proc, arg1, arg2, arg3, args) | ^ eval.c:843:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 843 | arg1 = SUBRF(proc)(arg1, arg2); | ^ eval.c:844:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 844 | arg1 = SUBRF(proc)(arg1, arg3); | ^ eval.c:846:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 846 | arg1 = SUBRF(proc)(arg1, CAR(args)); | ^ eval.c:851:27: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 851 | if (FALSEP(SUBRF(proc)(arg1, arg2))) return BOOL_F; | ^ eval.c:853:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 853 | if (FALSEP(SUBRF(proc)(arg2, arg3))) return BOOL_F; | ^ eval.c:865:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 865 | SCM scm_values(arg1, arg2, rest, what) | ^ eval.c:931:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 931 | static void unpaint(p) | ^ eval.c:960:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 960 | SCM m_quote(xorig, env, ctxt) | ^ eval.c:971:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 971 | SCM m_begin(xorig, env, ctxt) | ^ eval.c:981:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 981 | static int constant_p(x) | ^ eval.c:987:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 987 | SCM m_if(xorig, env, ctxt) | ^ eval.c:1005:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1005 | SCM m_set(xorig, env, ctxt) | ^ eval.c:1018:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1018 | SCM m_and(xorig, env, ctxt) | ^ eval.c:1039:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1039 | SCM m_or(xorig, env, ctxt) | ^ eval.c:1066:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1066 | SCM m_case(xorig, env, ctxt) | ^ eval.c:1125:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1125 | SCM m_cond(xorig, env, ctxt) | ^ eval.c:1154:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1154 | static int varcheck(vars, op, what) | ^ eval.c:1184:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1184 | SCM m_lambda(xorig, env, ctxt) | ^ eval.c:1256:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1256 | int scm_nullenv_p(env) | ^ eval.c:1274:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1274 | static SCM m_letstar1(imm, vars, inits, body, env, ctxt) | ^ eval.c:1290:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1290 | SCM m_letstar(xorig, env, ctxt) | ^ eval.c:1314:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1314 | SCM m_do(xorig, env, ctxt) | ^ eval.c:1351:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1351 | static SCM evalcar(x) | ^ eval.c:1359:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1359 | static SCM iqq(form) | ^ eval.c:1380:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1380 | static SCM m_iqq(form, depth, env, ctxt) | ^ eval.c:1440:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1440 | SCM m_quasiquote(xorig, env, ctxt) | ^ eval.c:1449:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1449 | SCM m_delay(xorig, env, ctxt) | ^ eval.c:1456:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1456 | static int built_inp(name, x) | ^ eval.c:1474:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1474 | static void checked_define(name, val, what) | ^ eval.c:1504:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1504 | SCM m_define(xorig, env, ctxt) | ^ eval.c:1524:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1524 | static SCM m_parse_let(imm, xorig, x, vars, inits) | ^ eval.c:1556:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1556 | static SCM m_let_null(body, env, ctxt) | ^ eval.c:1568:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1568 | static SCM m_letrec1(imm, xorig, env, ctxt) | ^ eval.c:1580:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1580 | SCM m_letrec(xorig, env, ctxt) | ^ eval.c:1586:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1586 | SCM m_let(xorig, env, ctxt) | ^ eval.c:1613:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1613 | SCM m_apply(xorig, env, ctxt) | ^ eval.c:1620:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1620 | static SCM m_body(xorig, env, ctxt) | ^ eval.c:1663:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1663 | static SCM m_binding(name, value, env, ctxt) | ^ eval.c:1670:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1670 | static SCM m_bindings(names, values, env, ctxt) | ^ eval.c:1680:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1680 | static SCM m_seq(x, env, ctxt) | ^ eval.c:1698:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1698 | static SCM m_expr(x, env, ctxt) | ^ eval.c:1709:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1709 | SCM scm_check_linum(x, linum) | ^ eval.c:1720:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1720 | SCM scm_add_linum(linum, x) | ^ eval.c:1737:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1737 | static SCM macroexp1(xorig, env, ctxt, mode) | ^ eval.c:1920:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1920 | int badargsp(formals, args) | ^ eval.c:1932:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1932 | int scm_arity_check(proc, argc, what) | ^ eval.c:2014:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2014 | SCM ceval(x, static_env, env) | ^ eval.c:2029:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2029 | SCM scm_eval_values(x, env, valenv) | ^ eval.c:2056:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2056 | static SCM scm_apply_cxr(proc, arg1) | ^ eval.c:2108:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2108 | static SCM ceval_1(x) | ^ eval.c:2448:26: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2448 | return SUBRF(proc) (UNDEFINED); | ^ eval.c:2450:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2450 | return SUBRF(proc)(EOL); | ^ eval.c:2454:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2454 | return SUBRF(proc)(UNDEFINED, UNDEFINED); | ^ eval.c:2537:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2537 | return SUBRF(proc)(arg1, UNDEFINED); | ^ eval.c:2540:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2540 | return SUBRF(proc)(arg1); | ^ eval.c:2546:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2546 | return SUBRF(proc)(arg1, UNDEFINED); | ^ eval.c:2548:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2548 | return SUBRF(proc)(cons(arg1, EOL)); | ^ eval.c:2625:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2625 | return SUBRF(proc)(arg1, arg2); | ^ eval.c:2627:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2627 | return SUBRF(proc)(cons2(arg1, arg2, EOL)); | ^ eval.c:2629:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2629 | return SUBRF(proc)(arg1, arg2, EOL); | ^ eval.c:2632:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2632 | return SUBRF(proc)(arg1, arg2); | ^ eval.c:2738:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2738 | return SUBRF(proc)(arg1, arg2, arg3); | ^ eval.c:2744:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2744 | return SUBRF(proc)(arg1, arg2, cons(arg3, x)); | ^ eval.c:2746:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2746 | return SUBRF(proc)(cons2(arg1, arg2, cons(arg3, x))); | ^ eval.c:2809:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2809 | SCM procedurep(obj) | ^ eval.c:2823:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2823 | static SCM l_proc_doc(proc) | ^ eval.c:2846:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2846 | SCM nconc2copy(lst) | ^ eval.c:2867:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2867 | SCM scm_cp_list(lst, minlen) | ^ eval.c:2882:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2882 | SCM scm_v2lst(n, v, end) | ^ eval.c:2890:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2890 | SCM apply(proc, arg1, args) | ^ eval.c:2913:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2913 | return SUBRF(proc)(arg1, args); | ^ eval.c:2919:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2919 | return SUBRF(proc)(arg1, args); | ^ eval.c:2926:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2926 | return SUBRF(proc)(arg1); | ^ eval.c:2933:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2933 | return SUBRF(proc)(arg1, CAR(args), CAR(CDR(args))); | ^ eval.c:2935:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2935 | return SUBRF(proc)(UNBNDP(arg1) ? EOL : cons(arg1, args)); | ^ eval.c:2938:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2938 | return SUBRF(proc)(arg1, CAR(args), CDR(args)); | ^ eval.c:2940:40: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2940 | if (NULLP(args)) return SUBRF(proc)(arg1, UNDEFINED); | ^ eval.c:2943:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2943 | arg1 = SUBRF(proc)(arg1, CAR(args)); | ^ eval.c:2951:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2951 | if (FALSEP(SUBRF(proc)(arg1, CAR(args)))) return BOOL_F; | ^ eval.c:2983:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2983 | SCM scm_cvapply(proc, n, argv) | ^ eval.c:2994:33: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2994 | if (1==n) return SUBRF(proc)(argv[0], UNDEFINED); | ^ eval.c:2997:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2997 | return SUBRF(proc)(argv[0], argv[1]); | ^ eval.c:3001:33: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3001 | if (0==n) return SUBRF(proc)(UNDEFINED); | ^ eval.c:3004:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3004 | return SUBRF(proc)(argv[0]); | ^ eval.c:3008:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3008 | return SUBRF(proc)(argv[0], argv[1], argv[2]); | ^ eval.c:3010:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3010 | return SUBRF(proc)(0==n ? EOL : scm_v2lst(n, argv, EOL)); | ^ eval.c:3012:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3012 | return SUBRF(proc)(argv[0], argv[1], | ^ eval.c:3015:35: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3015 | if (1 >= n) return SUBRF(proc)(0==n ? UNDEFINED: argv[0], UNDEFINED); | ^ eval.c:3018:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3018 | res = SUBRF(proc)(res, argv[i]); | ^ eval.c:3023:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3023 | if (FALSEP(SUBRF(proc)(argv[i], argv[i+1]))) return BOOL_F; | ^ eval.c:3066:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3066 | SCM map(proc, arg1, args) | ^ eval.c:3115:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3115 | SCM for_each(proc, arg1, args) | ^ eval.c:3166:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3166 | SCM closure(code, argc) | ^ eval.c:3184:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3184 | SCM makprom(code) | ^ eval.c:3193:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3193 | static int prinprom(exp, port, writing) | ^ eval.c:3206:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3206 | static SCM makro(code, flags, what) | ^ eval.c:3220:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3220 | SCM makacro(code) | ^ eval.c:3226:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3226 | SCM makmacro(code) | ^ eval.c:3232:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3232 | SCM makmmacro(code) | ^ eval.c:3238:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3238 | SCM makidmacro(code) | ^ eval.c:3287:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3287 | static int prinmacro(exp, port, writing) | ^ eval.c:3310:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3310 | static int prinenv(exp, port, writing) | ^ eval.c:3338:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3338 | SCM force(x) | ^ eval.c:3378:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3378 | SCM copytree(obj) | ^ eval.c:3397:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3397 | SCM eval(obj) | ^ eval.c:3405:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3405 | static SCM definedp(xorig, env, ctxt) | ^ eval.c:3625:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3625 | static SCM make_synt(name, flags, fcn) | ^ eval.c:3639:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3639 | static SCM make_specfun(name, typ, flags) | ^ 123 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing subr.c -o subr.o subr.c:69:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 69 | static SCM lnot(x) | ^ subr.c:74:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 74 | SCM booleanp(obj) | ^ subr.c:81:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 81 | SCM eq(x, y) | ^ subr.c:88:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 88 | static SCM consp(x) | ^ subr.c:94:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 94 | static SCM setcar(pair, value) | ^ subr.c:101:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 101 | static SCM setcdr(pair, value) | ^ subr.c:108:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 108 | static SCM nullp(x) | ^ subr.c:113:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 113 | long ilength(sx) | ^ subr.c:132:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 132 | static SCM listp(x) | ^ subr.c:138:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 138 | SCM list(objs) | ^ subr.c:143:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 143 | SCM length(x) | ^ subr.c:150:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 150 | SCM append(args) | ^ subr.c:177:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 177 | SCM reverse(lst) | ^ subr.c:189:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 189 | static SCM list_ref(lst, k) | ^ subr.c:204:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 204 | SCM memq(x, lst) | ^ subr.c:214:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 214 | static SCM member(x, lst) | ^ subr.c:224:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 224 | SCM assq(x, alist) | ^ subr.c:237:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 237 | static SCM assoc(x, alist) | ^ subr.c:251:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 251 | static SCM promisep(x) | ^ subr.c:257:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 257 | static SCM symbolp(x) | ^ subr.c:263:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 263 | SCM symbol2string(s) | ^ subr.c:269:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 269 | SCM string2symbol(s) | ^ subr.c:277:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 277 | SCM exactp(x) | ^ subr.c:286:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 286 | SCM oddp(n) | ^ subr.c:299:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 299 | SCM evenp(n) | ^ subr.c:313:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 313 | SCM scm_round_quotient(num, den) | ^ subr.c:410:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 410 | SCM lquotient(x, y) | ^ subr.c:479:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 479 | static SCM lremainder(x, y) | ^ subr.c:520:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 520 | SCM modulo(x, y) | ^ subr.c:557:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 557 | static SCM lgcd(x, y) | ^ subr.c:615:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 615 | static SCM llcm(n1, n2) | ^ subr.c:1016:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1016 | SCM scm_logior(x, y) | ^ subr.c:1065:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1065 | SCM scm_logand(x, y) | ^ subr.c:1114:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1114 | SCM scm_logxor(x, y) | ^ subr.c:1156:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1156 | SCM scm_logtest(x, y) | ^ subr.c:1194:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1194 | SCM scm_logbitp(index, j1) | ^ subr.c:1225:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1225 | static SCM scm_copybit(index, j1, bit) | ^ subr.c:1263:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1263 | SCM scm_lognot(n) | ^ subr.c:1269:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1269 | SCM scm_ash(n, cnt) | ^ subr.c:1300:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1300 | static SCM scm_bitfield(n, start, end) | ^ subr.c:1343:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1343 | SCM scm_bitif(mask, n0, n1) | ^ subr.c:1358:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1358 | SCM scm_copybitfield(to, from, rest) | ^ subr.c:1395:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1395 | static SCM scm_bitwise_bit_count(n) | ^ subr.c:1427:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1427 | SCM scm_logcount(n) | ^ subr.c:1452:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1452 | SCM scm_intlength(n) | ^ subr.c:1481:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1481 | static SCM charp(x) | ^ subr.c:1486:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1486 | static SCM char_lessp(x, y) | ^ subr.c:1493:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1493 | static SCM char_leqp(x, y) | ^ subr.c:1500:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1500 | static SCM char_grp(x, y) | ^ subr.c:1507:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1507 | static SCM char_geqp(x, y) | ^ subr.c:1514:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1514 | static SCM chci_eq(x, y) | ^ subr.c:1521:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1521 | static SCM chci_lessp(x, y) | ^ subr.c:1528:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1528 | static SCM chci_leqp(x, y) | ^ subr.c:1535:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1535 | static SCM chci_grp(x, y) | ^ subr.c:1542:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1542 | static SCM chci_geqp(x, y) | ^ subr.c:1549:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1549 | static SCM char_alphap(chr) | ^ subr.c:1555:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1555 | static SCM char_nump(chr) | ^ subr.c:1561:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1561 | static SCM char_whitep(chr) | ^ subr.c:1567:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1567 | static SCM char_upperp(chr) | ^ subr.c:1573:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1573 | static SCM char_lowerp(chr) | ^ subr.c:1579:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1579 | static SCM char2int(chr) | ^ subr.c:1585:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1585 | static SCM int2char(n) | ^ subr.c:1593:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1593 | static SCM char_upcase(chr) | ^ subr.c:1599:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1599 | static SCM char_downcase(chr) | ^ subr.c:1606:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1606 | static SCM stringp(x) | ^ subr.c:1612:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1612 | SCM string(chrs) | ^ subr.c:1627:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1627 | SCM make_string(k, chr) | ^ subr.c:1643:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1643 | static SCM st_length(str) | ^ subr.c:1649:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1649 | static SCM st_ref(str, k) | ^ subr.c:1657:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1657 | static SCM st_set(str, k, chr) | ^ subr.c:1667:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1667 | SCM st_equal(s1, s2) | ^ subr.c:1681:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1681 | static SCM stci_equal(s1, s2) | ^ subr.c:1695:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1695 | static SCM st_lessp(s1, s2) | ^ subr.c:1715:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1715 | static SCM st_leqp(s1, s2) | ^ subr.c:1720:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1720 | static SCM st_grp(s1, s2) | ^ subr.c:1725:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1725 | static SCM st_geqp(s1, s2) | ^ subr.c:1730:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1730 | static SCM stci_lessp(s1, s2) | ^ subr.c:1750:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1750 | static SCM stci_leqp(s1, s2) | ^ subr.c:1755:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1755 | static SCM stci_grp(s1, s2) | ^ subr.c:1760:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1760 | static SCM stci_geqp(s1, s2) | ^ subr.c:1765:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1765 | SCM substring(str, start, end) | ^ subr.c:1778:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1778 | SCM st_append(args) | ^ subr.c:1802:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1802 | static SCM vectorp(x) | ^ subr.c:1808:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1808 | SCM vector_length(v) | ^ subr.c:1814:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1814 | SCM vector(l) | ^ subr.c:1826:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1826 | static SCM vector_ref(v, k) | ^ subr.c:1834:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1834 | static SCM vector_set(v, k, obj) | ^ subr.c:1844:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1844 | SCM make_vector(k, fill) | ^ subr.c:2424:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2424 | void init_iprocs(subra, type) | ^ 89 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing unif.c -o unif.o unif.c:45:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 45 | SCM resizuve(vect, len) | ^ unif.c:2170:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2170 | int raprin1(exp, port, writing) | ^ unif.c:2178:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2178 | SCM istr2bve(str, len) | ^ 3 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing rope.c -o rope.o rope.c:25:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 25 | SCM long2num(sl) | ^ rope.c:41:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 41 | SCM ulong2num(sl) | ^ rope.c:59:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 59 | unsigned char num2uchar(num, pos, s_caller) | ^ rope.c:67:16: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 67 | unsigned short num2ushort(num, pos, s_caller) | ^ rope.c:75:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 75 | unsigned long num2ulong(num, pos, s_caller) | ^ rope.c:106:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 106 | long num2long(num, pos, s_caller) | ^ rope.c:138:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 138 | short num2short(num, pos, s_caller) | ^ rope.c:147:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 147 | signed char num2char(num, pos, s_caller) | ^ rope.c:173:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 173 | SCM makfromstr(src, len) | ^ rope.c:185:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 185 | SCM makfrom0str(src) | ^ rope.c:193:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 193 | SCM makfromstrs(argc, argv) | ^ rope.c:205:8: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 205 | char **makargvfrmstrs(args, s_name) | ^ rope.c:225:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 225 | void must_free_argv(argv) | ^ rope.c:236:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 236 | SCM scm_evstr(str) | ^ rope.c:245:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 245 | void scm_ldstr(str) | ^ rope.c:254:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 254 | int scm_ldfile(path) | ^ rope.c:261:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 261 | int scm_ldprog(path) | ^ rope.c:387:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 387 | int scm_cell_p(x) | ^ rope.c:412:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 412 | SCM scm_gc_protect(obj) | ^ 19 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing continue.c -o continue.o continue.c:45:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 45 | long stack_size(start) | ^ continue.c:64:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 64 | CONTINUATION *make_root_continuation(stack_base) | ^ continue.c:87:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 87 | CONTINUATION *make_continuation(parent_cont) | ^ continue.c:122:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 122 | void free_continuation(cont) | ^ continue.c:159:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 159 | void dynthrow(a) | ^ continue.c:230:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 230 | void throw_to_continuation(cont, val, root_cont) | ^ 6 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing findexec.c -o findexec.o findexec.c:136:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 136 | static char *copy_of(s) | ^ findexec.c:155:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 155 | char *dld_find_executable(name) | ^ 2 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing script.c -o script.o script.c:47:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 47 | char *scm_cat_path(str1, str2, n) | ^ script.c:68:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 68 | char *scm_try_path(path) | ^ script.c:83:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 83 | static char *scm_sep_init_try(path, sep, initname) | ^ script.c:111:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 111 | char *script_find_executable(name) | ^ script.c:144:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 144 | char *find_impl_file(exec_path, generic_name, initname, sep) | ^ script.c:281:20: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 281 | static const char *script_read_arg(f) | ^ script.c:339:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 339 | static int script_meta_arg_P(arg) | ^ script.c:354:21: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 354 | const char * const *script_process_argv(argc, argv) | ^ script.c:384:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 384 | int script_count_argv(argv) | ^ 9 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing debug.c -o debug.o debug.c:31:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 31 | SCM scm_env_rlookup(addr, stenv, what) | ^ debug.c:85:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 85 | SCM scm_env_addprop(prop, val, env) | ^ debug.c:92:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 92 | SCM scm_env_getprop(prop, env) | ^ debug.c:109:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 109 | static SCM prinhead(x, port, writing) | ^ debug.c:119:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 119 | static void prinbindings(names, inits, init_env, | ^ debug.c:143:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 143 | void scm_princode(code, env, port, writing) | ^ debug.c:289:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 289 | void scm_princlosure(proc, port, writing) | ^ debug.c:326:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 326 | static SCM scm_int2linum(n) | ^ debug.c:335:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 335 | static SCM scm_linum2int(linum) | ^ debug.c:342:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 342 | static SCM scm_linump(obj) | ^ debug.c:349:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 349 | static SCM scm_remove_linums(x) | ^ debug.c:382:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 382 | static long num_frames(estk, i) | ^ debug.c:395:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 395 | static SCM *estk_frame(estk, i, nf) | ^ debug.c:413:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 413 | static SCM stacktrace1(estk, i) | ^ debug.c:449:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 449 | static SCM *cont_frame(contin, nf) | ^ debug.c:461:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 461 | SCM scm_stack_trace(contin) | ^ debug.c:482:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 482 | static SCM scm_frame_trace(contin, nf) | ^ debug.c:499:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 499 | static SCM scm_frame2env(contin, nf) | ^ debug.c:512:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 512 | static SCM scm_frame_eval(contin, nf, expr) | ^ debug.c:532:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 532 | SCM scm_scope_trace(env) | ^ debug.c:599:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 599 | static SCM scm_env_annotation(var, stenv) | ^ debug.c:661:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 661 | SCM scm_wrapcode(code, env) | ^ debug.c:671:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 671 | static int princodeptr(exp, port, writing) | ^ 23 warnings generated. cc -c -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing scmmain.c -o scmmain.o scmmain.c:44:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 44 | static char *scm_find_implpath(execpath) | ^ scmmain.c:79:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 79 | int main(argc, argv) | ^ 2 warnings generated. cp -p requires.scm require.scm 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 /usr/bin/make checklit ./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 if grep -ie dynamic-linking udscm5.opt>/dev/null && ! /usr/bin/make dlls; then if sed "s/dynamic-linking//g" < udscm5.opt > tmp.opt; then mv -f tmp.opt udscm5.opt; fi; if sed "s/dynamic-linking//g" < scm5.opt > tmp.opt; then mv -f tmp.opt scm5.opt; fi fi echo "--compiler-options=-Wall" >> dlls.opt echo "--linker-options=-Wall" >> dlls.opt ./build -hsystem -t dll -f dlls.opt -F rev2-procedures #-c sc2.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall sc2.c") sc2.c:24:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 24 | static SCM last_pair(sx) | ^ sc2.c:43:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 43 | static SCM subml(str1, start1, args) | ^ sc2.c:66:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 66 | static SCM submr(str1, start1, args) | ^ sc2.c:89:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 89 | static SCM subfl(str, start, args) | ^ sc2.c:110:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 110 | static SCM strnullp(str) | ^ sc2.c:119:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 119 | static SCM appendb(args) | ^ 6 warnings generated. (system "cc -shared -o sc2.so sc2.o") (delete-file "sc2.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F byte #-c byte.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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_byte();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall byte.c") byte.c:24:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 24 | static SCM scm_make_bytes(k, n) | ^ byte.c:41:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 41 | static SCM scm_bytes(ints) | ^ byte.c:58:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 58 | static SCM scm_byte_ref(str, k) | ^ byte.c:67:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 67 | static SCM scm_byte_set(str, k, n) | ^ byte.c:78:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 78 | static SCM scm_bytes2list(str) | ^ byte.c:90:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 90 | static SCM scm_bytes_reverse(str) | ^ byte.c:106:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 106 | static SCM scm_write_byte(chr, port) | ^ byte.c:117:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 117 | static SCM scm_read_byte(port) | ^ byte.c:129:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 129 | static SCM scm_subbytes_read(sstr, start, args) | ^ byte.c:176:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 176 | static SCM scm_subbytes_write(sstr, start, args) | ^ 10 warnings generated. (system "cc -shared -o byte.so byte.o") (delete-file "byte.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F array-for-each #-c ramap.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_ramap();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall ramap.c") ramap.c:46:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 46 | static sizet cind(ra, inds) | ^ ramap.c:66:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 66 | static int ra_matchp(ra0, ras) | ^ ramap.c:180:33: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 180 | return (UNBNDP(data) ? cproc(vra0, lvra) : cproc(vra0, data, lvra)); | ^ ramap.c:180:53: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 180 | return (UNBNDP(data) ? cproc(vra0, lvra) : cproc(vra0, data, lvra)); | ^ ramap.c:242:32: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 242 | if (0==(UNBNDP(data) ? cproc(vra0, lvra) : cproc(vra0, data, lvra))) | ^ ramap.c:242:52: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 242 | if (0==(UNBNDP(data) ? cproc(vra0, lvra) : cproc(vra0, data, lvra))) | ^ ramap.c:140:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 140 | static int ramapc(cproc, data, ra0, lra, what) | ^ ramap.c:260:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 260 | static SCM array_fill(ra, fill) | ^ ramap.c:269:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 269 | static int racp(src, dst) | ^ ramap.c:468:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 468 | static SCM array_copy(dst, src) | ^ ramap.c:481:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 481 | static SCM ra2contig(ra, copy) | ^ ramap.c:514:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 514 | static SCM ura_read(ra, port) | ^ ramap.c:528:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 528 | static SCM ura_write(ra, port) | ^ ramap.c:538:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 538 | SCM sc2array(s, ra, prot) | ^ ramap.c:606:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 606 | static int ra_eqp(ra0, ras) | ^ ramap.c:665:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 665 | static int ra_compare(ra0, ra1, ra2, opt) | ^ ramap.c:727:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 727 | static int ra_lessp(ra0, ras) | ^ ramap.c:732:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 732 | static int ra_leqp(ra0, ras) | ^ ramap.c:737:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 737 | static int ra_grp(ra0, ras) | ^ ramap.c:742:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 742 | static int ra_greqp(ra0, ras) | ^ ramap.c:748:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 748 | static int ra_sum(ra0, ras) | ^ ramap.c:834:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 834 | static int ra_difference(ra0, ras) | ^ ramap.c:965:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 965 | static int ra_product(ra0, ras) | ^ ramap.c:1054:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1054 | static int ra_divide(ra0, ras) | ^ ramap.c:1165:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1165 | static int ra_identity(dst, src) | ^ ramap.c:1171:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1171 | static int ramap(ra0, proc, ras) | ^ ramap.c:1200:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1200 | static int ramap_cxr(ra0, proc, ras) | ^ ramap.c:1272:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1272 | if (FALSEP(SUBRF(proc)(RVREF(ra1, i1, e1), RVREF(ra2, i2, e2)))) | ^ ramap.c:1257:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1257 | static int ramap_rp(ra0, proc, ras) | ^ ramap.c:1288:35: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1288 | VELTS(ra0)[i0] = SUBRF(proc)(cvref(ra1, i1, UNDEFINED)); | ^ ramap.c:1291:28: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1291 | aset(ra0, SUBRF(proc)(RVREF(ra1, i1, e1)), MAKINUM(i0)); | ^ ramap.c:1276:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1276 | static int ramap_1(ra0, proc, ras) | ^ ramap.c:1308:30: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1308 | VELTS(ra0)[i0] = SUBRF(proc)(cvref(ra1, i1, UNDEFINED), UNDEFINED); | ^ ramap.c:1311:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1311 | aset(ra0, SUBRF(proc)(RVREF(ra1, i1, e1), UNDEFINED), | ^ ramap.c:1323:15: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1323 | SUBRF(proc)(cvref(ra1, i1, UNDEFINED), cvref(ra2, i2, UNDEFINED)); | ^ ramap.c:1327:18: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1327 | SUBRF(proc)(RVREF(ra1, i1, e1), RVREF(ra2, i2, e2)), | ^ ramap.c:1294:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1294 | static int ramap_2o(ra0, proc, ras) | ^ ramap.c:1342:28: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1342 | aset(ra0, SUBRF(proc)(RVREF(ra0, i0, e0), UNDEFINED), MAKINUM(i0)); | ^ ramap.c:1349:28: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1349 | aset(ra0, SUBRF(proc)(RVREF(ra0, i0, e0), RVREF(ra1, i1, e1)), | ^ ramap.c:1332:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1332 | static int ramap_a(ra0, proc, ras) | ^ ramap.c:1418:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1418 | SCM fill = SUBRF(proc)(UNDEFINED, UNDEFINED); | ^ ramap.c:1376:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1376 | static SCM array_map(ra0, proc, lra) | ^ ramap.c:1475:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1475 | static int rafe(ra0, proc, ras) | ^ ramap.c:1503:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1503 | static SCM array_for_each(proc, ra0, lra) | ^ ramap.c:1530:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1530 | static SCM scm_array_index_for_each(ra, proc) | ^ ramap.c:1601:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1601 | static SCM array_imap(ra, proc) | ^ ramap.c:1674:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1674 | static int raeql_1(ra0, as_equal, ra1) | ^ ramap.c:1759:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1759 | static int raeql(ra0, as_equal, ra1) | ^ ramap.c:1796:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1796 | SCM raequal(ra0, ra1) | ^ ramap.c:1802:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1802 | static SCM array_equal(ra0, ra1) | ^ ramap.c:1846:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1846 | static void init_raprocs(subra) | ^ 51 warnings generated. (system "cc -shared -o ramap.so ramap.o") (delete-file "ramap.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F differ #-c differ.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_differ();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall differ.c") differ.c:77:20: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 77 | static const void *I32_subarray(_ra, start, end) | ^ differ.c:83:20: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 83 | static const void *short_subarray(_ra, start, end) | ^ differ.c:89:20: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 89 | static const void *char_subarray(_ra, start, end) | ^ differ.c:96:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 96 | static int long_array_refsEql_P(a, x, m, b, y, n) | ^ differ.c:101:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 101 | static int long_array_refs_revEql_P(a, x, m, b, y, n) | ^ differ.c:108:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 108 | static int short_array_refsEql_P(a, x, m, b, y, n) | ^ differ.c:113:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 113 | static int short_array_refs_revEql_P(a, x, m, b, y, n) | ^ differ.c:120:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 120 | static int char_array_refsEql_P(a, x, m, b, y, n) | ^ differ.c:125:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 125 | static int char_array_refs_revEql_P(a, x, m, b, y, n) | ^ differ.c:146:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 146 | int fp_compare(fp, fpoff, cc, a, m, b, n, array_refsEql_P, p_lim) | ^ differ.c:199:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 199 | int fp_run(fp, fpoff, k, a, m, b, n, array_refsEql_P, cc, p) | ^ differ.c:227:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 227 | && (array_refsEql_P(a, x, m, b, y, n))) | ^ differ.c:240:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 240 | int diff_mid_split(n, rr, cc, cost) | ^ differ.c:263:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 263 | void fp_init(fp, fpoff, fill, mindx, maxdx) | ^ differ.c:286:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 286 | int diff_divide_and_conquer(fp, fpoff, ccrr, a, start_a, end_a, b, start_b, end_b, edits, edx, epo, procs, p_lim) | ^ differ.c:330:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 330 | int diff2et(fp, fpoff, ccrr, a, start_a, end_a, b, start_b, end_b, edits, edx, epo, procs, p_lim) | ^ differ.c:351:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 351 | && (procs->array_refsEql_P(a, adx, 0, b, bdx, 0))) { | ^ differ.c:362:31: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 362 | && (procs->array_refsEql_P(a, asx, 0, b, bsx, 0))) { | ^ differ.c:380:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 380 | int diff2ez(fp, fpoff, ccrr, a, start_a, end_a, b, start_b, end_b, edits, edx, epo, procs, p_lim) | ^ differ.c:423:38: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 423 | else if (procs->array_refsEql_P(a, adx, 0, b, bdx, 0)) | ^ differ.c:464:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 464 | static void check_cost(name, est, cost) | ^ differ.c:478:18: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 478 | static fp_procs *raprot2procs(prot, s_name) | ^ differ.c:495:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 495 | static void* array2addr(RA, prot, pos, s_name) | ^ differ.c:508:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 508 | SCM diff2edits(Edits, Fp, Args) | ^ differ.c:548:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 548 | SCM diff2editlen(Fp, A, Args) | ^ 25 warnings generated. (system "cc -shared -o differ.so differ.o") (delete-file "differ.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F generalized-c-arguments #-c gsubr.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_gsubr();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall gsubr.c") gsubr.c:65:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 65 | case 2: return (*fcn)(v[0], v[1]); | ^ gsubr.c:66:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 66 | case 3: return (*fcn)(v[0], v[1], v[2]); | ^ gsubr.c:67:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 67 | case 4: return (*fcn)(v[0], v[1], v[2], v[3]); | ^ gsubr.c:68:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 68 | case 5: return (*fcn)(v[0], v[1], v[2], v[3], v[4]); | ^ gsubr.c:69:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 69 | case 6: return (*fcn)(v[0], v[1], v[2], v[3], v[4], v[5]); | ^ gsubr.c:70:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 70 | case 7: return (*fcn)(v[0], v[1], v[2], v[3], v[4], v[5], v[6]); | ^ gsubr.c:71:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 71 | case 8: return (*fcn)(v[0], v[1], v[2], v[3], v[4], v[5], v[6], v[7]); | ^ gsubr.c:72:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 72 | case 9: return (*fcn)(v[0], v[1], v[2], v[3], v[4], v[5], v[6], v[7], v[8]); | ^ gsubr.c:73:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 73 | case 10: return (*fcn)(v[0], v[1], v[2], v[3], v[4], v[5], v[6], v[7], v[8], v[9]); | ^ gsubr.c:35:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 35 | static SCM gsubr_apply(args) | ^ 10 warnings generated. (system "cc -shared -o gsubr.so gsubr.o") (delete-file "gsubr.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F record #-c record.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_record();" "#define CCLO" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall record.c") record.c:60:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 60 | static SCM recordp(obj) | ^ record.c:65:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 65 | static SCM rec_pred1(cclo, obj) | ^ record.c:74:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 74 | static SCM rec_pred(rtd) | ^ record.c:84:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 84 | static SCM rec_rtd(rec) | ^ record.c:93:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 93 | static SCM rec_constr(rtd, flds) | ^ record.c:129:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 129 | static void rec_error(arg, pos, what, rtd, i) | ^ record.c:150:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 150 | static SCM rec_constr1(args) | ^ record.c:177:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 177 | static SCM makrecclo(proc, rtd, field, what) | ^ record.c:197:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 197 | static SCM rec_accessor1(cclo, rec) | ^ record.c:208:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 208 | static SCM rec_modifier1(cclo, rec, val) | ^ record.c:221:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 221 | static SCM rec_accessor(rtd, field) | ^ record.c:228:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 228 | static SCM rec_modifier(rtd, field) | ^ record.c:235:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 235 | static SCM makrectyp(name, fields) | ^ record.c:251:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 251 | static SCM rec_prinset(rtd, printer) | ^ record.c:261:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 261 | static SCM markrec(ptr) | ^ record.c:269:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 269 | static sizet freerec(ptr) | ^ record.c:275:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 275 | static int recprin1(exp, port, writing) | ^ record.c:324:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 324 | static SCM rec_rtdprin1(rtd, port, writing_p) | ^ record.c:340:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 340 | static SCM recequal(rec0, rec1) | ^ 19 warnings generated. (system "cc -shared -o record.so record.o") (delete-file "record.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F byte-number inexact bignums ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_bytenumb();" "#define FLOATS" "#define BIGNUMS" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall bytenumb.c") bytenumb.c:29:16: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 29 | static ssize_t get_bytes_length(obj) | ^ bytenumb.c:52:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 52 | static void * get_bytes(obj, minlen, s_name) | ^ bytenumb.c:72:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 72 | static SCM scm_bytes_to_integer(sbyts, sn) | ^ bytenumb.c:117:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 117 | static SCM scm_integer_to_bytes(sn, slen) | ^ bytenumb.c:182:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 182 | static SCM scm_bytes_to_ieee_float(sbyts) | ^ bytenumb.c:212:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 212 | static SCM scm_bytes_to_ieee_double(sbyts) | ^ bytenumb.c:242:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 242 | static SCM scm_ieee_float_to_bytes(in_flt) | ^ bytenumb.c:323:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 323 | static SCM scm_ieee_double_to_bytes(in_flt) | ^ bytenumb.c:403:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 403 | static SCM scm_integer_byte_collate_M(byte_vector) | ^ bytenumb.c:412:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 412 | static SCM scm_ieee_byte_collate_M(byte_vector) | ^ bytenumb.c:430:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 430 | static SCM scm_ieee_byte_decollate_M(byte_vector) | ^ 11 warnings generated. (system "cc -shared -o bytenumb.so bytenumb.o") (delete-file "bytenumb.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F i/o-extensions #-c ioext.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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_ioext();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall ioext.c") ioext.c:109:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 109 | static SCM read_line(port) | ^ ioext.c:138:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 138 | static SCM read_line1(str, port) | ^ ioext.c:168:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 168 | static SCM l_write_line(obj, port) | ^ ioext.c:176:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 176 | static SCM reopen_file(filename, modes, port) | ^ ioext.c:207:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 207 | static SCM l_dup(oldpt, modes) | ^ ioext.c:241:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 241 | static SCM l_dup2(into_pt, from_pt) | ^ ioext.c:264:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 264 | static SCM l_opendir(dirname) | ^ ioext.c:280:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 280 | static SCM l_readdir(port) | ^ ioext.c:293:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 293 | static SCM l_rewinddir(port) | ^ ioext.c:301:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 301 | static SCM l_closedir(port) | ^ ioext.c:315:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 315 | static int dir_print(sexp, port, writing) | ^ ioext.c:321:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 321 | static sizet dir_free(p) | ^ ioext.c:441:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 441 | static SCM l_mkdir(path, mode) | ^ ioext.c:459:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 459 | static SCM l_rmdir(path) | ^ ioext.c:475:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 475 | static SCM lchdir(str) | ^ ioext.c:502:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 502 | static SCM l_chmod(pathname, mode) | ^ ioext.c:524:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 524 | static SCM l_utime(pathname, acctime, modtime) | ^ ioext.c:539:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 539 | static SCM l_umask(mode) | ^ ioext.c:550:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 550 | static SCM ren_fil(oldname, newname) | ^ ioext.c:572:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 572 | static SCM scm_copy_file(oldname, newname) | ^ ioext.c:620:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 620 | static SCM l_fileno(port) | ^ ioext.c:636:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 636 | static SCM l_access(pathname, mode) | ^ ioext.c:655:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 655 | static SCM l_stat(str) | ^ ioext.c:686:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 686 | SCM stat2scm(stat_temp) | ^ ioext.c:723:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 723 | static SCM i_execv(modes, path, args) | ^ ioext.c:742:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 742 | static SCM lexec(path, arg0, args) | ^ ioext.c:747:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 747 | static SCM lexecp(path, arg0, args) | ^ ioext.c:752:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 752 | static SCM lexecv(path, args) | ^ ioext.c:757:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 757 | static SCM lexecvp(path, args) | ^ ioext.c:763:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 763 | static SCM l_putenv(str) | ^ ioext.c:818:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 818 | static SCM scm_try_create_file(fname, modes, perms) | ^ 31 warnings generated. (system "cc -shared -o ioext.so ioext.o") (delete-file "ioext.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F posix #-c posix.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_posix();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall posix.c") posix.c:49:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 49 | static SCM l_chown(path, owner, group) | ^ posix.c:61:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 61 | static SCM l_link(oldpath, newpath) | ^ posix.c:99:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 99 | static SCM open_pipe(pipestr, modes) | ^ posix.c:150:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 150 | static SCM l_pwinfo(user) | ^ posix.c:176:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 176 | static SCM l_grinfo(name) | ^ posix.c:197:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 197 | static SCM l_setgr(arg) | ^ posix.c:204:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 204 | static SCM l_setpw(arg) | ^ posix.c:213:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 213 | static SCM l_kill(pid, sig) | ^ posix.c:223:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 223 | static SCM l_waitpid(pid, options) | ^ posix.c:258:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 258 | static SCM l_setuid(id) | ^ posix.c:265:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 265 | static SCM l_setgid(id) | ^ posix.c:274:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 274 | static SCM l_seteuid(id) | ^ posix.c:281:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 281 | static SCM l_setegid(id) | ^ posix.c:290:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 290 | static SCM l_ttyname(port) | ^ 14 warnings generated. (system "cc -shared -o posix.so posix.o") (delete-file "posix.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F socket #-c socket.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_socket();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall socket.c") socket.c:57:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 57 | static SCM l_inetaddr (host) | ^ socket.c:75:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 75 | static SCM l_inetstr (inetid) | ^ socket.c:86:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 86 | static SCM l_network (host) | ^ socket.c:96:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 96 | static SCM l_lna (host) | ^ socket.c:106:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 106 | static SCM l_makaddr (net, lna) | ^ socket.c:118:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 118 | static SCM l_hostinfo(name) | ^ socket.c:162:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 162 | static SCM l_netinfo(name) | ^ socket.c:192:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 192 | static SCM l_protoinfo(name) | ^ socket.c:220:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 220 | static SCM l_servinfo(args) | ^ socket.c:254:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 254 | static SCM l_sethost(arg) | ^ socket.c:262:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 262 | static SCM l_setnet(arg) | ^ socket.c:270:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 270 | static SCM l_setproto(arg) | ^ socket.c:277:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 277 | static SCM l_setserv(arg) | ^ socket.c:286:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 286 | static SCM l_socket(fam, proto) | ^ socket.c:320:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 320 | static SCM l_socketpair(fam, proto) | ^ socket.c:353:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 353 | static SCM l_shutdown(port, how) | ^ socket.c:374:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 374 | static SCM l_connect (sockpt, address, arg) | ^ socket.c:418:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 418 | static SCM l_bind(sockpt, address) | ^ socket.c:454:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 454 | static SCM l_listen(port, backlog) | ^ socket.c:472:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 472 | static SCM l_accept(sockpt) | ^ socket.c:503:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 503 | static int sknm_print(exp, port, writing) | ^ socket.c:525:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 525 | static sizet sknm_free(p) | ^ socket.c:535:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 535 | static SCM l_sknm_family(snm) | ^ socket.c:542:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 542 | static SCM l_sknm_port_num(snm) | ^ socket.c:555:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 555 | static SCM l_sknm_addr(snm) | ^ socket.c:570:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 570 | static SCM maksknm(sad) | ^ socket.c:584:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 584 | static SCM l_getpeername(sockpt) | ^ socket.c:599:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 599 | static SCM l_getsockname(sockpt) | ^ 28 warnings generated. (system "cc -shared -o socket.so socket.o") (delete-file "socket.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F unix #-c unix.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_unix();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -Wall unix.c") unix.c:58:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 58 | SCM scm_mknod(path, mode, dev) | ^ unix.c:69:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 69 | SCM scm_acct(path) | ^ unix.c:83:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 83 | SCM scm_nice(incr) | ^ unix.c:97:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 97 | SCM scm_symlink(oldpath, newpath) | ^ unix.c:107:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 107 | SCM scm_readlink(path) | ^ unix.c:118:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 118 | SCM scm_lstat(str) | ^ 6 warnings generated. (system "cc -shared -o unix.so unix.o") (delete-file "unix.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F regex #-c rgx.c ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_rgx();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -I/usr/local/include -Wall rgx.c") rgx.c:94:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 94 | static sizet fregex(ptr) | ^ rgx.c:107:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 107 | static int prinregex(exp, port, writing) | ^ rgx.c:118:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 118 | static SCM markregex(ptr) | ^ rgx.c:128:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 128 | static SCM lregerror(scode) | ^ rgx.c:154:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 154 | static SCM lregcomp(pattern, flags) | ^ rgx.c:272:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 272 | static SCM lregexec(prog, str) | ^ rgx.c:306:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 306 | static SCM lregmatp(prog, str) | ^ rgx.c:333:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 333 | static SCM lregsearchmatch(prog, str, args, search, vector) | ^ rgx.c:445:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 445 | static SCM lregsearch(prog, str, args) | ^ rgx.c:53:12: warning: a function declaration without a prototype is deprecated in all versions of C and is treated as a zero-parameter prototype in C23, conflicting with a subsequent definition [-Wdeprecated-non-prototype] 53 | static SCM lregsearch(); | ^ rgx.c:451:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 451 | static SCM lregsearchv(prog, str, args) | ^ rgx.c:54:12: warning: a function declaration without a prototype is deprecated in all versions of C and is treated as a zero-parameter prototype in C23, conflicting with a subsequent definition [-Wdeprecated-non-prototype] 54 | static SCM lregsearchv(); | ^ rgx.c:457:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 457 | static SCM lregmatch(prog, str, args) | ^ rgx.c:463:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 463 | static SCM lregmatchv(prog, str, args) | ^ rgx.c:469:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 469 | static SCM stringsplitutil(prog, str, vector) | ^ rgx.c:527:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 527 | static SCM lstringsplit(prog, str) | ^ rgx.c:533:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 533 | static SCM lstringsplitv(prog, str) | ^ rgx.c:559:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 559 | static SCM lstringedit(prog, editspec, args) | ^ 18 warnings generated. (system "cc -shared -L/usr/local/lib -lgnuregex -o rgx.so rgx.o") (delete-file "rgx.o") ; ================ Link C object files (delete-file "slibcat") ./build -hsystem -t dll -f dlls.opt -F edit-line ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: dlls.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 COMPILED_INITS init_edline();" "#define DLL")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -fPIC -c -I/usr/local/include -Wall edline.c") edline.c:28:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 28 | static SCM lreadline(prompt) | ^ edline.c:44:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 44 | static SCM ladd_history(line) | ^ 2 warnings generated. (system "cc -shared -L/usr/local/lib -lreadline -o edline.so edline.o") (delete-file "edline.o") ; ================ Link C object files (delete-file "slibcat") /usr/bin/make x.so ./scmlit -l xgen.scm /usr/local/include/X11/Xlib.h ;ERROR: "/wrkdirs/usr/ports/lang/scm/work/slib/lineio.scm": read-char: Wrong type in arg1 #f ; in expression: (#@apply #@read-char #@port) ; in scope: ; port procedure read-line ; defined by load: "/wrkdirs/usr/ports/lang/scm/work/slib/lineio.scm" ;STACK TRACE 1; (#@let* ((char (#@apply #@read-char #@port))) (if (eof-object ... 2; (#@do ((line (#@read-line #@xatom.h) (read-line xatom.h))) ((e ... 3; ((#@fprintf #@xatoms.scm ";; %s extracted definitions from %s ... 4; (#@let* ((ans (#@apply #@proc #@ports))) (#@for-each #@close- ... 5; ((#@cond ((#@= 1 (#@length #@args)) (#@xatoms) (apply xgen arg ... 6; (#@exit (#@xgen.scm (#@list-tail #@*argv* #@*optind*))) 7; (#@define ((filesuf #@file) (hss (#@has-suffix? #@file (#@sche ... 8; ((#@thunk) (set! complete #t)) 9; ((#@do-thunk (#@lambda () (#@cond (#@*syntax-rules* (require ( ... 10; ((#@case #@option #(# #f #\? #\: #\n #\u #\m #\s ... 11; ((#@cond ((#@not #@*argv*) (#@set! #@*argv* (#@program-argume ... ; program args: ("./scmlit" "-l" "xgen.scm" "/usr/local/include/X11/Xlib.h") *** Error code 1 Stop. make[3]: stopped making "x.so" in /wrkdirs/usr/ports/lang/scm/work/scm-5f3 *** Error code 1 (ignored) if ! /usr/bin/make dscm5; then /usr/bin/make scm5; fi make[2]: don't know how to make gmalloc.c. Stop make[2]: stopped making "dscm5" in /wrkdirs/usr/ports/lang/scm/work/scm-5f3 ./build -hsystem -f scm5.opt -o scm -s /wrkdirs/usr/ports/lang/scm/work/scm-5f3/ ; Scheme (unix) script created by SLIB/batch ; [-p freebsd] ; used options from: scm5.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 \"/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Init5f3.scm\"" "#define INITS init_sc2();" "#define COMPILED_INITS init_record();" "#define CCLO" "#define CAUTIOUS" "#define BIGNUMS" "#define ARRAYS" "#define FLOATS" "#define ENGNOT" "#define MACRO")))) ; ================ Compile C source files (system "cc -pipe -O0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fstack-protector-strong -fno-strict-aliasing -c -DSUN_DL sc2.c record.c dynl.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") sc2.c:24:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 24 | static SCM last_pair(sx) | ^ sc2.c:43:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 43 | static SCM subml(str1, start1, args) | ^ sc2.c:66:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 66 | static SCM submr(str1, start1, args) | ^ sc2.c:89:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 89 | static SCM subfl(str, start, args) | ^ sc2.c:110:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 110 | static SCM strnullp(str) | ^ sc2.c:119:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 119 | static SCM appendb(args) | ^ 6 warnings generated. record.c:60:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 60 | static SCM recordp(obj) | ^ record.c:65:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 65 | static SCM rec_pred1(cclo, obj) | ^ record.c:74:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 74 | static SCM rec_pred(rtd) | ^ record.c:84:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 84 | static SCM rec_rtd(rec) | ^ record.c:93:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 93 | static SCM rec_constr(rtd, flds) | ^ record.c:129:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 129 | static void rec_error(arg, pos, what, rtd, i) | ^ record.c:150:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 150 | static SCM rec_constr1(args) | ^ record.c:177:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 177 | static SCM makrecclo(proc, rtd, field, what) | ^ record.c:197:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 197 | static SCM rec_accessor1(cclo, rec) | ^ record.c:208:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 208 | static SCM rec_modifier1(cclo, rec, val) | ^ record.c:221:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 221 | static SCM rec_accessor(rtd, field) | ^ record.c:228:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 228 | static SCM rec_modifier(rtd, field) | ^ record.c:235:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 235 | static SCM makrectyp(name, fields) | ^ record.c:251:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 251 | static SCM rec_prinset(rtd, printer) | ^ record.c:261:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 261 | static SCM markrec(ptr) | ^ record.c:269:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 269 | static sizet freerec(ptr) | ^ record.c:275:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 275 | static int recprin1(exp, port, writing) | ^ record.c:324:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 324 | static SCM rec_rtdprin1(rtd, port, writing_p) | ^ record.c:340:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 340 | static SCM recequal(rec0, rec1) | ^ 19 warnings generated. dynl.c:342:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 342 | static sizet frshl(ptr) | ^ dynl.c:354:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 354 | static int prinshl(exp, port, writing) | ^ dynl.c:366:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 366 | static SCM l_dyn_link(fname) | ^ dynl.c:395:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 395 | static SCM l_dyn_call(symb, shl) | ^ dynl.c:422:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 422 | static SCM l_dyn_main_call(symb, shl, args) | ^ dynl.c:456:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 456 | static SCM l_dyn_unlink(shl) | ^ 6 warnings generated. continue.c:45:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 45 | long stack_size(start) | ^ continue.c:64:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 64 | CONTINUATION *make_root_continuation(stack_base) | ^ continue.c:87:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 87 | CONTINUATION *make_continuation(parent_cont) | ^ continue.c:122:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 122 | void free_continuation(cont) | ^ continue.c:159:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 159 | void dynthrow(a) | ^ continue.c:204:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 204 | void grow_throw(a) /* Grow the stack so that there is room */ | ^ continue.c:230:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 230 | void throw_to_continuation(cont, val, root_cont) | ^ 7 warnings generated. scm.c:226:19: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 226 | static SIGRETTYPE err_signal(sig) | ^ scm.c:236:19: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 236 | static SIGRETTYPE scmable_signal(sig) | ^ scm.c:292:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 292 | static SCM lalarm(i) | ^ scm.c:306:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 306 | static SCM scm_setitimer(which, value, interval) | ^ scm.c:357:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 357 | static SCM l_sleep(i) | ^ scm.c:419:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 419 | static SCM l_raise(sig) | ^ scm.c:461:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 461 | void init_scm(iverbose, buf0stdin, init_heap_size) | ^ scm.c:499:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 499 | static void init_sig1(scm_err, signo, handler) | ^ scm.c:631:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 631 | void scm_init_from_argv(argc, argv, script_arg, iverbose, buf0stdin) | ^ scm.c:653:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 653 | void final_scm(freeall) | ^ scm.c:787:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 787 | int init_buf0(inport) | ^ scm.c:814:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 814 | static SCM scm_execpath(newpath) | ^ scm.c:833:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 833 | char *scm_find_execpath(argc, argv, script_arg) | ^ scm.c:873:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 873 | static SCM lsystem(cmd) | ^ scm.c:891:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 891 | static SCM scm_getenv(nam) | ^ scm.c:975:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 975 | void add_feature(str) | ^ 16 warnings generated. scmmain.c:44:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 44 | static char *scm_find_implpath(execpath) | ^ scmmain.c:79:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 79 | int main(argc, argv) | ^ 2 warnings generated. findexec.c:136:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 136 | static char *copy_of(s) | ^ findexec.c:155:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 155 | char *dld_find_executable(name) | ^ 2 warnings generated. script.c:47:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 47 | char *scm_cat_path(str1, str2, n) | ^ script.c:68:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 68 | char *scm_try_path(path) | ^ script.c:83:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 83 | static char *scm_sep_init_try(path, sep, initname) | ^ script.c:111:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 111 | char *script_find_executable(name) | ^ script.c:144:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 144 | char *find_impl_file(exec_path, generic_name, initname, sep) | ^ script.c:281:20: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 281 | static const char *script_read_arg(f) | ^ script.c:339:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 339 | static int script_meta_arg_P(arg) | ^ script.c:354:21: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 354 | const char * const *script_process_argv(argc, argv) | ^ script.c:384:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 384 | int script_count_argv(argv) | ^ 9 warnings generated. time.c:304:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 304 | static int scm_ftime(time_buffer) | ^ time.c:389:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 389 | long time_in_msec(x) | ^ 2 warnings generated. repl.c:143:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 143 | void scm_intprint(n, radix, port) | ^ repl.c:152:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 152 | void scm_ipruk(hdr, ptr, port) | ^ repl.c:171:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 171 | static void scm_iprlist(hdr, exp, tlr, port, writing) | ^ repl.c:194:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 194 | void scm_iprin1(exp, port, writing) | ^ repl.c:421:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 421 | static int input_waiting(f) | ^ repl.c:450:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 450 | static SCM char_readyp(port) | ^ repl.c:475:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 475 | static SCM wait_for_input(args) | ^ repl.c:568:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 568 | SCM eof_objectp(x) | ^ repl.c:576:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 576 | int scm_io_error(port, what) | ^ repl.c:606:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 606 | void lfflush(port) /* internal SCM call */ | ^ repl.c:615:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 615 | static SCM scm_force_output(port) | ^ repl.c:624:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 624 | static SCM scm_write(obj, port) | ^ repl.c:632:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 632 | SCM scm_display(obj, port) | ^ repl.c:640:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 640 | SCM scm_newline(port) | ^ repl.c:649:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 649 | SCM scm_write_char(chr, port) | ^ repl.c:658:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 658 | static SCM scm_freshline(port) | ^ repl.c:669:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 669 | void lputc(c, port) | ^ repl.c:689:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 689 | void lputs(s, port) | ^ repl.c:713:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 713 | sizet lfwrite(ptr, size, nitems, port) | ^ repl.c:740:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 740 | int lgetc(port) | ^ repl.c:776:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 776 | void lungetc(c, port) | ^ repl.c:790:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 790 | SCM scm_read_char(port) | ^ repl.c:800:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 800 | SCM scm_peek_char(port) | ^ repl.c:812:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 812 | char *grow_tok_buf(tok_buf) | ^ repl.c:821:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 821 | static int flush_ws(port) | ^ repl.c:847:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 847 | SCM scm_read(port) | ^ repl.c:853:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 853 | static SCM scm_read_for_load(port) | ^ repl.c:867:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 867 | static SCM scm_lread1(port, flgs, what) | ^ repl.c:885:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 885 | static SCM scm_lreadpr(tok_buf, port, flgs) | ^ repl.c:1042:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1042 | static SCM scm_lreadr(tok_buf, port, flgs) | ^ repl.c:1055:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1055 | static SCM scm_lread_rec(tok_buf, port) | ^ repl.c:1082:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1082 | static sizet scm_read_token(ic, tok_buf, port, flgs) | ^ repl.c:1128:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1128 | static SCM scm_lreadparen(tok_buf, port, flgs, name) | ^ repl.c:1161:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1161 | static SCM swapcar(pair, value) | ^ repl.c:1175:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1175 | static SCM tryarb(arb) | ^ repl.c:1189:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1189 | SCM relarb(arb) | ^ repl.c:1197:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1197 | SCM makarb(name) | ^ repl.c:1206:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1206 | static int prinarb(exp, port, writing) | ^ repl.c:1260:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1260 | int handle_it(i) | ^ repl.c:1319:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1319 | SCM scm_top_level(initpath, toplvl_fun) | ^ repl.c:1446:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1446 | SCM scm_port_line(port) | ^ repl.c:1464:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1464 | SCM scm_port_col(port) | ^ repl.c:1485:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1485 | SCM scm_file_position(port, pos) | ^ repl.c:1528:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1528 | static SCM scm_port_filename(port) | ^ repl.c:1545:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1545 | void growth_mon(obj, size, units, grewp) | ^ repl.c:1564:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1564 | void gc_start(what) | ^ repl.c:1668:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1668 | SCM lroom(opt) | ^ repl.c:1710:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1710 | SCM prolixity(arg) | ^ repl.c:1786:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1786 | SCM quit(n) | ^ repl.c:1866:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1866 | SCM tryload(filename, reader) | ^ repl.c:1903:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1903 | SCM scm_eval_string(str) | ^ repl.c:1916:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1916 | SCM scm_load_string(str) | ^ repl.c:1935:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1935 | void scm_line_msg(file, linum, port) | ^ repl.c:1945:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1945 | void scm_err_line(what, file, linum, port) | ^ repl.c:1964:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1964 | static void err_head(str) | ^ repl.c:1988:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1988 | void scm_warn(str1, str2, obj) | ^ repl.c:2006:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2006 | static SCM lerrno(arg) | ^ repl.c:2017:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2017 | static SCM lperror(arg) | ^ repl.c:2119:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2119 | void everr(exp, env, arg, pos, s_subr, codep) | ^ repl.c:2136:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2136 | void wta(arg, pos, s_subr) | ^ repl.c:2146:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2146 | void scm_experr(arg, pos, s_subr) | ^ repl.c:2171:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2171 | static SCM set_inp(port) | ^ repl.c:2182:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2182 | static SCM set_outp(port) | ^ repl.c:2193:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2193 | static SCM set_errp(port) | ^ repl.c:2205:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2205 | static SCM l_isatty(port) | ^ repl.c:2268:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2268 | void init_repl( iverbose ) | ^ 66 warnings generated. scl.c:88:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 88 | static int inf2str(f, a) | ^ scl.c:105:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 105 | static sizet idbl2str(f, a) | ^ scl.c:121:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 121 | static void strrecy(str) | ^ scl.c:137:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 137 | void bigrecy(bgnm) | ^ scl.c:152:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 152 | static sizet pdbl2str(f, a, ch) | ^ scl.c:389:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 389 | static sizet iflo2str(flt, str) | ^ scl.c:409:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 409 | sizet iulong2str(num, rad, p) | ^ scl.c:427:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 427 | sizet ilong2str(num, rad, p) | ^ scl.c:439:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 439 | static SCM big2str(b, radix) | ^ scl.c:479:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 479 | SCM number2string(x, radix) | ^ scl.c:516:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 516 | int floprint(sexp, port, writing) | ^ scl.c:531:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 531 | int bigprint(exp, port, writing) | ^ scl.c:550:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 550 | SCM istr2int(str, len, radix) | ^ scl.c:674:8: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 674 | double mantexp2dbl(manstr, point) | ^ scl.c:683:8: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 683 | double pmantexp2dbl(bmant, point) | ^ scl.c:787:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 787 | SCM istr2flo(str, len, radix) | ^ scl.c:995:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 995 | SCM istring2number(str, len, radix) | ^ scl.c:1033:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1033 | SCM string2number(str, radix) | ^ scl.c:1044:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1044 | SCM makdbl (x, y) | ^ scl.c:1084:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1084 | SCM eqv(x, y) | ^ scl.c:1102:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1102 | SCM memv(x, lst) /* m.borza 12.2.91 */ | ^ scl.c:1115:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1115 | static SCM assv(x, alist) /* m.borza 12.2.91 */ | ^ scl.c:1133:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1133 | static SCM list_tail(lst, k) | ^ scl.c:1146:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1146 | SCM string2list(str) | ^ scl.c:1157:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1157 | SCM string_copy(str) | ^ scl.c:1163:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1163 | static SCM string_fill(str, chr) | ^ scl.c:1175:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1175 | SCM vector2list(v) | ^ scl.c:1186:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1186 | static SCM vector_fill(v, fill) | ^ scl.c:1196:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1196 | static SCM vector_equal(x, y) | ^ scl.c:1205:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1205 | SCM bigequal(x, y) | ^ scl.c:1213:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1213 | SCM floequal(x, y) | ^ scl.c:1222:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1222 | SCM equal(x, y) | ^ scl.c:1253:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1253 | if (pred) return (*pred)(x, y); | ^ scl.c:1259:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1259 | SCM numberp(obj) | ^ scl.c:1273:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1273 | static SCM scm_complex_p(obj) | ^ scl.c:1282:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1282 | static long scm_twos_power(n) | ^ scl.c:1307:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1307 | int scm_bigdblcomp(b, d) | ^ scl.c:1332:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1332 | static SCM realp(x) | ^ scl.c:1343:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1343 | static SCM scm_rationalp(x) | ^ scl.c:1358:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1358 | static SCM intp(x) | ^ scl.c:1376:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1376 | static SCM inexactp(x) | ^ scl.c:1385:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1385 | SCM eqp(x, y) | ^ scl.c:1459:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1459 | SCM lessp(x, y) | ^ scl.c:1528:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1528 | SCM greaterp(x, y) | ^ scl.c:1533:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1533 | SCM leqp(x, y) | ^ scl.c:1538:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1538 | SCM greqp(x, y) | ^ scl.c:1543:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1543 | SCM zerop(z) | ^ scl.c:1572:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1572 | SCM positivep(x) | ^ scl.c:1601:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1601 | SCM negativep(x) | ^ scl.c:1634:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1634 | static SCM scm_max(x, y) | ^ scl.c:1718:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1718 | static SCM scm_min(x, y) | ^ scl.c:1802:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1802 | SCM sum(x, y) | ^ scl.c:1917:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1917 | SCM difference(x, y) | ^ scl.c:2049:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2049 | SCM product(x, y) | ^ scl.c:2197:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2197 | SCM divide(x, y) | ^ scl.c:2408:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2408 | static SCM ilog(m, b, k, n) | ^ scl.c:2425:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2425 | static SCM scm_intlog(base, k) | ^ scl.c:2441:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2441 | static SCM scm_intexpt(z1, z2) | ^ scl.c:2545:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2545 | static SCM scm_cintlog(base, k) | ^ scl.c:2573:8: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2573 | double scm_truncate(x) | ^ scl.c:2580:8: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2580 | double scm_round(x) | ^ scl.c:2592:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2592 | static void two_doubles(z1, z2, sstring, xy) | ^ scl.c:2633:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2633 | static SCM expt(z1, z2) | ^ scl.c:2640:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2640 | static SCM latan2(z1, z2) | ^ scl.c:2647:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2647 | static SCM makrect(z1, z2) | ^ scl.c:2654:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2654 | static SCM makpolar(z1, z2) | ^ scl.c:2662:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2662 | static SCM real_part(z) | ^ scl.c:2680:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2680 | static SCM imag_part(z) | ^ scl.c:2698:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2698 | SCM scm_abs(z) | ^ scl.c:2711:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2711 | static SCM scm_magnitude(z) | ^ scl.c:2739:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2739 | static SCM angle(z) | ^ scl.c:2761:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2761 | static SCM ex2in(z) | ^ scl.c:2772:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2772 | static SCM in2ex(z) | ^ scl.c:2789:15: warning: implicit conversion from 'long' to 'double' changes value from 2305843009213693951 to 2305843009213693952 [-Wimplicit-const-int-float-conversion] 2789 | if ((u <= MOST_POSITIVE_FIXNUM) | ~~ ^~~~~~~~~~~~~~~~~~~~ ./scmfig.h:565:40: note: expanded from macro 'MOST_POSITIVE_FIXNUM' 565 | # define MOST_POSITIVE_FIXNUM (LONG_MAX>>2) | ~~~~~~~~^~~ scl.c:2818:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2818 | SCM scm_iabs(x) | ^ scl.c:2843:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2843 | SCM dbl2big(d) | ^ scl.c:2865:8: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2865 | double int2dbl(b) | ^ scl.c:2897:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2897 | static SCM bigdblop(op, b, re, im) | ^ scl.c:2934:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2934 | static SCM inex_divintbig(a, b) | ^ scl.c:2964:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2964 | static SCM scm_dfloat_parts(f) | ^ scl.c:2978:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2978 | static SCM scm_make_dfloat(mant, expt) | ^ scl.c:2991:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2991 | unsigned long hasher(obj, n, d) | ^ scl.c:3066:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3066 | SCM hash(obj, n) | ^ scl.c:3074:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3074 | SCM hashv(obj, n) | ^ scl.c:3084:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3084 | SCM hashq(obj, n) | ^ 85 warnings generated. eval.c:377:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 377 | static SCM *ilookup(iloc) | ^ eval.c:398:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 398 | static SCM *farlookup(farloc) | ^ eval.c:433:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 433 | SCM scm_env_lookup(var, stenv) | ^ eval.c:512:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 512 | static SCM *lookupcar(vloc) | ^ eval.c:546:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 546 | static SCM scm_lookupval(vloc, memo) | ^ eval.c:579:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 579 | static SCM evalatomcar(x, no_error) | ^ eval.c:627:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 627 | SCM scm_multi_set(syms, vals) | ^ eval.c:655:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 655 | static SCM scm_case_selector(x) | ^ eval.c:703:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 703 | static SCM acro_call(x, env) | ^ eval.c:728:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 728 | static SCM toplevel_define(xorig, env) | ^ eval.c:747:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 747 | SCM eval_args(l) | ^ eval.c:765:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 765 | static void ecache_evalx(x) | ^ eval.c:787:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 787 | static void ecache_undefs(x) | ^ eval.c:812:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 812 | static int ecache_eval_args(proc, arg1, arg2, arg3, x) | ^ eval.c:838:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 838 | static SCM asubr_apply(proc, arg1, arg2, arg3, args) | ^ eval.c:843:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 843 | arg1 = SUBRF(proc)(arg1, arg2); | ^ eval.c:844:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 844 | arg1 = SUBRF(proc)(arg1, arg3); | ^ eval.c:846:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 846 | arg1 = SUBRF(proc)(arg1, CAR(args)); | ^ eval.c:851:27: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 851 | if (FALSEP(SUBRF(proc)(arg1, arg2))) return BOOL_F; | ^ eval.c:853:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 853 | if (FALSEP(SUBRF(proc)(arg2, arg3))) return BOOL_F; | ^ eval.c:865:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 865 | SCM scm_values(arg1, arg2, rest, what) | ^ eval.c:906:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 906 | static int topdenote_eq(sym, id, env) | ^ eval.c:916:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 916 | static SCM id2sym(id) | ^ eval.c:931:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 931 | static void unpaint(p) | ^ eval.c:960:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 960 | SCM m_quote(xorig, env, ctxt) | ^ eval.c:971:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 971 | SCM m_begin(xorig, env, ctxt) | ^ eval.c:981:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 981 | static int constant_p(x) | ^ eval.c:987:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 987 | SCM m_if(xorig, env, ctxt) | ^ eval.c:1005:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1005 | SCM m_set(xorig, env, ctxt) | ^ eval.c:1018:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1018 | SCM m_and(xorig, env, ctxt) | ^ eval.c:1039:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1039 | SCM m_or(xorig, env, ctxt) | ^ eval.c:1066:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1066 | SCM m_case(xorig, env, ctxt) | ^ eval.c:1125:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1125 | SCM m_cond(xorig, env, ctxt) | ^ eval.c:1154:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1154 | static int varcheck(vars, op, what) | ^ eval.c:1184:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1184 | SCM m_lambda(xorig, env, ctxt) | ^ eval.c:1256:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1256 | int scm_nullenv_p(env) | ^ eval.c:1274:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1274 | static SCM m_letstar1(imm, vars, inits, body, env, ctxt) | ^ eval.c:1290:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1290 | SCM m_letstar(xorig, env, ctxt) | ^ eval.c:1314:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1314 | SCM m_do(xorig, env, ctxt) | ^ eval.c:1351:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1351 | static SCM evalcar(x) | ^ eval.c:1359:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1359 | static SCM iqq(form) | ^ eval.c:1380:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1380 | static SCM m_iqq(form, depth, env, ctxt) | ^ eval.c:1440:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1440 | SCM m_quasiquote(xorig, env, ctxt) | ^ eval.c:1449:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1449 | SCM m_delay(xorig, env, ctxt) | ^ eval.c:1456:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1456 | static int built_inp(name, x) | ^ eval.c:1474:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1474 | static void checked_define(name, val, what) | ^ eval.c:1504:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1504 | SCM m_define(xorig, env, ctxt) | ^ eval.c:1524:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1524 | static SCM m_parse_let(imm, xorig, x, vars, inits) | ^ eval.c:1556:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1556 | static SCM m_let_null(body, env, ctxt) | ^ eval.c:1568:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1568 | static SCM m_letrec1(imm, xorig, env, ctxt) | ^ eval.c:1580:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1580 | SCM m_letrec(xorig, env, ctxt) | ^ eval.c:1586:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1586 | SCM m_let(xorig, env, ctxt) | ^ eval.c:1613:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1613 | SCM m_apply(xorig, env, ctxt) | ^ eval.c:1620:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1620 | static SCM m_body(xorig, env, ctxt) | ^ eval.c:1663:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1663 | static SCM m_binding(name, value, env, ctxt) | ^ eval.c:1670:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1670 | static SCM m_bindings(names, values, env, ctxt) | ^ eval.c:1680:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1680 | static SCM m_seq(x, env, ctxt) | ^ eval.c:1698:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1698 | static SCM m_expr(x, env, ctxt) | ^ eval.c:1709:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1709 | SCM scm_check_linum(x, linum) | ^ eval.c:1720:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1720 | SCM scm_add_linum(linum, x) | ^ eval.c:1737:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1737 | static SCM macroexp1(xorig, env, ctxt, mode) | ^ eval.c:1920:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1920 | int badargsp(formals, args) | ^ eval.c:1932:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1932 | int scm_arity_check(proc, argc, what) | ^ eval.c:2014:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2014 | SCM ceval(x, static_env, env) | ^ eval.c:2029:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2029 | SCM scm_eval_values(x, env, valenv) | ^ eval.c:2063:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2063 | y = DSUBRF(proc)((double) INUM(arg1)); | ^ eval.c:2068:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2068 | y = DSUBRF(proc)(REALPART(arg1)); | ^ eval.c:2075:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2075 | y = DSUBRF(proc)(int2dbl(arg1)); | ^ eval.c:2056:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2056 | static SCM scm_apply_cxr(proc, arg1) | ^ eval.c:2108:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2108 | static SCM ceval_1(x) | ^ eval.c:2448:26: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2448 | return SUBRF(proc) (UNDEFINED); | ^ eval.c:2450:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2450 | return SUBRF(proc)(EOL); | ^ eval.c:2454:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2454 | return SUBRF(proc)(UNDEFINED, UNDEFINED); | ^ eval.c:2537:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2537 | return SUBRF(proc)(arg1, UNDEFINED); | ^ eval.c:2540:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2540 | return SUBRF(proc)(arg1); | ^ eval.c:2546:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2546 | return SUBRF(proc)(arg1, UNDEFINED); | ^ eval.c:2548:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2548 | return SUBRF(proc)(cons(arg1, EOL)); | ^ eval.c:2625:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2625 | return SUBRF(proc)(arg1, arg2); | ^ eval.c:2627:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2627 | return SUBRF(proc)(cons2(arg1, arg2, EOL)); | ^ eval.c:2629:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2629 | return SUBRF(proc)(arg1, arg2, EOL); | ^ eval.c:2632:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2632 | return SUBRF(proc)(arg1, arg2); | ^ eval.c:2738:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2738 | return SUBRF(proc)(arg1, arg2, arg3); | ^ eval.c:2744:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2744 | return SUBRF(proc)(arg1, arg2, cons(arg3, x)); | ^ eval.c:2746:20: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2746 | return SUBRF(proc)(cons2(arg1, arg2, cons(arg3, x))); | ^ eval.c:2809:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2809 | SCM procedurep(obj) | ^ eval.c:2823:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2823 | static SCM l_proc_doc(proc) | ^ eval.c:2846:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2846 | SCM nconc2copy(lst) | ^ eval.c:2867:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2867 | SCM scm_cp_list(lst, minlen) | ^ eval.c:2882:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2882 | SCM scm_v2lst(n, v, end) | ^ eval.c:2890:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2890 | SCM apply(proc, arg1, args) | ^ eval.c:2913:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2913 | return SUBRF(proc)(arg1, args); | ^ eval.c:2919:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2919 | return SUBRF(proc)(arg1, args); | ^ eval.c:2926:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2926 | return SUBRF(proc)(arg1); | ^ eval.c:2933:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2933 | return SUBRF(proc)(arg1, CAR(args), CAR(CDR(args))); | ^ eval.c:2935:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2935 | return SUBRF(proc)(UNBNDP(arg1) ? EOL : cons(arg1, args)); | ^ eval.c:2938:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2938 | return SUBRF(proc)(arg1, CAR(args), CDR(args)); | ^ eval.c:2940:40: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2940 | if (NULLP(args)) return SUBRF(proc)(arg1, UNDEFINED); | ^ eval.c:2943:25: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2943 | arg1 = SUBRF(proc)(arg1, CAR(args)); | ^ eval.c:2951:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2951 | if (FALSEP(SUBRF(proc)(arg1, CAR(args)))) return BOOL_F; | ^ eval.c:2983:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2983 | SCM scm_cvapply(proc, n, argv) | ^ eval.c:2994:33: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2994 | if (1==n) return SUBRF(proc)(argv[0], UNDEFINED); | ^ eval.c:2997:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2997 | return SUBRF(proc)(argv[0], argv[1]); | ^ eval.c:3001:33: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3001 | if (0==n) return SUBRF(proc)(UNDEFINED); | ^ eval.c:3004:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3004 | return SUBRF(proc)(argv[0]); | ^ eval.c:3008:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3008 | return SUBRF(proc)(argv[0], argv[1], argv[2]); | ^ eval.c:3010:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3010 | return SUBRF(proc)(0==n ? EOL : scm_v2lst(n, argv, EOL)); | ^ eval.c:3012:23: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3012 | return SUBRF(proc)(argv[0], argv[1], | ^ eval.c:3015:35: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3015 | if (1 >= n) return SUBRF(proc)(0==n ? UNDEFINED: argv[0], UNDEFINED); | ^ eval.c:3018:24: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3018 | res = SUBRF(proc)(res, argv[i]); | ^ eval.c:3023:29: warning: passing arguments to a function without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3023 | if (FALSEP(SUBRF(proc)(argv[i], argv[i+1]))) return BOOL_F; | ^ eval.c:3066:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3066 | SCM map(proc, arg1, args) | ^ eval.c:3115:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3115 | SCM for_each(proc, arg1, args) | ^ eval.c:3166:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3166 | SCM closure(code, argc) | ^ eval.c:3184:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3184 | SCM makprom(code) | ^ eval.c:3193:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3193 | static int prinprom(exp, port, writing) | ^ eval.c:3206:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3206 | static SCM makro(code, flags, what) | ^ eval.c:3220:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3220 | SCM makacro(code) | ^ eval.c:3226:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3226 | SCM makmacro(code) | ^ eval.c:3232:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3232 | SCM makmmacro(code) | ^ eval.c:3238:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3238 | SCM makidmacro(code) | ^ eval.c:3253:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3253 | static SCM scm_macroexpand1(x, env) | ^ eval.c:3278:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3278 | static SCM scm_eval_syntax(x, env) | ^ eval.c:3287:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3287 | static int prinmacro(exp, port, writing) | ^ eval.c:3310:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3310 | static int prinenv(exp, port, writing) | ^ eval.c:3322:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3322 | static int prinid(exp, port, writing) | ^ eval.c:3338:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3338 | SCM force(x) | ^ eval.c:3378:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3378 | SCM copytree(obj) | ^ eval.c:3397:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3397 | SCM eval(obj) | ^ eval.c:3405:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3405 | static SCM definedp(xorig, env, ctxt) | ^ eval.c:3424:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3424 | SCM identp(obj) | ^ eval.c:3431:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3431 | SCM ident_eqp(id1, id2, env) | ^ eval.c:3456:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3456 | SCM ident2sym(id) | ^ eval.c:3465:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3465 | SCM renamed_ident(id, env) | ^ eval.c:3502:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3502 | SCM m_syn_quote(xorig, env, ctxt) | ^ eval.c:3510:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3510 | static SCM m_defsyntax(xorig, env, ctxt) | ^ eval.c:3524:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3524 | SCM m_let_syntax(xorig, env, ctxt) | ^ eval.c:3543:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3543 | SCM m_letrec_syntax(xorig, env, ctxt) | ^ eval.c:3566:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3566 | SCM m_the_macro(xorig, env, ctxt) | ^ eval.c:3625:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3625 | static SCM make_synt(name, flags, fcn) | ^ eval.c:3639:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3639 | static SCM make_specfun(name, typ, flags) | ^ 140 warnings generated. sys.c:105:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 105 | SCM i_setbuf0(port) /* should be called with DEFER_INTS active */ | ^ sys.c:127:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 127 | long mode_bits(modes, cmodes) | ^ sys.c:152:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 152 | static SCM try_open_file(filename, modes) | ^ sys.c:181:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 181 | SCM open_file(filename, modes) | ^ sys.c:190:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 190 | SCM close_port(port) | ^ sys.c:215:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 215 | static SCM scm_portp(x) | ^ sys.c:221:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 221 | static SCM input_portp(x) | ^ sys.c:227:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 227 | static SCM output_portp(x) | ^ sys.c:233:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 233 | static SCM port_closedp(port) | ^ sys.c:240:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 240 | static SCM scm_port_type(port) | ^ sys.c:322:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 322 | static SCM del_fil(str) | ^ sys.c:335:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 335 | void prinport(exp, port, type) | ^ sys.c:384:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 384 | static int stputc(c, p) | ^ sys.c:393:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 393 | static sizet stwrite(str, siz, num, p) | ^ sys.c:407:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 407 | static int stputs(s, p) | ^ sys.c:413:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 413 | static int stgetc(p) | ^ sys.c:421:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 421 | static int stclose(p) | ^ sys.c:427:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 427 | static int stungetc(c, p) | ^ sys.c:439:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 439 | static int noop0(stream) | ^ sys.c:444:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 444 | SCM mkstrport(pos, str, modes, caller) | ^ sys.c:464:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 464 | static SCM cwos(proc) | ^ sys.c:473:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 473 | static SCM cwis(str, proc) | ^ sys.c:551:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 551 | static int sfputc(c, p) | ^ sys.c:559:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 559 | static sizet sfwrite(str, siz, num, p) | ^ sys.c:569:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 569 | static int sfputs(s, p) | ^ sys.c:575:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 575 | static int sfflush(stream) | ^ sys.c:584:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 584 | static int sfgetc(p) | ^ sys.c:594:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 594 | static int sfclose(p) | ^ sys.c:604:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 604 | static SCM mksfpt(pv, modes) | ^ sys.c:644:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 644 | static int clputc(c, p) | ^ sys.c:649:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 649 | static sizet clwrite(str, siz, num, p) | ^ sys.c:655:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 655 | static int clputs(s, p) | ^ sys.c:660:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 660 | static int clgetc(p) | ^ sys.c:689:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 689 | static sizet syswrite(str, siz, num, p) | ^ sys.c:722:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 722 | static int sysputs(s, p) | ^ sys.c:728:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 728 | static int sysputc(c, p) | ^ sys.c:735:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 735 | static int sysflush(p) | ^ sys.c:761:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 761 | SCM mksafeport(maxlen, port) | ^ sys.c:775:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 775 | int reset_safeport(sfp, maxlen, port) | ^ sys.c:787:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 787 | static sizet safewrite(str, siz, num, p) | ^ sys.c:806:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 806 | static int safeputs(s, p) | ^ sys.c:812:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 812 | static int safeputc(c, p) | ^ sys.c:819:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 819 | static int safeflush(p) | ^ sys.c:825:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 825 | static SCM marksafep(ptr) | ^ sys.c:830:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 830 | static int freesafep(ptr) | ^ sys.c:849:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 849 | static int freeprint(exp, port, writing) | ^ sys.c:943:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 943 | void add_final(final) | ^ sys.c:951:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 951 | SCM scm_add_finalizer(value, finalizer) | ^ sys.c:975:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 975 | static SCM make_stk_seg(size, contents) | ^ sys.c:1009:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1009 | void scm_estk_reset(size) | ^ sys.c:1062:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1062 | void scm_env_cons(x, y) | ^ sys.c:1080:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1080 | void scm_env_cons2(w, x, y) | ^ sys.c:1101:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1101 | void scm_env_cons3(v, w, x, y) | ^ sys.c:1125:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1125 | void scm_env_v2lst(argc, argv) | ^ sys.c:1238:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1238 | static void grew_lim(nm) | ^ sys.c:1252:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1252 | static char *igc_for_alloc(where, olen, size, what) | ^ sys.c:1280:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1280 | char *must_malloc(len, what) | ^ sys.c:1298:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1298 | SCM must_malloc_cell(len, c, what) | ^ sys.c:1321:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1321 | char *must_realloc(where, olen, len, what) | ^ sys.c:1342:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1342 | void must_realloc_cell(z, olen, len, what) | ^ sys.c:1362:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1362 | void must_free(obj, len) | ^ sys.c:1390:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1390 | SCM sym2vcell(sym) | ^ sys.c:1405:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1405 | SCM intern(name, len) | ^ sys.c:1437:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1437 | SCM sysintern(name, val) | ^ sys.c:1468:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1468 | SCM cons(x, y) | ^ sys.c:1477:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1477 | SCM cons2(w, x, y) | ^ sys.c:1490:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1490 | SCM acons(w, x, y) | ^ sys.c:1504:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1504 | SCM makstr(len) | ^ sys.c:1520:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1520 | SCM scm_maksubr(name, type, fcn) | ^ sys.c:1553:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1553 | SCM make_subr(name, type, fcn) | ^ sys.c:1563:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1563 | SCM makcclo(proc, len) | ^ sys.c:1608:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1608 | static SCM dynwind(thunk1, thunk2, thunk3) | ^ sys.c:1619:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1619 | static void downd(to, delta) | ^ sys.c:1637:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1637 | void dowinds(to) | ^ sys.c:1688:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1688 | void scm_dynthrow(tocont, arg1, arg2, rest) | ^ sys.c:1728:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1728 | SCM obhash(obj) | ^ sys.c:1739:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1739 | SCM obunhash(obj) | ^ sys.c:1782:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1782 | unsigned long strhash(str, len, n) | ^ sys.c:1802:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1802 | static void fixconfig(s1, s2, s) | ^ sys.c:1832:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1832 | static sizet init_heap_seg(seg_org, size) | ^ sys.c:1903:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1903 | void scm_init_gra(gra, eltsize, len, maxlen, what) | ^ sys.c:1925:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1925 | int scm_grow_gra(gra, elt) | ^ sys.c:1952:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1952 | void scm_trim_gra(gra) | ^ sys.c:1966:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1966 | void scm_free_gra(gra) | ^ sys.c:1973:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1973 | static void gra_report1(gra) | ^ sys.c:1994:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1994 | long newsmob(smob) | ^ sys.c:2000:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2000 | long newptob(ptob) | ^ sys.c:2008:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2008 | SCM scm_port_entry(stream, ptype, flags) | ^ sys.c:2066:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2066 | SCM markcdr(ptr) | ^ sys.c:2071:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2071 | sizet free0(ptr) | ^ sys.c:2076:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2076 | SCM equal0(ptr1, ptr2) | ^ sys.c:2088:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2088 | void init_storage(stack_start_ptr, init_heap_size) | ^ sys.c:2309:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2309 | SCM gc(arg) | ^ sys.c:2321:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2321 | void scm_run_finalizers(exiting) | ^ sys.c:2363:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2363 | void igc(what, basecont) | ^ sys.c:2494:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2494 | void scm_protect_temp(ptr) | ^ sys.c:2501:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2501 | void gc_mark(p) | ^ sys.c:2636:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2636 | void mark_locations(x, n) | ^ sys.c:2660:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2660 | static void gc_sweep(contin_bad) | ^ sys.c:2856:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2856 | static void mark_syms(v) | ^ sys.c:2888:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2888 | static void mark_sym_values(v) | ^ sys.c:2903:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2903 | static void sweep_symhash(v) | ^ sys.c:2928:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2928 | static void mark_finalizers(finalizers, pending) | ^ sys.c:2982:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2982 | static void mark_port_table(port) | ^ sys.c:3050:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3050 | static void egc_copy(px) | ^ sys.c:3076:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3076 | static void egc_copy_locations(ve, len) | ^ sys.c:3091:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 3091 | static void egc_copy_stack(stk, len) | ^ 107 warnings generated. subr.c:69:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 69 | static SCM lnot(x) | ^ subr.c:74:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 74 | SCM booleanp(obj) | ^ subr.c:81:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 81 | SCM eq(x, y) | ^ subr.c:88:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 88 | static SCM consp(x) | ^ subr.c:94:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 94 | static SCM setcar(pair, value) | ^ subr.c:101:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 101 | static SCM setcdr(pair, value) | ^ subr.c:108:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 108 | static SCM nullp(x) | ^ subr.c:113:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 113 | long ilength(sx) | ^ subr.c:132:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 132 | static SCM listp(x) | ^ subr.c:138:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 138 | SCM list(objs) | ^ subr.c:143:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 143 | SCM length(x) | ^ subr.c:150:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 150 | SCM append(args) | ^ subr.c:177:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 177 | SCM reverse(lst) | ^ subr.c:189:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 189 | static SCM list_ref(lst, k) | ^ subr.c:204:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 204 | SCM memq(x, lst) | ^ subr.c:214:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 214 | static SCM member(x, lst) | ^ subr.c:224:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 224 | SCM assq(x, alist) | ^ subr.c:237:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 237 | static SCM assoc(x, alist) | ^ subr.c:251:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 251 | static SCM promisep(x) | ^ subr.c:257:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 257 | static SCM symbolp(x) | ^ subr.c:263:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 263 | SCM symbol2string(s) | ^ subr.c:269:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 269 | SCM string2symbol(s) | ^ subr.c:277:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 277 | SCM exactp(x) | ^ subr.c:286:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 286 | SCM oddp(n) | ^ subr.c:299:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 299 | SCM evenp(n) | ^ subr.c:313:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 313 | SCM scm_round_quotient(num, den) | ^ subr.c:410:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 410 | SCM lquotient(x, y) | ^ subr.c:479:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 479 | static SCM lremainder(x, y) | ^ subr.c:520:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 520 | SCM modulo(x, y) | ^ subr.c:557:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 557 | static SCM lgcd(x, y) | ^ subr.c:615:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 615 | static SCM llcm(n1, n2) | ^ subr.c:672:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 672 | static SCM scm_copy_big_dec(b, sign) | ^ subr.c:691:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 691 | static SCM scm_copy_smaller(x, nx, zsgn) | ^ subr.c:709:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 709 | SCM scm_big_ior(x, nx, xsgn, bigy) | ^ subr.c:741:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 741 | SCM scm_big_xor(x, nx, xsgn, bigy) | ^ subr.c:773:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 773 | SCM scm_big_and(x, nx, xsgn, bigy, zsgn) | ^ subr.c:817:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 817 | SCM scm_big_test(x, nx, xsgn, bigy) | ^ subr.c:861:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 861 | static SCM scm_copy_big_2scomp(x, blen, sign) | ^ subr.c:928:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 928 | static void scm_2scomp1(b) | ^ subr.c:947:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 947 | SCM scm_big_ash(x, cnt) | ^ subr.c:1016:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1016 | SCM scm_logior(x, y) | ^ subr.c:1065:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1065 | SCM scm_logand(x, y) | ^ subr.c:1114:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1114 | SCM scm_logxor(x, y) | ^ subr.c:1156:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1156 | SCM scm_logtest(x, y) | ^ subr.c:1194:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1194 | SCM scm_logbitp(index, j1) | ^ subr.c:1225:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1225 | static SCM scm_copybit(index, j1, bit) | ^ subr.c:1263:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1263 | SCM scm_lognot(n) | ^ subr.c:1269:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1269 | SCM scm_ash(n, cnt) | ^ subr.c:1300:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1300 | static SCM scm_bitfield(n, start, end) | ^ subr.c:1343:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1343 | SCM scm_bitif(mask, n0, n1) | ^ subr.c:1358:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1358 | SCM scm_copybitfield(to, from, rest) | ^ subr.c:1395:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1395 | static SCM scm_bitwise_bit_count(n) | ^ subr.c:1427:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1427 | SCM scm_logcount(n) | ^ subr.c:1452:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1452 | SCM scm_intlength(n) | ^ subr.c:1481:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1481 | static SCM charp(x) | ^ subr.c:1486:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1486 | static SCM char_lessp(x, y) | ^ subr.c:1493:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1493 | static SCM char_leqp(x, y) | ^ subr.c:1500:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1500 | static SCM char_grp(x, y) | ^ subr.c:1507:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1507 | static SCM char_geqp(x, y) | ^ subr.c:1514:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1514 | static SCM chci_eq(x, y) | ^ subr.c:1521:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1521 | static SCM chci_lessp(x, y) | ^ subr.c:1528:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1528 | static SCM chci_leqp(x, y) | ^ subr.c:1535:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1535 | static SCM chci_grp(x, y) | ^ subr.c:1542:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1542 | static SCM chci_geqp(x, y) | ^ subr.c:1549:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1549 | static SCM char_alphap(chr) | ^ subr.c:1555:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1555 | static SCM char_nump(chr) | ^ subr.c:1561:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1561 | static SCM char_whitep(chr) | ^ subr.c:1567:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1567 | static SCM char_upperp(chr) | ^ subr.c:1573:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1573 | static SCM char_lowerp(chr) | ^ subr.c:1579:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1579 | static SCM char2int(chr) | ^ subr.c:1585:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1585 | static SCM int2char(n) | ^ subr.c:1593:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1593 | static SCM char_upcase(chr) | ^ subr.c:1599:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1599 | static SCM char_downcase(chr) | ^ subr.c:1606:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1606 | static SCM stringp(x) | ^ subr.c:1612:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1612 | SCM string(chrs) | ^ subr.c:1627:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1627 | SCM make_string(k, chr) | ^ subr.c:1643:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1643 | static SCM st_length(str) | ^ subr.c:1649:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1649 | static SCM st_ref(str, k) | ^ subr.c:1657:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1657 | static SCM st_set(str, k, chr) | ^ subr.c:1667:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1667 | SCM st_equal(s1, s2) | ^ subr.c:1681:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1681 | static SCM stci_equal(s1, s2) | ^ subr.c:1695:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1695 | static SCM st_lessp(s1, s2) | ^ subr.c:1715:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1715 | static SCM st_leqp(s1, s2) | ^ subr.c:1720:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1720 | static SCM st_grp(s1, s2) | ^ subr.c:1725:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1725 | static SCM st_geqp(s1, s2) | ^ subr.c:1730:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1730 | static SCM stci_lessp(s1, s2) | ^ subr.c:1750:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1750 | static SCM stci_leqp(s1, s2) | ^ subr.c:1755:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1755 | static SCM stci_grp(s1, s2) | ^ subr.c:1760:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1760 | static SCM stci_geqp(s1, s2) | ^ subr.c:1765:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1765 | SCM substring(str, start, end) | ^ subr.c:1778:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1778 | SCM st_append(args) | ^ subr.c:1802:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1802 | static SCM vectorp(x) | ^ subr.c:1808:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1808 | SCM vector_length(v) | ^ subr.c:1814:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1814 | SCM vector(l) | ^ subr.c:1826:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1826 | static SCM vector_ref(v, k) | ^ subr.c:1834:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1834 | static SCM vector_set(v, k, obj) | ^ subr.c:1844:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1844 | SCM make_vector(k, fill) | ^ subr.c:1868:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1868 | SCM mkbig(nlen, sign) | ^ subr.c:1882:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1882 | SCM big2inum(b, l) | ^ subr.c:1901:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1901 | SCM adjbig(b, nlen) | ^ subr.c:1915:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1915 | SCM normbig(b) | ^ subr.c:1932:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1932 | SCM copybig(b, sign) | ^ subr.c:1942:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1942 | SCM long2big(n) | ^ subr.c:1956:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1956 | SCM ulong2big(n) | ^ subr.c:1970:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1970 | int bigcomp(x, y) | ^ subr.c:1988:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1988 | long pseudolong(x) | ^ subr.c:2012:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2012 | SCM addbig(x, nx, xsgn, bigy, sgny) | ^ subr.c:2060:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2060 | SCM mulbig(x, nx, y, ny, sgn) | ^ subr.c:2094:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2094 | static SCM divbigint(x, z, sgn, mode) | ^ subr.c:2122:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2122 | static SCM scm_copy_big_ash1 (xds, xlen, dscl) | ^ subr.c:2144:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2144 | SCM divbigbig(x, xlen, y, ylen, sgn, mode) | ^ subr.c:2424:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2424 | void init_iprocs(subra, type) | ^ 112 warnings generated. debug.c:31:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 31 | SCM scm_env_rlookup(addr, stenv, what) | ^ debug.c:85:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 85 | SCM scm_env_addprop(prop, val, env) | ^ debug.c:92:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 92 | SCM scm_env_getprop(prop, env) | ^ debug.c:109:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 109 | static SCM prinhead(x, port, writing) | ^ debug.c:119:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 119 | static void prinbindings(names, inits, init_env, | ^ debug.c:143:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 143 | void scm_princode(code, env, port, writing) | ^ debug.c:289:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 289 | void scm_princlosure(proc, port, writing) | ^ debug.c:326:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 326 | static SCM scm_int2linum(n) | ^ debug.c:335:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 335 | static SCM scm_linum2int(linum) | ^ debug.c:342:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 342 | static SCM scm_linump(obj) | ^ debug.c:349:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 349 | static SCM scm_remove_linums(x) | ^ debug.c:382:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 382 | static long num_frames(estk, i) | ^ debug.c:395:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 395 | static SCM *estk_frame(estk, i, nf) | ^ debug.c:413:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 413 | static SCM stacktrace1(estk, i) | ^ debug.c:449:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 449 | static SCM *cont_frame(contin, nf) | ^ debug.c:461:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 461 | SCM scm_stack_trace(contin) | ^ debug.c:482:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 482 | static SCM scm_frame_trace(contin, nf) | ^ debug.c:499:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 499 | static SCM scm_frame2env(contin, nf) | ^ debug.c:512:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 512 | static SCM scm_frame_eval(contin, nf, expr) | ^ debug.c:532:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 532 | SCM scm_scope_trace(env) | ^ debug.c:599:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 599 | static SCM scm_env_annotation(var, stenv) | ^ debug.c:661:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 661 | SCM scm_wrapcode(code, env) | ^ debug.c:671:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 671 | static int princodeptr(exp, port, writing) | ^ 23 warnings generated. unif.c:45:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 45 | SCM resizuve(vect, len) | ^ unif.c:132:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 132 | long scm_prot2type(prot) | ^ unif.c:162:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 162 | SCM make_uve(k, prot) | ^ unif.c:216:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 216 | SCM arrayp(v, prot) | ^ unif.c:241:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 241 | SCM array_rank(ra) | ^ unif.c:256:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 256 | SCM array_dims(ra) | ^ unif.c:280:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 280 | long aind(ra, args, what) | ^ unif.c:311:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 311 | SCM make_ra(ndim) | ^ unif.c:326:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 326 | static SCM shap2ra(args, what) | ^ unif.c:360:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 360 | int rafill(ra, fill, ignore) | ^ unif.c:489:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 489 | SCM dims2ura(dims, prot, fill) | ^ unif.c:492:12: warning: variable 'vlen' set but not used [-Wunused-but-set-variable] 492 | sizet k, vlen = 1; | ^ unif.c:546:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 546 | static void ra_set_contp(ra) | ^ unif.c:563:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 563 | static SCM make_sh_array(oldra, mapfunc, dims) | ^ unif.c:663:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 663 | static SCM trans_array(args) | ^ unif.c:726:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 726 | static SCM encl_array(axes) | ^ unif.c:784:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 784 | static SCM array_inbp(args) | ^ unif.c:826:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 826 | SCM aref(v, args) | ^ unif.c:911:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 911 | SCM scm_array_ref(args) | ^ unif.c:920:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 920 | SCM cvref(v, pos, last) | ^ unif.c:1029:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1029 | SCM aset(v, obj, args) | ^ unif.c:1118:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1118 | SCM array_contents(ra, strict) | ^ unif.c:1155:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1155 | SCM uve_read(v, port) | ^ unif.c:1228:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1228 | SCM uve_write(v, port) | ^ unif.c:1292:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1292 | static SCM lcount(item, seq) | ^ unif.c:1352:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1352 | static SCM bit_position(item, v, k) | ^ unif.c:1421:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1421 | static SCM bit_set(v, kv, obj) | ^ unif.c:1463:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1463 | static SCM bit_count(v, kv, obj) | ^ unif.c:1509:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1509 | static SCM bit_inv(v) | ^ unif.c:1526:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1526 | static SCM strup(v) | ^ unif.c:1544:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1544 | static SCM strdown(v) | ^ unif.c:1563:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1563 | static SCM strcap(v) | ^ unif.c:1589:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1589 | SCM istr2bve(str, len) | ^ unif.c:1612:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1612 | static SCM ra2l(ra, base, k) | ^ unif.c:1637:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1637 | static SCM array2list(v) | ^ unif.c:1720:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1720 | SCM list2ura(ndim, prot, lst) | ^ unif.c:1755:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1755 | static int l2ra(lst, ra, base, k) | ^ unif.c:1786:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1786 | static void rapr1(ra, j, k, port, writing) | ^ unif.c:1887:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1887 | int raprin1(exp, port, writing) | ^ unif.c:1983:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 1983 | SCM array_prot(ra) | ^ unif.c:2020:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2020 | static SCM scm_logaref(args) | ^ unif.c:2056:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2056 | static SCM scm_logaset(ra, obj, args) | ^ unif.c:2140:12: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2140 | static SCM markra(ptr) | ^ unif.c:2145:14: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 2145 | static sizet freera(ptr) | ^ 44 warnings generated. rope.c:25:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 25 | SCM long2num(sl) | ^ rope.c:41:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 41 | SCM ulong2num(sl) | ^ rope.c:59:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 59 | unsigned char num2uchar(num, pos, s_caller) | ^ rope.c:67:16: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 67 | unsigned short num2ushort(num, pos, s_caller) | ^ rope.c:75:15: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 75 | unsigned long num2ulong(num, pos, s_caller) | ^ rope.c:89:27: warning: implicit conversion from 'unsigned long' to 'double' changes value from 18446744073709551615 to 18446744073709551616 [-Wimplicit-const-int-float-conversion] 89 | if ((0 <= u) && (u <= (unsigned long)~0L)) { | ~~ ^~~~~~~~~~~~~~~~~~ rope.c:106:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 106 | long num2long(num, pos, s_caller) | ^ rope.c:120:37: warning: implicit conversion from 'long' to 'double' changes value from 9223372036854775807 to 9223372036854775808 [-Wimplicit-const-int-float-conversion] 120 | && (u <= (MOST_POSITIVE_FIXNUM * 4 + 3))) { | ~~ ~~~~~~~~~~~~~~~~~~~~~~~~~^~~ rope.c:138:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 138 | short num2short(num, pos, s_caller) | ^ rope.c:147:13: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 147 | signed char num2char(num, pos, s_caller) | ^ rope.c:157:8: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 157 | double num2dbl(num, pos, s_caller) | ^ rope.c:173:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 173 | SCM makfromstr(src, len) | ^ rope.c:185:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 185 | SCM makfrom0str(src) | ^ rope.c:193:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 193 | SCM makfromstrs(argc, argv) | ^ rope.c:205:8: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 205 | char **makargvfrmstrs(args, s_name) | ^ rope.c:225:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 225 | void must_free_argv(argv) | ^ rope.c:236:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 236 | SCM scm_evstr(str) | ^ rope.c:245:6: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 245 | void scm_ldstr(str) | ^ rope.c:254:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 254 | int scm_ldfile(path) | ^ rope.c:261:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 261 | int scm_ldprog(path) | ^ rope.c:272:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 272 | void* scm_addr(args, s_name) | ^ rope.c:333:7: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 333 | void* scm_base_addr(v, s_name) | ^ rope.c:387:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 387 | int scm_cell_p(x) | ^ rope.c:412:5: warning: a function definition without a prototype is deprecated in all versions of C and is not supported in C23 [-Wdeprecated-non-prototype] 412 | SCM scm_gc_protect(obj) | ^ 24 warnings generated. ; ================ Link C object files (system "cc -o scm sc2.o record.o dynl.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 -lm -Wl,-export-dynamic ") rm 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 /usr/bin/make checkmacro ./scm -rmacro -fsyntest1.scm -fsyntest2.scm -fr4rstest.scm -e'(test-sc4)(test-cont)(test-delay)' -fsyntest1 -e '(or (null? errs) (quit 1))' < /dev/null (let ((x (quote outer))) (let-syntax ((m (syntax-rules () ((m) x)))) (let ((x (quote inner))) (m)))) ==> outer (let-syntax ((when (syntax-rules () ((when ?test ?stmt1 ?stmt2 ...) (if ?test (begin ?stmt1 ?stmt2 ...)))))) (let ((if #t)) (when if (set! if (quote now))) if)) ==> now (letrec-syntax ((or (syntax-rules () ((or) #f) ((or ?e) ?e) ((or ?e1 ?e2 ...) (let ((temp ?e1)) (if temp temp (or ?e2 ...))))))) (let ((x #f) (y 7) (temp 8) (let odd?) (if even?)) (or x (let temp) (if y) y))) ==> 7 (let ((=> #f)) (cond (#t => (quote ok)))) ==> ok (define-syntax set*! (syntax-rules () ((set*! (?var ?val) ...) (set*!-help (?val ...) () (?var ?val) ...)))) (define-syntax set*!-help (syntax-rules () ((set*!-help () (?temp ...) (?var ?val) ...) (let ((?temp ?val) ...) (set! ?var ?temp) ...)) ((set*!-help (?var1 ?var2 ...) ?temps ?assignments ...) (set*!-help (?var2 ...) (temp . ?temps) ?assignments ...)))) (let ((x 3) (y 4) (z 5)) (set*! (x (+ x y z)) (y (- x y z)) (z (* x y z))) (list x y z)) ==> (12 -6 60) (let ((else #f)) (cond (#f 3) (else 4) (#t 5))) ==> 5 (define-syntax push (syntax-rules () ((push item place) (set! place (cons item place))))) (let* ((cons (lambda (name) (case name ((phil) (quote (three-card monte))) ((dick) (quote (secret plan to end the war agnew not a crook))) ((jimmy) (quote (why not the best))) ((ron) (quote (abolish the draft balance the budget))) (else (quote ()))))) (scams (cons (quote phil)))) (push (car (cons (quote jimmy))) scams) (push (cadr (cons (quote ron))) scams) scams) ==> (balance the budget why not the best three-card monte) (define-syntax replic (syntax-rules () ((_ (?x ...) (?y ...)) (let ((?x (list ?y ...)) ...) (list ?x ...))))) (replic (x y z) (1 2)) ==> ((1 2) (1 2) (1 2)) Passed all tests Load "syntest2" to rewrite derived expressions and test 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 (# # "r4rstest.scm": (x) x> # "r4rstest.scm": (x) x>) ==> #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 (# # "r4rstest.scm": () (if (eqv? f g) (quote f) (quote both))> # "r4rstest.scm": () (if (eqv? f g) (quote g) (quote both))>) ==> #f (# a a) ==> #t (# (a) (a)) ==> #f (# () ()) ==> #t (# # #) ==> #t (# (a) (a)) ==> #t (# #() #()) ==> #t (# # "r4rstest.scm": (x) x> # "r4rstest.scm": (x) x>) ==> #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 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> 0 1) ==> 0 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> 0 256) ==> 0 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> -1 256) ==> 1 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> -1 255) ==> -1 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> -1 -256) ==> 1 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> -1 -255) ==> -1 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> 256 0) ==> 1 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> -256 0) ==> 1 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> 256 1) ==> 256 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> -256 1) ==> -256 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> 2 3) ==> 8 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> -2 3) ==> -8 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> 3 2) ==> 9 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> -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))) (# ((# (# (# #:3de2224791d0>) ((#) (# #f #f)) ((# (# . #)) (# . #)) ((# (# #:3de2224791d0> #) . #) (# ((# #)) (# # (# #) (# . #)))) ((# (#) . #) (# # (# . #))) ((# (# . #) . #) (# # (# . #) (# . #)))))) (# ((not ans) #t) ((number? ans) #t) (else ans))))> "+#.#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (# ((number? ans) #t) (else ans)))))> "-#.#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (# ((number? ans) #t) (else ans)))))> "#.#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (# ((number? ans) #t) (else ans)))))> "1/0") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "-1/0") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "0/0") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "+1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "-1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "0/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "0/0-0/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "1/0-1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "-1/0+1/0i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "#i") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "#e") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else ans))))))> "#") ==> #t (#number "r4rstest.scm": (str) (#@define ((ans (#@string->number #@str))) (#@let-syntax ((6 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (ans . #@define) (str) 2 test-string->number 1 "r4rstest.scm") (#@if (#@not #@ans) (#@begin #t) (#@if (#@number? #@ans) (#@begin #t) (# (else 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 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (obj) 2 (r) 2 (return) 2 (obj) 2 list-length 1 "r4rstest.scm") (#@if (#@null? #@obj) (#@begin 0) (#@if (#@pair? #@obj) (#@+ (#@r (#@cdr #@obj)) 1) (# (else (return #f)))))))) (#@let () (#@r #@obj)))))> (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) ==> 250.e-3 (magnitude 1.) ==> 1. (# 1.e-300+1.e-300i 4.e-300+4.e-300i) ==> 250.e-3 (# 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. (# 250.e-3) ==> 0. (# 800.e-3) ==> 1. (# 3.5) ==> 4. (# 4.5) ==> 4. (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (# ((zero? z2) (+ 1 (* z1 z2))) ((and (real? z2) (real? z1) (positive? z1)) (real-expt z1 z2)) (else (exp (* (if (zero? z1) (real-part z2) z2) (log z1)))))))> 0. 1.) ==> 0. (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) (#@if (#@let ((# (#@real? #@0+1))) (#@if #@# (#@let ((# (#@real? #@#))) (#@if #@# (#@let ((# (#@positive? #@#))) (#@if #@# # #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> 0. 1) ==> 0. (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) (#@if (#@let ((# (#@real? #@0+1))) (#@if #@# (#@let ((# (#@real? #@#))) (#@if #@# (#@let ((# (#@positive? #@#))) (#@if #@# # #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> 0 1.) ==> 0. (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) (#@if (#@let ((# (#@real? #@0+1))) (#@if #@# (#@let ((# (#@real? #@#))) (#@if #@# (#@let ((# (#@positive? #@#))) (#@if #@# # #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> -25 0.) ==> 1. (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (#@+ 1 (#@* #@z1 #@z2)) (#@if (#@let ((# (#@real? #@0+1))) (#@if #@# (#@let ((# (#@real? #@#))) (#@if #@# (#@let ((# (#@positive? #@#))) (#@if #@# # #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> -3.25 0.) ==> 1. (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (z1 z2) 2 expt 1 "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm") (#@if (#@let ((# (#@exact? #@0+1))) (#@if #@# (#@let ((# (#@not (#@let ((# (#@zero? #@#))) (#@if #@# (#@let ((# (#@negative? #@2+1))) (#@if #@# # #f)) #f))))) (#@if #@# #@# #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (#@+ 1 (#@* #@z1 #@z2)) (#@if (#@let ((# (#@real? #@0+1))) (#@if #@# (#@let ((# (#@real? #@#))) (#@if #@# (#@let ((# (#@positive? #@#))) (#@if #@# # #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> -3.25 0) ==> 1. (# 1 1) ==> 785.3981633974483e-3 (# "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 (250.e-3 -3.25))) (# #) ==> #t (# #) ==> #t (input-port? #t) ==> #t (# #) ==> #\; (# #) ==> #\; (# #) ==> #\; (# #) ==> (250.e-3 -3.25) (# #) ==> (define foo (quote (250.e-3 -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 (# ((# (# () ((# #) #) ((# # #) #))) (# (# () ((#) (# #f #f)) ((# . #) (# . #))))) (# # ((cnt -323)) (# (> 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)))))) (# (# cnt (+ 1 cnt))))))))>) ==> #t (# ((# (# () ((# #) #) ((# # #) #))) (# (# () ((#) (# #f #f)) ((# . #) (# . #))))) (# # ((xx (expt f2.0 1000)) (p 1000)) (# (zero? xx) (# all-ok?) (# (let ((cnv (string->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)))) (# (# xx (/ xx 2)) (# p (+ p -1))))))))>) ==> #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) (# (eot) (# ((xf (next-leaf-generator x eot)) (yf (next-leaf-generator y eot))) (letrec ((loop (lambda (x y) (cond ((not (eq? x y)) #f) ((eq? eot x) #t) (else (loop (xf) (yf))))))) (loop (xf) (yf))))) (list (quote eot)))> (a (b (c))) ((a) b c)) ==> #t (# . # "/wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm": (x-use env-use) (#@let* ((x-use (#@remove-line-numbers! #@x-use))) ((#@let ((loop (#@lambda (rules) (#@cond ((#@null? #@rules) (error "macro use does not match definition:" x-use)) ((#@match (#@car #@rules) #@x-use #@env-use) #@=> (#@lambda (vars) (#@substitute-in-template #@x-use (#@car #@rules) #@vars #@env-def))) (#t (#@loop (#@cdr #@rules))))))) #@loop) #@rules))>>)) (x y) 2 (loop) 2 (yf) 2 (xf) 2 (eot) 2 (x y) 2 leaf-eq? 1 "r4rstest.scm") (#@if (#@not (#@eq? #@x #@y)) (#@begin #f) (#@if (#@eq? #@eot #@x) (#@begin #t) (#@loop (#@xf) (#@yf))))))) (#@let () (#@loop (#@xf) (#@yf)))))))> (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 (# # "syntest2.scm": () (#@if #@result (#@car #@result) (#@let ((x (#@result))) (#@if #@result (car result) (#@begin (#@set! #@result (#@list #@x)) #@x))))>) ==> 6 (# # "syntest2.scm": () (#@if #@result (#@car #@result) (#@let ((x (#@result))) (#@if #@result (#@car #@result) (#@begin (#@set! #@result (#@list #@x)) #@x))))>) ==> 6 (force 3) ==> 3 Passed all tests (let ((x (quote outer))) (let-syntax ((m (syntax-rules () ((m) x)))) (let ((x (quote inner))) (m)))) ==> outer (let-syntax ((when (syntax-rules () ((when ?test ?stmt1 ?stmt2 ...) (if ?test (begin ?stmt1 ?stmt2 ...)))))) (let ((if #t)) (when if (set! if (quote now))) if)) ==> now (letrec-syntax ((or (syntax-rules () ((or) #f) ((or ?e) ?e) ((or ?e1 ?e2 ...) (let ((temp ?e1)) (if temp temp (or ?e2 ...))))))) (let ((x #f) (y 7) (temp 8) (let odd?) (if even?)) (or x (let temp) (if y) y))) ==> 7 (let ((=> #f)) (cond (#t => (quote ok)))) ==> ok (define-syntax set*! (syntax-rules () ((set*! (?var ?val) ...) (set*!-help (?val ...) () (?var ?val) ...)))) (define-syntax set*!-help (syntax-rules () ((set*!-help () (?temp ...) (?var ?val) ...) (let ((?temp ?val) ...) (set! ?var ?temp) ...)) ((set*!-help (?var1 ?var2 ...) ?temps ?assignments ...) (set*!-help (?var2 ...) (temp . ?temps) ?assignments ...)))) (let ((x 3) (y 4) (z 5)) (set*! (x (+ x y z)) (y (- x y z)) (z (* x y z))) (list x y z)) ==> (12 -6 60) (let ((else #f)) (cond (#f 3) (else 4) (#t 5))) ==> 5 (define-syntax push (syntax-rules () ((push item place) (set! place (cons item place))))) (let* ((cons (lambda (name) (case name ((phil) (quote (three-card monte))) ((dick) (quote (secret plan to end the war agnew not a crook))) ((jimmy) (quote (why not the best))) ((ron) (quote (abolish the draft balance the budget))) (else (quote ()))))) (scams (cons (quote phil)))) (push (car (cons (quote jimmy))) scams) (push (cadr (cons (quote ron))) scams) scams) ==> (balance the budget why not the best three-card monte) (define-syntax replic (syntax-rules () ((_ (?x ...) (?y ...)) (let ((?x (list ?y ...)) ...) (list ?x ...))))) (replic (x y z) (1 2)) ==> ((1 2) (1 2) (1 2)) Passed all tests Load "syntest2" to rewrite derived expressions and test =========================================================================== =================================================== ===== env: USE_PACKAGE_DEPENDS_ONLY=1 USER=root UID=0 GID=0 ===> scm-5f3_2 depends on file: /usr/local/share/slib/require.scm - found ===> scm-5f3_2 depends on executable: indexinfo - found =========================================================================== =================================================== ===== env: NO_DEPENDS=yes USER=root UID=0 GID=0 ===> Staging for scm-5f3_2 ===> Generating temporary packing list install -s -m 555 /wrkdirs/usr/ports/lang/scm/work/scm-5f3/scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/scmlit /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/bin install -m 444 /wrkdirs/usr/ports/lang/scm/work/scm-5f3/scm.1 /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/share/man/man1 install -m 0644 /wrkdirs/usr/ports/lang/scm/work/require.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/COPYING /wrkdirs/usr/ports/lang/scm/work/scm-5f3/COPYING.LESSER /wrkdirs/usr/ports/lang/scm/work/scm-5f3/Iedline.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/Idiffer.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/Init5f3.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/Link.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macexp.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/Macro.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/Transcen.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/Tscript.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/build /wrkdirs/usr/ports/lang/scm/work/scm-5f3/build.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/compile.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/hobbit.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/mkimpcat.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/patchlvl.h /wrkdirs/usr/ports/lang/scm/work/scm-5f3/r4rstest.scm /wrkdirs/usr/ports/lang/scm/work/scm-5f3/scmhob.h /wrkdirs/usr/ports/lang/scm/work/scm-5f3/scmhob.scm /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/lib/scm install -s -m 0644 /wrkdirs/usr/ports/lang/scm/work/scm-5f3/byte.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/bytenumb.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/differ.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/edline.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/gsubr.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/ioext.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/posix.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/ramap.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/record.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/rgx.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/sc2.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/socket.so /wrkdirs/usr/ports/lang/scm/work/scm-5f3/unix.so /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/lib/scm /usr/bin/tar -C /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/lib/scm -xf /portdistfiles/slib-psd1-3.tar.gz '*.scm' install -m 0644 /wrkdirs/usr/ports/lang/scm/work/scm-5f3/scm.info /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/share/info ====> Compressing man pages (compress-man) =========================================================================== =================================================== ===== env: 'PKG_NOTES=build_timestamp ports_top_git_hash ports_top_checkout_unclean port_git_hash port_checkout_unclean built_by' 'PKG_NOTE_build_timestamp=2025-11-10T02:19:00+0000' 'PKG_NOTE_ports_top_git_hash=ec159283c191' 'PKG_NOTE_ports_top_checkout_unclean=no' 'PKG_NOTE_port_git_hash=2b92bd705775' 'PKG_NOTE_port_checkout_unclean=no' 'PKG_NOTE_built_by=poudriere-git-3.4.2' NO_DEPENDS=yes USER=root UID=0 GID=0 ===> Building packages for scm-5f3_2 ===> Building scm-5f3_2 =========================================================================== =>> Cleaning up wrkdir ===> Cleaning for scm-5f3_2 build of lang/scm | scm-5f3_2 ended at Sun Nov 9 21:19:21 EST 2025 build time: 00:00:22