The time is now Fri, 17 Jul 2026 01:58:26 -0500 (/usr/bin/env PLTUSERHOME=/home/root//user PLT_PKG_BUILD_SERVICE=1 CI=true PLT_INFO_ALLOW_VARS=;PLT_PKG_BUILD_SERVICE PLTCOMPILEDROOTS=/home/root//zo: PLTSTDOUT=debug@pkg info@GC:major /usr/bin/xvfb-run --auto-servernum /bin/sh -c cd "/home/root/"/racket && bin/racket -MCR "/home/root/"/zo: -l- raco pkg install --jobs 1 -u --auto rkt-pythonize) Resolved "rkt-pythonize" via file:///home/root//catalogs/archive/catalog pkg: catalog response: #hash((author . "zhanghao@antigen.top") (checksum . "ff317ea22ad7fbe2b802497854c541434a7c7cbe") (dependencies . (("base") ("nanopass") ("scribble-lib") ("racket-doc") ("rackunit-lib"))) (description . "My scheme2python compiler") (modules . ((lib "rkt-pythonize/passes/define.rkt") (lib "rkt-pythonize/core/assignment.rkt") (lib "rkt-pythonize/passes/cond.rkt") (lib "rkt-pythonize/core/closure.rkt") (lib "rkt-pythonize/passes/quote.rkt") (lib "rkt-pythonize/passes/handler.rkt") (lib "rkt-pythonize/main.rkt") (lib "rkt-pythonize/passes/stream.rkt") (lib "rkt-pythonize/passes/partial-evaluate.rkt") (lib "rkt-pythonize/passes/cps.rkt") (lib "rkt-pythonize/passes/main.rkt") (lib "rkt-pythonize/core/base.rkt") (lib "rkt-pythonize/core/check-uniquification.rkt") (lib "rkt-pythonize/passes/explicit.rkt") (lib "rkt-pythonize/passes/vm.rkt") (lib "rkt-pythonize/passes/chain.rkt") (lib "rkt-pythonize/scribblings/rkt-pythonize.scrbl") (lib "rkt-pythonize/passes/cond-explicit.rkt") (lib "rkt-pythonize/passes/let.rkt") (lib "rkt-pythonize/passes/named-let.rkt") (lib "rkt-pythonize/passes/more-cond.rkt") (lib "rkt-pythonize/core/main.rkt") (lib "rkt-pythonize/passes/L0-uniquify.rkt") (lib "rkt-pythonize/passes/uniquify.rkt"))) (name . "rkt-pythonize") (ring . 2) (source . "file:///home/root/catalogs/archive/pkgs/rkt-pythonize.zip") (tags . ("compiler"))) Resolved "nanopass" via file:///home/root//catalogs/built/catalog pkg: catalog response: #hash((author . "leif@leifandersen.net") (checksum . "009ce6a628bb910a87aa030fdfa5abb152e3de1b") (dependencies . (("base") ("rackunit-lib") ("compatibility-lib") ("unstable-pretty-lib") ("scribble-lib") ("racket-doc"))) (description . "") (modules . ((lib "nanopass/tests/synforms.rkt") (lib "nanopass/tests/test-all.rkt") (lib "nanopass/tests/test-driver.rkt") (lib "nanopass/private/meta-parser.rkt") (lib "nanopass/private/language.rkt") (lib "nanopass/tests/alltests.rkt") (lib "nanopass/main.rkt") (lib "nanopass/private/syntaxconvert.rkt") (lib "nanopass/private/pass-helper.rkt") (lib "nanopass/tests/unit-tests.rkt") (lib "nanopass/private/language-helpers.rkt") (lib "nanopass/private/records.rkt") (lib "nanopass/base.rkt") (lib "nanopass/lang/reader.rkt") (lib "nanopass/tests/compiler-test.rkt") (lib "nanopass/private/nano-syntax-dispatch.rkt") (lib "nanopass/private/parser.rkt") (lib "nanopass/tests/compiler.rkt") (lib "nanopass/private/pass.rkt") (lib "nanopass/private/language-node-counter.rkt") (lib "nanopass/private/helpers.rkt") (lib "nanopass/private/meta-syntax-dispatch.rkt") (lib "nanopass/tests/coresheme-to-javascript-compiler.rkt") (lib "nanopass/private/unparser.rkt") (lib "nanopass/scribblings/nanopass.scrbl") (lib "nanopass/tests/helpers.rkt"))) (name . "nanopass") (ring . 1) (source . "file:///home/root/catalogs/built/pkgs/nanopass.zip") (tags . ("compiler"))) Resolved "unstable-pretty-lib" via file:///home/root//catalogs/built/catalog pkg: catalog response: #hash((author . "cce@racket-lang.org") (checksum . "4c83af2be9bbeb47ba525df1c94ad1c0d8c6a718") (dependencies . (("base"))) (description . "Experimental libraries for pretty printing") (modules . ((lib "unstable/pretty.rkt"))) (name . "unstable-pretty-lib") (ring . 0) (source . "file:///home/root/catalogs/built/pkgs/unstable-pretty-lib.zip") (tags . ("unstable"))) pkg: creating link to # pkg: updating db with "unstable-pretty-lib" to '#s(pkg-info (catalog "unstable-pretty-lib") "4c83af2be9bbeb47ba525df1c94ad1c0d8c6a718" #t) pkg: creating single-collection link to # pkg: updating db with "rkt-pythonize" to '#s((sc-pkg-info pkg-info 3) (catalog "rkt-pythonize") "ff317ea22ad7fbe2b802497854c541434a7c7cbe" #f "rkt-pythonize") pkg: creating single-collection link to # pkg: updating db with "nanopass" to '#s((sc-pkg-info pkg-info 3) (catalog "nanopass") "009ce6a628bb910a87aa030fdfa5abb152e3de1b" #t "nanopass") The following uninstalled packages were listed as dependencies and they were automatically installed: dependencies of rkt-pythonize: nanopass dependencies of nanopass: unstable-pretty-lib raco setup: version: 9.3.0.2 raco setup: platform: x86_64-linux-natipkg [cs] raco setup: target machine: any raco setup: cross-installation: yes raco setup: installation name: 9.3.0.2 raco setup: variants: cs raco setup: main collects: /home/root/racket/collects/ raco setup: collects paths: raco setup: /home/root/user/.local/share/racket/9.3.0.2/collects raco setup: /home/root/racket/collects/ raco setup: main pkgs: /home/root/racket/share/pkgs raco setup: pkgs paths: raco setup: /home/root/racket/share/pkgs raco setup: /home/root//user/.local/share/racket/9.3.0.2/pkgs raco setup: links files: raco setup: /home/root/racket/share/links.rktd raco setup: /home/root//user/.local/share/racket/9.3.0.2/links.rktd raco setup: compiled-file roots: raco setup: /home/root//zo raco setup: same raco setup: --- updating info-domain tables --- [6:59:17] raco setup: updating: /home/root/user/.local/share/racket/9.3.0.2/share/info-cache.rktd raco setup: --- pre-installing collections --- [6:59:17] raco setup: --- installing foreign libraries --- [6:59:17] raco setup: --- installing shared files --- [6:59:17] raco setup: --- compiling collections --- [6:59:17] raco setup: making: /nanopass raco setup: in /nanopass raco setup: in /nanopass/private raco setup: in /unstable-pretty-lib/unstable raco setup: in /nanopass/scribblings raco setup: making: /nanopass/lang raco setup: in /nanopass/lang raco setup: making: /nanopass/private raco setup: making: /nanopass/scribblings raco setup: making: /nanopass/tests raco setup: in /nanopass/tests raco setup: making: /rkt-pythonize raco setup: in /rkt-pythonize raco setup: in /rkt-pythonize/core raco setup: in /rkt-pythonize/passes s-exp->fasl: cannot write value value: # compilation context...: /home/root/user/.local/share/racket/9.3.0.2/pkgs/rkt-pythonize/passes/main.rkt /home/root/user/.local/share/racket/9.3.0.2/pkgs/rkt-pythonize/main.rkt context...: /home/root/racket/collects/compiler/private/cm-minimal.rkt:906:2 /home/root/racket/collects/compiler/private/cm-minimal.rkt:842:6 /home/root/racket/collects/racket/private/more-scheme.rkt:145:2: call-with-break-parameterization /home/root/racket/collects/racket/file.rkt:590:5 /home/root/racket/collects/compiler/private/cm-minimal.rkt:717:0: compile-zo* /home/root/racket/collects/compiler/private/cm-minimal.rkt:647:0: compile-zo*/cross-compile /home/root/racket/collects/compiler/private/cm-minimal.rkt:461:15 /home/root/racket/collects/compiler/private/cm-minimal.rkt:447:12: build /home/root/racket/collects/compiler/private/cm-minimal.rkt:418:0: maybe-compile-zo /home/root/racket/collects/compiler/private/cm-minimal.rkt:221:0: compile-root /home/root/racket/collects/compiler/private/cm-minimal.rkt:150:4: compilation-manager-load-handler /home/root/racket/collects/compiler/private/cm-minimal.rkt:717:0: compile-zo* /home/root/racket/collects/compiler/private/cm-minimal.rkt:647:0: compile-zo*/cross-compile /home/root/racket/collects/compiler/private/cm-minimal.rkt:461:15 /home/root/racket/collects/compiler/private/cm-minimal.rkt:447:12: build /home/root/racket/collects/compiler/private/cm-minimal.rkt:418:0: maybe-compile-zo ... raco setup: making: /rkt-pythonize/core raco setup: making: /rkt-pythonize/passes raco setup: in /rkt-pythonize/passes s-exp->fasl: cannot write value value: # context...: /home/root/racket/collects/compiler/private/cm-minimal.rkt:906:2 /home/root/racket/collects/compiler/private/cm-minimal.rkt:842:6 /home/root/racket/collects/racket/private/more-scheme.rkt:145:2: call-with-break-parameterization /home/root/racket/collects/racket/file.rkt:590:5 /home/root/racket/collects/compiler/private/cm-minimal.rkt:717:0: compile-zo* /home/root/racket/collects/compiler/private/cm-minimal.rkt:647:0: compile-zo*/cross-compile /home/root/racket/collects/compiler/private/cm-minimal.rkt:461:15 /home/root/racket/collects/compiler/private/cm-minimal.rkt:447:12: build /home/root/racket/collects/compiler/private/cm-minimal.rkt:418:0: maybe-compile-zo /home/root/racket/collects/compiler/private/cm-minimal.rkt:221:0: compile-root /home/root/racket/collects/compiler/private/cm-minimal.rkt:109:4 /home/root/racket/collects/compiler/compiler.rkt:179:4: worker /home/root/racket/collects/compiler/compiler.rkt:95:2: compile-directory-visitor /home/root/racket/collects/setup/setup-core.rkt:1137:2: compile-cc /home/root/racket/collects/setup/setup-core.rkt:1228:8 /home/root/racket/collects/setup/setup.rkt:80:3 ... raco setup: making: /rkt-pythonize/scribblings raco setup: making: /unstable-pretty-lib/unstable raco setup: --- creating launchers --- [7:05:23] raco setup: launcher: /home/root/user/.local/share/racket/9.3.0.2/bin/rkt-pythonize raco setup: --- installing man pages --- [7:05:23] raco setup: --- building documentation --- [7:05:23] raco setup: running: /racket-index/scribblings/main/user/family.scrbl raco setup: running: /racket-index/scribblings/main/user/local-redirect.scrbl raco setup: syncing: /nanopass/doc/nanopass raco setup: running: /racket-index/scribblings/main/user/release.scrbl raco setup: running: /rkt-pythonize/scribblings/rkt-pythonize.scrbl -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- ((lambda (mod) ((lambda (none) (vm-apply none '(1))) (get-attribute mod '"print"))) (dynamic-require '"builtins" none)) Compilation: cpu time: 139 real time: 140 gc time: 29 Evaluation: ((lambda (mod) ((lambda (print) '2 (vm-apply print '(1))) (get-attribute mod '"print"))) (dynamic-require '"builtins" none)) Compilation: cpu time: 78 real time: 79 gc time: 0 Evaluation: (let/cc cc ((lambda (mod) ((lambda (print) (vm-apply print '("1")) (cc (vm-apply print '("2"))) (vm-apply print '("3"))) (get-attribute mod '"print"))) (dynamic-require '"builtins" none))) Compilation: cpu time: 77 real time: 77 gc time: 0 Evaluation: (let/cc cc ((lambda (mod) ((lambda (print) (vm-apply print '("1"))) (get-attribute mod '"print"))) (dynamic-require '"builtins" none))) Compilation: cpu time: 45 real time: 45 gc time: 0 Evaluation: (let/cc cc cc) Compilation: cpu time: 16 real time: 16 gc time: 0 Evaluation: 2 Compilation: cpu time: 13 real time: 13 gc time: 0 Evaluation: #f Compilation: cpu time: 40 real time: 40 gc time: 0 Evaluation: "" Compilation: cpu time: 38 real time: 38 gc time: 0 Evaluation: #hasheq() Compilation: cpu time: 12 real time: 12 gc time: 3 Evaluation: '() Compilation: cpu time: 19 real time: 19 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print"))) (vm-apply print '("1")))) Compilation: cpu time: 26 real time: 26 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none)) (box #f)) (let ((print (get-attribute mod "print"))) (letrec ((proc (lambda () (if box (vm-apply print '("-1")) (begin (vm-apply print '("1")) (set! box #t) (proc)))))) (proc)))) Compilation: cpu time: 206 real time: 211 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print"))) (vm-apply print (@ '(("1")) 0)))) Compilation: cpu time: 1192 real time: 1193 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print"))) (vm-apply print (@ '#hasheq((a . (1))) "a")))) Compilation: cpu time: 42 real time: 42 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print")) (l '("1"))) (! l 0 "2") (vm-apply print l))) Compilation: cpu time: 31 real time: 31 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print")) (t '#hasheq((a . (1))))) (! t "a" '(2)) (vm-apply print (@ t "a")))) Compilation: cpu time: 40 real time: 41 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print")) (t '#hasheq((a . (1)))) (l '())) ( mod "print") l))))) (print (begin (begin 1)))) Compilation: cpu time: 98 real time: 100 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (lambda (v) (let ((l '())) ( mod "print") l))))) (print (begin (begin 1 2)))) Compilation: cpu time: 100 real time: 110 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (lambda (v) (let ((l '())) ( mod "print") l))))) (print "1")) Compilation: cpu time: 100 real time: 100 gc time: 1 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (lambda (v) (let ((l '())) ( mod "print") l))))) (=>! mod "a" 2) (print (=> mod "a"))) Compilation: cpu time: 145 real time: 150 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (os (dynamic-require "os" none)) (print (#%vm-procedure (=> mod "print") 1))) (print (=> os "path" "sep"))) Compilation: cpu time: 194 real time: 299 gc time: 1 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") 1))) (print "1")) Compilation: cpu time: 79 real time: 80 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") #f))) (print "1" "2")) Compilation: cpu time: 76 real time: 76 gc time: 2 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") 1))) (print (vm-apply (#%scm-procedure + 2) '(1 2)))) Compilation: cpu time: 53 real time: 53 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") #f))) (vm-apply (#%scm-procedure print #f) '(1 2 3))) Compilation: cpu time: 61 real time: 61 gc time: 0 Evaluation: (error "") Compilation: cpu time: 8 real time: 8 gc time: 0 Evaluation: (raise "") Compilation: cpu time: 12 real time: 12 gc time: 0 Evaluation: (print (error "")) Compilation: cpu time: 15 real time: 17 gc time: 0 Evaluation: (if (raise "") (print "") (print "")) Compilation: cpu time: 53 real time: 53 gc time: 0 Evaluation: ((error "") "") Compilation: cpu time: 25 real time: 32 gc time: 0 Evaluation: (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) (throw "A")) Compilation: cpu time: 117 real time: 122 gc time: 0 Evaluation: (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) (throw 1)) Compilation: cpu time: 98 real time: 102 gc time: 0 Evaluation: (let/cc cc (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) (throw (cc "A")))) Compilation: cpu time: 108 real time: 109 gc time: 1 Evaluation: (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) ((make-procedure (lambda (s) (print (throw (@ s 0))))) "A")) Compilation: cpu time: 189 real time: 240 gc time: 0 Evaluation: (let/cc cc (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) ((make-procedure (lambda (s) (throw (cc (@ s 0))))) "A"))) Compilation: cpu time: 109 real time: 110 gc time: 1 Evaluation: (with-handler print (vm-apply (#%scm-procedure (lambda () (throw 1)) 0) '())) Compilation: cpu time: 61 real time: 62 gc time: 0 Evaluation: (with-handler (lambda (v) (print (+ v 1))) (vm-apply (#%scm-procedure (lambda () (throw 1)) 0) '())) Compilation: cpu time: 78 real time: 106 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") 1)) (stream-for-each (lambda (p s) (if (equal? s none) -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- none (begin (p (stream-car s)) (stream-for-each p (stream-cdr s)))))) (numbers '(1 2 3 4 5 6)) (number-stream (let loop ((i 0)) (if (equal? i (length numbers)) none (stream-cons (@ numbers i) (loop (+ i 1))))))) (stream-for-each print number-stream) (stream-for-each print number-stream)) Compilation: cpu time: 582 real time: 686 gc time: 8 Evaluation: (letrec ((print (#%vm-procedure (=> (dynamic-require "builtins" none) "print") 1))) (cond (else (print 1))) (cond (1 (print 1)) (else (print 2))) (cond (#f (print 1)) (else (print 2))) (cond (1 (print 1) (print 2)) (else none))) Compilation: cpu time: 106 real time: 124 gc time: 0 Evaluation: (begin (print (+ 1 2)) (print (/ 1 2.0)) (print (/ 1 2)) (print (quotient 1 2.0)) (print (modulo 1 2.0)) (print (negate 1.0)) (print (eq? none 'none)) (print (eq? 'none 'none)) (print (eq? "a" "a")) (print (eq? 1 1.0)) (print (eq? '(1) '(1))) (print (eq? '#hasheq() '#hasheq())) (print (equal? 1 1.0)) (print (equal? '(1) '(1))) (print (equal? '(1) '(1 2))) (print (equal? '#hasheq((x . 1)) '#hasheq((x . 1)))) (print (equal? '#hasheq((x . 1)) '#hasheq((x . 1) (y . 2)))) (print (equal? '(1) '#hasheq((x . 1)))) (print (> 3 2)) (print (> 2 2)) (print (< 1 2)) (print (>= 3 3)) (print (>= 2 3)) (print (<= 1 1)) (print (<= 3 2)) (print (if 1 1 2)) (print (if + 2 1)) (print (if #f 2 3)) (print (if (lambda (x) x) 4 5)) (apply print '("1")) (print (is-a? 1 object-type)) (print (not dynamic-require)) (print (not #t)) (print (not #f)) (print (not 'none)) (print (not 0)) (print (not (lambda (x) x)))) Compilation: cpu time: 453 real time: 508 gc time: 5 Evaluation: (begin (print (+ 1 2)) (print (/ 1 2.0)) (print (/ 1 2)) (print (quotient 1 2.0)) (print (modulo 1 2.0)) (print (negate 1.0)) (print (eq? none 'none)) (print (eq? 'none 'none)) (print (eq? "a" "a")) (print (eq? 1 1.0)) (print (eq? '(1) '(1))) (print (eq? '#hasheq() '#hasheq())) (print (equal? 1 1.0)) (print (equal? '(1) '(1))) (print (equal? '(1) '(1 2))) (print (equal? '#hasheq((x . 1)) '#hasheq((x . 1)))) (print (equal? '#hasheq((x . 1)) '#hasheq((x . 1) (y . 2)))) (print (equal? '(1) '#hasheq((x . 1)))) (print (> 3 2)) (print (> 2 2)) (print (< 1 2)) (print (>= 3 3)) (print (>= 2 3)) (print (<= 1 1)) (print (<= 3 2)) (print (if 1 1 2)) (print (if + 2 1)) (print (if #f 2 3)) (print (if (lambda (x) x) 4 5)) (apply print '("1")) (print (is-a? 1 object-type)) (print (not dynamic-require)) (print (not #t)) (print (not #f)) (print (not 'none)) (print (not 0)) (print (not (lambda (x) x)))) Compilation: cpu time: 1373 real time: 1698 gc time: 243 Evaluation: (print (is-a? '() null-type)) Compilation: cpu time: 117 real time: 144 gc time: 0 Evaluation: (print (is-a? null null-type)) Compilation: cpu time: 18 real time: 30 gc time: 0 Evaluation: (print (is-a? '(1) pair-type)) Compilation: cpu time: 15 real time: 23 gc time: 0 Evaluation: (print (is-a? (cons 1 null) pair-type)) Compilation: cpu time: 33 real time: 52 gc time: 0 Evaluation: (letrec ((array-list->linked-list (lambda (al) (let ((len (length al))) (let loop ((i 0)) (if (equal? i len) null (cons (@ al i) (loop (+ i 1)))))))) (append (lambda (l1 l2) (if (eq? l1 null) l2 (cons (car l1) (append (cdr l1) l2))))) (partition (lambda (n l p) (if (eq? l null) (cons null (cons null null)) (let ((first (car l)) (sl (partition n (cdr l) p))) (if (p first n) (cons (cons first (@ sl 0)) (cons (@ sl 1) null)) (cons (@ sl 0) (cons (cons first (@ sl 1)) null))))))) (sort (lambda (l) (if (eq? l null) l (let ((first (car l)) (rest (cdr l))) (let ((pl (partition first rest <))) -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- (append (sort (@ pl 0)) (cons first (sort (@ pl 1)))))))))) (print (sort (array-list->linked-list '(8419 9565 5036 6888 5270 4038 6343 6075 4174 5165 5041 8833 3165 4130 5873 3189 25 7381 7611 4745 9134 8310 854 5967 108 4260 8948 2272 6088 2055 3446 7553 5777 4738 9038 1062 123 9758 35 8929))))) Compilation: cpu time: 534 real time: 661 gc time: 3 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") 1))) (print (>= 3 2)) (print (>= 2 2)) (print (>= 1 2)) (print (<= 1 2)) (print (<= 2 2)) (print (<= 3 2))) Compilation: cpu time: 135 real time: 143 gc time: 0 Evaluation: (letrec ((array-list->linked-list (lambda (al) (let ((len (length al))) (let loop ((i 0)) (if (equal? i len) null (cons (@ al i) (loop (+ i 1)))))))) (append (lambda (l1 l2) (if (eq? l1 null) l2 (cons (car l1) (append (cdr l1) l2))))) (partition (lambda (n l p) (if (eq? l null) (cons null (cons null null)) (let ((first (car l)) (sl (partition n (cdr l) p))) (if (p first n) (cons (cons first (@ sl 0)) (cons (@ sl 1) null)) (cons (@ sl 0) (cons (cons first (@ sl 1)) null))))))) (sort (lambda (l) (if (eq? l null) l (let ((first (car l)) (rest (cdr l))) (let ((pl (partition first rest <))) (append (sort (@ pl 0)) (cons first (sort (@ pl 1)))))))))) (print (sort (array-list->linked-list '(2386 1105 5352 9820 760 1389 5800 5269 4777 2379 7760 1180 1576 130 1918 6123 4774 3880 1674 2238 2745 590 5449 4961 7870 3279 6006 1953 6244 8625 6804 1127 1217 6297 342 6913 7995 7722 388 7681 8375 9580 8715 7110 7593 8375 8772 2526 3661 6963 1717 3921 1586 5642 4570 7868 3881 8630 142 9458 2830 9952 4246 7950 6142 2007 1767 2382 2275 1338 2480 117 1739 7958 5445 8933 6939 4572 5527 3987 5416 3379 5945 9665 985 4446 3237 9208 9623 7562 3312 5083 7304 1915 1331 6617 2303 7266 7658 991 5162 1291 4552 602 3331 5288 7193 2543 771 2733 2141 2328 8184 9036 4382 5335 1074 9915 678 5925 1092 8679 6416 9816 1056 3584 4663 875 519 5446 8473 7657 7747 2720 3662 8519 4077 2512 3351 8272 1730 5692 4305 9402 3729 9172 8489 8381 2099 8483 6129 2374 9058 7620 5602 3877 9995 7942 6898 8612 7313 2528 7545 5323 3550 7491 8153 9603 4151 251 8397 6644 1378 7906 9409 1578 9993 6661 6678 831 941 2580 7679 3461 3215 2861 1114 4532 4298 9660 1564 2932 7524 740 1829 9267 5365 5285 28 7775 1748 4013 531 3035 1090 279 4911 4294 9779 3748 1719 6972 2023 8925 4420 8180 8447 5191 8599 8282 8920 8087 6039 6754 946 7130 4277 4710 3131 7475 6715 1028 3869 2594 2724 6338 283 8879 5119 5923 8419 5208 4881 2467 5076 9606 2555 7859 5766 7362 7926 3188 9367 4459 3328 9084 6625 9444 8349 3723 9882 3008 1237 4952 9028 9542 193 8409 2082 6952 278 4920 8483 9456 7703 6993 6474 7518 6691 6150 9869 1205 7964 3257 1166 5562 4127 2840 3213 1071 8045 2726 8315 1480 6442 6044 5513 2004 2824 6454 7726 1750 4021 646 5428 215 2112 7504 95 3130 1973 6337 825 5171 2377 7253 3036 7833 9249 7667 6345 384 1327 8357 5745 4750 4287 3169 3868 9246 3560 9588 6526 4942 6489 6890 2609 4821 7708 280 8908 2830 825 8452 2844 214 5528 6891 8108 6234 8501 4504 4037 8347 4797 6259 8555 2204 992 785 6584 7637 4787 199 7972 5649 6599 4646 7680 3721 9883 7488 2309 7768 4260 4484 5016 7736 6070 9524 9628 8308 4874 4043 3130 5290 2810 6951 9364 229 3783 7641 7162 7088 5800 8500 3894 9635 3369 9371 377 6809 5031 3219 3990 6489 1968 6018 9991 8428 3936 4398 9028 4616 4530 1543 7190 430 7599 3390 405 3664 2722 2469 630 8074 210 1324 4636 1510 6565 3121 5219 2658 9657 8466 5975 2828 7771 4251 5107 1741 5409 3630 3213 5604 9799 5759 9071 9944 5701 893 4091 9313 4484 3601 1471 5375 6400 8551 7789 1314 4525 4065 3607 148 4604 2426 7310 7083 3692 2778 7919 8649 6361 848 716 3325 8726 5370 460 4086 127 3861 1720 8932 9243 4735 6882 7492 8716 6403 8505 15 5583 614 6642 942 942 1892 9435 2488 7440 3300 9527 1683 8114 5580 1960 1923 9395 1583 7720 4236 7822 1262 5567 4467 8113 8231 7635 7893 4754 9161 5699 2813 4171 9821 5642 7723 840 535 5366 2211 5025 495 7066 2645 1291 6212 2775 6775 2727 6774 9642 4748 4089 4931 6978 9485 6398 2881 4184 6805 2812 1630 3026 9181 7599 8956 2824 5197 6595 9817 7882 8969 6935 4175 9239 5883 5104 4469 9134 1904 2141 8193 5725 5731 7110 1650 7833 1402 9839 3174 6104 430 2533 2544 3587 7213 5168 4029 7901 4213 7085 7408 2793 1208 9770 1556 9783 5294 9163 3089 1917 3971 9721 1505 1659 2403 2695 5416 4981 2154 9978 1997 6516 7910 3492 319 9477 1319 9504 6774 2614 1878 356 4543 843 8229 4805 6264 4088 4122 8763 2840 7028 1713 2289 8627 2319 1013 8723 7827 691 6959 91 6048 8565 9655 6696 177 8630 2128 1692 1771 4980 4578 445 5816 3734 1608 2750 5026 2353 6226 1449 5147 4692 5246 3562 4230 629 1848 6383 9481 7222 9057 9105 1540 105 1762 4188 9130 8823 8028 4244 7724 2274 4465 9872 4688 235 3425 7661 8382 2849 1311 6474 6492 9301 4792 3118 559 467 2484 1556 883 862 7894 3578 8832 8567 2189 7950 396 6347 5011 4301 9147 2059 3967 6018 6024 5655 4325 1446 2187 8647 8611 8081 322 7613 3702 1045 2380 1152 5234 8513 5409 5033 9009 6690 7566 5252 8068 2259 531 1057 1181 7926 3952 4533 6665 1515 3685 2449 2165 3453 8268 5439 8627 3816 7132 5688 4535 1536 6089 9212 100 351 2416 6364 1895 1823 6520 7245 8222 2318 5992 8346 858 4648 3990 1972 2493 3161 9251 1447 6253 4716 136 6788 4454 2293 5090 6982 6769 3405 2177 5119 2431 3524 1874 9460 16 6938 3327 7427 1651 3500 2383 3033 2996 6977 4413 4747 2197 8815 1617 5236 4519 8444 6760 4807 1627 3064 7292 2549 663 1918 8804 3005 7162 3225 5258 4437 9652 2306 2991 9367 1249 9082 1169 3031 3498 2542 704 5509 1894 2685 2102 3371 1759 4511 5515 8166 9075 4347 5792 21 3321 8631 325 8932 1535 2761 5465 4085 8804 8249 9325 6955 7958 3828 5224 5289 1616 6617 1783 7172 8533 8163 3497 7714 5687 3596 6749 4205 2706 569 368 1800 2827 147 8624 5946 7064 895 576 9163 3323 7978 1212 6631 2065 4734 6516 4848 7854 6497 370 6807 6360 5620 1798 3962 9588 6432 5250 314 794 1197 1028 4687 7166 7740 3992 9117 1554 3091 9196 2878 7136 2958 2366 6312 4622 7391 9013 3815 8555 9294 6314 7335 504 4811 5156 4336 6319 9793 2011 96 9721 2510 1966 9842 7194 4637 349 946 3469 502 2802 4509 6305 2687 5520 7483 4983 8108 2858 5853 1653 5745 4176 6080 7694 6948 2448 2314 9668 2174 2401 2147 1519 2796 9900 9901 6450 3192 6851 7088 4635 7749 1964 5919 2317 9181 9826 8251 5785 3654 8343 3123 6904 1549 834 5337 2146 7194 673 2405 1548 8642 739 1568 4917 9934 3234 6930 9336 7021 9806 6664 4608 1432 5503 4286 4639 8777 4666 4958 1427 5910 3842 1280 238 4778 517 2522 3748 9305 5576 4896 6457 7372 6651 5861 1413 7538 5547 8181 1404 8636 5275 8318 9840 4968 1598 8506 7401 4066 6228 8094 8470 1520 9925 5854 7068 9408 3378 149 2590 1668 7903 4368 2846 6308 1151 8081 8298 3326 6888 1284 5505 1544 5688 4391 758 3364 7975 6525 3783 5417 704 5471 5973 3711 6610 5961 422 8069 6246 5095 9931 2559 2481 3521 3652 7645 9743 5067 2017 66 3718 5913 8275 4271 7301 5877 821 7904 4789 9746 5509 9482 8807 3695 4874 2620 481 7716 5487 6448 4623 5938 1117 4943 8369 9489 3424 3469 5516 7957 9755 2400 2965 4464 7532 8535 3042 4049 6610 5244 6763 9522 8060 932 1554 6794 9567 4214 4467 4478 4848 1645 5876 7266 3370 4604 1958 409 7326 4595 8833 6977 8689 5493 8637 8247 2984 6393 8975 2730 3228 5643 6906 8258 8411 7457 7766 3335 3962 8267 7077 5154 8171 705 6042 8512 8068 9043 2248 4516 9864 8045 6321 8573 1165 9234 477 8435 8477 1765 6673 2524 9798 863 8513 3682 1070 3885 4026 372 3428 584 1639 9166 6998 3197 2897 577 1338 4789 9853 2452 4869 7110 68 9272 6606 77 5593 588 1167 8294 6384 6344 4281 5278 8581 1908 2444 1799 4155 9957 9884 3062 9442 5355 6896 9806 6734 9744 9475 6167 6280 7163 1187 4299 5021 6784 1816 9229 9949 8297 8589 510 2878 9475 494 6031 5441 2076 8070 2207 7316 1688 5540 6395 3688 3565 5208 629 9690 3995 4218 4187 5130 118 4323 6900 4505 2957 9376 6984 3970 1308 6696 3977 1507 8503 3817 7120 5147 8601 8858 7089 6186 19 9397 8658 7410 4260 9838 4651 3290 3520 7623 1202 7096 628 9931 5218 3808 3034 8470 2807 8807 6552 6116 9193 7486 2465 4429 9922 2419 7797 2483 6577 2450 4589 1578 8752 2825 4628 8460 5353 5895 3483 906 6784 4604 6397 7240 3592 9823 3411 5211 585 1183 4055 2723 4646 4914 1795 7599 6785 2483 3140 1254 1099 6729 6589 1024 2080 2327 2268 4100 102 7940 511 9585 370 979 9520 8492 3172 5851 5088 5856 1070 4600 132 2398 2302 2300 7484 6208 9229 62 1346 7093 3411 2738 3105 1212 5307 2902 5380 932 6703 29 4593 4819 6601 2323 9445 9558 9491 8220 2575 9793 591 3516 2708 2599 3075 6911 769 3415 2062 5837 3624 9643 1822 7457 432 8747 5049 9804 6226 474 9270 6968 4265 9759 8164 6657 7121 2934 9299 3799 6891 1166 2217 4845 5522 7850 7494 4013 5849 3149 2180 6928 3071 6808 3940 5977 5684 9225 6858 4876 7217 5593 7392 1709 4647 8457 5640 5005 6104 2521 173 1612 8260 4326 5126 7158 2069 5650 2372 8008 5005 9243 8911 3808 8336 2870 1740 4288 8827 7742 5026 1867 1759 470 1768 7811 8150 8682 1898 5370 3116 767 629 9112 9910 9318 2607 4205 1216 7972 1661 5377 4215 9832 8619 9132 8203 4013 3351 8316 2166 1154 9143 4858 9704 9678 8709 9278 8396 4115 3280 6494 3967 8137 8159 6026 8355 10 7834 7043 3215 3968 2644 9937 3932 9550 2983 394 3124 5078 5977 249 1933 2975 4660 6475 8274 8834 4397 7582 5840 7357 9196 4353 8246 5867 1319 9848 6424 2326 5479 7954 9381 8481 2184 5561 1790 6512 7595 2920 5942 8008 4367 2688 9561 1996 2594 2947 7149 4925 7950 7354 6950 5278 1281 5813 672 7311 3281 2482 9926 2851 7792 8545 6535 9446 4530 4311 3575 4732 3061 4595 5773 8484 3999 7566 4271 8104 6138 9015 9177 9586 8085 3847 2167 9027 3937 926 396 3184 3339 9347 5528 5767 3538 528 8594 2303 5485 7038 8014 8149 5029 200 5533 5699 1206 5275 3558 8759 2843 7678 8721 8313 9751 3051 7608 1443 1420 5947 8374 4724 19 2812 5296 5644 3616 9276 6944 6301 5082 9415 9716 7896 4498 5074 5791 9278 6293 1500 2170 2553 489 8827 3890 572 7233 1805 9932 7089 7896 8839 5184 8019 7461 9814 9311 2513 988 9874 4038 3802 554 2912 6362 7554 6267 3756 2914 9290 9549 2642 9297 7012 4762 5591 4498 9510 8412 8175 530 6971 7454 5104 4106 4489 5264 3360 9 1889 18 5191 9120 4469 1399 643 1947 7345 839 219 9645 1018 2442 1840 1396 6238 5631 9472 4376 20 2302 4174 2599 5996 7698 6717 1446 5148 4678 1276 7952 5109 7044 5593 2543 8204 4422 835 3230 2227 4441 6211 4152 7172 8368 7958 6458 1299 9395 1910 7306 5845 126 6361 4736 3210 4406 2126 5858 8293 1490 941 1009 2301 7224 3916 794 1323 3789 3717 4946 8796 4826 7618 3605 5897 217 3603 299 8650 7026 6921 8139 102 9068 7410 4128 9632 7081 6313 2489 9022 645 9830 4007 3069 5680 2539 2301 9385 9671 5929 239 6975 7625 325 4845 8112 6056 3842 3054 7938 9584 2736 9499 8333 5534 375 8327 1192 3424 8713 7989 8614 3811 7160 1303 5462 8784 5798 927 8939 3166 2861 3525 9346 7585 8065 2873 3944 4256 2049 5078 8292 5044 8619 4248 734 1293 6408 4830 1048 3392 8742 1266 42 1992 2068 6323 742 2859 3171 3395 2996 5188 9268 3488 8137 8126 5620 2382 8603 4972 2876 3920 2857 8226 5400 5755 5804 7927 1270 26 4810 7802 8927 3581 2503 4016 5067 4239 8321 9515 7158 6651 1386 2601 6359 4044 1242 9407 2592 3424 5556 5546 3400 6262 8011 3795 2485 1381 2929 9593 7210 7925 4716 1704 5227 9614 8403 7811 6440 3724 8646 9320 3059 2618 9792 815 4680 899 1958 2125 6407 592 5065 3459 2438 8096 4398 9223 8423 9083 705 9433 1891 8494 9109 5574 2021 1314 421 3333 1376 4419 4568 6782 2168 9551 2308 1039 7386 342 554 1867 1542 7120 9507 9238 7643 6805 5297 1840 5327 7585 7872 5678 9115 2684 2939 7894 8326 1251 6827 9226 8686 1472 5533 2937 8859 9386 9922 5331 7469 8971 1776 203 4867 7392 5733 1626 2759 3949 9312 6719 7090 963 2777 2320 4280 7375 4063 3269 6236 2541 5796 529 4142 1716 8019 8826 9189 6429 5193 2682 4363 9611 284 5225 4575 8651 2748 8010 2004 2609 8532 9864 7582 7317 6617 1627 5230 9322 2084 2425 2160 8619 263 7730 6712 2681 5219 8277 6454 1905 4810 4330 4141 2105 319 1203 4085 3600 8068 4332 8578 7922 6074 7478 7369 1864 6339 874 8982 6508 9141 2013 9983 4243 3519 5277 9271 7519 6614 8142 4600 6297 4551 1058 1564 8456 1086 6300 5547 5594 5580 8411 4138 738 6500 2272 5998 4145 5537 2136 9282 8326 2009 534 4352 1984 3167 1353 3622 4933 3721 3714 6718 3680 232 5856 2510 2458 3087 1661 3361 3219 2855 3629 7420 335 1197 8049 7496 5538 4810 3755 8070 2858 2480 3666 2283 6227 3970 3828 2218 97 3091 285 6821 6696 1147 670 4567 7099 2769 9069 919 6641 1618 4851 4175 1092 948 7888 6286 3764 1917 7800 2613 1682 2520 9950 126 2315 8687 5863 1442 2106 3443 613 4103 2267 1986 1382 6903 6724 2750 5665 8731 2091 4969 4625 7608 2355 2966 3993 6007 8159 6266 160 1192 6636 9301 8333 7167 9684 2594 6851 194 7181 676 4663 1735 8939 6347 5018 185 7287 2097 9849 2521 8783 144 1402 4985 7618 8080 4093 3772 4819 5843 1894 9471 7197 3453 4191 3291 7690 901 3776 2792 3767 6979 6480 8236 1885 9651 2371 8835 80 9714 6652 4918 8192 5140 4203 7265 5700 8872 7248 8483 9997 6216 2579 296 6672 2049 8314 8646 9843 9675 1935 1838 1653 3830 6938 1981 5716 4120 7802 3039 6800 1378 1607 6175 9639 9048 7470 6338 7253 8263 7203 2510 2984 8770 2970 5104 6025 5882 2221 3362 6956 6245 6654 4954 1423 8613 3777 6637 2535 3342 7048 641 8392 1913 6250 9490 8264 9279 414 7342 2809 4324 5221 3672 9846 6890 2193 4393 8235 9193 3592 7700 1464 6375 2138 6282 1413 2312 1459 974 5782 2702 6283 9363 2167 3611 4875 1128 2351 5432 8852 1385 9375 58 4442 1999 1527 1445 4785 7725 3977 6881 891 994 6110 9066 2409 5139 778 9011 7822 4682 7327 694 3610 323 761 6976 5042 6853 8797 177 2160 1775 4119 4157 5998 8336 4000 4786 8222 1649 6874 4896 3478 5475 475 8741 444 9882 6235 505 2703 8127 3585 2043 8846 8138 4874 1734 3925 2798 8966 1753 8258 5981 3844 7635 379 3929 8730 611 1040 705 9105 9418 3579 2232 7482 8606 6802 1978 841 2801 7811 8304 1017 3629 3689 6362 7530 5351 1478 3682 7212 9887 6830 6753 1715 3105 47 187 5926 4848 8263 1774 8546 404 91 787 6985 2938 3482 2457 3007 1369 3054 7153 2738 9928 3085 8181 3912 8892 2797 7536 8082 2397 9909 8548 3464 6712 8498 6790 3957 3581 1918 6837 5804 3094 6025 9029 5243 130 2173 5268 526 768 6762 6756 3475 3163 5236 1031 6068 2719 333 4675 967 9025 45 8280 6787 260 6711 3790 7172 3474 8380 97 8775 7973 8037 9074 7224 5919 5870 2253 4533 8967 3255 3237 7243 2625 2948 5411 1794 614 8496 6937 2982 5821 4300 9616 8784 3534 4280 1581 5842 1973 3267 7601 9010 9823 7630 2869 5578 6194 7947 9752 2436 5872 662 9474 3006 1395 8785 8254 779 118 464 2081 8360 997 9081 1875 6580 1575 1994 8423 6112 4238 1964 9714 8416 8589 5119 3397 3436 2415 3300 8049 7889 6268 9156 1002 7302 1203 6880 3128 8755 6445 858 1082 9350 4038 8813 2958 9972 607 2094 9890 2802 6873 7293 8951 4049 2135 966 7305 7360 9915 4177 2252 8578 3395 6453 7558 7865 1473 936 6251 5490 6391 4451 906 9873 4857 4944 1056 6479 1816 768 7615 6047 2929 3436 4683 1633 2238 4869 6568 7677 2296 1851 3033 2244 5893 7160 3315 8739 9242 9269 1715 9839 2288 8542 5046 1178 154 1742 8456 3567 2194 9695 7204 887 4468 4509 1627 5363 2782 1720 6600 7211 5202 3320 3462 1083 6856 8268 5890 8996 5827 7806 8617 7823 3757 2582 3197 7043 3932 5253 2091 4989 767 4550 3760 3050 3896 518 3649 5757 2573 6955 1346 4324 909 9420 4703 5011 9808 4029 4191 7244 6812 8946 291 3573 2111 3895 6992 5957 7885 2686 1764 882 1059 3790 1221 2905 3629 4927 6129 8095 8790 269 184 8587 7780 3775 9504 7059 3830 2417 4203 949 52 8371 6909 506 1178 2794 1380 5260 6811 2089 2040 2147 3743 2388 1823 1323 956 1847 8354 4207 5845 1906 1132 3397 3434 4463 7328 3543 1578 6747 8560 4279 4562 4533 7936 8900 2961 1815 4997 3951 2952 6259 6128 7487 7585 9663 1604 4086 8389 9762 6286 5547 9940 5018 4312 3912 1446 5884 60 4467 4381 8876 3239 7600 594 4001 426 8944 4398 9731 8604 9786 4823 7122 6983 6481 9130 5419 503 2615 5157 4758 2188 61 3546 3993 7210 1101 8056 3618 4138 3230 6370 2938 8631 5614 2598 2972 6378 6214 5943 6463 6461 7556 6278 5578 4139 30 1635 2376 178 4942 6550 7782 3429 7865 4180 4707 4465 9471 636 4448 8944 91 3802 9149 4222 9471 6275 9085 2020 6533 9732 7995 9210 3538 6362 8754 5419 4538 7851 1728 4345 7031 3279 8615 5888 1127 6441 2647 3162 5322 3992 2515 4663 9539 7180 3709 5585 7643 850 5030 1571 5260 6653 2229 3699 603 4427 3999 2937 5255 8122 3669 1808 4448 1243 7152 6640 7809 5661 5659 8263 6187 7898 1669 4536 6793 6523 829 7705 6490 6581 4520 6527 8774 2067 9606 5244 6242 6711 5757 9677 7088 9214 3338 5367 3252 6348 3423 7428 9776 2264 7641 2941 6540 4972 6782 9284 9911 6146 2650 123 9241 1187 1954 8322 4331 7623 2617 9978 4209 3697 1927 9888 7386 2831 7101 6968 2785 2332 208 4325 6297 3672 3231 3511 3265 8192 9201 2368 3301 3443 4866 8959 3543 7952 9716 4494 2048 6702 1537 5379 4988 6338 4523 5581 8488 8993 5616 4282 1269 867 1752 4556 628 6981 6985 4732 7162 5922 1317 495 8361 9765 2084 4072 1652 3539 1115 2585 6903 9631 59 4515 8920 1588 5641 6003 2827 9262 5012 5019 914 2892 3360 4687 4405 9873 6499 2721 4203 3731 2597 7482 8144 6721 6255 3221 365 6599 8050 8105 7884 6374 610 8778 1319 894 124 3264 6110 5153 2779 5398 3087 6025 2288 8053 4650 3481 1289 5679 5652 7202 3978 1858 9726 4780 5634 2774 220 4213 7128 3119 1113 7016 7582 1262 911 3533 7688 7447 5808 4278 1549 4833 2952 4517 8912 1416 8909 5505 6865 990 5478 4043 5648 9101 4377 2740 3206 985 3099 9378 9581 8774 7309 2979 5687 3226 5795 2633 9134 5950 3970 2835 1374 3329 242 4590 5505 4649 5068 3625 2344 6077 9647 6267 8227 9324 8910 9286 1839 7130 9110 6935 5725 8878 6577 4144 9889 5435 556 4430 9179 6358 1442 6878 3375 8522 7780 4057 7850 9963 2047 8990 186 3852 3483 6228 6201 3733 1740 3439 465 2904 9933 7602 949 9776 4137 8238 4954 406 1137 6832 2792 1413 9262 4423 3150 3725 4558 2177 1971 1636 1494 3795 8615 4566 7505 5296 3407 9479 397 2138 5094 636 3538 177 8162 3227 7206 2329 9144 1102 6497 1989 6090 7205 4527 9889 7950 6198 7548 1261 2149 6496 8241 4913 7703 2235 2506 2510 8875 812 7019 5685 4639 5026 8270 382 9449 6392 9705 292 8355 646 4159 976 192 3411 6630 3394 5232 2796 382 1707 2661 4627 3207 3855 3037 6374 1781 3859 3081 7761 7840 3556 4482 5448 2435 4938 9842 1063 9591 5181 4483 3339 737 2663 8794 4961 4175 3335 6080 7950 1944 5554 5273 3135 7216 7444 3487 6368 6514 8336 1584 2615 3119 5893 6163 8510 4615 6695 8953 6060 8690 6033 5364 3534 9798 7662 160 2733 8134 5105 4534 6928 3528 6720 8688 6166 2489 8776 7287 998 619 3835 5864 1568 3785 7830 7441 6880 7992 6074 743 7505 1824 4460 733 313 3209 1667 3477 7986 4142 5125 6954 3661 8739 6243 5846 6159 4199 6556 4572 3834 8083 3727 9073 5649 7039 2527 6140 2664 8661 9293 8352 1299 7388 1164 5600 8341 2478 4109 3018 1500 3404 3534 7810 7165 308 4892 4565 7142 3169 91 521 5695 5220 5359 5627 7301 439 4572 7602 4019 1274 8142 8257 6893 8723 1454 5794 7469 3901 9005 7486 6499 8672 9635 4424 7986 2804 7890 6060 6339 8968 4946 6929 8237 1025 3747 6205 2463 3964 7814 9183 5322 8106 7480 3981 725 7357 8594 9776 9814 3545 3815 8713 1985 710 9917 3106 1259 9044 6452 7012 7941 9778 6035 4412 2367 1627 6314 7612 5030 981 4946 9393 6816 9608 7988 9370 2255 3730 5196 8708 9281 920 6937 9910 5325 3312 304 5698 8820 7011 7344 7939 2769 1038 1675 2323 2531 4356 8796 3799 9776 5087 6490 3816 8836 9715 9512 871 400 2533 4356 2818 5152 8694 1107 3025 3486 8950 234 2763 9734 4257 8848 3025 9044 5004 8625 5004 664 8042 3114 6691 1752 1869 3179 2658 3432 5349 269 84 4966 7440 393 9768 4617 9898 9371 3173 9943 3125 6523 2943 2923 8125 7669 9350 9497 6606 9998 6956 714 2244 802 5831 179 1929 5165 6136 326 6783 9937 71 2833 9360 2479 3734 8759 2008 3725 6408 1077 8644 9780 2000 1908 5689 9117 8136 2900 9511 3644 2552 5808 7366 9348 6454 4684 8943 2593 7493 6332 21 6444 8953 4258 9618 8408 2835 8244 8224 566 9647 3680 1671 963 6212 1329 1325 1044 4674 9451 6183 5915 4152 6191 2300 7159 4579 2140 821 2982 891 7650 4647 5334 8526 7518 6969 7679 6291 8303 9852 3060 6258 9145 8082 3401 5024 7824 1688 1143 1236 5350 2098 9729 2933 1501 8383 3205 7574 8854 1154 299 2819 7382 651 8218 6952 3210 7927 9812 1168 4039 8687 98 6697 2019 1775 2493 3241 4626 393 9068 7369 7750 486 1417 8125 3461 7583 9773 8418 1160 5505 204 8506 3576 3426 4747 1218 1486 8795 1523 3650 4279 3449 223 8779 4024 4023 4718 4874 8676 5344 9185 7204 3667 8187 4362 8422 8381 8899 7402 3298 2663 1854 9398 8729 4710 3298 1041 8908 9694 6928 621 5609 7306 6268 365 1976 9976 4813 5326 3534 7340 8763 5762 8408 7961 2742 9512 653 408 620 575 8744 7058 9095 684 4617 7264 8095 1099 2530 7853 3681 3573 2113 5024 727 3157 2309 5411 9245 2720 2017 8370 2286 1372 9737 2738 6951 7542 7036 4693 3553 3415 2494 8903 2046 2192 9904 7759 3092 8449 1028 2613 7356 8008 9669 9392 4279 5750 9364 6247 2905 9644 6178 6814 4619 2932 497 4301 4915 2588 8386 3831 3416 1607 6480 1998 5996 8072 6066 8918 7861 3534 9903 6773 4309 1235 6756 6807 9702 6371 8014 3352 786 7426 9920 5135 2221 4071 4123 4425 7003 8003 8217 5831 1444 6195 3844 8990 6842 4593 5017 1120 8862 3410 6367 4693 7678 5322 510 7854 5446 6073 9762 1845 3933 7281 7390 5376 1102 8251 221 2241 3029 1606 9969 1877 1576 3430 4857 2666 1623 2674 233 169 3041 2427 9415 8381 3297 284 4449 2145 9313 4697 9415 4174 5008 440 1452 827 8237 4730 3459 9229 5349 8085 4139 5653 5180 2607 4435 2436 5177 6819 8690 5725 4366 8329 2833 108 943 9086 3354 1998 9861 7337 2019 9996 9407 9819 9330 5753 2144 8438 9167 1203 1101 5164 6301 6706 8455 3738 6800 5700 7709 6791 2192 2856 6151 9255 8806 7289 628 2774 1106 5556 5471 1184 1615 3293 594 3212 7344 7391 2532 2022 1745 3675 4613 616 1494 6130 4241 6277 4755 359 4443 5072 4036 9182 5300 559 9556 1570 7782 9290 8954 7849 2279 5830 6336 8789 5161 1186 9380 7513 6308 2696 4284 8789 3891 3020 6741 7404 5087 7156 443 7792 1807 572 925 78 4538 4266 9933 312 6625 7350 9109 1966 7422 9757 5416 8665 1780 5953 6324 5765 7295 5203 8915 1008 7508 2753 4981 9090 7636 3267 420 8279 673 9682 9997 9909 4905 6370 3082 2482 5516 933 9750 7601 9153 1209 3002 7452 6871 9375 220 869 85 8692 9794 8678 9335 2014 8744 5828 1679 1657 1899 5038 6891 5121 177 2177 2793 5393 9497 1843 2278 2065 1593 1273 9062 6720 8100 1248 8234 8258 1971 3749 3841 1356 6657 3111 9306 9821 3847 9259 7296 152 8222 5974 9598 2010 7962 6097 2362 432 7333 6271 981 5207 4110 4557 9920 7539 2320 1995 766 2855 707 3128 2047 9291 4270 5108 2140 5385 324 7042 4964 5918 9992 6873 8456 7935 2451 5846 8085 5783 6481 8448 7156 8646 5267 7077 8335 7759 6691 4308 8379 6898 2510 8514 9017 3022 5625 1298 3605 4662 8548 2382 3961 4214 5466 3267 8723 6170 8927 7098 2956 4801 1630 1013 1683 7742 4317 353 6449 9215 8946 536 3421 8337 2656 946 3504 8063 2252 5966 9438 7503 9046 418 691 2351 3366 2665 3662 8768 5932 3022 2713 2498 4820 1325 8708 1401 9471 5573 6505 8686 1126 7964 6779 9419 7885 4805 7208 3705 2381 6458 2509 9910 9989 7301 979 5665 4964 2139 6345 1051 5438 5444 8306 6169 4316 9386 2208 773 1910 8512 8416 1855 2678 8037 6490 7581 2181 1537 8478 5061 5838 5996 2645 4073 80 9940 8403 6453 4064 1546 3345 7311 6757 3915 230 3286 4218 6162 5368 3804 6884 1780 3909 6363 7564 6994 1131 8659 7382 2729 2927 9275 4939 2344 9417 4370 1256 4793 7344 9995 7819 2174 3420 4553 7346 4512 2659 595 3582 6936 150 2505 1280 6108 1316 7794 2641 2973 1392 9848 2152 3834 1764 5012 3159 3848 9743 2611 9560 8069 1270 9580 4176 9300 293 1305 1567 5482 8997 8818 2993 4331 4089 8089 6068 6116 7852 8865 8637 7146 9278 3167 4806 9029 4621 515 7946 4847 2303 5559 4805 1507 5931 5522 7892 6986 332 1204 7453 8941 9765 7846 3363 4715 5487 4693 6802 8289 4885 5867 1961 6511 6023 737 2211 6290 9846 1778 9632 8683 9201 4950 1101 2175 5534 3167 9017 2257 2364 2566 6618 2901 4391 4470 9678 6241 7025 172 6370 7105 9777 877 7892 5690 672 1976 7887 5738 9918 4250 4607 8051 5706 7174 4987 8604 2636 9278 4275 3095 9414 8117 6036 776 6944 6762 1582 2769 8731 3239 5228 477 7314 8093 69 619 9598 1283 7623 1936 3959 2336 6778 7197 2558 6358 564 7930 567 7070 2281 5233 7547 7773 3330 9476 8984 6114 3291 8913 3897 3760 3207 6815 8738 4077 8391 3120 4543 2122 6799 188 4418 1759 1630 9459 1621 5840 1077 7098 155 8861 8792 5517 6194 3790 9769 7364 6261 2436 3394 2684 1854 5731 7240 5226 8218 6810 2286 1219 3830 841 2920 192 235 1335 5589 9087 7532 9848 3133 3849 2943 6302 8748 2584 7216 3601 1163 4138 7771 5805 2129 7254 2074 144 7499 7465 3162 4359 5612 7595 2877 797 9457 7594 4453 5083 9755 7212 549 1790 6619 1378 1813 6459 2082 8290 2845 4266 5992 2718 5601 9803 3851 863 1486 6918 2136 2063 7676 7754 1583 7330 476 9773 7346 934 8041 2221 1906 281 8038 2850 2167 6484 1396 7304 5739 4892 3494 4588 9013 8826 4730 6835 7772 3156 951 4056 3288 5564 1807 8826 6304 9135 1142 6087 4930 9074 7981 331 5558 3602 5106 4117 8115 6066 8554 721 3219 3809 8100 525 8146 181 6031 8369 831 2951 5544 6359 8858 490 1705 2606 2227 5540 7181 2697 1540 1497 8714 1893 4764 4980 5584 7777 5064 2117 4881 298 8113 3339 8431 1349 2370 1953 7631 4010 7535 2782 1036 3159 6989 7854 922 3403 1846 7130 9899 3526 8441 3735 4622 1037 7122 2878 8676 3443 5997 1185 4596 588 6364 2453 9583 1241 3539 2081 8891 4382 6346 9754 8913 3789 7262 4983 379 8754 5446 7165 1613 7613 4125 9389 5670 4562 4042 5172 5738 7408 5181 5980 6490 8165 265 2111 8741 3336 4116 7174 5910 3403 7699 9832 4610 3767 772 6540 4380 1848 8290 7402 8317 8400 3872 6684 141 8651 1807 3415 2205 8220 2489 1419 9371 1601 8944 7202 7290 5086 526 6865 6276 638 8330 5541 6956 9466 8344 2661 6104 670 8784 9251 550 6178 4874 6243 914 4485 9899 9652 5826 3777 390 6604 5311 7718 7536 5667 1383 6536 466 3 3046 5085 4755 588 1265 231 4507 1361 3484 9713 7173 4180 17 5685 5905 8066 7947 1077 8527 8015 1393 4151 1209 175 9050 7772 8633 6169 2907 9657 2481 1080 881 2929 3854 4861 1296 9356 1157 9214 8660 9085 3711 512 4025 3598 1977 8789 786 7889 640 1610 7565 2014 3214 4632 7151 715 1027 4179 2499 580 5202 2858 2329 7900 9372 8030 7584 5888 5955 5429 9694 6273 8781 3743 6534 5834 3127 5744 4373 5333 5630 2917 8657 704 7288 8105 3498 7166 2816 7657 1884 8344 3594 1445 2540 1377 1143 5882 3832 5735 5431 6254 2560 1670 58 5693 3876 4691 9446 2978 6119 7988 9473 1157 1856 8145 7267 1389 2579 5432 4173 2095 4242 3304 8996 9837 7541 4597 528 5690 2066 5684 5514 6838 2937 266 616 8223))))) Compilation: cpu time: 609 real time: 731 gc time: 5 Evaluation: -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- (letrec ((builtin (dynamic-require "builtins" none)) (print (#%vm-procedure (=> builtin "print") 1)) (stream-filter (lambda (p s) (if (equal? s none) none (let ((f (stream-car s))) (if (p f) (stream-cons f (stream-filter p (stream-cdr s))) (stream-filter p (stream-cdr s))))))) (numbers (let loop ((n 2)) (stream-cons n (loop (+ n 1))))) (primes (let loop ((ns numbers)) (let ((first (stream-car ns)) (rest (stream-cdr ns))) (stream-cons first (loop (stream-filter (lambda (n) (not (equal? (modulo n first) 0))) rest))))))) (let loop ((n 300) (ps primes)) (if (equal? n 0) (print (stream-car ps)) (loop (- n 1) (stream-cdr ps))))) Compilation: cpu time: 1241 real time: 1416 gc time: 13 Evaluation: raco setup: running: /racket-index/scribblings/main/user/search.scrbl raco setup: running: /racket-index/scribblings/main/user/start.scrbl raco setup: rendering: /racket-index/scribblings/main/user/family.scrbl raco setup: rendering: /racket-index/scribblings/main/user/local-redirect.scrbl raco setup: rendering: /racket-index/scribblings/main/user/release.scrbl raco setup: rendering: /rkt-pythonize/scribblings/rkt-pythonize.scrbl -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: ((lambda (mod) ((lambda (none) (vm-apply none '(1))) (get-attribute mod '"print"))) (dynamic-require '"builtins" none)) Compilation: cpu time: 228 real time: 240 gc time: 0 Evaluation: ((lambda (mod) ((lambda (print) '2 (vm-apply print '(1))) (get-attribute mod '"print"))) (dynamic-require '"builtins" none)) Compilation: cpu time: 60 real time: 60 gc time: 0 Evaluation: (let/cc cc ((lambda (mod) ((lambda (print) (vm-apply print '("1")) (cc (vm-apply print '("2"))) (vm-apply print '("3"))) (get-attribute mod '"print"))) (dynamic-require '"builtins" none))) Compilation: cpu time: 141 real time: 141 gc time: 29 Evaluation: (let/cc cc ((lambda (mod) ((lambda (print) (vm-apply print '("1"))) (get-attribute mod '"print"))) (dynamic-require '"builtins" none))) Compilation: cpu time: 41 real time: 41 gc time: 0 Evaluation: (let/cc cc cc) Compilation: cpu time: 17 real time: 17 gc time: 0 Evaluation: 2 Compilation: cpu time: 14 real time: 14 gc time: 0 Evaluation: #f Compilation: cpu time: 14 real time: 14 gc time: 0 Evaluation: "" Compilation: cpu time: 10 real time: 10 gc time: 0 Evaluation: #hasheq() Compilation: cpu time: 15 real time: 15 gc time: 0 Evaluation: '() Compilation: cpu time: 23 real time: 23 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print"))) (vm-apply print '("1")))) Compilation: cpu time: 42 real time: 42 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none)) (box #f)) (let ((print (get-attribute mod "print"))) (letrec ((proc (lambda () (if box (vm-apply print '("-1")) (begin (vm-apply print '("1")) (set! box #t) (proc)))))) (proc)))) Compilation: cpu time: 283 real time: 288 gc time: 75 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print"))) (vm-apply print (@ '(("1")) 0)))) Compilation: cpu time: 59 real time: 67 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print"))) (vm-apply print (@ '#hasheq((a . (1))) "a")))) Compilation: cpu time: 58 real time: 58 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print")) (l '("1"))) (! l 0 "2") (vm-apply print l))) Compilation: cpu time: 74 real time: 74 gc time: 3 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print")) (t '#hasheq((a . (1))))) (! t "a" '(2)) (vm-apply print (@ t "a")))) Compilation: cpu time: 74 real time: 74 gc time: 0 Evaluation: (let ((mod (dynamic-require "builtins" none))) (let ((print (get-attribute mod "print")) (t '#hasheq((a . (1)))) (l '())) ( mod "print") l))))) (print (begin (begin 1)))) Compilation: cpu time: 144 real time: 176 gc time: 2 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (lambda (v) (let ((l '())) ( mod "print") l))))) (print (begin (begin 1 2)))) Compilation: cpu time: 41 real time: 41 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (lambda (v) (let ((l '())) ( mod "print") l))))) (print "1")) Compilation: cpu time: 30 real time: 30 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (lambda (v) (let ((l '())) ( mod "print") l))))) (=>! mod "a" 2) (print (=> mod "a"))) Compilation: cpu time: 99 real time: 99 gc time: 51 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (os (dynamic-require "os" none)) (print (#%vm-procedure (=> mod "print") 1))) (print (=> os "path" "sep"))) Compilation: cpu time: 50 real time: 50 gc time: 1 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") 1))) (print "1")) Compilation: cpu time: 26 real time: 26 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") #f))) (print "1" "2")) Compilation: cpu time: 28 real time: 28 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") 1))) (print (vm-apply (#%scm-procedure + 2) '(1 2)))) Compilation: cpu time: 172 real time: 172 gc time: 1 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") #f))) (vm-apply (#%scm-procedure print #f) '(1 2 3))) Compilation: cpu time: 46 real time: 46 gc time: 0 Evaluation: (error "") Compilation: cpu time: 12 real time: 12 gc time: 0 Evaluation: (raise "") Compilation: cpu time: 11 real time: 11 gc time: 0 Evaluation: (print (error "")) Compilation: cpu time: 14 real time: 14 gc time: 0 Evaluation: (if (raise "") (print "") (print "")) Compilation: cpu time: 19 real time: 19 gc time: 0 Evaluation: ((error "") "") Compilation: cpu time: 15 real time: 16 gc time: 0 Evaluation: (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) (throw "A")) Compilation: cpu time: 68 real time: 68 gc time: 1 Evaluation: (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) (throw 1)) Compilation: cpu time: 64 real time: 64 gc time: 0 Evaluation: (let/cc cc (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) (throw (cc "A")))) Compilation: cpu time: 67 real time: 67 gc time: 0 Evaluation: (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) ((make-procedure (lambda (s) (print (throw (@ s 0))))) "A")) Compilation: cpu time: 87 real time: 86 gc time: 0 Evaluation: (let/cc cc (with-handler (lambda (v) (if (is-a? v str-type) (print v) (throw v))) ((make-procedure (lambda (s) (throw (cc (@ s 0))))) "A"))) Compilation: cpu time: 116 real time: 125 gc time: 0 Evaluation: (with-handler print (vm-apply (#%scm-procedure (lambda () (throw 1)) 0) '())) Compilation: cpu time: 47 real time: 48 gc time: 0 Evaluation: (with-handler (lambda (v) (print (+ v 1))) (vm-apply (#%scm-procedure (lambda () (throw 1)) 0) '())) Compilation: cpu time: 75 real time: 75 gc time: 0 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") 1)) (stream-for-each (lambda (p s) (if (equal? s none) none -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- (begin (p (stream-car s)) (stream-for-each p (stream-cdr s)))))) (numbers '(1 2 3 4 5 6)) (number-stream (let loop ((i 0)) (if (equal? i (length numbers)) none (stream-cons (@ numbers i) (loop (+ i 1))))))) (stream-for-each print number-stream) (stream-for-each print number-stream)) Compilation: cpu time: 495 real time: 502 gc time: 3 Evaluation: (letrec ((print (#%vm-procedure (=> (dynamic-require "builtins" none) "print") 1))) (cond (else (print 1))) (cond (1 (print 1)) (else (print 2))) (cond (#f (print 1)) (else (print 2))) (cond (1 (print 1) (print 2)) (else none))) Compilation: cpu time: 73 real time: 73 gc time: 0 Evaluation: (begin (print (+ 1 2)) (print (/ 1 2.0)) (print (/ 1 2)) (print (quotient 1 2.0)) (print (modulo 1 2.0)) (print (negate 1.0)) (print (eq? none 'none)) (print (eq? 'none 'none)) (print (eq? "a" "a")) (print (eq? 1 1.0)) (print (eq? '(1) '(1))) (print (eq? '#hasheq() '#hasheq())) (print (equal? 1 1.0)) (print (equal? '(1) '(1))) (print (equal? '(1) '(1 2))) (print (equal? '#hasheq((x . 1)) '#hasheq((x . 1)))) (print (equal? '#hasheq((x . 1)) '#hasheq((x . 1) (y . 2)))) (print (equal? '(1) '#hasheq((x . 1)))) (print (> 3 2)) (print (> 2 2)) (print (< 1 2)) (print (>= 3 3)) (print (>= 2 3)) (print (<= 1 1)) (print (<= 3 2)) (print (if 1 1 2)) (print (if + 2 1)) (print (if #f 2 3)) (print (if (lambda (x) x) 4 5)) (apply print '("1")) (print (is-a? 1 object-type)) (print (not dynamic-require)) (print (not #t)) (print (not #f)) (print (not 'none)) (print (not 0)) (print (not (lambda (x) x)))) Compilation: cpu time: 374 real time: 374 gc time: 4 Evaluation: (begin (print (+ 1 2)) (print (/ 1 2.0)) (print (/ 1 2)) (print (quotient 1 2.0)) (print (modulo 1 2.0)) (print (negate 1.0)) (print (eq? none 'none)) (print (eq? 'none 'none)) (print (eq? "a" "a")) (print (eq? 1 1.0)) (print (eq? '(1) '(1))) (print (eq? '#hasheq() '#hasheq())) (print (equal? 1 1.0)) (print (equal? '(1) '(1))) (print (equal? '(1) '(1 2))) (print (equal? '#hasheq((x . 1)) '#hasheq((x . 1)))) (print (equal? '#hasheq((x . 1)) '#hasheq((x . 1) (y . 2)))) (print (equal? '(1) '#hasheq((x . 1)))) (print (> 3 2)) (print (> 2 2)) (print (< 1 2)) (print (>= 3 3)) (print (>= 2 3)) (print (<= 1 1)) (print (<= 3 2)) (print (if 1 1 2)) (print (if + 2 1)) (print (if #f 2 3)) (print (if (lambda (x) x) 4 5)) (apply print '("1")) (print (is-a? 1 object-type)) (print (not dynamic-require)) (print (not #t)) (print (not #f)) (print (not 'none)) (print (not 0)) (print (not (lambda (x) x)))) Compilation: cpu time: 1377 real time: 1668 gc time: 9 Evaluation: (print (is-a? '() null-type)) Compilation: cpu time: 20 real time: 22 gc time: 0 Evaluation: (print (is-a? null null-type)) Compilation: cpu time: 25 real time: 26 gc time: 0 Evaluation: (print (is-a? '(1) pair-type)) Compilation: cpu time: 25 real time: 35 gc time: 0 Evaluation: (print (is-a? (cons 1 null) pair-type)) Compilation: cpu time: 30 real time: 42 gc time: 0 Evaluation: (letrec ((array-list->linked-list (lambda (al) (let ((len (length al))) (let loop ((i 0)) (if (equal? i len) null (cons (@ al i) (loop (+ i 1)))))))) (append (lambda (l1 l2) (if (eq? l1 null) l2 (cons (car l1) (append (cdr l1) l2))))) (partition (lambda (n l p) (if (eq? l null) (cons null (cons null null)) (let ((first (car l)) (sl (partition n (cdr l) p))) (if (p first n) (cons (cons first (@ sl 0)) (cons (@ sl 1) null)) (cons (@ sl 0) (cons (cons first (@ sl 1)) null))))))) (sort (lambda (l) (if (eq? l null) l (let ((first (car l)) (rest (cdr l))) (let ((pl (partition first rest <))) (append (sort (@ pl 0)) -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- (cons first (sort (@ pl 1)))))))))) (print (sort (array-list->linked-list '(3 7250 8268 3043 4175 6256 969 7068 8726 2110 3913 585 8405 2967 8522 913 9466 7803 1436 5061 1167 4331 3238 3906 1922 4296 690 3115 7453 2498 7742 7667 1435 2522 4507 4762 3923 188 8356 6651))))) Compilation: cpu time: 813 real time: 926 gc time: 225 Evaluation: (letrec ((mod (dynamic-require "builtins" none)) (print (#%vm-procedure (=> mod "print") 1))) (print (>= 3 2)) (print (>= 2 2)) (print (>= 1 2)) (print (<= 1 2)) (print (<= 2 2)) (print (<= 3 2))) Compilation: cpu time: 179 real time: 190 gc time: 0 Evaluation: (letrec ((array-list->linked-list (lambda (al) (let ((len (length al))) (let loop ((i 0)) (if (equal? i len) null (cons (@ al i) (loop (+ i 1)))))))) (append (lambda (l1 l2) (if (eq? l1 null) l2 (cons (car l1) (append (cdr l1) l2))))) (partition (lambda (n l p) (if (eq? l null) (cons null (cons null null)) (let ((first (car l)) (sl (partition n (cdr l) p))) (if (p first n) (cons (cons first (@ sl 0)) (cons (@ sl 1) null)) (cons (@ sl 0) (cons (cons first (@ sl 1)) null))))))) (sort (lambda (l) (if (eq? l null) l (let ((first (car l)) (rest (cdr l))) (let ((pl (partition first rest <))) (append (sort (@ pl 0)) (cons first (sort (@ pl 1)))))))))) (print (sort (array-list->linked-list '(7570 95 1277 570 8770 9426 7589 1517 8975 7692 8110 1517 5565 5987 3075 2417 1092 2837 466 6779 968 3823 955 1041 531 3425 1667 8147 1161 269 9963 463 9649 8672 5518 8679 837 3757 6033 3729 6149 2452 1193 3006 4851 7554 8093 6872 5062 8999 3652 9719 8502 4288 7740 3378 7443 5027 9018 7878 1137 6891 7476 3657 9706 8995 5218 5384 903 283 9186 5933 6674 9818 566 1115 1141 8826 2205 8720 8390 7706 6914 3849 4851 9038 3733 2314 5986 482 3505 7039 7352 4641 196 3048 7635 7987 5115 1568 4477 290 5083 6829 7485 3258 405 9828 3270 2803 7364 437 554 7663 5221 1251 6538 5776 9671 1290 7662 3499 160 5719 2453 4721 4290 7457 808 1989 9435 4656 150 2348 1882 5356 1250 3053 1890 9945 100 5537 8219 8584 5755 3505 3516 7549 3645 3426 3615 5553 7990 3013 9577 8743 8187 4387 1474 8167 5836 7780 8786 735 7590 7493 3104 927 5413 10 1834 5288 8487 6768 804 8951 6844 8349 101 9292 5115 2684 6736 6687 4522 8509 2023 5195 3319 878 293 5600 4128 4472 245 7941 4665 4830 9139 324 1641 798 8959 5207 3225 2127 1910 7092 4319 4154 4241 7071 4665 3092 3665 5262 2884 4560 7462 4462 5465 5509 2958 5228 715 4684 3594 7443 1273 1868 7025 3832 7744 9537 1077 5928 5541 6082 5410 1994 6654 9248 6137 9056 4516 882 9399 3309 4995 8726 2466 4840 5022 8946 296 8132 262 848 2177 6728 5764 4543 5953 8986 9854 5222 330 1576 3061 4691 4036 5346 5346 7098 7253 7618 5184 9921 115 392 5205 9019 9118 6923 3267 7584 3077 9661 375 4667 4390 56 815 1143 8337 5810 9471 5682 7774 1139 574 7486 9644 8532 6839 9957 616 9210 5513 970 1108 8196 9290 7650 2006 1352 5747 9778 6671 6616 7536 533 4383 3864 1757 5533 9140 5309 3624 6542 3306 7834 8045 3889 9393 9336 6146 2849 6273 6800 248 9840 9864 305 3462 6809 9763 9015 484 3910 3169 4227 8880 2963 6122 2602 6845 8954 7956 5946 6142 3598 4274 8914 1236 8262 8807 5353 151 5339 3722 5061 5121 585 9986 914 6520 2725 3417 2384 9075 5925 9641 1990 5455 3977 4017 3916 3528 4599 5013 9907 6014 8542 6690 9993 5170 2610 6939 6286 7175 9493 9400 187 8761 1634 3662 3424 2688 3572 6679 7858 9809 3051 9180 5734 190 6876 5158 8858 5716 7467 2307 5752 3275 430 7819 4771 6559 594 2214 3218 1895 9725 8355 3495 6945 1159 2279 5163 3306 3730 221 7185 1141 800 4964 2781 1401 3672 1087 6909 4331 7662 5264 4228 1242 1189 7592 4604 4758 3053 1973 446 6243 4044 5646 673 58 4600 1252 1781 9921 8711 9202 2027 6959 7485 8762 119 9916 9587 6643 5080 6702 4209 2829 4673 6061 8212 4610 3499 4024 6029 4835 3703 8274 2257 677 9604 8240 6353 7494 9759 3848 9276 9270 1361 7700 4519 1750 5763 1631 8417 4761 3518 6939 4810 7559 2302 7473 3093 2798 9035 9980 1819 9086 7891 4548 9897 2895 4420 6777 3543 3400 2751 4543 1774 8405 3999 5796 76 2770 118 2872 3790 7288 3973 6490 9743 1755 3050 1389 4449 5277 3095 5634 5216 1471 7706 2146 3948 3537 923 6875 1380 2727 7636 1581 5312 6587 9723 61 4766 7900 6291 5885 1122 4235 7549 219 9726 8886 5375 4012 7713 3517 752 1495 149 8054 9745 4123 2341 5333 1295 1732 7415 941 4050 4796 2083 5163 1294 3417 8937 1485 5271 9792 5951 4632 2942 8060 4817 3678 94 7957 2252 9897 447 4502 9388 2530 721 8233 395 8328 550 2202 1973 9774 4125 8891 3052 3676 5244 5349 2339 2708 5079 5781 786 848 3483 2525 9516 1182 7966 2205 339 3017 728 9428 411 5174 2590 283 2676 8066 8209 8688 6549 9590 4052 2647 7436 1354 6695 4006 2738 6192 4598 8504 5283 4270 1328 6047 5545 7380 606 4953 6137 8678 8150 2228 2521 2535 4190 561 2465 4222 2977 8666 3280 9200 7666 8790 1242 8037 3745 9421 4737 6140 4272 6874 8818 2049 2262 6383 4372 6775 728 5127 3536 5779 9851 8231 5921 9547 9748 5090 3756 9699 6103 1051 7109 7732 7091 2751 4710 1140 3979 5810 442 8819 2576 8574 7018 4451 8752 1305 8266 2052 498 7945 6426 390 5269 9000 472 252 615 8916 5904 7963 3676 9978 62 8277 5360 1985 7552 7420 6774 4919 9845 9864 2446 9034 3134 3005 1565 6813 5932 7478 8315 2438 1949 7465 8996 6547 115 6246 669 9168 5394 3673 9351 1398 4614 6574 5525 1232 5373 5719 8167 3374 7301 6265 2464 8417 7498 1732 7563 8887 8378 9499 859 7626 7936 1888 4504 3055 2627 8915 6365 2090 6319 1432 8815 8596 2328 4816 6693 7516 3517 3543 7748 8942 1927 8937 5070 7314 3903 3135 844 5556 4805 8394 8524 2966 1124 8563 9473 845 8561 9814 9305 8363 7083 9987 3970 4468 3259 5974 2245 66 9897 2976 5264 1089 6074 1441 7993 9228 9138 4583 6919 2744 5806 4806 8795 7248 6739 6199 8773 5438 9914 8253 7397 1308 249 715 5641 5563 6393 8015 2563 7267 5198 7841 9077 8536 5793 1116 351 469 4409 1645 1260 9738 8106 3141 4262 4272 8803 3586 763 8374 7796 5964 5988 4749 8011 9755 399 7837 220 1400 9427 1122 801 6140 2592 448 136 7674 689 8321 7687 8641 4080 2397 3396 1261 2251 764 7421 3327 3551 5487 2670 239 7613 7626 9936 4892 6821 2627 4684 478 7313 708 8048 7552 862 5334 7529 9071 2530 7288 4577 9034 3633 7089 170 6366 7659 4933 6770 9062 9540 3484 6158 2283 1045 4623 734 3823 9080 1216 237 1438 3848 1755 533 6774 1769 5127 8860 8664 5910 1441 3549 7502 731 9419 5678 9517 2507 4814 5871 1077 4282 9232 8634 3430 363 2008 4344 9908 5688 3610 8971 1726 7008 5398 3450 4440 4690 7252 8583 3140 3013 8366 8041 576 7621 9858 5256 7408 7417 8332 9867 6463 6951 4625 3236 627 9900 651 8896 3574 7956 3704 8276 8924 5307 4251 207 141 4350 4707 6304 7310 6113 8679 4464 5690 8661 3598 62 5293 416 3169 6157 1136 1124 8189 6504 5625 9328 5994 2635 6617 2590 1391 6178 225 9871 9652 5206 496 4555 31 7950 7791 3416 3041 9856 5786 6548 4948 5051 3916 7896 7880 5715 3359 3816 662 5184 8708 8476 9819 2942 7059 89 7595 1412 9036 4327 6509 2961 2135 9234 6263 9450 107 5428 1341 9183 3714 8334 9722 6671 9001 6836 5576 9240 7971 9673 9626 7831 2395 3401 2876 4065 2915 1485 5972 2021 5707 1080 5933 3948 5276 1881 7514 4680 4657 429 2571 6740 3014 3408 9974 576 6374 8836 783 4959 4996 2956 134 9414 2102 4275 9960 3039 5897 6515 3314 9773 6438 5436 7321 3770 3595 8925 1115 229 7593 5406 6867 3184 95 6449 6960 2400 6434 6612 3142 9257 2498 2111 8506 7313 9585 2399 9443 6674 2238 1260 3303 9268 9490 4754 6609 4291 6561 5825 9343 9311 6954 3783 3715 9172 2103 1653 9165 6519 8347 5575 2234 9758 3622 5890 5614 659 6967 1004 6871 7792 3304 2528 9050 9550 1674 4604 3750 2978 9018 4934 3499 3107 8414 8378 8694 4583 7377 9394 938 7178 1825 8910 2054 7490 4041 153 7174 7850 6223 8530 9851 6982 2239 295 5114 4941 4795 4999 2549 1158 6456 9287 3263 995 1680 1333 6503 2779 9209 842 5798 4919 2740 3570 8870 3355 2215 7618 6267 4960 1292 9099 9970 2561 7041 1709 8313 927 7824 9661 159 9450 6204 2361 7989 4362 7449 1071 4460 6009 9586 3567 6690 6563 201 5894 6049 2955 92 7070 6786 2710 758 7559 5134 1723 6444 5100 3962 6497 218 3820 6472 2294 4139 7269 2259 1182 3507 5494 4139 6057 3320 6551 4423 5932 9880 9735 9026 9046 6325 7965 905 8455 7793 6298 3178 8641 9634 8180 5368 343 2268 8137 8577 5742 6792 7127 30 2189 3335 7112 61 6612 1352 4189 6944 2103 1260 9035 798 3882 9957 7069 762 3504 4395 5882 1753 3940 9489 5663 9290 2011 1888 5793 5219 3928 5520 5336 6046 7965 6870 9579 6649 9529 9919 3864 8973 5880 247 6406 4210 109 8618 2959 8102 5686 9359 4214 5287 6951 1596 606 5858 9057 7611 7804 6025 8565 8125 8844 5145 4007 5637 5277 1942 6920 5390 9860 3506 9021 6594 2195 3563 8776 2370 3941 4302 424 5393 2086 7516 52 8794 318 5080 980 3950 1900 8630 783 417 656 1757 9136 133 9331 3847 9145 5450 4307 2541 7283 376 9608 160 3982 9540 7794 2269 2578 1338 3222 1855 6442 3516 7650 305 5860 6006 5601 9536 6573 9321 7954 2783 5376 4295 2253 2657 354 9234 2687 9904 2173 142 6524 2563 9805 8083 1150 4396 1436 4022 1664 7229 8476 3395 3805 4722 7562 421 1164 2710 5776 1362 7391 6544 1706 2045 1861 2042 5376 1710 4092 3462 7545 8611 5563 3771 836 5359 6709 4614 2045 8258 9769 2751 9271 6957 1064 3995 1104 7302 8361 5843 5825 1702 9566 1921 6218 6021 2448 6928 4967 4209 5533 2693 2398 6398 487 519 1206 7181 895 1587 3482 8488 8902 7168 804 6639 5820 4197 3461 22 6302 83 3885 2628 2083 9208 157 6472 6628 1676 3855 3714 7536 5103 3644 5109 4400 9633 6877 1280 5339 7459 994 4295 8768 3592 9142 3351 1693 7500 8487 1061 1049 4726 7465 2917 4988 1763 4320 3533 8769 8764 7725 8959 1250 4263 126 4870 5119 4053 7202 1743 4798 5319 2212 3545 6764 8730 2564 7904 3558 6570 4664 2555 1648 107 5321 1212 7263 7706 2333 6032 5333 8605 651 920 85 4140 2501 1385 267 114 2067 1209 6434 2737 2708 9965 6849 7369 4887 2187 8798 1251 7424 7103 6084 3593 1818 4338 6086 6669 7419 2829 6868 9128 9056 8715 8204 9326 2084 4056 4396 7081 3373 6992 5644 4226 3328 3616 45 3249 501 7620 3788 6794 1319 3174 2684 2197 1410 9932 7158 2604 495 8643 4978 4159 309 3355 902 9261 135 6008 8059 3267 8320 6617 3707 5343 9866 481 1729 7267 570 5231 2719 7197 3327 246 4203 2949 6676 3004 2426 8354 4280 9422 6509 1274 4074 5419 3311 4676 2478 7500 1299 2732 7788 3537 5181 7342 3603 6917 7725 4280 3912 1301 5856 1764 4628 1141 1415 9475 8949 9361 3247 3823 376 7519 7936 2422 2257 4513 7062 2133 922 1969 4217 3259 9569 4386 4921 3704 3495 2576 5436 2134 1396 9678 6058 9311 4030 9034 5274 8126 7758 4422 8669 6340 6644 3508 2556 9330 1266 6256 5366 934 3902 8659 228 6119 6769 1705 1212 7449 3025 8933 9411 7241 9444 5660 3511 5614 5384 9710 2702 4078 5309 4045 6675 1017 8741 4460 6590 7641 7726 9521 5134 6280 6957 4018 372 3051 7437 1681 6557 5845 3344 4218 9524 7946 8630 3691 8254 6862 2953 1755 3543 7093 7107 8219 5512 2234 6830 7839 2323 3066 7164 8988 4078 7640 5709 4736 3669 1927 7111 2391 5077 8965 9561 3725 3694 4691 6451 5798 6027 9672 1057 5150 1788 544 815 2324 175 4929 2469 7092 5100 3573 9054 2235 55 4534 5752 104 4245 7036 1374 4201 7302 6750 2058 8507 8650 9769 1633 7107 6145 9286 6341 7259 5732 109 5308 2272 905 5549 6124 3567 2364 4472 9151 9299 3653 8103 3555 4788 4854 3851 7362 2293 4730 5741 8790 3323 206 6274 1933 2327 2814 3706 3270 1849 9722 9945 9485 1694 6171 9553 5366 2160 7344 5889 2624 7961 7680 3065 37 5703 8937 3237 9139 46 5567 1196 2278 4617 2587 7367 330 8578 1303 5495 7567 191 7408 1516 2835 8836 6198 3019 1443 6550 1129 3077 7384 1462 373 1415 1964 696 2770 2908 6954 4259 9544 8734 976 6972 6417 511 7410 6197 9660 4871 6982 8945 1595 6095 3518 7101 4568 4357 6074 5122 3126 588 6504 6636 1834 8629 4749 3719 3113 6478 6797 1386 3952 9508 8315 8838 9819 3258 2101 7116 5680 3422 855 5622 8132 1110 8344 5349 5817 3102 6276 6167 9238 514 6826 2247 3271 5203 5361 2540 513 8170 8272 7828 4715 3464 7032 7266 1184 5733 1765 7164 9359 2438 7841 7366 5476 8434 4313 7741 3950 6926 7367 599 294 5436 333 7320 276 7820 4073 4819 4081 6278 3494 1937 7551 5985 3799 4969 7617 6566 7367 9507 9658 994 9713 7639 7245 4438 2372 4858 1275 790 2295 7547 1941 4948 8237 434 7466 4926 9828 1942 633 6431 1550 6733 7576 8310 5160 4768 4586 8523 2753 9393 9561 4880 1557 7003 1732 6616 3320 2789 7888 9071 4647 2781 1218 6657 9865 9231 3387 8620 9879 4534 3079 906 9268 6326 3316 3401 9853 7556 6157 9915 3682 8538 2083 2142 9340 7249 7427 2791 6225 3200 5726 7195 5008 7109 1029 3592 6887 6385 3894 8560 3936 4589 9785 6134 5569 6231 517 9070 8664 5004 1656 5273 5053 2935 2184 9245 5427 4536 7372 1813 4490 9112 2945 5029 7492 9614 7486 6621 7227 6718 7561 9215 6445 7314 3673 2319 5220 2186 5787 3587 3809 9725 9699 1174 5263 6270 7290 5056 2000 9601 173 1994 9217 4467 5061 3672 5623 9022 3659 3614 8754 6038 4598 8127 9531 8984 3149 6776 2012 1137 1843 634 6419 5421 9429 2245 7245 7496 6174 5740 3898 2275 8276 6294 6719 3053 2330 1806 4810 8871 1896 480 8963 9159 7159 4469 2167 9535 8670 7235 3549 2796 1920 3517 8493 116 3363 9942 6927 2707 1304 5591 3188 2645 91 5947 9660 8722 48 3614 7987 3732 3385 1713 6571 8788 8498 9091 655 9624 6058 9236 2828 1 4855 8604 2899 33 1988 242 8084 8099 7352 3770 2935 174 3695 4477 1999 1787 3410 3343 9470 6430 5682 19 415 6359 7687 7930 3356 1274 2848 7128 3302 5078 2632 3171 5257 8945 4608 8286 3555 7809 3456 6452 3407 6917 1503 6949 3861 2084 2078 5716 8984 6889 2583 2788 4886 9737 1131 6979 5309 1494 9839 1280 5678 3120 7369 2142 6511 5427 6371 5775 3545 6304 1148 2847 9917 1875 30 5454 6101 6365 5786 3814 8993 6090 3161 1707 5211 2566 6503 4592 3343 6019 3447 5776 485 6577 1816 1450 6644 7765 9956 1375 6414 4545 801 7034 8534 9376 1413 2090 9127 4552 6143 4647 5082 5011 5833 8803 1670 1854 7775 4705 805 6387 2326 6705 5713 2909 8468 8274 9942 1107 4557 6319 4891 3041 4408 1908 4010 3522 8772 4229 4328 8966 6499 171 1316 7135 1281 5378 9007 2130 441 7662 6394 8460 4895 4104 2811 2862 3369 7212 5374 6376 1861 9476 3772 7293 4886 3466 8121 2490 730 9972 6036 6090 6075 6428 9729 6570 4137 1876 1730 2566 5909 2946 1758 8250 5858 4231 330 9305 6214 9051 7671 5573 9464 9017 4565 5252 1280 6246 147 6281 723 5472 4457 5060 7405 5455 6286 5113 8023 2212 4732 2283 7544 6145 5804 5062 5240 9801 4770 1546 5319 9095 4610 7162 182 8188 215 2938 2885 8295 8057 2323 9971 4864 1152 3496 3464 6808 8304 9309 5 6016 7587 6185 6563 7747 6763 2252 4571 334 6887 8607 7903 1149 2598 5247 316 1640 4773 6992 1656 3807 4861 3953 251 709 150 4129 816 6917 4686 4911 2642 6731 6942 1441 2926 3499 5655 7636 8025 2364 2480 8513 3564 3883 5028 6783 1684 5419 1734 6552 1488 7039 8677 6408 595 8210 3822 932 4301 5240 4665 5110 8640 4962 5095 9827 4819 7481 4858 2565 4093 6593 1416 3696 2111 6160 4401 412 9112 9621 571 9298 4437 5039 5340 3762 2055 5057 4822 8279 5738 3920 9697 5429 4249 7230 5006 3045 9160 6866 1880 1876 177 1744 9287 7382 1752 6735 5269 2027 1442 8657 1099 3234 7854 2703 4136 9074 5707 2859 3133 982 6802 9021 1804 7819 7708 751 6323 2070 131 923 2761 7180 1654 9422 3319 1007 757 6311 860 7836 3638 2945 6192 3331 7009 2389 3143 1577 1105 7916 4161 5048 2500 8807 8717 2332 9326 7057 9209 3491 7992 1948 5789 4745 5547 1903 5978 8698 4183 1915 6300 408 2779 681 4655 7717 601 6029 9623 690 9966 9504 8564 1768 3281 9900 4008 4773 5654 9326 3300 1647 649 2906 2240 856 9516 4435 3637 1132 851 7392 3392 6539 160 7953 7957 5433 562 9954 152 2776 109 9069 2091 5809 8612 6420 9364 7421 3136 4828 5877 3794 789 2599 8603 5870 1778 4035 654 1443 9654 6168 3368 5313 3348 9200 9314 5177 2655 9262 467 4567 2108 3201 1335 8944 6176 2767 8354 6038 5334 812 814 8321 1920 1932 9877 6326 4721 1731 3007 8525 6556 6895 2865 8817 361 2926 6378 7959 8012 7451 7134 9615 6808 8106 3801 6278 9733 3300 2419 8087 2685 8764 7948 4714 3446 4694 3326 8908 6066 4240 3615 8712 9530 6680 6655 7150 4653 1177 1267 9512 6506 4235 1079 2468 5693 2266 8103 1222 4949 8352 867 4274 2788 8264 6016 1254 7939 2062 3619 7534 1149 9161 9973 5652 924 797 6767 650 8743 6473 268 2155 8262 7690 9243 6836 6193 9298 2647 4457 7487 9861 7264 605 6126 9704 863 8983 8451 4148 5258 9459 7209 1656 6520 5701 204 3936 8678 3162 3178 6382 5186 3586 7555 8680 5588 4934 6614 8989 5296 7214 9666 8821 7876 9795 8336 1698 7262 7837 5813 7550 4816 7615 8820 1360 2208 518 1539 8895 6222 4501 4030 57 7739 2501 9455 8074 6700 8325 3676 3849 2428 8944 9768 5864 6047 2544 481 1040 7431 6284 9059 7128 8098 1085 9901 4724 5704 7860 9440 3551 4222 2424 4953 3267 8138 5073 1037 2067 2342 2607 3310 4982 1036 4063 6929 2569 6381 2051 9383 3996 1385 4771 5637 4519 6825 4449 3170 9406 8030 7482 7745 2122 4441 9898 2142 5189 2197 1016 7056 9891 2164 7795 7758 2655 8608 8436 9327 4400 2978 8980 9536 191 9513 9349 8018 2967 2894 5001 7524 7198 7183 6577 8151 7145 4309 7067 8593 5972 6987 8914 2919 5976 7740 609 4020 724 2403 7053 977 8705 9245 4550 1726 5546 8991 8689 3651 4836 1097 9358 4986 1232 3985 3061 8122 7966 3410 1633 204 7870 5411 1471 6440 3457 7257 712 1193 780 1621 6017 6466 1459 8340 7990 9833 8330 8471 9901 5505 2631 4343 4368 9259 5313 9480 3812 6762 683 619 341 8776 5282 4330 9572 8556 6368 4755 4836 6460 4785 5966 1200 1655 8382 7571 8893 7869 6372 2327 4115 3069 2501 3978 5769 179 6742 4719 8324 1070 7419 1793 4509 5985 6434 1609 3060 8788 3515 3795 2047 6535 7276 9011 5671 9859 2818 3798 2609 1102 4336 6842 8419 8246 3084 7714 8713 3622 1125 8400 6825 4050 737 5508 8699 4700 2487 3216 5492 9150 8680 7660 1354 3085 5921 1236 8697 1920 4949 2845 3381 3958 9804 655 7679 8494 799 5180 226 7480 7928 8200 5222 767 3973 3936 9243 7445 9488 386 9605 4428 8403 9314 3799 4081 2201 8349 1288 5898 9367 8767 4201 9312 7533 1461 8625 878 4931 2930 9515 8952 7513 3350 95 4909 5724 9370 5346 2063 1732 4789 9202 7348 3904 9802 1020 996 1664 1447 4216 3091 61 1996 2448 2227 8874 4438 1682 6113 7717 8057 52 682 8733 2634 4667 5745 2415 212 854 6410 9749 7165 238 215 2432 2826 3082 4864 1552 6016 1444 9425 6447 8081 8283 3981 3965 4951 7512 9622 4582 7274 6068 9199 7663 4312 3888 9677 9689 3094 2920 9390 6644 5432 8351 909 2010 3957 1192 5547 5111 7244 2895 7263 8522 8281 6818 7466 1085 1403 984 5767 5563 6800 8628 5234 8820 5000 2475 4766 2221 8335 1234 8870 9371 2509 8758 3852 6153 6479 1078 4038 7790 7759 3586 7469 4902 5104 1822 4635 1269 2636 6652 8152 346 2194 8921 8332 4387 618 2607 37 4589 4569 7979 6658 4623 7167 8022 2420 120 8684 3188 6184 6339 4453 5672 7834 4277 9803 4216 6036 9353 8016 2267 5770 9747 8254 5135 7123 2594 7947 9290 1710 1623 3333 3919 4176 6113 2689 6275 2861 7356 4659 2721 8162 728 4082 124 2500 6751 6558 5550 3812 4315 5016 4585 9477 6042 2994 7498 5646 8378 7944 6685 8106 9483 8920 4544 7946 513 3195 2454 8633 2497 8419 2693 8800 3293 116 8855 8121 3065 8435 9728 7514 1554 2515 3801 5735 1338 8151 1299 6226 4296 6252 3600 6289 6381 1778 4218 424 2589 8531 3729 7544 8396 9961 2323 2918 5706 5168 4145 1864 6558 6458 6763 1677 7765 5475 6254 356 7400 5757 118 2334 3188 4520 5164 7041 4326 3932 6884 4120 8757 1951 2545 9872 3034 3519 1936 6285 3872 8825 8812 6764 684 3605 658 6852 6125 4717 2292 998 3246 7105 2742 5859 4267 5468 5682 262 4943 7647 67 9617 5939 3919 2216 9634 2441 6734 2745 8237 6954 996 7789 4402 905 505 436 2337 9930 2708 43 3773 4289 7476 8310 1439 408 8796 1775 7455 3516 1684 7101 1110 7878 6188 4795 2269 2501 9692 3122 9456 9996 2989 8127 6182 2803 4234 4001 3854 5782 2316 5588 9340 448 9053 1086 4921 2893 7450 5823 6006 5133 3456 4224 372 3701 3167 4081 311 9436 4316 3478 6012 9665 5490 7740 7095 3387 7746 2494 1523 5480 8944 5230 9028 5799 7496 689 7649 6137 9601 6095 6624 3810 1240 6710 244 5241 892 8778 3018 1737 1995 9977 499 2236 6468 7332 8817 3588 7146 3773 7963 1606 962 6338 5232 3533 9417 4024 4386 3151 3516 3620 1051 3875 7119 189 7060 31 3525 9361 1337 9582 831 7945 4926 6664 7961 5986 6520 880 462 9504 1901 7869 2037 7404 7070 8007 1150 3194 5999 3827 4936 3210 9978 7319 4174 3505 6152 1486 9165 2985 4354 3313 4461 2150 9690 1106 1023 914 6046 447 3873 9932 8283 2183 9468 8648 9883 8576 3402 887 9741 4517 6995 122 5218 4412 7130 8978 4575 7656 2346 9929 7163 2685 7261 5799 722 9545 617 5032 6697 8468 7294 6293 5677 3638 1573 2098 2961 7849 6314 5868 7543 840 2851 8876 4031 8225 6148 4353 4358 6627 8292 4917 4304 2393 4388 7428 9239 3188 7428 9075 503 1707 2571 5008 8295 2408 432 4603 2787 1409 1733 1826 3487 6407 1576 8033 6559 2504 9118 6754 9622 9343 1145 6021 6954 584 1404 7167 3059 9835 851 4827 2752 2399 1389 7114 4097 9349 7515 8925 7160 4005 5414 7904 906 9740 8813 9579 2612 8187 2994 5050 7464 2726 4580 3269 8237 4121 1312 8179 8374 7752 7643 9626 1251 4603 3399 6249 1272 1347 8720 5270 7682 7948 4102 6158 45 5244 720 5598 2775 61 4669 4994 9029 4298 6558 3025 3371 5876 5726 638 847 530 8021 3407 5027 8423 9735 9163 3512 9055 1880 5793 4026 2777 802 7823 6360 6169 9667 7539 2905 6572 5191 3290 5905 1867 6585 3983 4837 8603 4079 4412 3507 1856 9347 610 8072 8407 4459 3854 1484 5620 8318 3019 1468 3900 8415 3324 1901 8435 6431 48 1354 6151 1244 3774 9959 6780 4035 2409 1532 9588 6976 3860 3018 8556 1672 8528 1714 4856 8934 4434 3233 2723 841 6986 7759 6403 6151 5931 782 4708 6735 1554 4495 8138 7418 1117 481 9138 6147 8149 6018 6737 5589 4728 4431 4511 4074 7175 9603 8192 2319 1188 5037 8055 5571 8382 1331 2764 4055 24 334 3543 8952 8688 22 8615 4289 2686 4903 5014 8644 3965 8360 9821 825 3415 3646 3321 1316 6770 9922 171 5839 611 6781 9647 9655 8115 936 3273 5561 5371 3299 718 4477 2236 8062 390 4764 7362 1071 5101 4834 2127 3135 3195 5693 7112 3970 9002 4451 215 1882 5341 2383 6094 4529 7135 1785 6868 2632 7351 7331 7025 2870 3542 9636 723 9395 7064 1547 6050 9807 1043 8502 9531 5221 2356 7007 1024 1751 5534 9238 9006 3291 6346 1748 9224 5413 8503 9323 5337 3608 6886 3775 1895 816 5859 7237 5582 8768 3484 2747 5986 1845 8661 966 6602 1354 2971 3010 6716 1192 4412 6749 6783 1194 5524 2620 4565 5004 9754 4212 29 2231 6487 9054 4383 5652 5017 1573 8272 4167 6382 6515 284 9901 4312 6522 2439 4732 3054 3604 3520 2980 9650 7031 6416 6933 6675 5148 3648 8190 3356 1826 9191 1406 8548 420 7528 1378 5754 3547 4927 9944 7949 9084 301 6852 2557 9128 9144 2257 3672 1391 8529 6727 9905 8830 3552 1748 4477 4417 7882 1694 5141 2249 4270 9053 1721 6655 4517 1750 2628 5024 7516 9845 1265 2777 7491 4685 9058 8844 138 528 6839 8024 1694 1597 6911 1312 1436 9406 9911 6145 4174 251 9999 6091 5606 4758 6464 1549 9782 9379 5390 6120 2098 3198 3722 4304 513 9262 5280 1995 5060 9339 8838 1914 3185 5473 2519 9611 3894 7980 9578 2441 2534 8430 3157 6915 141 4991 2204 6315 5297 2146 2029 206 2446 7020 6139 1415 5014 1130 8903 55 7540 2794 9545 2061 1676 912 9966 3797 222 8722 2185 4785 9084 6071 2266 5492 598 1545 2322 2521 2836 1628 3586 538 8579 7419 3756 9438 5493 1746 3368 41 8535 8714 6079 1234 2845 2119 542 3094 9636 5312 2803 7208 2306 6486 1663 5351 2730 6200 7286 3245 8802 1185 9109 30 8792 3365 8596 5370 7222 5025 6921 8554 2785 9518 6066 9606 8851 9138 6802 3311 6750 9079 4799 5689 7183 4142 4566 3675 5162 5959 558 2244 6062 8659 9193 4347 9726 9271 1782 3398 3043 3911 8737 7173 1592 3810 8052 5219 5042 5008 428 2750 6714 4934 6985 5656 5731 4391 995 6239 6495 6414 1043 2961 3668 7283 1407 1817 324 6032 4781 2929 9944 1308 5351 9798 3867 367 859 3843 4709 8710 5294 8955 1603 3356 7837 1710 5905 3315 7982 9892 3192 8701 871 5691 1336 2073 7757 6191 4156 8747 5615 6627 9795 76 7176 8869 638 6863 2297 2024 6109 644 8697 7326 1981 4191 7705 1006 8897 5128 6726 9939 8043 7848 6684 2765 7296 3724 7822 6145 3608 4342 7379 7728 9677 7661 900 3380 4889 1025 6429 6542 8470 4989 9193 3783 6011 7625 380 1354 1862 3407 8700 4845 2475 7572 3611 5996 1051 1289 1754 5666 7141 249 613 9890 8792 8254 1883 2637 9800 9216 5604 767 8583 4309 7790 3253 1063 8571 5512 7576 5018 8678 4184 4246 4442 2282 3170 8126 513 6618 8012 8455 3411 6926 9614 8546 1989 917 3477 3257 2290 9013 3769 1606 5993 3355 3368 4837 2671 345 8658 2626 8525 5506 4305 2690 9053 9932 3643 3651 7658 7109 2986 674 8039 6012 6730 93 8559 8271 1913 4756 8404 1836 5252 3335 7487 5755 6685 2726 6616 9231 1205 8829 8547 5210 8293 5494 5006 9358 3360 4573 4587 4937 3800 2860 9888 9210 6450 5710 4946 1384 1538 4157 1199 1708 6575 3526 9782 3259 3830 1757 5118 7219 3154 4798 2909 9967 9766 8999 3161 688 4409 6731 117 8264 766 771 2446 5598 5807 2603 5423 621 8075 3511 6239 9935 1680 2179 1859 9254 7065 7306 9792 4967 6189 9586 2815 2788 7025 2729 8891 3331 7653 4691 9435 4422 6943 9704 8257 120 5008 109 6363 1898 9294 1487 1744 374 0 2092 6759 8703 6736 7273 4494 -------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- 8583 4907 6936 6642 4747 1159 9486 149 917 8636 7091 1235 2801 8169 3103 6296 692 4501 6691 7919 4 4042 3160 5779 3468 3926 7991 3802 2976 329 8725 5558 5762 6542 6909 3218 4502 1868 2038 19 6556 395 9820 2716 8061 4980 1318 1785 7534 9356 9779 9516 1875 5892 1067 1642 6008 7614 5157 9616 8228 8924 4953 5481 6099 574 7704 6858 1041 8549 4147 1481 9165 6846 6320 9183 8561 8616 4781 2395 1344 9269 3924 9837 413 455 7874 4478 6953 7971 4900 2058 1162 3081 7842 5987 7029 1747 525 2545 2447 7427 8956 8012 2596 9805 8303 1550 4559 2110 7865 1168 8971 440 3310 6647 4455 5670 723 1889 5412 6607 4695 1712 476 5957 3212 8711 9936 8706 6145 4509 3207 3126 8147 1781 2306 5717 5520 1698 6102 3711 6016 2064 4000 4914 438 8164 5404 6531 4029 1603 3167 8205 6958 3938 5448 932 9481 4337 6104 2894 3417 5524 2986 8912 2035 3370 6919 5036 2398 5058 6443 9409 3367 6742 2182 8468 3902 7034 8591 6824 4470 8301 570 3001 6474 8503 4905 4535 7050 2421 6553 9240 9948 8539 7556 1166 9526 4603 4664 9665 5196 8745 1269 715 6193 3615 4162 2871 83 6719 297 259 9264 4844 5865 1832 4253 389 2938 8608 8775 553 5843 2308 2410 8594 5737 9087 8548 568 269 3210 2815 6451 7180 7396 1431 3539 392 4064 7371 2059 8908 9040 3232 2204 239 2761 648 2743 6704 435 8673 5587 6661 4813 8719 8246 9568 8070 3723 2649 7910 3353 2274 52 5909 5648 9561 1006 6797 2020 3130 1596 3689 7231 7588 9385 2386 3893 7170 9607 4675 2777 9540 1565 9145 2006 5713 8581 2433 1673 6279 5285 8318 4287 7020 6704 7226 1974 3717 8871 2601 3476 5531 6685 4841 6467 6706 5555 9570 1739 1612 8866 7509 9075 115 9555 4910 8325 3348 1408 5846 3598 5558 3968 5822 5685 2540 407 4893))))) Compilation: cpu time: 564 real time: 846 gc time: 5 Evaluation: (letrec ((builtin (dynamic-require "builtins" none)) (print (#%vm-procedure-------------------- ERROR name: check-equal? location: main.rkt:88:6 system*: contract violation expected: path-string? given: #f -------------------- (=> builtin "print") 1)) (stream-filter (lambda (p s) (if (equal? s none) none (let ((f (stream-car s))) (if (p f) (stream-cons f (stream-filter p (stream-cdr s))) (stream-filter p (stream-cdr s))))))) (numbers (let loop ((n 2)) (stream-cons n (loop (+ n 1))))) (primes (let loop ((ns numbers)) (let ((first (stream-car ns)) (rest (stream-cdr ns))) (stream-cons first (loop (stream-filter (lambda (n) (not (equal? (modulo n first) 0))) rest))))))) (let loop ((n 300) (ps primes)) (if (equal? n 0) (print (stream-car ps)) (loop (- n 1) (stream-cdr ps))))) Compilation: cpu time: 1159 real time: 1521 gc time: 11 Evaluation: raco setup: rendering: /racket-index/scribblings/main/user/search.scrbl raco setup: rendering: /racket-index/scribblings/main/user/start.scrbl raco setup: --- installing collections --- [7:10:18] raco setup: --- post-installing collections --- [7:10:18] raco setup: --- summary of errors --- [7:10:18] raco setup: error: during making for /rkt-pythonize raco setup: s-exp->fasl: cannot write value raco setup: value: # raco setup: compiling: /rkt-pythonize/passes/main.rkt raco setup: error: during making for /rkt-pythonize/passes raco setup: s-exp->fasl: cannot write value raco setup: value: # racket pkg install: packages installed, although setup reported errors GC: 0:atexit peak 260,591K(+61,784K); alloc 20,290,163K; major 25; minor 2455; 129574ms The time is now Fri, 17 Jul 2026 02:10:18 -0500