From owner-freebsd-pkg-fallout@freebsd.org Sat Jun 17 01:25:01 2017 Return-Path: Delivered-To: freebsd-pkg-fallout@mailman.ysv.freebsd.org Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:1900:2254:206a::19:1]) by mailman.ysv.freebsd.org (Postfix) with ESMTP id 6C61BD8DC09 for ; Sat, 17 Jun 2017 01:25:01 +0000 (UTC) (envelope-from pkg-fallout@FreeBSD.org) Received: from mailman.ysv.freebsd.org (mailman.ysv.freebsd.org [IPv6:2001:1900:2254:206a::50:5]) by mx1.freebsd.org (Postfix) with ESMTP id 58D997793B for ; Sat, 17 Jun 2017 01:25:01 +0000 (UTC) (envelope-from pkg-fallout@FreeBSD.org) Received: by mailman.ysv.freebsd.org (Postfix) id 58227D8DC08; Sat, 17 Jun 2017 01:25:01 +0000 (UTC) Delivered-To: pkg-fallout@mailman.ysv.freebsd.org Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2001:1900:2254:206a::19:1]) by mailman.ysv.freebsd.org (Postfix) with ESMTP id 55ED9D8DC07 for ; Sat, 17 Jun 2017 01:25:01 +0000 (UTC) (envelope-from pkg-fallout@FreeBSD.org) Received: from beefy14.nyi.freebsd.org (beefy14.nyi.freebsd.org [IPv6:2610:1c1:1:6080::16:e1]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (Client did not present a certificate) by mx1.freebsd.org (Postfix) with ESMTPS id 06C8D7793A for ; Sat, 17 Jun 2017 01:25:00 +0000 (UTC) (envelope-from pkg-fallout@FreeBSD.org) Received: from beefy14.nyi.freebsd.org (localhost [127.0.0.1]) by beefy14.nyi.freebsd.org (8.15.2/8.15.2) with ESMTP id v5H1P0aF027100 for ; Sat, 17 Jun 2017 01:25:00 GMT (envelope-from pkg-fallout@FreeBSD.org) Received: (from root@localhost) by beefy14.nyi.freebsd.org (8.15.2/8.15.2/Submit) id v5H1P0YT027093; Sat, 17 Jun 2017 01:25:00 GMT (envelope-from pkg-fallout@FreeBSD.org) Date: Sat, 17 Jun 2017 01:25:00 GMT From: pkg-fallout@FreeBSD.org Message-Id: <201706170125.v5H1P0YT027093@beefy14.nyi.freebsd.org> To: pkg-fallout@FreeBSD.org Subject: [package - 110mips-quarterly][lang/scm] Failed for scm-5f2_3 in stage X-BeenThere: freebsd-pkg-fallout@freebsd.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: Fallout logs from package building List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Sat, 17 Jun 2017 01:25:01 -0000 You are receiving this mail as a port that you maintain is failing to build on the FreeBSD package build server. Please investigate the failure and submit a PR to fix build. Maintainer: mi@aldan.algebra.com Last committer: jbeich@FreeBSD.org Ident: $FreeBSD: branches/2017Q2/lang/scm/Makefile 437538 2017-04-02 09:08:47Z jbeich $ Log URL: http://beefy14.nyi.freebsd.org/data/110mips-quarterly/443704/logs/scm-5f2_3.log Build URL: http://beefy14.nyi.freebsd.org/build.html?mastername=110mips-quarterly&build=443704 Log: ====>> Building lang/scm build started at Sat Jun 17 01:18:46 UTC 2017 port directory: /usr/ports/lang/scm building for: FreeBSD 110mips-quarterly-job-16 11.0-RELEASE-p10 FreeBSD 11.0-RELEASE-p10 r317487 mips maintained by: mi@aldan.algebra.com Makefile ident: $FreeBSD: branches/2017Q2/lang/scm/Makefile 437538 2017-04-02 09:08:47Z jbeich $ Poudriere version: 3.1.19-29-g5598cc27 Host OSVERSION: 1200031 Jail OSVERSION: 1100122 Job Id: 16 ---Begin Environment--- SHELL=/bin/csh UNAME_p=mips UNAME_m=mips ABI_FILE=/usr/lib/crt1.o OSVERSION=1100122 UNAME_v=FreeBSD 11.0-RELEASE-p10 r317487 UNAME_r=11.0-RELEASE-p10 BLOCKSIZE=K MAIL=/var/mail/root STATUS=1 SAVED_TERM= MASTERMNT=/usr/local/poudriere/data/.m/110mips-quarterly/ref QEMU_EMULATING=1 PATH=/sbin:/bin:/usr/sbin:/usr/bin:/usr/local/sbin:/usr/local/bin:/root/bin POUDRIERE_BUILD_TYPE=bulk PKGNAME=scm-5f2_3 OLDPWD=/ PWD=/usr/local/poudriere/data/.m/110mips-quarterly/ref/.p/pool MASTERNAME=110mips-quarterly SCRIPTPREFIX=/usr/local/share/poudriere USER=root HOME=/root POUDRIERE_VERSION=3.1.19-29-g5598cc27 SCRIPTPATH=/usr/local/share/poudriere/bulk.sh LIBEXECPREFIX=/usr/local/libexec/poudriere LOCALBASE=/usr/local POUDRIEREPATH=/usr/local/bin/poudriere ---End Environment--- ---Begin Poudriere Port Flags/Env--- PORT_FLAGS= PKGENV= ---End Poudriere Port Flags/Env--- ---Begin OPTIONS List--- ===> The following configuration options are available for scm-5f2_3: X11=off: X11 (graphics) support ===> Use 'make config' to modify these settings ---End OPTIONS List--- --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 HOME=/wrkdirs/usr/ports/lang/scm/work TMPDIR="/tmp" 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 HOME=/wrkdirs/usr/ports/lang/scm/work TMPDIR="/tmp" NO_PIE=yes MK_DEBUG_FILES=no MK_KERNEL_SYMBOLS=no SHELL=/bin/sh NO_LINT=YES PREFIX=/usr/local LOCALBASE=/usr/local LIBDIR="/usr/lib" CC="gcc" CFLAGS="-O2 -pipe -G0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fno-strict-aliasing" CPP="gcpp" CPPFLAGS="-I/usr/local/include" LDFLAGS=" -L/usr/local/lib" LIBS="" CXX="g++" CXXFLAGS="-O2 -pipe -G0 -Wall -Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized -fno-strict-aliasing " MANPREFIX="/usr/local" 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="5f2" X11="@comment " NO_X11="" OSREL=11.0 PREFIX=%D LOCALBASE=/usr/local RESETPREFIX=/usr/local PORTDOCS="" PORTEXAMPLES="" 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--- .sinclude "/etc/make.nxb.conf" USE_PACKAGE_DEPENDS=yes BATCH=yes WRKDIRPREFIX=/wrkdirs PORTSDIR=/usr/ports PACKAGES=/packages DISTDIR=/distfiles PACKAGE_BUILDING=yes MACHINE=mips MACHINE_ARCH=mips ARCH=${MACHINE_ARCH} #### /usr/local/etc/poudriere.d/make.conf #### # XXX: We really need this but cannot use it while 'make checksum' does not # try the next mirror on checksum failure. It currently retries the same # failed mirror and then fails rather then trying another. It *does* # try the next if the size is mismatched though. #MASTER_SITE_FREEBSD=yes # Build ALLOW_MAKE_JOBS_PACKAGES with 2 jobs MAKE_JOBS_NUMBER=2 #### /usr/ports/Mk/Scripts/ports_env.sh #### ARCH=mips CONFIGURE_MAX_CMD_LEN=262144 OPSYS=FreeBSD OSREL=11.0 OSVERSION=1100122 PYTHONBASE=/usr/local UID=0 _JAVA_OS_LIST_REGEXP=native\|linux _JAVA_VENDOR_LIST_REGEXP=openjdk\|oracle\|sun _JAVA_VERSION_LIST_REGEXP=1.6\|1.7\|1.8\|1.6+\|1.7+\|1.8+ _OSRELEASE=11.0-RELEASE-p10 #### Misc Poudriere #### GID=0 DISABLE_MAKE_JOBS=poudriere ---End make.conf--- ---Begin make.nxb.conf--- CC=/nxb-bin/usr/bin/cc CPP=/nxb-bin/usr/bin/cpp CXX=/nxb-bin/usr/bin/c++ AS=/nxb-bin/usr/bin/as NM=/nxb-bin/usr/bin/nm LD=/nxb-bin/usr/bin/ld OBJCOPY=/nxb-bin/usr/bin/objcopy SIZE=/nxb-bin/usr/bin/size STRIPBIN=/nxb-bin/usr/bin/strip SED=/nxb-bin/usr/bin/sed READELF=/nxb-bin/usr/bin/readelf RANLIB=/nxb-bin/usr/bin/ranlib YACC=/nxb-bin/usr/bin/yacc MAKE=/nxb-bin/usr/bin/make STRINGS=/nxb-bin/usr/bin/strings AWK=/nxb-bin/usr/bin/awk FLEX=/nxb-bin/usr/bin/flex ---End make.nxb.conf--- --Resource limits-- cpu time (seconds, -t) unlimited file size (512-blocks, -f) unlimited data seg size (kbytes, -d) 131072 stack size (kbytes, -s) 8192 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) 1024 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 --End resource limits-- =================================================== ===> License LGPL21 accepted by the user =========================================================================== =================================================== ===> scm-5f2_3 depends on file: /usr/local/sbin/pkg - not found ===> Installing existing package /packages/All/pkg-1.10.1.txz [110mips-quarterly-job-16] Installing pkg-1.10.1... [110mips-quarterly-job-16] Extracting pkg-1.10.1: .......... done ===> scm-5f2_3 depends on file: /usr/local/sbin/pkg - found ===> Returning to build of scm-5f2_3 =========================================================================== =================================================== =========================================================================== =================================================== ===> License LGPL21 accepted by the user ===> Fetching all distfiles required by scm-5f2_3 for building =========================================================================== =================================================== ===> License LGPL21 accepted by the user ===> Fetching all distfiles required by scm-5f2_3 for building => SHA256 Checksum OK for scm-5f2.zip. => SHA256 Checksum OK for slib-3b5.zip. => SHA256 Checksum OK for slib-psd1-3.tar.gz. =========================================================================== =================================================== =========================================================================== =================================================== ===> License LGPL21 accepted by the user ===> Fetching all distfiles required by scm-5f2_3 for building ===> Extracting for scm-5f2_3 => SHA256 Checksum OK for scm-5f2.zip. (# #) ==> (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.0) ==> #f (# 0.0 0.0) ==> #t (# 0.0 0.0) ==> #t (# 0.0 0.0) ==> #t (# 0.0 0.0) ==> #t (# 0.0 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 0.0) ==> #t (# 0.0 0.0) ==> #t (# 0.0 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) ==> 0.0 (# 250.e-3) ==> 0.0 (# 800.e-3) ==> 1. (# 3.5) ==> 4. (# 4.5) ==> 4. (# . # "/wrkdirs/usr/ports/lang/scm/work/scm/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/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.0 1.) ==> 0.0 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm/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/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.0 1) ==> 0.0 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm/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/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.0 (# . # "/wrkdirs/usr/ports/lang/scm/work/scm/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/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.0) ==> 1. (# . # "/wrkdirs/usr/ports/lang/scm/work/scm/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/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.0) ==> 1. (# . # "/wrkdirs/usr/ports/lang/scm/work/scm/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/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 ;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/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 =========================================================================== =================================================== ===> scm-5f2_3 depends on executable: indexinfo - found =========================================================================== =================================================== ===> Staging for scm-5f2_3 ===> Generating temporary packing list install -s -m 555 /wrkdirs/usr/ports/lang/scm/work/scm/scm /wrkdirs/usr/ports/lang/scm/work/scm/scmlit /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/bin install -m 444 /wrkdirs/usr/ports/lang/scm/work/scm/scm.1 /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/man/man1 install -m 0644 /wrkdirs/usr/ports/lang/scm/work/require.scm /wrkdirs/usr/ports/lang/scm/work/scm/COPYING /wrkdirs/usr/ports/lang/scm/work/scm/COPYING.LESSER /wrkdirs/usr/ports/lang/scm/work/scm/Iedline.scm /wrkdirs/usr/ports/lang/scm/work/scm/Idiffer.scm /wrkdirs/usr/ports/lang/scm/work/scm/Init5f2.scm /wrkdirs/usr/ports/lang/scm/work/scm/Link.scm /wrkdirs/usr/ports/lang/scm/work/scm/Macexp.scm /wrkdirs/usr/ports/lang/scm/work/scm/Macro.scm /wrkdirs/usr/ports/lang/scm/work/scm/Transcen.scm /wrkdirs/usr/ports/lang/scm/work/scm/Tscript.scm /wrkdirs/usr/ports/lang/scm/work/scm/build /wrkdirs/usr/ports/lang/scm/work/scm/build.scm /wrkdirs/usr/ports/lang/scm/work/scm/compile.scm /wrkdirs/usr/ports/lang/scm/work/scm/hobbit.scm /wrkdirs/usr/ports/lang/scm/work/scm/mkimpcat.scm /wrkdirs/usr/ports/lang/scm/work/scm/patchlvl.h /wrkdirs/usr/ports/lang/scm/work/scm/r4rstest.scm /wrkdirs/usr/ports/lang/scm/work/scm/rwb-isam.scm /wrkdirs/usr/ports/lang/scm/work/scm/scmhob.h /wrkdirs/usr/ports/la ng/scm/work/scm/scmhob.scm /wrkdirs/usr/ports/lang/scm/work/scm/wbtab.scm /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/lib/scm install -s -m 0644 /wrkdirs/usr/ports/lang/scm/work/scm/byte.so /wrkdirs/usr/ports/lang/scm/work/scm/bytenumb.so /wrkdirs/usr/ports/lang/scm/work/scm/crs.so /wrkdirs/usr/ports/lang/scm/work/scm/differ.so /wrkdirs/usr/ports/lang/scm/work/scm/edline.so /wrkdirs/usr/ports/lang/scm/work/scm/gsubr.so /wrkdirs/usr/ports/lang/scm/work/scm/ioext.so /wrkdirs/usr/ports/lang/scm/work/scm/posix.so /wrkdirs/usr/ports/lang/scm/work/scm/ramap.so /wrkdirs/usr/ports/lang/scm/work/scm/record.so /wrkdirs/usr/ports/lang/scm/work/scm/rgx.so /wrkdirs/usr/ports/lang/scm/work/scm/sc2.so /wrkdirs/usr/ports/lang/scm/work/scm/socket.so /wrkdirs/usr/ports/lang/scm/work/scm/unix.so /wrkdirs/usr/ports/lang/scm/work/stage/usr/local/lib/scm install: /wrkdirs/usr/ports/lang/scm/work/scm/edline.so: No such file or directory *** Error code 71 Stop. make: stopped in /usr/ports/lang/scm