Skip site navigation (1)Skip section navigation (2)
Date:      Thu, 13 Apr 2017 02:25:08 GMT
From:      pkg-fallout@FreeBSD.org
To:        pkg-fallout@FreeBSD.org
Subject:   [package - 110mips-quarterly][lang/scm] Failed for scm-5f2_3 in stage
Message-ID:  <201704130225.v3D2P87V068270@beefy14.nyi.freebsd.org>

next in thread | raw e-mail | index | archive | help

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/438400/logs/scm-5f2_3.log
Build URL:      http://beefy14.nyi.freebsd.org/build.html?mastername=110mips-quarterly&build=438400
Log:

====>> Building lang/scm
build started at Thu Apr 13 02:19:03 UTC 2017
port directory: /usr/ports/lang/scm
building for: FreeBSD 110mips-quarterly-job-25 11.0-RELEASE-p9 FreeBSD 11.0-RELEASE-p9 r316722 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.17-9-gf49c6f78
Host OSVERSION: 1200020
Jail OSVERSION: 1100122
Job Id: 25

---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-p9 r316722
UNAME_r=11.0-RELEASE-p9
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.17-9-gf49c6f78
SCRIPTPATH=/usr/local/share/poudriere/bulk.sh
LIBEXECPREFIX=/usr/local/libexec/poudriere
LOCALBASE=/usr/local
PACKAGE_BUILDING=yes
POUDRIEREPATH=/usr/local/bin/poudriere
---End Environment---

