Profiling results ----------------- Total cpu time observed: 42962ms (out of 43356ms) Number of samples taken: 201 (once every 214ms) (Hiding functions with self<1.0% and local<2.0%: 4 of 110 hidden) ===================================================================== Caller Idx Total Self Name+src Local% ms(pct) ms(pct) Callee ===================================================================== ??? [31] 100.0% [1] 41698(97.1%) 0(0.0%) profile-thunk14 ...t/pkgs/profile-lib/main.rkt:9:0 run [4] 100.0% --------------------------------------------------------------------- ??? [31] 100.0% [2] 15740(36.6%) 0(0.0%) run-improve58 ...ock/herbie/src/mainloop.rkt:242:0 for-loop [5] 74.5% get-final-combination [8] 20.8% loop [40] 4.7% --------------------------------------------------------------------- loop [69] 2.3% ??? [31] 97.7% [3] 9930(23.1%) 0(0.0%) simplify ...lock/herbie/src/core/simplify.rkt:39:0 simplify-expr [6] 42.3% for-loop [7] 35.4% iterate-egraph!5 [10] 22.3% --------------------------------------------------------------------- profile-thunk14 [1] 100.0% [4] 41698(97.1%) 0(0.0%) run ...share/racket/pkgs/profile-lib/main.rkt:31:2 ??? [31] 100.0% --------------------------------------------------------------------- run-improve58 [2] 100.0% [5] 11728(27.3%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:253:8 run-iter! [9] 100.0% --------------------------------------------------------------------- simplify [3] 100.0% [6] 4200(9.8%) 0(0.0%) simplify-expr ...herbie/src/core/simplify.rkt:68:0 iterate-egraph!5 [10] 100.0% --------------------------------------------------------------------- simplify [3] 100.0% [7] 3520(8.2%) 0(0.0%) for-loop ...ock/herbie/src/core/simplify.rkt:61:12 iterate-egraph!5 [10] 87.9% debug7 [12] 6.4% loop [14] 5.7% --------------------------------------------------------------------- run-improve58 [2] 100.0% [8] 3268(7.6%) 0(0.0%) get-final-combination ...ie/src/mainloop.rkt:269:0 split-table [11] 93.1% extract-alt [13] 6.9% --------------------------------------------------------------------- for-loop [5] 100.0% [9] 11728(27.3%) 0(0.0%) run-iter! ...tatlock/herbie/src/mainloop.rkt:223:0 simplify! [15] 82.8% finalize-iter! [18] 12.1% gen-series! [20] 3.6% localize-error [22] 1.5% --------------------------------------------------------------------- simplify [3] 23.3% for-loop [7] 32.6% simplify-expr [6] 44.2% [10] 9504(22.1%) 0(0.0%) iterate-egraph!5 ...bie/src/core/simplify.rkt:95:0 one-iter [16] 93.4% map-enodes [19] 6.6% --------------------------------------------------------------------- get-final-combination [8] 100.0% [11] 3044(7.1%) 0(0.0%) split-table .../ztatlock/herbie/src/glue.rkt:171:0 infer-splitpoints4 [17] 100.0% --------------------------------------------------------------------- for-loop [7] 100.0% [12] 224(0.5%) 224(0.5%) debug7 /home/ztatlock/herbie/src/debug.rkt:102:0 --------------------------------------------------------------------- get-final-combination [8] 100.0% [13] 224(0.5%) 0(0.0%) extract-alt ...e/ztatlock/herbie/src/glue.rkt:57:0 loop [69] 100.0% --------------------------------------------------------------------- for-loop [7] 100.0% [14] 202(0.5%) 0(0.0%) loop ...tatlock/herbie/src/core/simplify.rkt:203:2 pass [21] 100.0% --------------------------------------------------------------------- run-iter! [9] 100.0% [15] 9706(22.6%) 0(0.0%) simplify! ...tatlock/herbie/src/mainloop.rkt:162:0 for-loop [23] 100.0% --------------------------------------------------------------------- iterate-egraph!5 [10] 100.0% [16] 8880(20.7%) 202(0.5%) one-iter ...ock/herbie/src/core/simplify.rkt:106:0 for-loop [24] 48.0% loop [25] 47.2% apply-match [32] 2.5% --------------------------------------------------------------------- split-table [11] 100.0% [17] 3044(7.1%) 0(0.0%) infer-splitpoints4 ...ie/src/core/regimes.rkt:19:0 option-on-expr [26] 93.7% debug-print [96] 6.3% --------------------------------------------------------------------- run-iter! [9] 100.0% [18] 1424(3.3%) 0(0.0%) finalize-iter! ...ck/herbie/src/mainloop.rkt:177:0 ??? [27] 100.0% --------------------------------------------------------------------- iterate-egraph!5 [10] 100.0% [19] 624(1.5%) 0(0.0%) map-enodes ...ock/herbie/src/core/egraph.rkt:139:0 loop [69] 67.6% hash-keys [29] 32.4% --------------------------------------------------------------------- run-iter! [9] 100.0% [20] 418(1.0%) 0(0.0%) gen-series! ...tlock/herbie/src/mainloop.rkt:134:0 for-loop [28] 100.0% --------------------------------------------------------------------- loop [14] 100.0% [21] 202(0.5%) 0(0.0%) pass ...tatlock/herbie/src/core/simplify.rkt:193:2 for-loop [30] 100.0% --------------------------------------------------------------------- run-iter! [9] 100.0% [22] 180(0.4%) 0(0.0%) localize-error ...erbie/src/core/localize.rkt:47:0 hash-ref! [84] 100.0% --------------------------------------------------------------------- simplify! [15] 100.0% [23] 9706(22.6%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:166:6 ??? [31] 100.0% --------------------------------------------------------------------- for-loop [24] 50.0% one-iter [16] 50.0% [24] 4262(9.9%) 834(1.9%) for-loop ...ck/herbie/src/core/simplify.rkt:116:12 for-loop [24] 50.0% match-e [41] 40.2% --------------------------------------------------------------------- one-iter [16] 100.0% [25] 4194(9.8%) 0(0.0%) loop ...cket/collects/racket/private/map.rkt:53:19 apply-match [32] 100.0% --------------------------------------------------------------------- infer-splitpoints4 [17] 100.0% [26] 2852(6.6%) 0(0.0%) option-on-expr ...erbie/src/core/regimes.rkt:106:0 sort-context-on-expr [33] 85.5% pick-errors [36] 7.4% errors [58] 7.1% --------------------------------------------------------------------- finalize-iter! [18] 100.0% [27] 1424(3.3%) 0(0.0%) ??? ...contract/private/arrow-val-first.rkt:357:18 for-loop [34] 87.5% atab-add-altns [39] 12.5% --------------------------------------------------------------------- gen-series! [20] 100.0% [28] 418(1.0%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:140:7 taylor-alt [35] 100.0% --------------------------------------------------------------------- map-enodes [19] 100.0% [29] 202(0.5%) 0(0.0%) hash-keys .../collects/racket/private/hash.rkt:2:2 loop [37] 100.0% --------------------------------------------------------------------- pass [21] 100.0% [30] 202(0.5%) 0(0.0%) for-loop ...ck/herbie/src/core/simplify.rkt:196:29 for-loop [38] 100.0% --------------------------------------------------------------------- for-loop [23] 8.0% run [4] 45.3% [31] 42962(100.0%) 0(0.0%) ??? ...lects/racket/private/more-scheme.rkt:261:28 profile-thunk14 [1] 45.3% loop [40] 31.7% run-improve58 [2] 15.0% simplify [3] 8.0% --------------------------------------------------------------------- one-iter [16] 5.0% loop [25] 95.0% [32] 4416(10.3%) 202(0.5%) apply-match .../herbie/src/core/simplify.rkt:122:2 merge-egraph-nodes! [43] 35.5% update-leader! [48] 30.0% match-e [41] 19.1% loop! [76] 10.9% --------------------------------------------------------------------- option-on-expr [26] 100.0% [33] 2438(5.7%) 0(0.0%) sort-context-on-expr ...herbie/src/points.rkt:50:0 sort [42] 100.0% --------------------------------------------------------------------- ??? [27] 100.0% [34] 1246(2.9%) 0(0.0%) for-loop ...ock/herbie/src/core/alt-table.rkt:51:2 atab-add-altn [44] 100.0% --------------------------------------------------------------------- for-loop [28] 100.0% [35] 418(1.0%) 0(0.0%) taylor-alt ...e/ztatlock/herbie/src/glue.rkt:142:0 for-loop [45] 100.0% --------------------------------------------------------------------- option-on-expr [26] 100.0% [36] 212(0.5%) 0(0.0%) pick-errors ...k/herbie/src/core/regimes.rkt:173:0 for-loop [46] 100.0% --------------------------------------------------------------------- hash-keys [29] 3.7% loop [37] 96.3% [37] 202(0.5%) 202(0.5%) loop ...acket/collects/racket/private/hash.rkt:3:4 loop [37] 96.3% --------------------------------------------------------------------- for-loop [30] 100.0% [38] 202(0.5%) 202(0.5%) for-loop ...ck/herbie/src/core/simplify.rkt:183:13 --------------------------------------------------------------------- ??? [27] 100.0% [39] 178(0.4%) 0(0.0%) atab-add-altns ...rbie/src/core/alt-table.rkt:50:0 atab-add-altn [44] 100.0% --------------------------------------------------------------------- run-improve58 [2] 2.7% ??? [31] 97.3% [40] 27966(65.1%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:122:2 loop [47] 50.2% make-exacts* [53] 47.9% loop [54] 2.0% --------------------------------------------------------------------- apply-match [32] 11.3% for-loop [57] 18.9% for-loop [24] 69.7% [41] 4270(9.9%) 1282(3.0%) match-e ...tatlock/herbie/src/core/ematch.rkt:46:0 for-loop [49] 51.8% list-cartesian-product [59] 12.1% for-loop [57] 6.9% loop [69] 5.2% --------------------------------------------------------------------- sort-context-on-expr [33] 100.0% [42] 2438(5.7%) 0(0.0%) sort ...ket/collects/racket/private/sort.rkt:213:0 copying-mergesort [50] 73.3% loop [56] 26.7% --------------------------------------------------------------------- apply-match [32] 100.0% [43] 1568(3.6%) 0(0.0%) merge-egraph-nodes! ...e/src/core/egraph.rkt:152:0 update-leader! [48] 100.0% --------------------------------------------------------------------- atab-add-altns [39] 12.5% for-loop [34] 87.5% [44] 1424(3.3%) 0(0.0%) atab-add-altn ...rbie/src/core/alt-table.rkt:208:0 best-and-tied-at-points [51] 87.5% loop [69] 12.5% --------------------------------------------------------------------- taylor-alt [35] 100.0% [45] 418(1.0%) 0(0.0%) for-loop /home/ztatlock/herbie/src/glue.rkt:144:2 location-do [52] 100.0% --------------------------------------------------------------------- pick-errors [36] 100.0% [46] 212(0.5%) 0(0.0%) for-loop ...lock/herbie/src/core/regimes.rkt:176:4 eval-prog [70] 100.0% --------------------------------------------------------------------- loop [40] 100.0% [47] 14034(32.7%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:93:2 loop [54] 57.3% make-exacts* [53] 42.7% --------------------------------------------------------------------- apply-match [32] 45.8% merge-egraph-nodes! [43] 54.2% [48] 2892(6.7%) 200(0.5%) update-leader! ...herbie/src/core/egraph.rkt:217:0 for-loop [55] 93.1% --------------------------------------------------------------------- match-e [41] 100.0% [49] 2592(6.0%) 1106(2.6%) for-loop ...tlock/herbie/src/core/ematch.rkt:59:11 for-loop [57] 42.2% list-cartesian-product [59] 11.7% loop [69] 7.7% --------------------------------------------------------------------- sort [42] 48.6% copying-mergesort [50] 51.4% [50] 1786(4.2%) 0(0.0%) copying-mergesort .../racket/private/sort.rkt:91:4 copying-mergesort [50] 51.4% loop [56] 45.5% jloop [62] 3.1% --------------------------------------------------------------------- atab-add-altn [44] 100.0% [51] 1246(2.9%) 0(0.0%) best-and-tied-at-points ...ore/alt-table.rkt:122:0 errors [58] 67.7% for-loop [61] 32.3% --------------------------------------------------------------------- location-do [52] 28.7% for-loop [45] 71.3% [52] 418(1.0%) 0(0.0%) location-do ...tlock/herbie/src/programs.rkt:129:0 approximate9 [60] 71.3% location-do [52] 28.7% --------------------------------------------------------------------- loop [47] 30.9% loop [40] 69.1% [53] 19376(45.1%) 0(0.0%) make-exacts* ...tatlock/herbie/src/points.rkt:80:0 loop [69] 58.0% map [63] 42.0% --------------------------------------------------------------------- loop [40] 6.4% loop [47] 93.6% [54] 8590(20.0%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:83:4 map [63] 100.0% --------------------------------------------------------------------- update-leader! [48] 100.0% [55] 2692(6.3%) 220(0.5%) for-loop ...tlock/herbie/src/core/egraph.rkt:222:6 for-loop [64] 91.8% --------------------------------------------------------------------- sort [42] 29.4% copying-mergesort [50] 70.6% [56] 2218(5.2%) 0(0.0%) loop ...cket/collects/racket/private/sort.rkt:64:8 ??? [65] 100.0% --------------------------------------------------------------------- match-e [41] 31.6% for-loop [49] 68.4% [57] 1746(4.1%) 240(0.6%) for-loop ...tlock/herbie/src/core/ematch.rkt:65:37 match-e [41] 81.6% ??? [68] 11.6% --------------------------------------------------------------------- option-on-expr [26] 19.3% best-and-tied-at-points [51] 80.7% [58] 1046(2.4%) 0(0.0%) errors /home/ztatlock/herbie/src/points.rkt:144:0 for-loop [66] 55.8% eval-prog [70] 44.2% --------------------------------------------------------------------- for-loop [49] 19.7% match-e [41] 30.3% list-cartesian-product [59] 50.0% [59] 1020(2.4%) 1020(2.4%) list-cartesian-product ...src/core/ematch.rkt:20:0 list-cartesian-product [59] 50.0% --------------------------------------------------------------------- location-do [52] 100.0% [60] 418(1.0%) 0(0.0%) approximate9 ...ck/herbie/src/core/taylor.rkt:11:0 loop [67] 100.0% --------------------------------------------------------------------- best-and-tied-at-points [51]100.0% [61] 402(0.9%) 402(0.9%) for-loop ...k/herbie/src/core/alt-table.rkt:124:16 --------------------------------------------------------------------- copying-mergesort [50] 100.0% [62] 220(0.5%) 0(0.0%) jloop ...et/collects/racket/private/sort.rkt:85:19 ??? [65] 100.0% --------------------------------------------------------------------- f16 [98] 1.1% make-exacts* [53] 48.1% loop [54] 50.8% [63] 16910(39.4%) 0(0.0%) map ...acket/collects/racket/private/map.rkt:21:13 loop [69] 98.9% f16 [98] 0.7% --------------------------------------------------------------------- for-loop [55] 100.0% [64] 2472(5.8%) 0(0.0%) for-loop ...tlock/herbie/src/core/egraph.rkt:223:8 hash-update! [71] 100.0% --------------------------------------------------------------------- jloop [62] 9.0% loop [56] 91.0% [65] 2438(5.7%) 0(0.0%) ??? /home/ztatlock/herbie/src/points.rkt:52:27 eval-prog [70] 100.0% --------------------------------------------------------------------- errors [58] 100.0% [66] 584(1.4%) 382(0.9%) for-loop ...e/ztatlock/herbie/src/points.rkt:147:4 ulp-difference [72] 34.6% --------------------------------------------------------------------- approximate9 [60] 100.0% [67] 418(1.0%) 0(0.0%) loop ...e/ztatlock/herbie/src/core/taylor.rkt:82:4 hash-ref! [84] 100.0% --------------------------------------------------------------------- for-loop [57] 100.0% [68] 202(0.5%) 202(0.5%) ??? /home/ztatlock/herbie/src/core/ematch.rkt:50:5 --------------------------------------------------------------------- for-loop [49] 0.0% map-enodes [19] 0.1% match-e [41] 0.1% extract-alt [13] 0.2% atab-add-altn [44] 0.6% parse-loop12 [93] 0.6% map [63] 0.8% make-exacts* [53] 0.8% loop! [76] 0.9% loop [69] 95.7% [69] 29870(69.5%) 220(0.5%) loop ...cket/collects/racket/private/map.rkt:26:19 loop [69] 95.7% ??? [73] 1.6% loop! [76] 0.9% ??? [79] 0.6% loop [80] 0.6% simplify [3] 0.2% for-loop [77] 0.1% --------------------------------------------------------------------- for-loop [46] 6.8% errors [58] 14.8% ??? [65] 78.3% [70] 3112(7.2%) 2446(5.7%) eval-prog ...tatlock/herbie/src/programs.rkt:162:0 ??? [75] 21.4% --------------------------------------------------------------------- for-loop [64] 100.0% [71] 2472(5.8%) 0(0.0%) hash-update! ...ket/private/more-scheme.rkt:362:13 ??? [74] 100.0% --------------------------------------------------------------------- for-loop [66] 100.0% [72] 202(0.5%) 0(0.0%) ulp-difference ...atlock/herbie/src/float.rkt:19:0 ??? [78] 100.0% --------------------------------------------------------------------- loop [69] 100.0% [73] 27966(65.1%) 538(1.3%) ??? /home/ztatlock/herbie/src/programs.rkt:168:4 ??? [81] 92.2% real->bigfloat [83] 4.4% ??? [85] 1.5% --------------------------------------------------------------------- hash-update! [71] 100.0% [74] 2472(5.8%) 200(0.5%) ??? .../ztatlock/herbie/src/core/egraph.rkt:225:24 for-loop [82] 91.9% --------------------------------------------------------------------- eval-prog [70] 100.0% [75] 666(1.6%) 444(1.0%) ??? ...collects/racket/private/qq-and-or.rkt:155:9 ??? [88] 33.3% --------------------------------------------------------------------- loop [69] 50.0% apply-match [32] 50.0% [76] 480(1.1%) 0(0.0%) loop! .../ztatlock/herbie/src/core/enode.rkt:163:2 loop [69] 50.0% custom-set-union [86] 25.0% set [87] 25.0% --------------------------------------------------------------------- loop [69] 100.0% [77] 422(1.0%) 222(0.5%) for-loop ...ock/herbie/src/core/simplify.rkt:161:2 setfindf [89] 47.4% --------------------------------------------------------------------- ulp-difference [72] 100.0% [78] 202(0.5%) 202(0.5%) ??? /home/ztatlock/herbie/src/config.rkt:29:0 --------------------------------------------------------------------- loop [69] 100.0% [79] 180(0.4%) 0(0.0%) ??? ...ket/collects/racket/private/list.rkt:323:18 hash-ref! [84] 100.0% --------------------------------------------------------------------- loop [69] 25.0% loop [80] 75.0% [80] 178(0.4%) 178(0.4%) loop ...ket/collects/racket/private/list.rkt:82:16 loop [80] 75.0% --------------------------------------------------------------------- ??? [73] 100.0% [81] 25786(60.0%) 200(0.5%) ??? ...acket/collects/racket/private/kw.rkt:400:14 ??? [95] 97.5% --------------------------------------------------------------------- ??? [74] 100.0% [82] 2272(5.3%) 1430(3.3%) for-loop ...lock/herbie/src/core/egraph.rkt:226:26 update-en-expr [90] 37.1% --------------------------------------------------------------------- ??? [73] 100.0% [83] 1222(2.8%) 1222(2.8%) real->bigfloat .../private/bigfloat/mpfr.rkt:451:0 --------------------------------------------------------------------- ??? [94] 14.9% ??? [79] 15.1% localize-error [22] 15.1% ??? [92] 27.5% loop [67] 27.5% [84] 598(1.4%) 0(0.0%) hash-ref! ...racket/private/more-scheme.rkt:373:13 parse-loop12 [93] 30.1% ??? [92] 27.5% simplify [91] 27.5% ??? [94] 14.9% --------------------------------------------------------------------- ??? [73] 100.0% [85] 420(1.0%) 0(0.0%) ??? ...ects/racket/contract/private/guts.rkt:638:8 ??? [99] 100.0% --------------------------------------------------------------------- loop! [76] 100.0% [86] 240(0.6%) 240(0.6%) custom-set-union ...et/private/set-types.rkt:168:0 --------------------------------------------------------------------- loop! [76] 100.0% [87] 240(0.6%) 240(0.6%) set ...collects/racket/private/set-types.rkt:982:0 --------------------------------------------------------------------- ??? [75] 100.0% [88] 222(0.5%) 222(0.5%) ??? ...ollects/racket/private/qq-and-or.rkt:164:21 --------------------------------------------------------------------- for-loop [77] 100.0% [89] 200(0.5%) 200(0.5%) setfindf ...e/ztatlock/herbie/src/common.rkt:173:0 --------------------------------------------------------------------- for-loop [82] 100.0% [90] 842(2.0%) 842(2.0%) update-en-expr ...herbie/src/core/egraph.rkt:211:0 --------------------------------------------------------------------- hash-ref! [84] 100.0% [91] 418(1.0%) 0(0.0%) simplify ...atlock/herbie/src/core/reduce.rkt:18:0 debug-print [96] 57.4% f16 [98] 42.6% --------------------------------------------------------------------- hash-ref! [84] 100.0% [92] 418(1.0%) 0(0.0%) ??? ...e/ztatlock/herbie/src/core/taylor.rkt:42:15 hash-ref! [84] 100.0% --------------------------------------------------------------------- hash-ref! [84] 100.0% [93] 180(0.4%) 0(0.0%) parse-loop12 ...s/racket/match/compiler.rkt:410:15 loop [69] 50.0% loop [97] 50.0% --------------------------------------------------------------------- hash-ref! [84] 100.0% [94] 178(0.4%) 0(0.0%) ??? .../ztatlock/herbie/src/core/taylor.rkt:338:33 hash-ref! [84] 100.0% --------------------------------------------------------------------- ??? [81] 98.3% [95] 25586(59.6%) 24574(57.2%) ??? ...-racket/utils/simple-result-arrow.rkt:26:12 ??? [99] 2.3% bfmul [101] 1.7% --------------------------------------------------------------------- infer-splitpoints4 [17] 44.4% simplify [91] 55.6% [96] 432(1.0%) 0(0.0%) debug-print ...ztatlock/herbie/src/debug.rkt:107:0 for-loop [100] 100.0% --------------------------------------------------------------------- parse-loop12 [93] 1.9% loop [97] 98.1% [97] 180(0.4%) 0(0.0%) loop ...cket/collects/racket/private/map.rkt:37:19 loop [97] 98.1% --------------------------------------------------------------------- simplify [91] 33.3% map [63] 66.7% [98] 178(0.4%) 0(0.0%) f16 ...t/collects/racket/match/compiler.rkt:499:40 map [63] 100.0% --------------------------------------------------------------------- ??? [85] 42.0% ??? [95] 58.0% [99] 1000(2.3%) 622(1.4%) ??? ...tract/private/arrow-higher-order.rkt:373:33 ??? [102] 19.6% ??? [104] 18.2% --------------------------------------------------------------------- debug-print [96] 100.0% [100] 432(1.0%) 240(0.6%) for-loop /home/ztatlock/herbie/src/debug.rkt:113:2 write-proc [103] 44.4% --------------------------------------------------------------------- ??? [95] 100.0% [101] 432(1.0%) 250(0.6%) bfmul ...-lib/math/private/bigfloat/mpfr.rkt:819:4 ??? [105] 42.1% --------------------------------------------------------------------- ??? [99] 100.0% [102] 196(0.5%) 0(0.0%) ??? ...ects/racket/contract/private/prop.rkt:489:4 ??? [106] 100.0% --------------------------------------------------------------------- for-loop [100] 100.0% [103] 192(0.4%) 192(0.4%) write-proc ...lock/herbie/src/alternative.rkt:22:9 --------------------------------------------------------------------- ??? [99] 100.0% [104] 182(0.4%) 182(0.4%) ??? ...llects/racket/contract/combinator.rkt:178:4 --------------------------------------------------------------------- bfmul [101] 100.0% [105] 182(0.4%) 182(0.4%) ??? .../share/racket/collects/ffi/unsafe.rkt:861:4 --------------------------------------------------------------------- ??? [102] 100.0% [106] 196(0.5%) 196(0.5%) ??? ...lects/racket/contract/private/orc.rkt:73:14 ---------------------------------------------------------------------