Profiling results ----------------- Total cpu time observed: 11716ms (out of 12496ms) Number of samples taken: 129 (once every 91ms) (Hiding functions with self<1.0% and local<2.0%: 1 of 106 hidden) ========================================================================= Caller Idx Total Self Name+src Local% ms(pct) ms(pct) Callee ========================================================================= ??? [30] 100.0% [1] 10446(89.2%) 0(0.0%) profile-thunk16 ...t/pkgs/profile-lib/main.rkt:9:0 run [5] 100.0% ------------------------------------------------------------------------- ??? [30] 100.0% [2] 6976(59.5%) 0(0.0%) run-improve50 ...ng-logging/src/mainloop.rkt:234:0 for-loop [6] 84.0% setup-alt-simplified [9] 13.5% loop [32] 2.5% ------------------------------------------------------------------------- for-loop [104] 3.2% loop [74] 96.8% [3] 3252(27.8%) 222(1.9%) ??? ...bie/sampling-logging/src/programs.rkt:154:4 ??? [7] 58.7% ??? [8] 34.5% ------------------------------------------------------------------------- ??? [37] 100.0% [4] 804(6.9%) 0(0.0%) loop ...mpling-logging/src/core/simplify.rkt:215:2 pass [10] 100.0% ------------------------------------------------------------------------- profile-thunk16 [1] 100.0% [5] 10446(89.2%) 0(0.0%) run ...share/racket/pkgs/profile-lib/main.rkt:39:2 ??? [30] 100.0% ------------------------------------------------------------------------- run-improve50 [2] 100.0% [6] 5858(50.0%) 0(0.0%) for-loop ...mpling-logging/src/mainloop.rkt:249:10 run-iter! [11] 100.0% ------------------------------------------------------------------------- ??? [3] 100.0% [7] 1908(16.3%) 470(4.0%) ??? ...acket/collects/racket/private/kw.rkt:444:14 ??? [12] 66.0% parse-loop145 [16] 3.5% ??? [17] 2.9% ...higher-order.rkt:346:33 [18] 2.9% ------------------------------------------------------------------------- ??? [3] 100.0% [8] 1122(9.6%) 0(0.0%) ??? ...contract/private/../../private/kw.rkt:761:9 real->bigfloat [13] 100.0% ------------------------------------------------------------------------- run-improve50 [2] 100.0% [9] 942(8.0%) 0(0.0%) setup-alt-simplified ...-logging/src/glue.rkt:49:0 simplify-alt [14] 100.0% ------------------------------------------------------------------------- loop [4] 100.0% [10] 804(6.9%) 0(0.0%) pass ...mpling-logging/src/core/simplify.rkt:205:2 for-loop [15] 100.0% ------------------------------------------------------------------------- for-loop [6] 100.0% [11] 5858(50.0%) 0(0.0%) run-iter! ...mpling-logging/src/mainloop.rkt:215:0 simplify! [19] 95.3% gen-series! [23] 2.9% finalize-iter! [25] 1.8% ------------------------------------------------------------------------- ??? [7] 100.0% [12] 1260(10.8%) 60(0.5%) ??? ...-racket/utils/simple-result-arrow.rkt:39:12 bfadd [20] 95.2% ------------------------------------------------------------------------- ??? [8] 100.0% [13] 1122(9.6%) 898(7.7%) real->bigfloat .../private/bigfloat/mpfr.rkt:451:0 ??? [28] 20.0% ------------------------------------------------------------------------- setup-alt-simplified [9] 100.0% [14] 942(8.0%) 0(0.0%) simplify-alt ...sampling-logging/src/glue.rkt:76:0 ??? [37] 100.0% ------------------------------------------------------------------------- pass [10] 100.0% [15] 804(6.9%) 0(0.0%) for-loop ...g-logging/src/core/simplify.rkt:208:29 argmin [21] 50.2% loop [22] 31.1% for-loop [24] 18.7% ------------------------------------------------------------------------- ??? [7] 100.0% [16] 66(0.6%) 66(0.6%) parse-loop145 .../racket/match/compiler.rkt:418:15 ------------------------------------------------------------------------- ??? [7] 100.0% [17] 56(0.5%) 56(0.5%) ??? ...ects/racket/contract/private/prop.rkt:493:4 ------------------------------------------------------------------------- ??? [7] 100.0% [18] 56(0.5%) 0(0.0%) ...higher-order.rkt:346:33 (unknown source) ??? [93] 100.0% ------------------------------------------------------------------------- run-iter! [11] 100.0% [19] 5584(47.7%) 0(0.0%) simplify! ...mpling-logging/src/mainloop.rkt:155:0 for-loop [26] 100.0% ------------------------------------------------------------------------- ??? [12] 100.0% [20] 1200(10.2%) 894(7.6%) bfadd ...-lib/math/private/bigfloat/mpfr.rkt:819:4 ??? [28] 25.5% ------------------------------------------------------------------------- for-loop [15] 100.0% [21] 404(3.4%) 0(0.0%) argmin ...re/racket/collects/racket/list.rkt:743:0 for-loop [27] 100.0% ------------------------------------------------------------------------- for-loop [15] 100.0% [22] 250(2.1%) 0(0.0%) loop ...hare/racket/collects/racket/list.rkt:729:4 for-loop [27] 100.0% ------------------------------------------------------------------------- run-iter! [11] 100.0% [23] 170(1.5%) 0(0.0%) gen-series! ...ling-logging/src/mainloop.rkt:129:0 for-loop [29] 100.0% ------------------------------------------------------------------------- for-loop [15] 100.0% [24] 150(1.3%) 150(1.3%) for-loop ...g-logging/src/core/simplify.rkt:195:13 ------------------------------------------------------------------------- run-iter! [11] 100.0% [25] 104(0.9%) 0(0.0%) finalize-iter! ...g-logging/src/mainloop.rkt:169:0 ??? [86] 100.0% ------------------------------------------------------------------------- simplify! [19] 100.0% [26] 5584(47.7%) 0(0.0%) for-loop ...ampling-logging/src/mainloop.rkt:159:6 ??? [30] 100.0% ------------------------------------------------------------------------- loop [22] 38.2% argmin [21] 61.8% [27] 654(5.6%) 0(0.0%) for-loop ...ampling-logging/src/programs.rkt:199:2 ??? [37] 61.8% ??? [84] 22.6% ...gging/src/common.rkt:47:2 [85] 15.6% ------------------------------------------------------------------------- real->bigfloat [13] 42.3% bfadd [20] 57.7% [28] 530(4.5%) 530(4.5%) ??? .../share/racket/collects/ffi/unsafe.rkt:861:4 ------------------------------------------------------------------------- gen-series! [23] 100.0% [29] 170(1.5%) 0(0.0%) for-loop ...ampling-logging/src/mainloop.rkt:135:7 taylor-alt [31] 100.0% ------------------------------------------------------------------------- for-loop [26] 15.9% run [5] 36.6% [30] 11716(100.0%) 0(0.0%) ??? ...lects/racket/private/more-scheme.rkt:261:28 profile-thunk16 [1] 36.6% ??? [37] 26.7% run-improve50 [2] 21.8% loop [32] 14.8% ------------------------------------------------------------------------- for-loop [29] 100.0% [31] 170(1.5%) 0(0.0%) taylor-alt .../sampling-logging/src/glue.rkt:134:0 for-loop [33] 100.0% ------------------------------------------------------------------------- run-improve50 [2] 4.8% ??? [30] 95.2% [32] 3646(31.1%) 0(0.0%) loop ...rbie/sampling-logging/src/points.rkt:192:2 loop [38] 58.8% make-exacts* [39] 22.5% loop [34] 17.3% for-loop [36] 1.4% ------------------------------------------------------------------------- taylor-alt [31] 100.0% [33] 170(1.5%) 0(0.0%) for-loop ...ie/sampling-logging/src/glue.rkt:139:6 ??? [35] 100.0% ------------------------------------------------------------------------- loop [32] 100.0% [34] 632(5.4%) 0(0.0%) loop ...rbie/sampling-logging/src/points.rkt:151:2 loop [38] 54.1% eval-prog [40] 27.8% make-exacts* [39] 18.0% ------------------------------------------------------------------------- ??? [37] 19.2% for-loop [33] 19.2% loop [74] 61.5% [35] 442(3.8%) 60(0.5%) ??? ...tract/private/arrow-higher-order.rkt:342:33 ??? [37] 67.2% simplify [41] 19.2% ------------------------------------------------------------------------- loop [32] 100.0% [36] 50(0.4%) 0(0.0%) for-loop ...sampling-logging/src/points.rkt:204:24 for-loop [42] 100.0% ------------------------------------------------------------------------- for-loop [27] 1.6% get-sigs [81] 2.1% ??? [35] 3.6% simplify-alt [14] 5.8% ??? [37] 14.7% for-loop [44] 32.2% ??? [30] 40.1% [37] 8178(69.8%) 156(1.3%) ??? ...llects/racket/private/norm-define.rkt:53:83 iterate-egraph!13 [43] 41.7% for-loop [44] 32.2% ??? [37] 14.7% loop [4] 4.1% ??? [46] 3.1% ??? [35] 1.0% ??? [95] 0.7% assoc-iterate-first [48] 0.6% ------------------------------------------------------------------------- loop [34] 13.8% loop [32] 86.2% [38] 2486(21.2%) 0(0.0%) loop ...rbie/sampling-logging/src/points.rkt:141:4 loop [74] 56.2% map [45] 43.8% ------------------------------------------------------------------------- loop [34] 12.2% loop [32] 87.8% [39] 934(8.0%) 0(0.0%) make-exacts* ...pling-logging/src/points.rkt:138:0 loop [74] 56.5% map [45] 43.5% ------------------------------------------------------------------------- loop [34] 100.0% [40] 176(1.5%) 0(0.0%) eval-prog ...mpling-logging/src/programs.rkt:148:0 [running body] [47] 100.0% ------------------------------------------------------------------------- ??? [35] 100.0% [41] 170(1.5%) 0(0.0%) simplify ...pling-logging/src/core/reduce.rkt:16:0 f172 [51] 100.0% ------------------------------------------------------------------------- for-loop [36] 100.0% [42] 50(0.4%) 50(0.4%) for-loop ...sampling-logging/src/points.rkt:205:26 ------------------------------------------------------------------------- ??? [37] 100.0% [43] 6992(59.7%) 0(0.0%) iterate-egraph!13 ...g/src/core/simplify.rkt:102:0 one-iter [49] 100.0% ------------------------------------------------------------------------- ??? [37] 100.0% [44] 5564(47.5%) 0(0.0%) for-loop ...ng-logging/src/core/simplify.rkt:63:12 ??? [37] 100.0% ------------------------------------------------------------------------- f172 [51] 10.2% make-exacts* [39] 24.4% loop [38] 65.4% [45] 1666(14.2%) 0(0.0%) map ...acket/collects/racket/private/map.rkt:20:13 loop [74] 89.8% f172 [51] 10.2% ------------------------------------------------------------------------- ??? [37] 100.0% [46] 762(6.5%) 300(2.6%) ??? ...ects/racket/contract/private/list.rkt:737:4 for-loop [50] 47.0% ??? [54] 13.6% ------------------------------------------------------------------------- eval-prog [40] 100.0% [47] 176(1.5%) 176(1.5%) [running body] ...t/collects/syntax/id-set.rkt:##f ------------------------------------------------------------------------- ??? [37] 100.0% [48] 148(1.3%) 148(1.3%) assoc-iterate-first ...cket/private/dict.rkt:166:0 ------------------------------------------------------------------------- iterate-egraph!13 [43] 100.0% [49] 6992(59.7%) 164(1.4%) one-iter ...ng-logging/src/core/simplify.rkt:113:0 loop [52] 83.1% for-loop [53] 11.7% apply-match [56] 2.9% ------------------------------------------------------------------------- ??? [46] 100.0% [50] 358(3.1%) 252(2.2%) for-loop ...acket/contract/private/list.rkt:743:12 ??? [54] 29.6% ------------------------------------------------------------------------- simplify [41] 33.3% map [45] 66.7% [51] 170(1.5%) 0(0.0%) f172 .../collects/racket/match/compiler.rkt:507:40 map [45] 66.7% gather-multiplicative-terms [55] 33.3% ------------------------------------------------------------------------- one-iter [49] 100.0% [52] 5810(49.6%) 0(0.0%) loop ...cket/collects/racket/private/map.rkt:52:19 apply-match [56] 100.0% ------------------------------------------------------------------------- for-loop [53] 50.0% one-iter [49] 50.0% [53] 816(7.0%) 148(1.3%) for-loop ...g-logging/src/core/simplify.rkt:123:12 for-loop [53] 50.0% match-e [58] 40.9% ------------------------------------------------------------------------- ??? [46] 49.5% for-loop [50] 50.5% [54] 210(1.8%) 210(1.8%) ??? ...private/unconstrained-domain-arrow.rkt:74:4 ------------------------------------------------------------------------- f172 [51] 100.0% [55] 170(1.5%) 170(1.5%) gather-multiplicative-terms ...re/reduce.rkt:116:0 ------------------------------------------------------------------------- one-iter [49] 3.4% loop [52] 96.6% [56] 6012(51.3%) 100(0.9%) apply-match ...logging/src/core/simplify.rkt:130:2 for-loop [57] 79.4% update-leader! [63] 8.8% match-e [58] 8.3% ------------------------------------------------------------------------- apply-match [56] 100.0% [57] 4774(40.7%) 0(0.0%) for-loop ...g-logging/src/core/simplify.rkt:145:10 merge-egraph-nodes! [59] 49.1% mk-enode! [64] 21.9% loop! [72] 17.2% substitute-e [61] 10.6% list-member? [62] 1.1% ------------------------------------------------------------------------- apply-match [56] 23.6% for-loop [65] 37.8% for-loop [53] 38.6% [58] 1170(10.0%) 314(2.7%) match-e ...mpling-logging/src/core/ematch.rkt:46:0 for-loop [60] 52.8% for-loop [65] 10.5% loop [74] 8.7% ??? [86] 5.8% ------------------------------------------------------------------------- for-loop [66] 1.1% merge-egraph-nodes! [59] 11.3% for-loop [57] 87.6% [59] 2346(20.0%) 102(0.9%) merge-egraph-nodes! ...g/src/core/egraph.rkt:152:0 update-leader! [63] 64.7% merge-egraph-nodes! [59] 11.3% for-loop [67] 6.6% for-loop [66] 5.5% enode-merge! [68] 4.3% loop! [72] 3.2% ------------------------------------------------------------------------- match-e [58] 100.0% [60] 856(7.3%) 300(2.6%) for-loop ...ling-logging/src/core/ematch.rkt:59:11 for-loop [65] 65.1% loop [74] 8.6% ------------------------------------------------------------------------- for-loop [57] 100.0% [61] 508(4.3%) 0(0.0%) substitute-e ...g-logging/src/core/ematch.rkt:71:0 mk-enode! [64] 100.0% ------------------------------------------------------------------------- for-loop [57] 100.0% [62] 54(0.5%) 0(0.0%) list-member? ...llects/racket/private/set.rkt:24:0 loop [69] 100.0% ------------------------------------------------------------------------- apply-match [56] 23.4% merge-egraph-nodes! [59] 76.6% [63] 2264(19.3%) 152(1.3%) update-leader! ...ogging/src/core/egraph.rkt:217:0 for-loop [70] 93.3% ------------------------------------------------------------------------- substitute-e [61] 32.7% for-loop [57] 67.3% [64] 1554(13.3%) 0(0.0%) mk-enode! ...ing-logging/src/core/egraph.rkt:101:0 new-enode [71] 100.0% ------------------------------------------------------------------------- match-e [58] 26.0% for-loop [60] 74.0% [65] 816(7.0%) 0(0.0%) for-loop ...ling-logging/src/core/ematch.rkt:65:37 match-e [58] 100.0% ------------------------------------------------------------------------- merge-egraph-nodes! [59] 100.0% [66] 156(1.3%) 0(0.0%) for-loop ...ing-logging/src/core/egraph.rkt:200:10 loop! [72] 66.7% merge-egraph-nodes! [59] 33.3% ------------------------------------------------------------------------- merge-egraph-nodes! [59] 100.0% [67] 154(1.3%) 0(0.0%) for-loop ...ling-logging/src/core/egraph.rkt:232:6 update-en-expr [94] 100.0% ------------------------------------------------------------------------- merge-egraph-nodes! [59] 100.0% [68] 102(0.9%) 0(0.0%) enode-merge! ...g-logging/src/core/enode.rkt:129:0 adopt-enode! [73] 100.0% ------------------------------------------------------------------------- list-member? [62] 100.0% [69] 54(0.5%) 54(0.5%) loop (unknown source) ------------------------------------------------------------------------- update-leader! [63] 100.0% [70] 2112(18.0%) 56(0.5%) for-loop ...ling-logging/src/core/egraph.rkt:222:6 for-loop [75] 97.3% ------------------------------------------------------------------------- mk-enode! [64] 100.0% [71] 1554(13.3%) 0(0.0%) new-enode ...pling-logging/src/core/enode.rkt:97:0 type-of-enode-expr [76] 90.3% check-valid-enode5 [79] 9.7% ------------------------------------------------------------------------- for-loop [66] 4.8% merge-egraph-nodes! [59] 7.0% loop [74] 38.4% for-loop [57] 49.8% [72] 1074(9.2%) 112(1.0%) loop! ...sampling-logging/src/core/enode.rkt:192:2 loop [74] 47.7% set [77] 28.6% custom-set-union [78] 14.0% update-en-expr [94] 4.6% ------------------------------------------------------------------------- enode-merge! [68] 100.0% [73] 102(0.9%) 0(0.0%) adopt-enode! ...g-logging/src/core/enode.rkt:105:0 custom-set-union [78] 100.0% ------------------------------------------------------------------------- make-exacts* [39] 0.0% loop [38] 0.1% map [45] 0.1% loop! [72] 1.9% for-loop [60] 3.2% match-e [58] 4.3% loop [74] 90.4% [74] 4696(40.1%) 248(2.1%) loop ...cket/collects/racket/private/map.rkt:25:19 loop [74] 90.4% curried [82] 4.3% loop! [72] 1.6% ??? [3] 0.2% ??? [35] 0.0% ------------------------------------------------------------------------- for-loop [70] 100.0% [75] 2056(17.5%) 0(0.0%) for-loop ...ling-logging/src/core/egraph.rkt:223:8 hash-update! [80] 100.0% ------------------------------------------------------------------------- new-enode [71] 100.0% [76] 1404(12.0%) 50(0.4%) type-of-enode-expr ...ging/src/core/enode.rkt:68:0 get-sigs [81] 96.4% ------------------------------------------------------------------------- loop! [72] 100.0% [77] 614(5.2%) 614(5.2%) set ...collects/racket/private/set-types.rkt:981:0 ------------------------------------------------------------------------- adopt-enode! [73] 40.5% loop! [72] 59.5% [78] 252(2.2%) 252(2.2%) custom-set-union ...et/private/set-types.rkt:168:0 ------------------------------------------------------------------------- new-enode [71] 100.0% [79] 150(1.3%) 150(1.3%) check-valid-enode5 ...ing/src/core/enode.rkt:206:0 ------------------------------------------------------------------------- for-loop [75] 100.0% [80] 2056(17.5%) 0(0.0%) hash-update! ...ket/private/more-scheme.rkt:362:13 ??? [83] 100.0% ------------------------------------------------------------------------- type-of-enode-expr [76] 100.0% [81] 1354(11.6%) 0(0.0%) get-sigs ...ampling-logging/src/type-check.rkt:5:0 ??? [37] 37.4% ??? [84] 29.4% ...gging/src/common.rkt:47:2 [85] 25.7% ??? [86] 7.5% ------------------------------------------------------------------------- loop [74] 100.0% [82] 204(1.7%) 204(1.7%) curried ...cket/collects/racket/function.rkt:71:18 ------------------------------------------------------------------------- hash-update! [80] 100.0% [83] 2056(17.5%) 0(0.0%) ??? ...sampling-logging/src/core/egraph.rkt:225:24 for-loop [87] 100.0% ------------------------------------------------------------------------- for-loop [27] 27.1% get-sigs [81] 72.9% [84] 546(4.7%) 148(1.3%) ??? ...ts/racket/contract/private/arr-i.rkt:804:10 for-loop [88] 72.9% ------------------------------------------------------------------------- for-loop [27] 22.7% get-sigs [81] 77.3% [85] 450(3.8%) 106(0.9%) ...gging/src/common.rkt:47:2 ...e/arr-i.rkt:906:19 ??? [89] 42.7% ??? [90] 33.8% ------------------------------------------------------------------------- get-sigs [81] 24.9% finalize-iter! [25] 25.4% match-e [58] 49.8% [86] 410(3.5%) 204(1.7%) ??? ...contract/private/arrow-val-first.rkt:357:18 for-loop [91] 25.4% hash-has-key? [92] 24.9% ------------------------------------------------------------------------- ??? [83] 100.0% [87] 2056(17.5%) 1798(15.3%) for-loop ...ing-logging/src/core/egraph.rkt:226:26 update-en-expr [94] 12.5% ------------------------------------------------------------------------- ??? [84] 100.0% [88] 398(3.4%) 0(0.0%) for-loop ...racket/contract/private/hash.rkt:239:6 ??? [93] 100.0% ------------------------------------------------------------------------- ??? [93] 26.6% ...gging/src/common.rkt:47:2 [85] 73.4% [89] 192(1.6%) 0(0.0%) ??? ...ects/racket/contract/private/list.rkt:342:4 ??? [93] 73.4% ??? [102] 26.6% ------------------------------------------------------------------------- ...gging/src/common.rkt:47:2 [85]100.0% [90] 152(1.3%) 0(0.0%) ??? ...s/racket/contract/private/arr-i.rkt:1268:39 ??? [95] 67.1% return/no-unsupplied [97] 32.9% ------------------------------------------------------------------------- ??? [86] 100.0% [91] 104(0.9%) 0(0.0%) for-loop ...ng-logging/src/core/alt-table.rkt:51:2 atab-add-altn [96] 100.0% ------------------------------------------------------------------------- ??? [86] 100.0% [92] 102(0.9%) 102(0.9%) hash-has-key? ...et/private/more-scheme.rkt:368:13 ------------------------------------------------------------------------- ...higher-order.rkt:346:33 [18] 8.7% ??? [89] 29.7% for-loop [88] 61.6% [93] 646(5.5%) 146(1.2%) ??? ...cts/racket/contract/private/list.rkt:187:10 ??? [98] 61.6% ??? [89] 15.8% ------------------------------------------------------------------------- loop! [72] 19.2% for-loop [67] 30.2% for-loop [87] 50.6% [94] 510(4.4%) 510(4.4%) update-en-expr ...ogging/src/core/egraph.rkt:211:0 ------------------------------------------------------------------------- ??? [37] 35.4% ??? [90] 64.6% [95] 158(1.3%) 0(0.0%) ??? ...racket/collects/racket/private/kw.rkt:761:9 ??? [99] 100.0% ------------------------------------------------------------------------- for-loop [91] 100.0% [96] 104(0.9%) 0(0.0%) atab-add-altn ...ging/src/core/alt-table.rkt:208:0 best-and-tied-at-points [100] 100.0% ------------------------------------------------------------------------- ??? [90] 100.0% [97] 50(0.4%) 0(0.0%) return/no-unsupplied ...ct/private/arr-i.rkt:533:0 filter [101] 100.0% ------------------------------------------------------------------------- ??? [93] 100.0% [98] 398(3.4%) 0(0.0%) ??? ...ects/racket/contract/private/list.rkt:686:7 ??? [102] 100.0% ------------------------------------------------------------------------- ??? [95] 100.0% [99] 158(1.3%) 158(1.3%) ??? ...s/racket/contract/private/arr-i.rkt:1233:27 ------------------------------------------------------------------------- atab-add-altn [96] 100.0% [100] 104(0.9%) 0(0.0%) best-and-tied-at-points ...ore/alt-table.rkt:122:0 errors [103] 100.0% ------------------------------------------------------------------------- return/no-unsupplied [97] 100.0% [101] 50(0.4%) 50(0.4%) filter ...t/collects/racket/private/list.rkt:256:2 ------------------------------------------------------------------------- ??? [89] 20.4% ??? [98] 79.6% [102] 500(4.3%) 398(3.4%) ??? ...ects/racket/contract/private/guts.rkt:644:8 contract? [105] 20.4% ------------------------------------------------------------------------- best-and-tied-at-points [100] 100.0% [103] 104(0.9%) 0(0.0%) errors ...ie/sampling-logging/src/points.rkt:229:0 for-loop [104] 100.0% ------------------------------------------------------------------------- errors [103] 100.0% [104] 104(0.9%) 0(0.0%) for-loop .../sampling-logging/src/points.rkt:232:4 ??? [3] 100.0% ------------------------------------------------------------------------- ??? [102] 100.0% [105] 102(0.9%) 102(0.9%) contract? ...acket/contract/private/guts.rkt:109:0 -------------------------------------------------------------------------