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:     m...@aldan.algebra.com
Last committer: ger...@freebsd.org
Ident:          $FreeBSD: head/lang/scm/Makefile 464084 2018-03-10 17:46:04Z 
gerald $
Log URL:        
http://beefy12.nyi.freebsd.org/data/head-amd64-default/p466934_s332344/logs/scm-5f2_6.log
Build URL:      
http://beefy12.nyi.freebsd.org/build.html?mastername=head-amd64-default&build=p466934_s332344
Log:

=>> Building lang/scm
build started at Tue Apr 10 12:34:04 UTC 2018
port directory: /usr/ports/lang/scm
package name: scm-5f2_6
building for: FreeBSD head-amd64-default-job-11 12.0-CURRENT FreeBSD 
12.0-CURRENT 1200061 amd64
maintained by: m...@aldan.algebra.com
Makefile ident:      $FreeBSD: head/lang/scm/Makefile 464084 2018-03-10 
17:46:04Z gerald $
Poudriere version: 3.2.6-1-ga0ae87a0
Host OSVERSION: 1200060
Jail OSVERSION: 1200061
Job Id: 11




!!! Jail is newer than host. (Jail: 1200061, Host: 1200060) !!!
!!! This is not supported. !!!
!!! Host kernel must be same or newer than jail. !!!
!!! Expect build failures. !!!



---Begin Environment---
SHELL=/bin/csh
OSVERSION=1200061
UNAME_v=FreeBSD 12.0-CURRENT 1200061
UNAME_r=12.0-CURRENT
BLOCKSIZE=K
MAIL=/var/mail/root
STATUS=1
HOME=/root
PATH=/sbin:/bin:/usr/sbin:/usr/bin:/usr/local/sbin:/usr/local/bin:/root/bin
LOCALBASE=/usr/local
USER=root
LIBEXECPREFIX=/usr/local/libexec/poudriere
POUDRIERE_VERSION=3.2.6-1-ga0ae87a0
MASTERMNT=/usr/local/poudriere/data/.m/head-amd64-default/ref
POUDRIERE_BUILD_TYPE=bulk
PACKAGE_BUILDING=yes
SAVED_TERM=
PWD=/usr/local/poudriere/data/.m/head-amd64-default/ref/.p/pool
P_PORTS_FEATURES=FLAVORS SELECTED_OPTIONS
MASTERNAME=head-amd64-default
SCRIPTPREFIX=/usr/local/share/poudriere
OLDPWD=/usr/local/poudriere/data/.m/head-amd64-default/ref/.p
SCRIPTPATH=/usr/local/share/poudriere/bulk.sh
POUDRIEREPATH=/usr/local/bin/poudriere
---End Environment---

---Begin Poudriere Port Flags/Env---
PORT_FLAGS=
PKGENV=
FLAVOR=
DEPENDS_ARGS=
MAKE_ARGS=
---End Poudriere Port Flags/Env---

---Begin OPTIONS List---
===> The following configuration options are available for scm-5f2_6:
     X11=off: X11 (graphics) support
===> Use 'make config' to modify these settings
---End OPTIONS List---

--MAINTAINER--
m...@aldan.algebra.com
--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  
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
 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" 
PATH=/wrkdirs/usr/ports/lang/scm/work/.bin:/sbin:/bin:/usr/sbin:/usr/bin:/usr/local/sbin:/usr/local/bin:/root/bin
 NO_PIE=yes MK_DEBUG_FILES=no MK_KERNEL_SYMBOLS=no SHELL=/bin/sh NO_LINT=YES 
ADDR2LINE="/usr/local/bin/addr2line" AR="/usr/local/bin/ar" 
AS="/usr/local/bin/as" CPPFILT="/usr/local/bin/c++filt" 
GPROF="/usr/local/bin/gprof" LD="/usr/local/bin/ld" NM="/usr/local/bin/nm" 
OBJCOPY="/usr/local/bin/objcopy" OBJDUMP="/usr/local/bin/objdump" 
RANLIB="/usr/local/bin/ranlib" READELF="/usr/local/bin/readelf" 
SIZE="/usr/local/bin/size" STRINGS="/usr/local/bin/strings" PREFIX=/usr/local  
LOCALBASE=/usr/local  LIBDIR="/usr/lib"  CC="gcc6" CFLAGS="-O2 -pipe  -Wall 
-Wwrite-strings -Wmissing-declarations -Wredundant-decls -Wcast-qual 
-Wno-unused-label -Wno-uninitialized -fstack-protector 
-Wl,-rpath=/usr/local/lib/gcc6 -fno-strict-aliasing"  CPP=
 "cpp6" CPPFLAGS="-I/usr/local/include"  LDFLAGS=" -L/usr/local/lib 
