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: lini...@freebsd.org Ident: $FreeBSD: head/lang/scm/Makefile 455167 2017-11-30 06:13:34Z linimon $ Log URL: http://beefy12.nyi.freebsd.org/data/head-amd64-default/p463457_s330300/logs/scm-5f2_5.log Build URL: http://beefy12.nyi.freebsd.org/build.html?mastername=head-amd64-default&build=p463457_s330300 Log: =>> Building lang/scm build started at Sat Mar 3 21:25:32 UTC 2018 port directory: /usr/ports/lang/scm package name: scm-5f2_5 building for: FreeBSD head-amd64-default-job-02 12.0-CURRENT FreeBSD 12.0-CURRENT 1200059 amd64 maintained by: m...@aldan.algebra.com Makefile ident: $FreeBSD: head/lang/scm/Makefile 455167 2017-11-30 06:13:34Z linimon $ Poudriere version: 3.2.4-56-g0fd5b0e3 Host OSVERSION: 1200054 Jail OSVERSION: 1200059 Job Id: 02 !!! Jail is newer than host. (Jail: 1200059, Host: 1200054) !!! !!! This is not supported. !!! !!! Host kernel must be same or newer than jail. !!! !!! Expect build failures. !!! ---Begin Environment--- SHELL=/bin/csh OSVERSION=1200059 UNAME_v=FreeBSD 12.0-CURRENT 1200059 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.4-56-g0fd5b0e3 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_5: 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 (branches/release_60 325932) (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 (branches/release_60 325932) (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" OUTPUT_58173849_921dbbb2=yes OUTPUT_9bdba57c_921dbbb2=yes OUTPUT_6a4fe7f5_921dbbb2=yes OUTPUT_6bcac02b_921dbbb2=yes OUTPUT_67d20829_921dbbb2=yes OUTPUT_bfa62e83_921dbbb2=yes OUTPUT_f0b4d593_921dbbb2=yes OUTPUT_308abb44_921dbbb2=yes OUTPUT_f00456e5_921dbbb2=yes OUTPUT_65ad290d_921dbbb2=yes OUTPUT_b2657cc3_921dbbb2=yes OUTPUT_380987f7_921dbbb2=yes ARCH=amd64 OPSYS=FreeBSD _OSRELEASE=12.0-CURRENT OSREL=12.0 OSVERSION=1200059 PYTHONBASE=/usr/local HAVE_COMPAT_IA32_KERN=YES CONFIGURE_MAX_CMD_LEN=262144 #### Misc Poudriere #### GID=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_5 depends on file: /usr/local/sbin/pkg - not found ===> Installing existing package /packages/All/pkg-1.10.5.txz [head-amd64-default-job-02] Installing pkg-1.10.5... [head-amd64-default-job-02] Extracting pkg-1.10.5: .......... done ===> scm-5f2_5 depends on file: /usr/local/sbin/pkg - found ===> Returning to build of scm-5f2_5 =========================================================================== =======================<phase: fetch-depends >============================ =========================================================================== =======================<phase: fetch >============================ ===> License LGPL21 accepted by the user ===> Fetching all distfiles required by scm-5f2_5 for building =========================================================================== =======================<phase: checksum >============================ ===> License LGPL21 accepted by the user ===> Fetching all distfiles required by scm-5f2_5 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_5 for building ===> Extracting for scm-5f2_5 => 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_5 ===> Applying FreeBSD patches for scm-5f2_5 =========================================================================== =======================<phase: build-depends >============================ ===> scm-5f2_5 depends on executable: gcc6 - not found ===> Installing existing package /packages/All/gcc6-6.4.0_3.txz [head-amd64-default-job-02] Installing gcc6-6.4.0_3... [head-amd64-default-job-02] `-- Installing binutils-2.30_2,1... [head-amd64-default-job-02] | `-- Installing gettext-runtime-0.19.8.1_1... [head-amd64-default-job-02] | | `-- Installing indexinfo-0.3.1... [head-amd64-default-job-02] | | `-- Extracting indexinfo-0.3.1: .... done [head-amd64-default-job-02] | `-- Extracting gettext-runtime-0.19.8.1_1: .......... done [head-amd64-default-job-02] `-- Extracting binutils-2.30_2,1: .......... done <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:8011eab80> . #<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:8011e35e0> (#@exact? #@0+1))) (#@if #@#<id x:8011e35e0> (#@let ((#<id x:8011e2700> (#@not (#@let ((#<id x:8011e1bc0> (#@zero? #@#<id x:8011e35e0>))) (#@if #@#<id x:8011e1bc0> (#@let ((#<id x:8011e1330> (#@negative? #@2+1))) (#@if #@#<id x:8011e1330> #<id x:8011e1330> #f)) #f))))) (#@if #@#<id x:8011e2700> #@#<id x:8011e2700> #f)) #f)) (#@integer-expt #@z1 #@z2) (#<id cond-aux:8011e3c80> ((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:8011eab80> . #<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:8011e35e0> (#@exact? #@0+1))) (#@if #@#<id x:8011e35e0> (#@let ((#<id x:8011e2700> (#@not (#@let ((#<id x:8011e1bc0> (#@zero? #@#<id x:8011e35e0>))) (#@if #@#<id x:8011e1bc0> (#@let ((#<id x:8011e1330> (#@negative? #@2+1))) (#@if #@#<id x:8011e1330> #<id x:8011e1330> #f)) #f))))) (#@if #@#<id x:8011e2700> #@#<id x:8011e2700> #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) (#@if (#@let ((#<id x:8012506f0> (#@real? #@0+1))) (#@if #@#<id x:8012506f0> (#@let ((#<id x:80124fd80> (#@real? #@#<id x:8012506f0>))) (#@if #@#<id x:80124fd80> (#@let ((#<id x:80124f4e0> (#@positive? #@#<id x:8012506f0>))) (#@if #@#<id x:80124f4e0> #<id x:80124f4e0> #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:8011eab80> . #<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:8011e35e0> (#@exact? #@0+1))) (#@if #@#<id x:8011e35e0> (#@let ((#<id x:8011e2700> (#@not (#@let ((#<id x:8011e1bc0> (#@zero? #@#<id x:8011e35e0>))) (#@if #@#<id x:8011e1bc0> (#@let ((#<id x:8011e1330> (#@negative? #@2+1))) (#@if #@#<id x:8011e1330> #<id x:8011e1330> #f)) #f))))) (#@if #@#<id x:8011e2700> #@#<id x:8011e2700> #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) (#@if (#@let ((#<id x:8012506f0> (#@real? #@0+1))) (#@if #@#<id x:8012506f0> (#@let ((#<id x:80124fd80> (#@real? #@#<id x:8012506f0>))) (#@if #@#<id x:80124fd80> (#@let ((#<id x:80124f4e0> (#@positive? #@#<id x:8012506f0>))) (#@if #@#<id x:80124f4e0> #<id x:80124f4e0> #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:8011eab80> . #<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:8011e35e0> (#@exact? #@0+1))) (#@if #@#<id x:8011e35e0> (#@let ((#<id x:8011e2700> (#@not (#@let ((#<id x:8011e1bc0> (#@zero? #@#<id x:8011e35e0>))) (#@if #@#<id x:8011e1bc0> (#@let ((#<id x:8011e1330> (#@negative? #@2+1))) (#@if #@#<id x:8011e1330> #<id x:8011e1330> #f)) #f))))) (#@if #@#<id x:8011e2700> #@#<id x:8011e2700> #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (+ 1 (* z1 z2)) (#@if (#@let ((#<id x:8012506f0> (#@real? #@0+1))) (#@if #@#<id x:8012506f0> (#@let ((#<id x:80124fd80> (#@real? #@#<id x:8012506f0>))) (#@if #@#<id x:80124fd80> (#@let ((#<id x:80124f4e0> (#@positive? #@#<id x:8012506f0>))) (#@if #@#<id x:80124f4e0> #<id x:80124f4e0> #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:8011eab80> . #<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:8011e35e0> (#@exact? #@0+1))) (#@if #@#<id x:8011e35e0> (#@let ((#<id x:8011e2700> (#@not (#@let ((#<id x:8011e1bc0> (#@zero? #@#<id x:8011e35e0>))) (#@if #@#<id x:8011e1bc0> (#@let ((#<id x:8011e1330> (#@negative? #@2+1))) (#@if #@#<id x:8011e1330> #<id x:8011e1330> #f)) #f))))) (#@if #@#<id x:8011e2700> #@#<id x:8011e2700> #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (#@+ 1 (#@* #@z1 #@z2)) (#@if (#@let ((#<id x:8012506f0> (#@real? #@0+1))) (#@if #@#<id x:8012506f0> (#@let ((#<id x:80124fd80> (#@real? #@#<id x:8012506f0>))) (#@if #@#<id x:80124fd80> (#@let ((#<id x:80124f4e0> (#@positive? #@#<id x:8012506f0>))) (#@if #@#<id x:80124f4e0> #<id x:80124f4e0> #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:8011eab80> . #<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:8011e35e0> (#@exact? #@0+1))) (#@if #@#<id x:8011e35e0> (#@let ((#<id x:8011e2700> (#@not (#@let ((#<id x:8011e1bc0> (#@zero? #@#<id x:8011e35e0>))) (#@if #@#<id x:8011e1bc0> (#@let ((#<id x:8011e1330> (#@negative? #@2+1))) (#@if #@#<id x:8011e1330> #<id x:8011e1330> #f)) #f))))) (#@if #@#<id x:8011e2700> #@#<id x:8011e2700> #f)) #f)) (#@integer-expt #@z1 #@z2) (#@if (#@zero? #@z2) (#@+ 1 (#@* #@z1 #@z2)) (#@if (#@let ((#<id x:8012506f0> (#@real? #@0+1))) (#@if #@#<id x:8012506f0> (#@let ((#<id x:80124fd80> (#@real? #@#<id x:8012506f0>))) (#@if #@#<id x:80124fd80> (#@let ((#<id x:80124f4e0> (#@positive? #@#<id x:8012506f0>))) (#@if #@#<id x:80124f4e0> #<id x:80124f4e0> #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:801276d80> (eot) (#<id let*:801277460> ((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:80122fc60> . #<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"