---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
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-p9
#### 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--
=======================<phase: check-sanity   >============================
===>  License LGPL21 accepted by the user
===========================================================================
=======================<phase: pkg-depends    >============================
===>   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-25] Installing pkg-1.10.1...
[110mips-quarterly-job-25] Extracting pkg-1.10.1: .......... done
===>   scm-5f2_3 depends on file: /usr/local/sbin/pkg - found
===>   Returning to build of scm-5f2_3
===========================================================================
=======================<phase: fetch-depends  >============================
===========================================================================
=======================<phase: fetch          >============================
===>  License LGPL21 accepted by the user
===> Fetching all distfiles required by scm-5f2_3 for building
===========================================================================
=======================<phase: checksum       >============================
===>  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.
===========================================================================
=======================<phase: extract-depends>============================
===========================================================================
=======================<phase: extract        >============================
===>  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.
=> SHA256 Checksum OK for slib-3b5.zip.
=> SHA256 Checksum OK for slib-psd1-3.tar.gz.
===========================================================================
=======================<phase: patch-depends  >============================
===========================================================================
<snip>
(#<primitive-procedure read> #<input-port "r4rstest.scm">)  ==> (define cur-section (quote ()))
(#<primitive-procedure peek-char> #<input-port "r4rstest.scm">)  ==> #\(
(#<primitive-procedure read> #<input-port "r4rstest.scm">)  ==> (define errs (quote ()))
SECTION(6 10 3)
(#<CLOSURE call-with-output-file "/wrkdirs/usr/ports/lang/scm/work/scm/Init5f2.scm": (str proc) (call-with-open-ports (open-output-file str) proc)> "tmp1" #<CLOSURE <anon> "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
(#<primitive-procedure read> #<input-port "tmp1">)  ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c))))
(#<primitive-procedure eof-object?> #<eof>)  ==> #t
(#<primitive-procedure eof-object?> #<eof>)  ==> #t
(input-port? #t)  ==> #t
(#<primitive-procedure read-char> #<input-port "tmp1">)  ==> #\;
(#<primitive-procedure read-char> #<input-port "tmp1">)  ==> #\;
(#<primitive-procedure read-char> #<input-port "tmp1">)  ==> #\;
(#<primitive-procedure read> #<input-port "tmp1">)  ==> (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c))
(#<primitive-procedure read> #<input-port "tmp1">)  ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c))))
(#<primitive-procedure output-port?> #<output-port "tmp2">)  ==> #t
(#<primitive-procedure read> #<input-port "tmp2">)  ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c))))
(#<primitive-procedure eof-object?> #<eof>)  ==> #t
(#<primitive-procedure eof-object?> #<eof>)  ==> #t
(input-port? #t)  ==> #t
(#<primitive-procedure read-char> #<input-port "tmp2">)  ==> #\;
(#<primitive-procedure read-char> #<input-port "tmp2">)  ==> #\;
(#<primitive-procedure read-char> #<input-port "tmp2">)  ==> #\;
(#<primitive-procedure read> #<input-port "tmp2">)  ==> (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c))
(#<primitive-procedure read> #<input-port "tmp2">)  ==> (define foo (quote (#t #f a () 9739 -3 . #((test) "te \" \" st" "" test #() b c))))

Passed all tests

;testing inexact numbers; 
SECTION(6 2)
(#<primitive-procedure eqv?> 1 1.)  ==> #f
(#<primitive-procedure eqv?> 0 0.0)  ==> #f
(#<primitive-procedure eqv?> 0.0 0.0)  ==> #t
(#<primitive-procedure eqv?> 0.0 0.0)  ==> #t
(#<primitive-procedure equal?> 0.0 0.0)  ==> #t
(#<primitive-procedure eqv?> 0.0 0.0)  ==> #t
(#<primitive-procedure equal?> 0.0 0.0)  ==> #t
SECTION(6 5 5)
(magnitude 1.)  ==> 1.
(#<primitive-procedure /> 1.e300+1.e300i 4.e300+4.e300i)  ==> 250.e-3
(magnitude 1.)  ==> 1.
(#<primitive-procedure /> 1.e-300+1.e-300i 4.e-300+4.e-300i)  ==> 250.e-3
(#<primitive-procedure => 0.0 0.0)  ==> #t
(#<primitive-procedure => 0.0 0.0)  ==> #t
(#<primitive-procedure => 0.0 0.0)  ==> #t
(#<primitive-procedure inexact?> 3.9)  ==> #t
(max #t)  ==> #t
(#<primitive-procedure max> 3.9 4)  ==> 4.
(#<primitive-procedure exact->inexact> 4)  ==> 4.
(#<primitive-procedure exact->inexact> 4.)  ==> 4.
(#<primitive-procedure inexact->exact> 4)  ==> 4
(#<primitive-procedure inexact->exact> 4.)  ==> 4
(#<primitive-procedure round> -4.5)  ==> -4.
(#<primitive-procedure round> -3.5)  ==> -4.
(#<primitive-procedure round> -3.9)  ==> -4.
(#<primitive-procedure round> 0.0)  ==> 0.0
(#<primitive-procedure round> 250.e-3)  ==> 0.0
(#<primitive-procedure round> 800.e-3)  ==> 1.
(#<primitive-procedure round> 3.5)  ==> 4.
(#<primitive-procedure round> 4.5)  ==> 4.
(#<CLOSURE expt "/wrkdirs/usr/ports/lang/scm/work/scm/Transcen.scm": (z1 z2) (#@let-syntax ((6 (#<id cond-aux:740db8f8> . #<macro! #<CLOSURE <anon> "/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 ((#<id x:740d7e60> (#@exact? #@0+1)))  (#@if #@#<id x:740d7e60> (#@let ((#<id x:740d7998> (#@not (#@let ((#<id x:740d72b8> (#@zero? #@#<id x:740d7e60>)))  (#@if #@#<id x:740d72b8> (#@let ((#<id x:740d6d38> (#@negative? #@2+1)))  (#@if #@#<id x:740d6d38> #<id x:740d6d38> #f)) #f)))))  (#@if #@#<id x:740d7998> #@#<id x:740d7998> #f)) #f)) (#
 @integer-expt #@z1 #@z2) (#<id cond-aux:740d8148> ((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
(#<CLOSURE expt "/wrkdirs/usr/ports/lang/scm/work/scm/Transcen.scm": (z1 z2) (#@let-syntax ((6 (#<id cond-aux:740db8f8> . #<macro! #<CLOSURE <anon> "/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 ((#<id x:740d7e60> (#@exact? #@0+1)))  (#@if #@#<id x:740d7e60> (#@let ((#<id x:740d7998> (#@not (#@let ((#<id x:740d72b8> (#@zero? #@#<id x:740d7e60>)))  (#@if #@#<id x:740d72b8> (#@let ((#<id x:740d6d38> (#@negative? #@2+1)))  (#@if #@#<id x:740d6d38> #<id x:740d6d38> #f)) #f)))))  (#@if #@#<id x:740d7998> #@#<id x:740d7998> #f)) #f)) (#
 @integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) (#@if (#@let ((#<id x:7410dbc8> (#@real? #@0+1)))  (#@if #@#<id x:7410dbc8> (#@let ((#<id x:7410d700> (#@real? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d700> (#@let ((#<id x:7410d2b0> (#@positive? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d2b0> #<id x:7410d2b0> #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> 0.0 1)  ==> 0.0
(#<CLOSURE expt "/wrkdirs/usr/ports/lang/scm/work/scm/Transcen.scm": (z1 z2) (#@let-syntax ((6 (#<id cond-aux:740db8f8> . #<macro! #<CLOSURE <anon> "/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 ((#<id x:740d7e60> (#@exact? #@0+1)))  (#@if #@#<id x:740d7e60> (#@let ((#<id x:740d7998> (#@not (#@let ((#<id x:740d72b8> (#@zero? #@#<id x:740d7e60>)))  (#@if #@#<id x:740d72b8> (#@let ((#<id x:740d6d38> (#@negative? #@2+1)))  (#@if #@#<id x:740d6d38> #<id x:740d6d38> #f)) #f)))))  (#@if #@#<id x:740d7998> #@#<id x:740d7998> #f)) #f)) (#
 @integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) (#@if (#@let ((#<id x:7410dbc8> (#@real? #@0+1)))  (#@if #@#<id x:7410dbc8> (#@let ((#<id x:7410d700> (#@real? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d700> (#@let ((#<id x:7410d2b0> (#@positive? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d2b0> #<id x:7410d2b0> #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> 0 1.)  ==> 0.0
(#<CLOSURE expt "/wrkdirs/usr/ports/lang/scm/work/scm/Transcen.scm": (z1 z2) (#@let-syntax ((6 (#<id cond-aux:740db8f8> . #<macro! #<CLOSURE <anon> "/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 ((#<id x:740d7e60> (#@exact? #@0+1)))  (#@if #@#<id x:740d7e60> (#@let ((#<id x:740d7998> (#@not (#@let ((#<id x:740d72b8> (#@zero? #@#<id x:740d7e60>)))  (#@if #@#<id x:740d72b8> (#@let ((#<id x:740d6d38> (#@negative? #@2+1)))  (#@if #@#<id x:740d6d38> #<id x:740d6d38> #f)) #f)))))  (#@if #@#<id x:740d7998> #@#<id x:740d7998> #f)) #f)) (#
 @integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) (#@if (#@let ((#<id x:7410dbc8> (#@real? #@0+1)))  (#@if #@#<id x:7410dbc8> (#@let ((#<id x:7410d700> (#@real? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d700> (#@let ((#<id x:7410d2b0> (#@positive? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d2b0> #<id x:7410d2b0> #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> -25 0.0)  ==> 1.
(#<CLOSURE expt "/wrkdirs/usr/ports/lang/scm/work/scm/Transcen.scm": (z1 z2) (#@let-syntax ((6 (#<id cond-aux:740db8f8> . #<macro! #<CLOSURE <anon> "/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 ((#<id x:740d7e60> (#@exact? #@0+1)))  (#@if #@#<id x:740d7e60> (#@let ((#<id x:740d7998> (#@not (#@let ((#<id x:740d72b8> (#@zero? #@#<id x:740d7e60>)))  (#@if #@#<id x:740d72b8> (#@let ((#<id x:740d6d38> (#@negative? #@2+1)))  (#@if #@#<id x:740d6d38> #<id x:740d6d38> #f)) #f)))))  (#@if #@#<id x:740d7998> #@#<id x:740d7998> #f)) #f)) (#
 @integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (#@+ 1 (#@* #@z1 #@z2)) (#@if (#@let ((#<id x:7410dbc8> (#@real? #@0+1)))  (#@if #@#<id x:7410dbc8> (#@let ((#<id x:7410d700> (#@real? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d700> (#@let ((#<id x:7410d2b0> (#@positive? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d2b0> #<id x:7410d2b0> #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> -3.25 0.0)  ==> 1.
(#<CLOSURE expt "/wrkdirs/usr/ports/lang/scm/work/scm/Transcen.scm": (z1 z2) (#@let-syntax ((6 (#<id cond-aux:740db8f8> . #<macro! #<CLOSURE <anon> "/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 ((#<id x:740d7e60> (#@exact? #@0+1)))  (#@if #@#<id x:740d7e60> (#@let ((#<id x:740d7998> (#@not (#@let ((#<id x:740d72b8> (#@zero? #@#<id x:740d7e60>)))  (#@if #@#<id x:740d72b8> (#@let ((#<id x:740d6d38> (#@negative? #@2+1)))  (#@if #@#<id x:740d6d38> #<id x:740d6d38> #f)) #f)))))  (#@if #@#<id x:740d7998> #@#<id x:740d7998> #f)) #f)) (#
 @integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (#@+ 1 (#@* #@z1 #@z2)) (#@if (#@let ((#<id x:7410dbc8> (#@real? #@0+1)))  (#@if #@#<id x:7410dbc8> (#@let ((#<id x:7410d700> (#@real? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d700> (#@let ((#<id x:7410d2b0> (#@positive? #@#<id x:7410dbc8>)))  (#@if #@#<id x:7410d2b0> #<id x:7410d2b0> #f)) #f)) #f)) (real-expt z1 z2) (#@exp (#@* (#@if (#@zero? #@z1) (#@real-part #@z2) z2) (#@log #@z1)))))))> -3.25 0)  ==> 1.
(#<CLOSURE atan "/wrkdirs/usr/ports/lang/scm/work/scm/Transcen.scm": (z . y) (#@if (#@null? #@y) (#@if (#@real? #@z) (#@real-atan #@z) (/ (log (/ (- 0.0+1.i z) (+ 0.0+1.i z))) 0.0+2.i)) ($atan2 z (car y)))> 1 1)  ==> 785.3981633974483e-3
(#<CLOSURE call-with-output-file "/wrkdirs/usr/ports/lang/scm/work/scm/Init5f2.scm": (str proc) (#@call-with-open-ports (#@open-output-file #@str) #@proc)> "tmp3" #<CLOSURE <anon> "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
(#<primitive-procedure read> #<input-port "tmp3">)  ==> (define foo (quote (250.e-3 -3.25)))
(#<primitive-procedure eof-object?> #<eof>)  ==> #t
(#<primitive-procedure eof-object?> #<eof>)  ==> #t
(input-port? #t)  ==> #t
(#<primitive-procedure read-char> #<input-port "tmp3">)  ==> #\;
(#<primitive-procedure read-char> #<input-port "tmp3">)  ==> #\;
(#<primitive-procedure read-char> #<input-port "tmp3">)  ==> #\;
(#<primitive-procedure read> #<input-port "tmp3">)  ==> (250.e-3 -3.25)
(#<primitive-procedure read> #<input-port "tmp3">)  ==> (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)
(#<primitive-procedure modulo> 33333333333333333333 3)  ==> 0
(#<primitive-procedure modulo> 33333333333333333333 -3)  ==> 0
(#<primitive-procedure remainder> 33333333333333333333 3)  ==> 0
(#<primitive-procedure remainder> 33333333333333333333 -3)  ==> 0
(#<primitive-procedure modulo> 33333333333333333332 3)  ==> 2
(#<primitive-procedure modulo> 33333333333333333332 -3)  ==> -1
(#<primitive-procedure remainder> 33333333333333333332 3)  ==> 2
(#<primitive-procedure remainder> 33333333333333333332 -3)  ==> 2
(#<primitive-procedure modulo> -33333333333333333332 3)  ==> 1
(#<primitive-procedure modulo> -33333333333333333332 -3)  ==> -2
(#<primitive-procedure remainder> -33333333333333333332 3)  ==> -2
(#<primitive-procedure remainder> -33333333333333333332 -3)  ==> -2
(#<primitive-procedure modulo> 3 33333333333333333333)  ==> 3
(#<primitive-procedure modulo> -3 33333333333333333333)  ==> 33333333333333333330
(#<primitive-procedure remainder> 3 33333333333333333333)  ==> 3
(#<primitive-procedure remainder> -3 33333333333333333333)  ==> -3
(#<primitive-procedure modulo> 3 -33333333333333333333)  ==> -33333333333333333330
(#<primitive-procedure modulo> -3 -33333333333333333333)  ==> -3
(#<primitive-procedure remainder> 3 -33333333333333333333)  ==> 3
(#<primitive-procedure remainder> -3 -33333333333333333333)  ==> -3
(#<primitive-procedure modulo> -2177452800 86400)  ==> 0
(#<primitive-procedure modulo> 2177452800 -86400)  ==> 0
(#<primitive-procedure modulo> 2177452800 86400)  ==> 0
(#<primitive-procedure modulo> -2177452800 -86400)  ==> 0
(#<primitive-procedure modulo> 0 -2177452800)  ==> 0
(remainder #t)  ==> #t
(remainder #t)  ==> #t
(#<primitive-procedure gcd> 33333333333333333333 11111111111111111111)  ==> 11111111111111111111
(#<primitive-procedure gcd> 33333333333333333332 11111111111111111111)  ==> 1
(#<primitive-procedure gcd> 33333333333333333330 11111111111111111111)  ==> 1
(#<primitive-procedure gcd> 33333333333333333333 33333333333333333330)  ==> 3
(#<primitive-procedure lcm> 33333333333333333333 11111111111111111111)  ==> 33333333333333333333
(#<primitive-procedure lcm> -3 11111111111111111111)  ==> 33333333333333333333
SECTION(6 5 8)
(#<primitive-procedure number->string> 281474976710655325431)  ==> "281474976710655325431"

Passed all tests

;testing bignum-inexact comparisons;
SECTION(6 5 5)
(#<primitive-procedure => 1427247692705959881058285969449495136382746625 1.42724769270596e45 1427247692705959881058285969449495136382746623)  ==> #f
(#<primitive-procedure => 1.42724769270596e45 1427247692705959881058285969449495136382746625 1427247692705959881058285969449495136382746623)  ==> #f
(#<primitive-procedure <> 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)
(#<primitive-procedure string->list> "P l")  ==> (#\P #\space #\l)
(#<primitive-procedure string->list> "")  ==> ()
(#<primitive-procedure list->string> (#\1 #\\ #\"))  ==> "1\\\""
(#<primitive-procedure list->string> ())  ==> ""
SECTION(6 8)
(#<primitive-procedure vector->list> #(dah dah didah))  ==> (dah dah didah)
(#<primitive-procedure vector->list> #())  ==> ()
(#<primitive-procedure list->vector> (dididit dah))  ==> #(dididit dah)
(#<primitive-procedure list->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)
(#<CLOSURE leaf-eq? "r4rstest.scm": (x y) ((#<id lambda:74121330> (eot) (#<id let*:741216a0> ((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
(#<CLOSURE leaf-eq? "r4rstest.scm": (x y) (#@let ((eot (#@list (#@quote eot))))  (#@let ((xf (#@next-leaf-generator #@eot #@xf)))  (#@let ((yf (#@next-leaf-generator #@2+1 #@xf)))  (#@let ((loop #f))  (#@set! #@loop (#@lambda (x y) (#@let-syntax ((6 (#<id cond-aux:740fb4a0> . #<macro! #<CLOSURE <anon> "/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 <anon> (loop) 2 <anon> (yf) 2 <anon> (xf) 2 <anon> (eot) 2 <anon> (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
(#<CLOSURE force "syntest2.scm": (promise) (#@promise)> #<CLOSURE <anon> "syntest2.scm": () (#@if #@result (#@car #@result) (#@let ((x (#@result)))  (#@if #@result (car result) (#@begin (#@set! #@result (#@list #@x)) #@x))))>)  ==> 6
(#<CLOSURE force "syntest2.scm": (promise) (#@promise)> #<CLOSURE <anon> "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
===========================================================================
=======================<phase: run-depends    >============================
===>   scm-5f2_3 depends on executable: indexinfo - found
===========================================================================
=======================<phase: stage          >============================
===>  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



Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201704130225.v3D2P87V068270>