-fstack-protector -Wl,-rpath=/usr/local/lib/gcc6 -L/usr/local/lib/gcc6" LIBS="" 
 CXX="g++6" CXXFLAGS="-O2 -pipe -Wall -Wwrite-strings -Wmissing-declarations 
-Wredundant-decls -Wcast-qual -Wno-unused-label -Wno-uninitialized 
-fstack-protector -Wl,-rpath=/usr/local/lib/gcc6 -fno-strict-aliasing  
-Wl,-rpath=/usr/local/lib/gcc6"  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" PORTDOCS="" PORTEXAMPLES="" X11="@comment " NO_X11="" OSREL=12.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---
USE_PACKAGE_DEPENDS=yes
BATCH=yes
WRKDIRPREFIX=/wrkdirs
PORTSDIR=/usr/ports
PACKAGES=/packages
DISTDIR=/distfiles
PACKAGE_BUILDING=yes
PACKAGE_BUILDING_FLAVORS=yes
#### /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 ####
_CCVERSION_921dbbb2=FreeBSD clang version 6.0.0 (tags/RELEASE_600/final 326565) 
(based on LLVM 6.0.0) Target: x86_64-unknown-freebsd12.0 Thread model: posix 
InstalledDir: /usr/bin
_ALTCCVERSION_921dbbb2=none
_CXXINTERNAL_acaad9ca=FreeBSD clang version 6.0.0 (tags/RELEASE_600/final 
326565) (based on LLVM 6.0.0) Target: x86_64-unknown-freebsd12.0 Thread model: 
posix InstalledDir: /usr/bin "/usr/bin/ld" "--eh-frame-hdr" "-dynamic-linker" 
"/libexec/ld-elf.so.1" "--hash-style=both" "--enable-new-dtags" "-o" "a.out" 
"/usr/lib/crt1.o" "/usr/lib/crti.o" "/usr/lib/crtbegin.o" "-L/usr/lib" 
"/dev/null" "-lc++" "-lm" "-lgcc" "--as-needed" "-lgcc_s" "--no-as-needed" 
"-lc" "-lgcc" "--as-needed" "-lgcc_s" "--no-as-needed" "/usr/lib/crtend.o" 
"/usr/lib/crtn.o"
CC_OUTPUT_921dbbb2_58173849=yes
CC_OUTPUT_921dbbb2_9bdba57c=yes
CC_OUTPUT_921dbbb2_6a4fe7f5=yes
CC_OUTPUT_921dbbb2_6bcac02b=yes
CC_OUTPUT_921dbbb2_67d20829=yes
CC_OUTPUT_921dbbb2_bfa62e83=yes
CC_OUTPUT_921dbbb2_f0b4d593=yes
CC_OUTPUT_921dbbb2_308abb44=yes
CC_OUTPUT_921dbbb2_f00456e5=yes
CC_OUTPUT_921dbbb2_65ad290d=yes
CC_OUTPUT_921dbbb2_b2657cc3=yes
CC_OUTPUT_921dbbb2_380987f7=yes
_OBJC_CCVERSION_921dbbb2=FreeBSD clang version 6.0.0 (tags/RELEASE_600/final 
326565) (based on LLVM 6.0.0) Target: x86_64-unknown-freebsd12.0 Thread model: 
posix InstalledDir: /usr/bin
_OBJC_ALTCCVERSION_921dbbb2=none
ARCH=amd64
OPSYS=FreeBSD
_OSRELEASE=12.0-CURRENT
OSREL=12.0
OSVERSION=1200061
PYTHONBASE=/usr/local
HAVE_COMPAT_IA32_KERN=YES
CONFIGURE_MAX_CMD_LEN=262144
HAVE_PORTS_ENV=1
#### Misc Poudriere ####
GID=0
UID=0
DISABLE_MAKE_JOBS=poudriere
---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)  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_6 depends on file: /usr/local/sbin/pkg - not found
===>   Installing existing package /packages/All/pkg-1.10.5.txz
[head-amd64-default-job-11] Installing pkg-1.10.5...
[head-amd64-default-job-11] Extracting pkg-1.10.5: .......... done
===>   scm-5f2_6 depends on file: /usr/local/sbin/pkg - found
===>   Returning to build of scm-5f2_6
===========================================================================
=======================<phase: fetch-depends  >============================
===========================================================================
=======================<phase: fetch          >============================
===>  License LGPL21 accepted by the user
===> Fetching all distfiles required by scm-5f2_6 for building
===========================================================================
=======================<phase: checksum       >============================
===>  License LGPL21 accepted by the user
===> Fetching all distfiles required by scm-5f2_6 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_6 for building
===>  Extracting for scm-5f2_6
=> 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  >============================
===========================================================================
=======================<phase: patch          >============================
===>  Patching for scm-5f2_6
===>  Applying FreeBSD patches for scm-5f2_6
===========================================================================
=======================<phase: build-depends  >============================
===>   scm-5f2_6 depends on executable: gcc6 - not found
===>   Installing existing package /packages/All/gcc6-6.4.0_5.txz
[head-amd64-default-job-11] Installing gcc6-6.4.0_5...
[head-amd64-default-job-11] `-- Installing binutils-2.30_2,1...
[head-amd64-default-job-11] |   `-- Installing gettext-runtime-0.19.8.1_1...
<snip>
(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:8011ebb80> . #<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:8011e45e0> (#@exact? #@0+1)))  (#@if #@#<id x:8011e45e0> (#@let ((#<id 
x:8011e3700> (#@not (#@let ((#<id x:8011e2bc0> (#@zero? #@#<id x:8011e45e0>)))  
(#@if #@#<id x:8011e2bc0> (#@let ((#<id x:8011e2330> (#@negative? #@2+1)))  
(#@if #@#<id x:8011e2330> #<id x:8011e2330> #f)) #f)))))  (#@if #@#<id 
x:8011e3700> #@#<id x:8011e3700> 
 #f)) #f)) (#@integer-expt #@z1 #@z2) (#<id cond-aux:8011e4c80> ((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:8011ebb80> . #<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:8011e45e0> (#@exact? #@0+1)))  (#@if #@#<id x:8011e45e0> (#@let ((#<id 
x:8011e3700> (#@not (#@let ((#<id x:8011e2bc0> (#@zero? #@#<id x:8011e45e0>)))  
(#@if #@#<id x:8011e2bc0> (#@let ((#<id x:8011e2330> (#@negative? #@2+1)))  
(#@if #@#<id x:8011e2330> #<id x:8011e2330> #f)) #f)))))  (#@if #@#<id 
x:8011e3700> #@#<id x:8011e3700> 
 #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) 
(#@if (#@let ((#<id x:8012516f0> (#@real? #@0+1)))  (#@if #@#<id x:8012516f0> 
(#@let ((#<id x:801250d80> (#@real? #@#<id x:8012516f0>)))  (#@if #@#<id 
x:801250d80> (#@let ((#<id x:8012504e0> (#@positive? #@#<id x:8012516f0>)))  
(#@if #@#<id x:8012504e0> #<id x:8012504e0> #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:8011ebb80> . #<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:8011e45e0> (#@exact? #@0+1)))  (#@if #@#<id x:8011e45e0> (#@let ((#<id 
x:8011e3700> (#@not (#@let ((#<id x:8011e2bc0> (#@zero? #@#<id x:8011e45e0>)))  
(#@if #@#<id x:8011e2bc0> (#@let ((#<id x:8011e2330> (#@negative? #@2+1)))  
(#@if #@#<id x:8011e2330> #<id x:8011e2330> #f)) #f)))))  (#@if #@#<id 
x:8011e3700> #@#<id x:8011e3700> 
 #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) 
(#@if (#@let ((#<id x:8012516f0> (#@real? #@0+1)))  (#@if #@#<id x:8012516f0> 
(#@let ((#<id x:801250d80> (#@real? #@#<id x:8012516f0>)))  (#@if #@#<id 
x:801250d80> (#@let ((#<id x:8012504e0> (#@positive? #@#<id x:8012516f0>)))  
(#@if #@#<id x:8012504e0> #<id x:8012504e0> #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:8011ebb80> . #<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:8011e45e0> (#@exact? #@0+1)))  (#@if #@#<id x:8011e45e0> (#@let ((#<id 
x:8011e3700> (#@not (#@let ((#<id x:8011e2bc0> (#@zero? #@#<id x:8011e45e0>)))  
(#@if #@#<id x:8011e2bc0> (#@let ((#<id x:8011e2330> (#@negative? #@2+1)))  
(#@if #@#<id x:8011e2330> #<id x:8011e2330> #f)) #f)))))  (#@if #@#<id 
x:8011e3700> #@#<id x:8011e3700> 
 #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) 
(#@if (#@let ((#<id x:8012516f0> (#@real? #@0+1)))  (#@if #@#<id x:8012516f0> 
(#@let ((#<id x:801250d80> (#@real? #@#<id x:8012516f0>)))  (#@if #@#<id 
x:801250d80> (#@let ((#<id x:8012504e0> (#@positive? #@#<id x:8012516f0>)))  
(#@if #@#<id x:8012504e0> #<id x:8012504e0> #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:8011ebb80> . #<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:8011e45e0> (#@exact? #@0+1)))  (#@if #@#<id x:8011e45e0> (#@let ((#<id 
x:8011e3700> (#@not (#@let ((#<id x:8011e2bc0> (#@zero? #@#<id x:8011e45e0>)))  
(#@if #@#<id x:8011e2bc0> (#@let ((#<id x:8011e2330> (#@negative? #@2+1)))  
(#@if #@#<id x:8011e2330> #<id x:8011e2330> #f)) #f)))))  (#@if #@#<id 
x:8011e3700> #@#<id x:8011e3700> 
 #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (#@+ 1 (#@* #@z1 
#@z2)) (#@if (#@let ((#<id x:8012516f0> (#@real? #@0+1)))  (#@if #@#<id 
x:8012516f0> (#@let ((#<id x:801250d80> (#@real? #@#<id x:8012516f0>)))  (#@if 
#@#<id x:801250d80> (#@let ((#<id x:8012504e0> (#@positive? #@#<id 
x:8012516f0>)))  (#@if #@#<id x:8012504e0> #<id x:8012504e0> #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:8011ebb80> . #<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:8011e45e0> (#@exact? #@0+1)))  (#@if #@#<id x:8011e45e0> (#@let ((#<id 
x:8011e3700> (#@not (#@let ((#<id x:8011e2bc0> (#@zero? #@#<id x:8011e45e0>)))  
(#@if #@#<id x:8011e2bc0> (#@let ((#<id x:8011e2330> (#@negative? #@2+1)))  
(#@if #@#<id x:8011e2330> #<id x:8011e2330> #f)) #f)))))  (#@if #@#<id 
x:8011e3700> #@#<id x:8011e3700> 
 #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (#@+ 1 (#@* #@z1 
#@z2)) (#@if (#@let ((#<id x:8012516f0> (#@real? #@0+1)))  (#@if #@#<id 
x:8012516f0> (#@let ((#<id x:801250d80> (#@real? #@#<id x:8012516f0>)))  (#@if 
#@#<id x:801250d80> (#@let ((#<id x:8012504e0> (#@positive? #@#<id 
x:8012516f0>)))  (#@if #@#<id x:8012504e0> #<id x:8012504e0> #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)
Number readback failure for (+ 0.0 (* -96 5.e-324))
-474.e-324
-474.e-324
(float-print-test #f)  ==> #f
 BUT EXPECTED #t
Number readback failure for (+ 100.e-3 (* -68 13.877787807814457e-18))
99.99999999999906e-3
99.99999999999906e-3
(mult-float-print-test #f)  ==> #f
 BUT EXPECTED #t
Number readback failure for (+ 30. (* -4 3.552713678800501e-15))
29.999999999999986
29.999999999999986
(mult-float-print-test #f)  ==> #f
 BUT EXPECTED #t
(mult-float-print-test #t)  ==> #t
(mult-float-print-test #t)  ==> #t
Number readback failure for (+ 271.82818284590454e-102 (* 27 
50.75883674631298e-117))
271.8281828459059e-102
271.8281828459059e-102
(mult-float-print-test #f)  ==> #f
 BUT EXPECTED #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"

errors were:
(SECTION (got expected (call)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (float-print-test #f)))


;testing bignum-inexact comparisons;
SECTION(6 5 5)
(#<primitive-procedure => 3 2. 1)  ==> #f
(#<primitive-procedure => 2. 3 1)  ==> #f
(#<primitive-procedure <> 1 2. 3)  ==> #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))

errors were:
(SECTION (got expected (call)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (float-print-test #f)))


;testing continuations; 
SECTION(6 9)
(#<CLOSURE leaf-eq? "r4rstest.scm": (x y) ((#<id lambda:801277d80> (eot) (#<id 
let*:801278460> ((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:801230c60> . #<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

errors were:
(SECTION (got expected (call)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (float-print-test #f)))


;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

errors were:
(SECTION (got expected (call)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (mult-float-print-test #f)))
((6 5 6) (#f #t (float-print-test #f)))

(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))

; program args: ("./scm" "-rmacro" "-fsyntest1.scm" "-fsyntest2.scm" 
"-fr4rstest.scm" "-e(test-sc4)(test-cont)(test-delay)" "-fsyntest1" "-e" "(or 
(null? errs) (quit 1))")
Passed all tests
Load "syntest2" to rewrite derived expressions and test
*** Error code 1

Stop.
make[4]: stopped in /wrkdirs/usr/ports/lang/scm/work/scm
*** Error code 1

Stop.
make[3]: stopped in /wrkdirs/usr/ports/lang/scm/work/scm
*** Error code 1

Stop.
make[2]: stopped in /wrkdirs/usr/ports/lang/scm/work/scm
*** Error code 1

Stop.
make[1]: stopped in /wrkdirs/usr/ports/lang/scm/work/scm
*** Error code 1

Stop.
make: stopped in /usr/ports/lang/scm
_______________________________________________
freebsd-pkg-fallout@freebsd.org mailing list
https://lists.freebsd.org/mailman/listinfo/freebsd-pkg-fallout
To unsubscribe, send any mail to "freebsd-pkg-fallout-unsubscr...@freebsd.org"

Reply via email to