scsh-0.5/initial.debug

; Package uid -> name
(0 low-structures)
(1 debug-low-structures)
(2 alt-features-structures)
(3 cheat-features-structures)
(4 the-interfaces)
(5 meta-module-system)
(6 run-time-structures)
(7 compiler-structures)
(8 initial-structures)
(9 debug-structures)
(10 usual-structures)
(11 alt-low-structures)
(12 compiler-structures)
(13 linker-structures)
(14 scheme-level-0)
(15 scheme-level-1)
(16 records)
(17 bummed-define-record-types)
(18 methods)
(19 number-i/o)
(20 fluids)
(21 wind)
(22 ports)
(23 enumerated)
(24 architecture)
(25 conditions)
(26 templates)
(27 continuations)
(28 more-types)
(29 exceptions)
(30 interrupts)
(31 writing)
(32 reading)
(33 scheme-level-2)
(34 scheme-level-2-internal)
(35 weak)
(36 display-conditions)
(37 tables)
(38 filenames)
(39 meta-types)
(40 interfaces)
(41 syntactic)
(42 usual-macros)
(43 reconstruction)
(44 packages)
(45 scan)
(46 segments)
(47 compiler)
(48 defpackage)
(49 types)
(50 module-system)
(51 inline)
(52 environments)
(53 evaluation)
(54 ensures-loaded)
(55 for-reification)
(56 scheme)
(57 mini-command)
(58 initial-system)
-
; Location uid -> (name . package-uid)
(0 (current-cont . 14))
(1 (closure-template . 14))
(2 (continuation-ref . 14))
(3 (output-port? . 14))
(4 (closure? . 14))
(5 (complex? . 14))
(6 (arithmetic-shift . 14))
(7 (signal-condition . 14))
(8 (integer? . 14))
(9 (make-closure . 14))
(10 (template-ref . 14))
(11 (make-rectangular . 14))
(12 (string=? . 14))
(13 (extended-number? . 14))
(14 (reverse-list->string . 14))
(15 (denominator . 14))
(16 (call-with-values . 14))
(17 (weak-pointer-ref . 14))
(18 (find-all-symbols . 14))
(19 (code-vector? . 14))
(20 (pop . 14))
(21 (exp . 14))
(22 (sin . 14))
(23 (make-extended-number . 14))
(24 (cos . 14))
(25 (collect . 14))
(26 (external-lookup . 14))
(27 (tan . 14))
(28 (log . 14))
(29 (continuation-length . 14))
(30 (make-code-vector . 14))
(31 (cdr . 14))
(32 (bitwise-xor . 14))
(33 (car . 14))
(34 (string? . 14))
(35 (symbol? . 14))
(36 (set-cdr! . 14))
(37 (bitwise-not . 14))
(38 (vector? . 14))
(39 (closure-env . 14))
(40 (set-car! . 14))
(41 (bitwise-ior . 14))
(42 (number? . 14))
(43 (template-length . 14))
(44 (string-hash . 14))
(45 (pop-env . 14))
(46 (primitive-catch . 14))
(47 (make-string . 14))
(48 (input-port? . 14))
(49 (record? . 14))
(50 (make-vector . 14))
(51 (extended-number-set! . 14))
(52 (write-image . 14))
(53 (eq? . 14))
(54 (bitwise-and . 14))
(55 (location-id . 14))
(56 (code-vector-set! . 14))
(57 (set-location-id! . 14))
(58 (make-record . 14))
(59 (intern . 14))
(60 (values . 14))
(61 (string-set! . 14))
(62 (unassigned . 14))
(63 (vector-set! . 14))
(64 (extended-number-ref . 14))
(65 (unspecific . 14))
(66 (code-vector-ref . 14))
(67 (schedule-interrupt . 14))
(68 (find-all-xs . 14))
(69 (char-ready? . 14))
(70 (set-interrupt-handlers! . 14))
(71 (eof-object? . 14))
(72 (record-set! . 14))
(73 (ascii->char . 14))
(74 (char->ascii . 14))
(75 (set-enabled-interrupts! . 14))
(76 (external-value . 14))
(77 (make-immutable! . 14))
(78 (close-port . 14))
(79 (string-ref . 14))
(80 (immutable? . 14))
(81 (vector-ref . 14))
(82 (exact? . 14))
(83 (write-char . 14))
(84 (symbol->string . 14))
(85 (make-polar . 14))
(86 (record-ref . 14))
(87 (numerator . 14))
(88 (extended-number-length . 14))
(89 (error . 14))
(90 (exact->inexact . 14))
(91 (inexact->exact . 14))
(92 (apply . 14))
(93 (memory-status . 14))
(94 (code-vector-length . 14))
(95 (floor . 14))
(96 (with-continuation . 14))
(97 (magnitude . 14))
(98 (nargs . 14))
(99 (char=? . 14))
(100 (char<? . 14))
(101 (continuation? . 14))
(102 (remainder . 14))
(103 (vm-return . 14))
(104 (false . 14))
(105 (angle . 14))
(106 (open-port . 14))
(107 (string-length . 14))
(108 (external? . 14))
(109 (make-continuation . 14))
(110 (vector-length . 14))
(111 (template? . 14))
(112 (rational? . 14))
(113 (location? . 14))
(114 (external-name . 14))
(115 (set-exception-handler! . 14))
(116 (pair? . 14))
(117 (make-external . 14))
(118 (record-length . 14))
(119 (external-call . 14))
(120 (set-dynamic-state! . 14))
(121 (get-cont-from-heap . 14))
(122 (real-part . 14))
(123 (real? . 14))
(124 (make-template . 14))
(125 (imag-part . 14))
(126 (make-location . 14))
(127 (= . 14))
(128 (< . 14))
(129 (char? . 14))
(130 (quotient . 14))
(131 (/ . 14))
(132 (weak-pointer? . 14))
(133 (- . 14))
(134 (continuation-set! . 14))
(135 (peek-char . 14))
(136 (+ . 14))
(137 (* . 14))
(138 (contents . 14))
(139 (sqrt . 14))
(140 (read-char . 14))
(141 (set-contents! . 14))
(142 (push . 14))
(143 (make-weak-pointer . 14))
(144 (get-dynamic-state . 14))
(145 (trap . 14))
(146 (cons . 14))
(147 (template-set! . 14))
(148 (time . 14))
(149 (location-defined? . 14))
(150 (asin . 14))
(151 (write-string . 14))
(152 (vm-extension . 14))
(153 (force-output . 14))
(154 (acos . 14))
(155 (set-location-defined?! . 14))
(156 (atan . 14))
(157 (loophole . 14))
(158 (define-syntax . 14))
(159 (begin . 14))
(160 (letrec-syntax . 14))
(161 (%file-name% . 14))
(162 (structure-ref . 14))
(163 (quote . 14))
(164 (lambda . 14))
(165 (define . 14))
(166 (if . 14))
(167 (let-syntax . 14))
(168 (letrec . 14))
(169 (primitive-procedure . 14))
(170 (set! . 14))
(171 (with-aliases . 14))
(172 (call . 14))
(173 (and . 14))
(174 (cond . 14))
(175 (do . 14))
(176 (let . 14))
(177 (let* . 14))
(178 (or . 14))
(179 (char->integer . 14))
(180 (integer->char . 14))
(181 (ascii-limit . 14))
(182 (ascii-whitespaces . 14))
(183 (procedure? . 14))
(184 (invoke-closure . 14))
(185 (primitive-cwcc . 14))
(186 (make-undefined-location . 14))
(187 (vector-unassigned? . 14))
(188 (string-copy . 14))
(189 (string->symbol . 14))
(190 (*the-symbol-table* . 14))
(191 (flush-the-symbol-table! . 14))
(192 (restore-the-symbol-table! . 14))
(193 (maybe-open-input-file . 14))
(194 (maybe-open-output-file . 14))
(195 (open-input-file . 14))
(196 (open-output-file . 14))
(197 (close-input-port . 14))
(198 (close-output-port . 14))
(199 (make-condition . 14))
(200 (signal . 14))
(201 (warn . 14))
(202 (syntax-error . 14))
(203 (call-error . 14))
(204 (case . 15))
(205 (quasiquote . 15))
(206 (syntax-rules . 15))
(207 (not . 15))
(208 (boolean? . 15))
(209 (eqv? . 15))
(210 (equal? . 15))
(211 (> . 15))
(212 (<= . 15))
(213 (>= . 15))
(214 (max . 15))
(215 (min . 15))
(216 (abs . 15))
(217 (zero? . 15))
(218 (positive? . 15))
(219 (negative? . 15))
(220 (even? . 15))
(221 (odd? . 15))
(222 (caar . 15))
(223 (cadr . 15))
(224 (cdar . 15))
(225 (cddr . 15))
(226 (caaar . 15))
(227 (caadr . 15))
(228 (cadar . 15))
(229 (caddr . 15))
(230 (cdaar . 15))
(231 (cdadr . 15))
(232 (cddar . 15))
(233 (cdddr . 15))
(234 (caaaar . 15))
(235 (caaadr . 15))
(236 (caadar . 15))
(237 (caaddr . 15))
(238 (cadaar . 15))
(239 (cadadr . 15))
(240 (caddar . 15))
(241 (cadddr . 15))
(242 (cdaaar . 15))
(243 (cdaadr . 15))
(244 (cdadar . 15))
(245 (cdaddr . 15))
(246 (cddaar . 15))
(247 (cddadr . 15))
(248 (cdddar . 15))
(249 (cddddr . 15))
(250 (null? . 15))
(251 (list . 15))
(252 (length . 15))
(253 (append . 15))
(254 (reverse . 15))
(255 (append-reverse . 15))
(256 (list-tail . 15))
(257 (list-ref . 15))
(258 (mem . 15))
(259 (memq . 15))
(260 (memv . 15))
(261 (member . 15))
(262 (ass . 15))
(263 (assv . 15))
(264 (assoc . 15))
(265 (assq . 15))
(266 (list? . 15))
(267 (char>? . 15))
(268 (char>=? . 15))
(269 (char<=? . 15))
(270 (char-whitespace? . 15))
(271 (char-lower-case? . 15))
(272 (char-upper-case? . 15))
(273 (char-numeric? . 15))
(274 (char-alphabetic? . 15))
(275 (char-case-delta . 15))
(276 (char-upcase . 15))
(277 (char-downcase . 15))
(278 (char-ci-compare . 15))
(279 (char-ci=? . 15))
(280 (char-ci<? . 15))
(281 (char-ci<=? . 15))
(282 (char-ci>? . 15))
(283 (char-ci>=? . 15))
(284 (string . 15))
(285 (substring . 15))
(286 (string-append . 15))
(287 (string->list . 15))
(288 (list->string . 15))
(289 (string-fill! . 15))
(290 (make-string=? . 15))
(291 (string-ci=? . 15))
(292 (make-string<? . 15))
(293 (string<? . 15))
(294 (string-ci<? . 15))
(295 (string>? . 15))
(296 (string<=? . 15))
(297 (string>=? . 15))
(298 (string-ci>? . 15))
(299 (string-ci<=? . 15))
(300 (string-ci>=? . 15))
(301 (vector . 15))
(302 (vector->list . 15))
(303 (list->vector . 15))
(304 (vector-fill! . 15))
(305 (map . 15))
(306 (map1 . 15))
(307 (map2+ . 15))
(308 (for-each . 15))
(309 (delay . 15))
(310 (make-promise . 15))
(311 (force . 15))
(312 (unspecific . 15))
(313 (reduce . 15))
(314 (filter . 15))
(315 (pos . 15))
(316 (posq . 15))
(317 (posv . 15))
(318 (position . 15))
(319 (any . 15))
(320 (every . 15))
(321 (sublist . 15))
(322 (last . 15))
(323 (insert . 15))
(324 (inexact? . 15))
(325 (modulo . 15))
(326 (ceiling . 15))
(327 (truncate . 15))
(328 (round . 15))
(329 (gcd . 15))
(330 (euclid . 15))
(331 (lcm . 15))
(332 (expt . 15))
(333 (raise-to-integer-power . 15))
(334 (rationalize . 15))
(335 (simplest-rational . 15))
(336 (record-type . 16))
(337 (*record-type-uid* . 16))
(338 (*record-type* . 16))
(339 (make-record-type . 16))
(340 (record-type? . 16))
(341 (record-type-uid . 16))
(342 (record-type-name . 16))
(343 (record-type-field-names . 16))
(344 (record-type-discloser . 16))
(345 (record-field-index . 16))
(346 (record-constructor . 16))
(347 (record-accessor . 16))
(348 (record-modifier . 16))
(349 (record-predicate . 16))
(350 (define-record-discloser . 16))
(351 (disclose-record . 16))
(352 (default-record-discloser . 16))
(353 (:record-type . 16))
(354 (define-record-type . 17))
(355 (define-constructor . 17))
(356 (define-accessors . 17))
(357 (define-accessor . 17))
(358 (:simple-type . 18))
(359 (really-make-simple-type . 18))
(360 (simple-type-id . 18))
(361 (simple-type-priority . 18))
(362 (simple-type-predicate . 18))
(363 (simple-type-superiors . 18))
(364 (simple-type? . 18))
(365 (make-simple-type . 18))
(366 (compute-priority . 18))
(367 (*increment* . 18))
(368 (%type-priority . 18))
(369 (%type-predicate . 18))
(370 (%same-type? . 18))
(371 (define-simple-type . 18))
(372 (:syntax . 18))
(373 (:values . 18))
(374 (value? . 18))
(375 (:value . 18))
(376 (:zero . 18))
(377 (:number . 18))
(378 (:complex . 18))
(379 (:real . 18))
(380 (:rational . 18))
(381 (:integer . 18))
(382 (:exact-integer . 18))
(383 (:boolean . 18))
(384 (:symbol . 18))
(385 (:char . 18))
(386 (:null . 18))
(387 (:pair . 18))
(388 (:vector . 18))
(389 (:string . 18))
(390 (:procedure . 18))
(391 (:input-port . 18))
(392 (:output-port . 18))
(393 (:eof-object . 18))
(394 (:record . 18))
(395 (record-type-priority . 18))
(396 (:method-info . 18))
(397 (really-make-method-info . 18))
(398 (method-info-proc . 18))
(399 (method-info-n-ary? . 18))
(400 (method-info-types . 18))
(401 (method-info? . 18))
(402 (make-method-info . 18))
(403 (empty-method-list . 18))
(404 (insert-method . 18))
(405 (same-applicability? . 18))
(406 (every2 . 18))
(407 (more-specific? . 18))
(408 (more-specific-type? . 18))
(409 (:method-table . 18))
(410 (really-make-method-table . 18))
(411 (method-table-id . 18))
(412 (method-table-set-perform! . 18))
(413 (method-table-get-perform . 18))
(414 (make-generic . 18))
(415 (method-table-prototype . 18))
(416 (method-table-methods . 18))
(417 (set-method-table-methods! . 18))
(418 (method-table? . 18))
(419 (make-method-table . 18))
(420 (make-cell-for-generic . 18))
(421 (add-to-method-table! . 18))
(422 (set-final-method! . 18))
(423 (apply-generic . 18))
(424 (define-generic . 18))
(425 (methods->perform . 18))
(426 (last-action . 18))
(427 (one-action . 18))
(428 (argument-sequence-predicate . 18))
(429 (check-for-next . 18))
(430 (check-next . 18))
(431 (method-info . 18))
(432 (method-internal . 18))
(433 (with-next-method . 18))
(434 (define-method . 18))
(435 (&add-method! . 18))
(436 (add-method! . 18))
(437 (&type-predicate . 18))
(438 (type-predicate . 18))
(439 (&type-priority . 18))
(440 (type-priority . 18))
(441 (&type-superiors . 18))
(442 (type-superiors . 18))
(443 (&same-type? . 18))
(444 (same-type? . 18))
(445 (:singleton . 18))
(446 (singleton . 18))
(447 (singleton-value . 18))
(448 (compare-to . 18))
(449 (&disclose . 18))
(450 (disclose . 18))
(451 (proc->discloser . 18))
(452 (&number->string . 19))
(453 (number->string . 19))
(454 (integer->string . 19))
(455 (string->number . 19))
(456 (&really-string->number . 19))
(457 (really-string->number . 19))
(458 (:integer-string . 19))
(459 (set-exactness . 19))
(460 (string->integer . 19))
(461 (:thread . 20))
(462 (make-thread . 20))
(463 (thread-dynamic-env . 20))
(464 (current-thread . 20))
(465 (set-current-thread! . 20))
(466 (get-dynamic-env . 20))
(467 (set-dynamic-env! . 20))
(468 (initialize-dynamic-state! . 20))
(469 (with-dynamic-env . 20))
(470 (empty-dynamic-env . 20))
(471 (:fluid . 20))
(472 (make-fluid . 20))
(473 (fluid-top-level-value . 20))
(474 (set-fluid-top-level-value! . 20))
(475 (fluid . 20))
(476 (set-fluid! . 20))
(477 (let-fluid . 20))
(478 (let-fluids . 20))
(479 (fluid-lookup . 20))
(480 (dynamic-wind . 21))
(481 (call-with-current-continuation . 21))
(482 (continuation->procedure . 21))
(483 (:point . 21))
(484 (make-point . 21))
(485 (point-parent . 21))
(486 (point-dynamic-env . 21))
(487 (point-out . 21))
(488 (point-in . 21))
(489 (point-depth . 21))
(490 (root-point . 21))
(491 ($dynamic-point . 21))
(492 (get-dynamic-point . 21))
(493 (env-dynamic-point . 21))
(494 (let-dynamic-point . 21))
(495 (travel-to-point! . 21))
(496 ($current-input-port . 22))
(497 ($current-output-port . 22))
(498 ($error-output-port . 22))
(499 (current-input-port . 22))
(500 (current-output-port . 22))
(501 (error-output-port . 22))
(502 (with-initial-ports . 22))
(503 (call-with-mumble-file . 22))
(504 (call-with-input-file . 22))
(505 (call-with-output-file . 22))
(506 (with-input-from-file . 22))
(507 (with-output-to-file . 22))
(508 (newline . 22))
(509 (output-port-option . 22))
(510 (input-port-option . 22))
(511 (write . 31))
(512 (recurring-write . 31))
(513 (write-boolean . 31))
(514 (write-number . 31))
(515 (write-char-literal . 31))
(516 (character-name . 31))
(517 (write-string-literal . 31))
(518 (write-list . 31))
(519 (quotation? . 31))
(520 (write-vector . 31))
(521 (write-other . 31))
(522 (display-type-name . 31))
(523 (display . 31))
(524 (*condition-types* . 25))
(525 (condition-supertypes . 25))
(526 (define-condition-type . 25))
(527 (condition-predicate . 25))
(528 (condition? . 25))
(529 (condition-type . 25))
(530 (condition-stuff . 25))
(531 (error? . 25))
(532 (call-error? . 25))
(533 (read-error? . 25))
(534 (exception? . 25))
(535 (exception-opcode . 25))
(536 (exception-arguments . 25))
(537 (make-exception . 25))
(538 (warning? . 25))
(539 (syntax-error? . 25))
(540 (interrupt? . 25))
(541 (read . 32))
(542 (sub-read-carefully . 32))
(543 (reader-token-marker . 32))
(544 (make-reader-token . 32))
(545 (reader-token? . 32))
(546 (close-paren . 32))
(547 (dot . 32))
(548 (sub-read . 32))
(549 (read-dispatch-vector . 32))
(550 (read-terminating?-vector . 32))
(551 (set-standard-syntax! . 32))
(552 (set-standard-read-macro! . 32))
(553 (sub-read-list . 32))
(554 (gobble-line . 32))
(555 (*sharp-macros* . 32))
(556 (define-sharp-macro . 32))
(557 (sub-read-token . 32))
(558 (parse-token . 32))
(559 (strange-symbol-names . 32))
(560 (preferred-case . 32))
(561 (reading-error . 32))
(562 (script-skip . 32))
(563 (bel . 32))
(564 (bs . 32))
(565 (ff . 32))
(566 (cr . 32))
(567 (ht . 32))
(568 (vt . 32))
(569 (:table . 37))
(570 (really-make-table . 37))
(571 (table-set!-procedure . 37))
(572 (set-table-set!-procedure! . 37))
(573 (table-ref-procedure . 37))
(574 (set-table-ref-procedure! . 37))
(575 (table-data . 37))
(576 (set-table-data! . 37))
(577 (table-size . 37))
(578 (set-table-size! . 37))
(579 (table? . 37))
(580 (table-ref . 37))
(581 (table-set! . 37))
(582 (linear-table-size-limit . 37))
(583 (table-size-limit . 37))
(584 (next-table-size . 37))
(585 (make-table-maker . 37))
(586 (null-entry . 37))
(587 (new-entry . 37))
(588 (make-assoc . 37))
(589 (eq?-assoc . 37))
(590 (make-linear-table-ref . 37))
(591 (make-linear-table-set! . 37))
(592 (make->hash-table . 37))
(593 (make-hash-table-ref . 37))
(594 (make-hash-table-set! . 37))
(595 (expand-hash-table! . 37))
(596 (table-enter-alist! . 37))
(597 (table-expand-table! . 37))
(598 (table-walk . 37))
(599 (really-table-walk . 37))
(600 (alist-walk . 37))
(601 (make-table-immutable! . 37))
(602 (table->entry-list . 37))
(603 (default-table-hash-function . 37))
(604 (symbol-hash . 37))
(605 (make-table . 37))
(606 (make-string-table . 37))
(607 (make-symbol-table . 37))
(608 (make-integer-table . 37))
(609 (:meta-type . 39))
(610 (really-make-type . 39))
(611 (type-info . 39))
(612 (type-more . 39))
(613 (type-mask . 39))
(614 (meta-type? . 39))
(615 (make-type . 39))
(616 (name->type-table . 39))
(617 (mask->name-table . 39))
(618 (name->type . 39))
(619 (set-type-name! . 39))
(620 (*mask* . 39))
(621 (new-type-bit . 39))
(622 (mask->type . 39))
(623 (bottom-type . 39))
(624 (error-type . 39))
(625 (bottom-type? . 39))
(626 (new-atomic-type . 39))
(627 (named-atomic-type . 39))
(628 (syntax-type . 39))
(629 (other-static-type . 39))
(630 (empty-rail-type . 39))
(631 (rail-type . 39))
(632 (make-optional-type . 39))
(633 (make-rest-type . 39))
(634 (head-type . 39))
(635 (head-type-really . 39))
(636 (tail-type . 39))
(637 (empty-rail-type? . 39))
(638 (rest-type? . 39))
(639 (optional-type? . 39))
(640 (mask/no-values . 39))
(641 (mask/two-or-more . 39))
(642 (mask/&rest . 39))
(643 (value-type . 39))
(644 (mask/value . 39))
(645 (value-type? . 39))
(646 (any-values-type . 39))
(647 (any-arguments-type . 39))
(648 (mask/one-or-more . 39))
(649 (same-type? . 39))
(650 (subtype? . 39))
(651 (meet-type . 39))
(652 (other-type-info . 39))
(653 (p . 39))
(654 (meet-rail . 39))
(655 (meet-procedure . 39))
(656 (meet? . 39))
(657 (meet-procedure? . 39))
(658 (join-type . 39))
(659 (join-rail . 39))
(660 (join-procedure . 39))
(661 (number-hierarchy . 39))
(662 (integer-type . 39))
(663 (rational-type . 39))
(664 (real-type . 39))
(665 (complex-type . 39))
(666 (number-type . 39))
(667 (exact-type . 39))
(668 (inexact-type . 39))
(669 (exact-integer-type . 39))
(670 (boolean-type . 39))
(671 (pair-type . 39))
(672 (null-type . 39))
(673 (record-type . 39))
(674 (any-procedure-type . 39))
(675 (other-value-type . 39))
(676 (mask/other . 39))
(677 (make-other-type . 39))
(678 (char-type . 39))
(679 (unspecific-type . 39))
(680 (string-type . 39))
(681 (symbol-type . 39))
(682 (vector-type . 39))
(683 (escape-type . 39))
(684 (structure-type . 39))
(685 (mask/procedure . 39))
(686 (procedure-type . 39))
(687 (make-procedure-type . 39))
(688 (procedure-type-domain . 39))
(689 (procedure-type-codomain . 39))
(690 (restrictive? . 39))
(691 (sexp->type . 39))
(692 (sexp->values-type . 39))
(693 (type->sexp . 39))
(694 (atomic-type->sexp . 39))
(695 (rail-type->sexp . 39))
(696 (disjoin-type . 39))
(697 (disjoin-rest . 39))
(698 (mask/number . 39))
(699 (make-some-values-type . 39))
(700 (proc . 39))
(701 (some-values . 39))
(702 (procedure-type? . 39))
(703 (fixed-arity-procedure-type? . 39))
(704 (procedure-type-arity . 39))
(705 (procedure-type-argument-types . 39))
(706 (usual-operator-type . 41))
(707 (:operator . 41))
(708 (make-operator . 41))
(709 (operator-name . 41))
(710 (operator-uid . 41))
(711 (operator-nargs . 41))
(712 (operator-type . 41))
(713 (set-operator-type! . 41))
(714 (operator? . 41))
(715 (get-operator . 41))
(716 (*operator-uid* . 41))
(717 (operators-table . 41))
(718 (number-of-operators . 41))
(719 (the-operators . 41))
(720 (make-operator-table . 41))
(721 (operator-table-ref . 41))
(722 (operator-lookup . 41))
(723 (operator-define! . 41))
(724 (:node . 41))
(725 (really-make-node . 41))
(726 (node-plist . 41))
(727 (set-node-plist! . 41))
(728 (node-form . 41))
(729 (node-operator-id . 41))
(730 (node? . 41))
(731 (make-node . 41))
(732 (node-ref . 41))
(733 (node-set! . 41))
(734 (node-operator . 41))
(735 (node-predicate . 41))
(736 (make-similar-node . 41))
(737 (:generated . 41))
(738 (make-generated . 41))
(739 (generated-parent-name . 41))
(740 (generated-env . 41))
(741 (generated-token . 41))
(742 (generated-symbol . 41))
(743 (generated? . 41))
(744 (generate-name . 41))
(745 (generated-uid . 41))
(746 (*generated-uid* . 41))
(747 (name->symbol . 41))
(748 (name-hash . 41))
(749 (desyntaxify . 41))
(750 (:transform . 41))
(751 (really-make-transform . 41))
(752 (transform-id . 41))
(753 (transform-source . 41))
(754 (transform-aux-names . 41))
(755 (transform-type . 41))
(756 (transform-env . 41))
(757 (transform-procedure . 41))
(758 (transform? . 41))
(759 (make-transform . 41))
(760 (maybe-transform . 41))
(761 (bind-aliases . 41))
(762 (make-name-generator . 41))
(763 (same-denotation? . 41))
(764 (binding? . 41))
(765 (binding-type . 41))
(766 (binding-place . 41))
(767 (binding-static . 41))
(768 (set-binding-place! . 41))
(769 (make-binding . 41))
(770 (clobber-binding! . 41))
(771 (impose-type . 41))
(772 (forget-integration . 41))
(773 (classify . 41))
(774 (call-node? . 41))
(775 (name-node? . 41))
(776 (classify-literal . 41))
(777 (classify-call . 41))
(778 (classify-name . 41))
(779 (operator/name . 41))
(780 (classify-macro-application . 41))
(781 (classify-transform-application . 41))
(782 (maybe-transform-call . 41))
(783 (classify-operator-form . 41))
(784 (classifiers . 41))
(785 (define-classifier . 41))
(786 (unspecific-node . 41))
(787 (define-node? . 41))
(788 (define-syntax-node? . 41))
(789 (funny-name/source-file-name . 41))
(790 (bind-source-file-name . 41))
(791 (lookup . 41))
(792 (bind1 . 41))
(793 (bind . 41))
(794 (bindrec . 41))
(795 (literal? . 41))
(796 (number-of-required-args . 41))
(797 (n-ary? . 41))
(798 (normalize-formals . 41))
(799 (syntax? . 41))
(800 (name? . 41))
(801 (unbound? . 41))
(802 (define-usual-suspects . 41))
(803 (process-syntax . 41))
(804 (get-funny . 41))
(805 (funny-name/reflective-tower . 41))
(806 (reflective-tower . 41))
(807 (scan-body . 41))
(808 (scan-body-forms . 41))
(809 (body-lossage . 41))
(810 (begin-node? . 41))
(811 (variable-type . 41))
(812 (variable-type? . 41))
(813 (variable-value-type . 41))
(814 (compatible-types? . 41))
(815 (usual-variable-type . 41))
(816 (undeclared-type . 41))
(817 (funny-name/reader . 41))
(818 (environment-reader . 41))
(819 (schemify . 41))
(820 (schemify1 . 41))
(821 (schemifiers . 41))
(822 (define-schemifier . 41))
(823 (name->qualified . 41))
(824 (schemify-sexp . 41))
(825 (make-qualified . 41))
(826 (qualified? . 41))
(827 (qualified-parent-name . 41))
(828 (qualified-symbol . 41))
(829 (make-population . 35))
(830 (add-to-population! . 35))
(831 (weak-memq . 35))
(832 (population-reduce . 35))
(833 (population->list . 35))
(834 (walk-population . 35))
(835 (:interface . 40))
(836 (really-make-interface . 40))
(837 (interface-name . 40))
(838 (set-interface-name! . 40))
(839 (interface-clients . 40))
(840 (walk-method . 40))
(841 (ref-method . 40))
(842 (interface? . 40))
(843 (interface-ref . 40))
(844 (for-each-declaration . 40))
(845 (note-reference-to-interface! . 40))
(846 (make-interface . 40))
(847 (make-simple-interface . 40))
(848 (really-make-simple-interface . 40))
(849 (make-compound-interface . 40))
(850 (note-interface-name! . 40))
(851 (:structure . 44))
(852 (really-make-structure . 44))
(853 (structure-name . 44))
(854 (set-structure-name! . 44))
(855 (structure-clients . 44))
(856 (structure-package . 44))
(857 (structure-interface-really . 44))
(858 (set-structure-interface! . 44))
(859 (structure-interface-thunk . 44))
(860 (structure? . 44))
(861 (structure-interface . 44))
(862 (initialize-structure! . 44))
(863 (make-structure . 44))
(864 (structure-unstable? . 44))
(865 (for-each-export . 44))
(866 (note-structure-name! . 44))
(867 (:package . 44))
(868 (really-make-package . 44))
(869 (package-cached . 44))
(870 (package-clients . 44))
(871 (package-plist . 44))
(872 (set-package-plist! . 44))
(873 (package-accesses-thunk . 44))
(874 (package-opens-thunk . 44))
(875 (set-package-opens-thunk! . 44))
(876 (package->environment . 44))
(877 (set-package->environment! . 44))
(878 (package-loaded? . 44))
(879 (set-package-loaded?! . 44))
(880 (package-clauses . 44))
(881 (package-file-name . 44))
(882 (package-get-location . 44))
(883 (set-package-get-location! . 44))
(884 (package-integrate? . 44))
(885 (set-package-integrate?! . 44))
(886 (package-unstable? . 44))
(887 (package-definitions . 44))
(888 (package-opens-really . 44))
(889 (set-package-opens! . 44))
(890 (package-uid . 44))
(891 (package? . 44))
(892 (make-package . 44))
(893 (really-package->environment . 44))
(894 (new-package-uid . 44))
(895 (*package-uid* . 44))
(896 (package-name-table . 44))
(897 (package-name . 44))
(898 (note-package-name! . 44))
(899 (package-opens . 44))
(900 (initialize-package-if-necessary! . 44))
(901 (package-accesses . 44))
(902 (make-simple-package . 44))
(903 (package-definition . 44))
(904 (package-define! . 44))
(905 (really-package-define! . 44))
(906 (package-lookup . 44))
(907 (really-package-lookup . 44))
(908 (structure-lookup . 44))
(909 (generic-lookup . 44))
(910 (initialize-package! . 44))
(911 (define-funny-names! . 44))
(912 (package-define-funny! . 44))
(913 (funny-name/the-package . 44))
(914 (extract-package-from-environment . 44))
(915 (for-each-definition . 44))
(916 (get-new-location . 44))
(917 (make-new-location . 44))
(918 ($get-location . 44))
(919 (*location-uid* . 44))
(920 (location-info-table . 44))
(921 (flush-location-names . 44))
(922 (package-get . 44))
(923 (package-put! . 44))
(924 (package-note-caching . 44))
(925 (maybe-fix-place . 44))
(926 (follow-forwarding-pointers . 44))
(927 (environment-ref . 52))
(928 (environment-set! . 52))
(929 (environment-define! . 52))
(930 (*structure-ref . 52))
(931 (carefully . 52))
(932 ($interaction-environment . 52))
(933 (interaction-environment . 52))
(934 (set-interaction-environment! . 52))
(935 (with-interaction-environment . 52))
(936 (scheme-report-environment . 52))
(937 (*scheme-report-environment* . 52))
(938 (*scheme-report-number* . 52))
(939 (set-scheme-report-environment! . 52))
(940 (make-reflective-tower . 52))
(941 (set-reflective-tower-maker! . 52))
(942 (the-usual-transforms . 42))
(943 (define-usual-macro . 42))
(944 (usual-transform . 42))
(945 (long-enough? . 42))
(946 (process-rules . 42))
(947 (segment-pattern? . 42))
(948 (segment-template? . 42))
(949 (indicators-for-zero-or-more . 42))
(950 (find-free-names-in-syntax-rules . 42))
(951 (namestring . 38))
(952 (directory-component-separator . 38))
(953 (type-component-separator . 38))
(954 (namestring-component . 38))
(955 (file-name-preferred-case . 38))
(956 (*scheme-file-type* . 38))
(957 (*load-file-type* . 38))
(958 (file-name-directory . 38))
(959 (file-name-nondirectory . 38))
(960 (file-nondirectory-position . 38))
(961 (string-posq . 38))
(962 (*translations* . 38))
(963 (translations . 38))
(964 (set-translation! . 38))
(965 (translate . 38))
(966 ($note-file-package . 45))
(967 (scan-forms . 45))
(968 (scan-file . 45))
(969 (really-scan-port . 45))
(970 (really-scan-file . 45))
(971 (scan-form-list . 45))
(972 (scan-form . 45))
(973 (process-define-syntax . 45))
(974 (scan-structures . 45))
(975 (really-scan-structures . 45))
(976 (scan-package . 45))
(977 (really-scan-package . 45))
(978 (optimize . 45))
(979 (check-structure . 45))
(980 (initialize-usual-transforms! . 45))
(981 (define-all-operators . 45))
(982 (make-define-primitive-node . 45))
(983 (optimizers-table . 45))
(984 (get-optimizer . 45))
(985 (set-optimizer! . 45))
(986 ($note-undefined . 45))
(987 (note-undefined! . 45))
(988 (noting-undefined-variables . 45))
(989 (really-noting-undefined-variables . 45))
(990 (define-enumeration . 23))
(991 (components . 23))
(992 (enum . 23))
(993 (enumerand->name . 23))
(994 (name->enumerand . 23))
(995 (lookup-enumerand . 23))
(996 (bits-used-per-byte . 24))
(997 (maximum-stack-args . 24))
(998 (define-instruction-set . 24))
(999 (op . 24))
(1000 (op-enumeration . 24))
(1001 (op-count . 24))
(1002 (opcode-arg-specs . 24))
(1003 (interrupt . 24))
(1004 (interrupt-enumeration . 24))
(1005 (interrupt-count . 24))
(1006 (time-option . 24))
(1007 (time-option-enumeration . 24))
(1008 (time-option-count . 24))
(1009 (memory-status-option . 24))
(1010 (memory-status-option-enumeration . 24))
(1011 (memory-status-option-count . 24))
(1012 (stob . 24))
(1013 (stob-enumeration . 24))
(1014 (stob-count . 24))
(1015 (least-b-vector-type . 24))
(1016 (stob-data . 24))
(1017 (node-type . 43))
(1018 (reconstruct-type . 43))
(1019 (reconstruct . 43))
(1020 (reconstructors . 43))
(1021 (define-reconstructor . 43))
(1022 (careful-codomain . 43))
(1023 (reconstruct-body . 43))
(1024 (operator/name . 43))
(1025 (reconstruct-name . 43))
(1026 (reconstruct-call . 43))
(1027 (fork-constraints . 43))
(1028 (examine . 43))
(1029 (node->type . 43))
(1030 (call-node? . 43))
(1031 (name-node? . 43))
(1032 (begin-node? . 43))
(1033 (reconstruct-apply . 43))
(1034 (declare-operator-type . 43))
(1035 (constant-type . 43))
(1036 (template-overhead . 26))
(1037 (template-code . 26))
(1038 (template-info . 26))
(1039 (set-template-code! . 26))
(1040 (set-template-info! . 26))
(1041 (make-segment . 46))
(1042 (segment-size . 46))
(1043 (segment-emitter . 46))
(1044 (segment->template . 46))
(1045 (segment-data->template . 46))
(1046 (:assembly-state . 46))
(1047 (make-assembly-state . 46))
(1048 (astate-literals . 46))
(1049 (set-astate-literals! . 46))
(1050 (astate-count . 46))
(1051 (set-astate-count! . 46))
(1052 (astate-pc . 46))
(1053 (set-astate-pc! . 46))
(1054 (astate-code-vector . 46))
(1055 (make-astate . 46))
(1056 (emit-byte! . 46))
(1057 (emit-literal! . 46))
(1058 (emit-segment! . 46))
(1059 (empty-segment . 46))
(1060 (instruction . 46))
(1061 (sequentially . 46))
(1062 (sequentially-2 . 46))
(1063 (instruction-with-literal . 46))
(1064 (instruction-with-location . 46))
(1065 (instruction-with-template . 46))
(1066 (make-label . 46))
(1067 (instruction-using-label . 46))
(1068 (attach-label . 46))
(1069 (byte-limit . 46))
(1070 ($debug-data . 46))
(1071 (note-source-code . 46))
(1072 (note-environment . 46))
(1073 (emit-with-environment-maps! . 46))
(1074 ($environment-maps . 46))
(1075 (environment-maps-table . 46))
(1076 (new-template-uid . 46))
(1077 (*template-uid* . 46))
(1078 (template-uid . 46))
(1079 (set-template-uid! . 46))
(1080 (debug-flag-names . 46))
(1081 (type/debug-flags . 46))
(1082 (make-debug-flags . 46))
(1083 ($debug-flags . 46))
(1084 (debug-flag-accessor . 46))
(1085 (debug-flag-modifier . 46))
(1086 (keep-source-code? . 46))
(1087 (keep-environment-maps? . 46))
(1088 (keep-procedure-names? . 46))
(1089 (keep-file-names? . 46))
(1090 (tabulate-debug-data? . 46))
(1091 (debug-data-table . 46))
(1092 (with-fresh-compiler-state . 46))
(1093 (saving-and-restoring . 46))
(1094 (:debug-data . 46))
(1095 (make-debug-data . 46))
(1096 (debug-data-source . 46))
(1097 (set-debug-data-source! . 46))
(1098 (debug-data-env-maps . 46))
(1099 (set-debug-data-env-maps! . 46))
(1100 (debug-data-pc-in-parent . 46))
(1101 (debug-data-parent . 46))
(1102 (debug-data-name . 46))
(1103 (debug-data-uid . 46))
(1104 (debug-data? . 46))
(1105 (new-debug-data . 46))
(1106 (debug-data->info . 46))
(1107 (get-debug-data . 46))
(1108 (note-debug-data! . 46))
(1109 (interesting-debug-data? . 46))
(1110 (debug-data-names . 46))
(1111 (template-debug-data . 46))
(1112 (template-id . 46))
(1113 (template-name . 46))
(1114 (template-names . 46))
(1115 (compile-top . 47))
(1116 (compile . 47))
(1117 (compilators . 47))
(1118 (define-compilator . 47))
(1119 (compile-constant . 47))
(1120 (compile-begin . 47))
(1121 (compile-call . 47))
(1122 (lambda-node? . 47))
(1123 (compile-redex . 47))
(1124 (compile-unknown-call . 47))
(1125 (maybe-push-continuation . 47))
(1126 (push-arguments . 47))
(1127 (push-all-with-names . 47))
(1128 (compile-lambda . 47))
(1129 (compile-lambda-code . 47))
(1130 (compile-letrec . 47))
(1131 (compile-body . 47))
(1132 (operator/letrec . 47))
(1133 (make-cont . 47))
(1134 (cont-segment . 47))
(1135 (cont-source-info . 47))
(1136 (return-cont-segment . 47))
(1137 (return-cont . 47))
(1138 (return-cont? . 47))
(1139 (fall-through-cont . 47))
(1140 (fall-through-cont? . 47))
(1141 (ignore-values-segment . 47))
(1142 (ignore-values-cont . 47))
(1143 (ignore-values-cont? . 47))
(1144 (deliver-value . 47))
(1145 (named-cont . 47))
(1146 (cont-name . 47))
(1147 (bind-vars . 47))
(1148 (initial-cenv . 47))
(1149 (environment-level . 47))
(1150 (funny-name/lexical-level . 47))
(1151 (name-node-binding . 47))
(1152 (generate-trap . 47))
(1153 (careful-sequentially . 47))
(1154 (large-segment-size . 47))
(1155 (shrink-segment . 47))
(1156 (type-check . 47))
(1157 (set-type-check?! . 47))
(1158 (*type-check?* . 47))
(1159 (diagnose-call-error . 47))
(1160 (define-compiler-primitive . 47))
(1161 (closed-compilators . 47))
(1162 (define-closed-compilator . 47))
(1163 (get-closed-compilator . 47))
(1164 (direct-compilator . 47))
(1165 (direct-closed-compilator . 47))
(1166 (nargs->domain . 47))
(1167 (define-simple-primitive . 47))
(1168 (simple-compilator . 47))
(1169 (simple-closed-compilator . 47))
(1170 (symbol-append . 47))
(1171 (define-stob-predicate . 47))
(1172 (define-data-struct-primitives . 47))
(1173 (define-vector-primitives . 47))
(1174 (define-n-ary-compiler-primitive . 47))
(1175 (n-ary-primitive-compilator . 47))
(1176 (push-all-but-last . 47))
(1177 (compile-form . 47))
(1178 (compile-file . 47))
(1179 (compile-and-run-forms . 47))
(1180 (compile-and-run-file . 47))
(1181 (compile-and-run-port . 47))
(1182 (compile-and-run-scanned-forms . 47))
(1183 (compile-scanned-forms . 47))
(1184 (compile-scanned-form . 47))
(1185 (compile-definition . 47))
(1186 (get-location . 47))
(1187 (get-location-for-undefined . 47))
(1188 (get-location-for-unassignable . 47))
(1189 (package-accessor-on-demand . 47))
(1190 (location-on-demand . 47))
(1191 (package-undefineds . 47))
(1192 (location-for-reference . 47))
(1193 (package-undefined-but-assigneds . 47))
(1194 (location-for-assignment . 47))
(1195 (note-caching . 47))
(1196 (grumble . 47))
(1197 (make-startup-procedure . 47))
(1198 (an-ignore-values-cont . 47))
(1199 (eval . 53))
(1200 (load-into . 53))
(1201 (load-quietly . 53))
(1202 (eval-from-file . 53))
(1203 (eval-scanned-forms . 53))
(1204 (really-eval-scanned-forms . 53))
(1205 (invoke-template . 53))
(1206 (load . 53))
(1207 (:closure . 28))
(1208 (:code-vector . 28))
(1209 (:location . 28))
(1210 (:template . 28))
(1211 (continuation-cont . 27))
(1212 (continuation-pc . 27))
(1213 (continuation-template . 27))
(1214 (continuation-env . 27))
(1215 (continuation-overhead . 27))
(1216 (continuation-arg . 27))
(1217 (continuation-arg-count . 27))
(1218 (continuation-parent . 27))
(1219 (:continuation . 27))
(1220 (usual-exception-handler . 29))
(1221 (define-exception-handler . 29))
(1222 (signal-exception . 29))
(1223 (exception-handlers . 29))
(1224 (make-opcode-generic! . 29))
(1225 (really-signal-condition . 29))
(1226 (with-handler . 29))
(1227 ($condition-handlers . 29))
(1228 (initialize-exceptions! . 29))
(1229 (last-resort-condition-handler . 29))
(1230 (report-utter-lossage . 29))
(1231 (continuation-preview . 29))
(1232 (ignore-errors . 29))
(1233 (*wna-handlers* . 29))
(1234 (define-wna-handler . 29))
(1235 (op/check-nargs= . 29))
(1236 (wna-lose . 29))
(1237 (comparison-wna . 29))
(1238 (display-condition . 36))
(1239 (really-display-condition . 36))
(1240 (*depth* . 36))
(1241 (*length* . 36))
(1242 (&disclose-condition . 36))
(1243 (disclose-condition . 36))
(1244 (limited-write . 36))
(1245 (command-processor . 57))
(1246 (mini-load . 57))
(1247 (read-string . 57))
(1248 (interrupt-handlers . 30))
(1249 (initialize-interrupts! . 30))
(1250 (time-option/ticks-per-second . 30))
(1251 (one-second . 30))
(1252 (no-interrupts . 30))
(1253 (all-interrupts . 30))
(1254 (with-interrupts-inhibited . 30))
(1255 (with-interrupts-allowed . 30))
(1256 (with-interrupts . 30))
(1257 (enabled-interrupts . 30))
(1258 (interrupt-before-heap-overflow! . 30))
(1259 (interrupt/memory-shortage . 30))
(1260 (memory-status-option/set-minimum-recovered-space! . 30))
(1261 (memory-status-option/heap-size . 30))
(1262 (usual-resumer . 34))
(1263 (start . 58))
(1264 (make-built-in-structures . 58))
(1265 (initialize-interaction-environment! . 58))
(1266 (make-initial-package . 58))
(1267 (make-tower . 58))
(1268 (inline-transform . 51))
(1269 (make-substitution . 51))
(1270 (substitute . 51))
(1271 (operator/name . 51))
(1272 (qualified->name . 51))
(1273 (get-qualified-env . 51))
(1274 (operator . 55))
(1275 (simple-interface . 55))
(1276 (package . 55))
(1277 (transform . 55))
(1278 (:syntax . 49))
(1279 (:values . 49))
(1280 (:arguments . 49))
(1281 (:value . 49))
(1282 (procedure . 49))
(1283 (:boolean . 49))
(1284 (:char . 49))
(1285 (:null . 49))
(1286 (:unspecific . 49))
(1287 (:number . 49))
(1288 (:complex . 49))
(1289 (:real . 49))
(1290 (:rational . 49))
(1291 (:integer . 49))
(1292 (:exact-integer . 49))
(1293 (:pair . 49))
(1294 (:string . 49))
(1295 (:symbol . 49))
(1296 (:vector . 49))
(1297 (:procedure . 49))
(1298 (:input-port . 49))
(1299 (:output-port . 49))
(1300 (:error . 49))
(1301 (:escape . 49))
(1302 (:structure . 49))
(1303 (:type . 49))
(1304 (def . 48))
(1305 (really-def . 48))
(1306 (define-multiple . 48))
(1307 (define-interface . 48))
(1308 (export . 48))
(1309 (compound-interface . 48))
(1310 (define-structure . 48))
(1311 (define-structures . 48))
(1312 (structure . 48))
(1313 (structures . 48))
(1314 (a-package . 48))
(1315 (receive . 48))
(1316 (define-reflective-tower-maker . 48))
(1317 (export-reflective-tower-maker . 48))
(1318 (define-module . 48))
(1319 (make-a-package . 48))
(1320 (loser . 48))
(1321 (interface-of . 48))
(1322 (*verify-later!* . 48))
(1323 (verify-later! . 48))
(1324 (set-verify-later! . 48))
(1325 (note-name! . 48))
(1326 (ensure-loaded . 54))
(1327 (really-ensure-loaded . 54))
-
; Template uid -> name, parent, pc in parent, env maps
(1 current-cont 0 4 ())
(2 closure-template 0 12 ())
(3 continuation-ref 0 20 ())
(4 output-port? 0 28 ())
(5 closure? 0 36 ())
(6 complex? 0 44 ())
(7 arithmetic-shift 0 52 ())
(8 signal-condition 0 60 ())
(9 integer? 0 68 ())
(10 make-closure 0 76 ())
(11 template-ref 0 84 ())
(12 make-rectangular 0 92 ())
(13 string=? 0 100 ())
(14 extended-number? 0 108 ())
(15 reverse-list->string 0 116 ())
(16 denominator 0 124 ())
(17 call-with-values 0 132 ())
(18 weak-pointer-ref 0 140 ())
(19 find-all-symbols 0 148 ())
(20 code-vector? 0 156 ())
(21 pop 0 164 ())
(22 exp 0 172 ())
(23 sin 0 180 ())
(24 make-extended-number 0 188 ())
(25 cos 0 196 ())
(26 collect 0 204 ())
(27 external-lookup 0 212 ())
(28 tan 0 220 ())
(29 log 0 228 ())
(30 continuation-length 0 236 ())
(31 make-code-vector 0 244 ())
(33 cdr 32 4 ())
(34 bitwise-xor 32 12 ())
(35 car 32 20 ())
(36 string? 32 28 ())
(37 symbol? 32 36 ())
(38 set-cdr! 32 44 ())
(39 bitwise-not 32 52 ())
(40 vector? 32 60 ())
(41 closure-env 32 68 ())
(42 set-car! 32 76 ())
(43 bitwise-ior 32 84 ())
(44 number? 32 92 ())
(45 template-length 32 100 ())
(46 string-hash 32 108 ())
(47 pop-env 32 116 ())
(48 primitive-catch 32 124 ())
(49 make-string 32 132 ())
(50 input-port? 32 140 ())
(51 record? 32 148 ())
(52 make-vector 32 156 ())
(53 extended-number-set! 32 164 ())
(54 write-image 32 172 ())
(55 eq? 32 180 ())
(56 bitwise-and 32 188 ())
(57 location-id 32 196 ())
(58 code-vector-set! 32 204 ())
(59 set-location-id! 32 212 ())
(60 make-record 32 220 ())
(61 intern 32 228 ())
(62 values 32 236 ())
(63 string-set! 32 244 ())
(64 unassigned 32 252 ())
(65 vector-set! 32 260 ())
(66 extended-number-ref 32 268 ())
(67 unspecific 32 276 ())
(68 code-vector-ref 32 284 ())
(69 schedule-interrupt 32 292 ())
(70 find-all-xs 32 300 ())
(71 char-ready? 32 308 ())
(72 set-interrupt-handlers! 32 316 ())
(73 eof-object? 32 324 ())
(74 record-set! 32 332 ())
(75 ascii->char 32 340 ())
(76 char->ascii 32 348 ())
(77 set-enabled-interrupts! 32 356 ())
(78 external-value 32 364 ())
(79 make-immutable! 32 372 ())
(80 close-port 32 380 ())
(81 string-ref 32 388 ())
(82 immutable? 32 396 ())
(83 vector-ref 32 404 ())
(84 exact? 32 412 ())
(85 write-char 32 420 ())
(86 symbol->string 32 428 ())
(87 make-polar 32 436 ())
(88 record-ref 32 444 ())
(89 numerator 32 452 ())
(90 extended-number-length 32 460 ())
(91 error 32 468 ())
(92 exact->inexact 32 476 ())
(93 inexact->exact 32 484 ())
(94 apply 32 492 ())
(95 memory-status 32 500 ())
(97 code-vector-length 96 4 ())
(98 floor 96 12 ())
(99 with-continuation 96 20 ())
(100 magnitude 96 28 ())
(101 nargs 96 36 ())
(102 char=? 96 44 ())
(103 char<? 96 52 ())
(104 continuation? 96 60 ())
(105 remainder 96 68 ())
(106 vm-return 96 76 ())
(107 false 96 84 ())
(108 angle 96 92 ())
(109 open-port 96 100 ())
(110 string-length 96 108 ())
(111 external? 96 116 ())
(112 make-continuation 96 124 ())
(113 vector-length 96 132 ())
(114 template? 96 140 ())
(115 rational? 96 148 ())
(116 location? 96 156 ())
(117 external-name 96 164 ())
(118 set-exception-handler! 96 172 ())
(119 pair? 96 180 ())
(120 make-external 96 188 ())
(121 record-length 96 196 ())
(122 external-call 96 204 ())
(123 set-dynamic-state! 96 212 ())
(124 get-cont-from-heap 96 220 ())
(125 real-part 96 228 ())
(126 real? 96 236 ())
(127 make-template 96 244 ())
(128 imag-part 96 252 ())
(129 make-location 96 260 ())
(130 = 96 268 ())
(131 < 96 276 ())
(132 char? 96 284 ())
(133 quotient 96 292 ())
(134 / 96 300 ())
(135 weak-pointer? 96 308 ())
(136 - 96 316 ())
(137 continuation-set! 96 324 ())
(138 peek-char 96 332 ())
(139 + 96 340 ())
(140 * 96 348 ())
(141 contents 96 356 ())
(142 sqrt 96 364 ())
(143 read-char 96 372 ())
(144 set-contents! 96 380 ())
(145 push 96 388 ())
(146 make-weak-pointer 96 396 ())
(147 get-dynamic-state 96 404 ())
(148 trap 96 412 ())
(149 cons 96 420 ())
(150 template-set! 96 428 ())
(151 time 96 436 ())
(152 location-defined? 96 444 ())
(153 asin 96 452 ())
(154 write-string 96 460 ())
(155 vm-extension 96 468 ())
(156 force-output 96 476 ())
(157 acos 96 484 ())
(158 set-location-defined?! 96 492 ())
(159 atan 96 500 ())
(161 char->integer 160 4 ())
(162 integer->char 160 12 ())
(163 invoke-closure 160 44 ())
(164 primitive-cwcc 160 52 ())
(165 #f 164 7 ())
(166 make-undefined-location 160 60 ())
(167 vector-unassigned? 160 68 ())
(168 string-copy 160 76 ())
(169 loop 168 24 ())
(170 string->symbol 160 84 ())
(171 flush-the-symbol-table! 160 99 ())
(172 restore-the-symbol-table! 160 107 ())
(173 maybe-open-input-file 160 127 ())
(174 maybe-open-output-file 160 135 ())
(175 open-input-file 160 143 ())
(176 open-output-file 160 151 ())
(178 signal 177 12 ())
(179 warn 177 20 ())
(180 syntax-error 177 28 ())
(181 call-error 177 36 ())
(183 not 182 4 ())
(184 boolean? 182 12 ())
(185 eqv? 182 20 ())
(186 equal? 182 28 ())
(187 loop 186 141 ())
(188 > 182 36 ())
(189 <= 182 44 ())
(190 >= 182 52 ())
(191 max 182 60 ())
(192 #f 191 8 ())
(193 min 182 68 ())
(194 #f 193 8 ())
(195 abs 182 76 ())
(196 zero? 182 84 ())
(197 positive? 182 92 ())
(198 negative? 182 100 ())
(199 even? 182 108 ())
(200 odd? 182 116 ())
(201 caar 182 124 ())
(202 cadr 182 132 ())
(203 cdar 182 140 ())
(204 cddr 182 148 ())
(205 caaar 182 156 ())
(206 caadr 182 164 ())
(207 cadar 182 172 ())
(208 caddr 182 180 ())
(209 cdaar 182 188 ())
(210 cdadr 182 196 ())
(211 cddar 182 204 ())
(212 cdddr 182 212 ())
(213 caaaar 182 220 ())
(214 caaadr 182 228 ())
(215 caadar 182 236 ())
(216 caaddr 182 244 ())
(217 cadaar 182 252 ())
(218 cadadr 182 260 ())
(219 caddar 182 268 ())
(220 cadddr 182 276 ())
(221 cdaaar 182 284 ())
(222 cdaadr 182 292 ())
(223 cdadar 182 300 ())
(224 cdaddr 182 308 ())
(225 cddaar 182 316 ())
(226 cddadr 182 324 ())
(227 cdddar 182 332 ())
(228 cddddr 182 340 ())
(229 null? 182 348 ())
(230 list 182 356 ())
(231 length 182 364 ())
(232 #f 231 5 ())
(233 append 182 372 ())
(234 recur 233 22 ())
(235 reverse 182 380 ())
(236 append-reverse 182 388 ())
(237 list-tail 182 396 ())
(238 list-ref 182 404 ())
(239 mem 182 412 ())
(240 #f 239 5 ())
(241 loop 240 9 ())
(243 ass 242 4 ())
(244 #f 243 5 ())
(245 loop 244 9 ())
(246 assq 242 46 ())
(247 list? 242 54 ())
(248 recur 247 9 ())
(249 char>? 242 62 ())
(250 char>=? 242 70 ())
(251 char<=? 242 78 ())
(252 char-whitespace? 242 86 ())
(253 char-lower-case? 242 94 ())
(254 char-upper-case? 242 102 ())
(255 char-numeric? 242 110 ())
(256 char-alphabetic? 242 118 ())
(257 char-upcase 242 140 ())
(258 char-downcase 242 148 ())
(259 char-ci-compare 242 156 ())
(260 #f 259 5 ())
(261 string 242 249 ())
(262 substring 242 257 ())
(263 loop##0 262 22 ())
(264 string-append 242 265 ())
(265 #f 264 10 ())
(266 loop 264 39 ())
(267 loop##1 266 35 ())
(268 string->list 242 273 ())
(269 loop##2 268 15 ())
(270 list->string 242 281 ())
(271 loop##3 270 27 ())
(272 string-fill! 242 289 ())
(273 loop##4 272 15 ())
(274 make-string=? 242 297 ())
(275 #f 274 5 ())
(276 loop 275 25 ())
(277 make-string<? 242 322 ())
(278 #f 277 5 ())
(279 loop 278 36 ())
(280 string>? 242 370 ())
(281 string<=? 242 378 ())
(282 string>=? 242 386 ())
(283 string-ci>? 242 394 ())
(284 string-ci<=? 242 402 ())
(285 string-ci>=? 242 410 ())
(286 vector 242 418 ())
(287 vector->list 242 426 ())
(288 loop##5 287 9 ())
(289 list->vector 242 434 ())
(290 loop##6 289 27 ())
(291 vector-fill! 242 442 ())
(292 loop##7 291 16 ())
(293 map 242 450 ())
(294 map1 242 458 ())
(295 map2+ 242 466 ())
(296 for-each 242 474 ())
(297 loop 296 12 ())
(298 make-promise 242 483 ())
(299 #f 298 11 ())
(300 force 242 491 ())
(302 unspecific 301 4 ())
(303 reduce 301 12 ())
(304 filter 301 20 ())
(305 #f 304 5 ())
(306 pos 301 28 ())
(307 #f 306 5 ())
(308 loop 307 9 ())
(309 any 301 87 ())
(310 every 301 95 ())
(311 sublist 301 103 ())
(312 recur 311 42 ())
(313 last 301 111 ())
(314 insert 301 119 ())
(316 inexact? 315 4 ())
(317 modulo 315 12 ())
(318 ceiling 315 20 ())
(319 truncate 315 28 ())
(320 round 315 36 ())
(321 gcd 315 44 ())
(322 #f 321 6 ())
(323 euclid 315 52 ())
(324 lcm 315 60 ())
(325 #f 324 6 ())
(326 expt 315 68 ())
(327 raise-to-integer-power 315 76 ())
(328 loop 327 21 ())
(330 rationalize 329 4 ())
(331 simplest-rational 329 12 ())
(332 simplest-rational-internal 331 9 ())
(334 record-type 333 4 ())
(335 make-record-type 333 27 ())
(336 record-type? 333 35 ())
(337 record-type-uid 333 43 ())
(338 record-type-name 333 51 ())
(339 record-type-field-names 333 59 ())
(340 record-type-discloser 333 67 ())
(341 record-field-index 333 75 ())
(342 loop 341 9 ())
(343 record-constructor 333 83 ())
(344 #f 343 9 ())
(345 #f 343 43 ())
(346 loop 345 30 ())
(347 record-accessor 333 91 ())
(348 #f 347 55 ())
(349 record-modifier 333 99 ())
(350 #f 349 55 ())
(351 record-predicate 333 107 ())
(352 #f 351 5 ())
(353 define-record-discloser 333 115 ())
(354 disclose-record 333 123 ())
(355 default-record-discloser 333 131 ())
(359 simple-type-id 358 44 ())
(360 simple-type-priority 358 52 ())
(361 simple-type-predicate 358 60 ())
(362 simple-type-superiors 358 68 ())
(364 make-simple-type 358 108 ())
(365 compute-priority 358 116 ())
(366 %type-priority 358 132 ())
(367 %type-predicate 358 140 ())
(368 %same-type? 358 148 ())
(369 value? 358 213 ())
(374 record-type-priority 373 40 ())
(375 method-info-proc 373 89 ())
(376 method-info-n-ary? 373 97 ())
(377 method-info-types 373 105 ())
(378 make-method-info 373 130 ())
(380 empty-method-list 373 153 ())
(381 insert-method 373 161 ())
(382 recur 381 9 ())
(383 same-applicability? 373 169 ())
(384 every2 373 177 ())
(385 more-specific? 373 185 ())
(386 loop 385 106 ())
(387 more-specific-type? 373 193 ())
(388 method-table-id 373 241 ())
(389 method-table-set-perform! 373 249 ())
(390 method-table-get-perform 373 257 ())
(391 make-generic 373 265 ())
(392 method-table-prototype 373 273 ())
(393 method-table-methods 373 281 ())
(394 set-method-table-methods! 373 289 ())
(396 make-method-table 373 329 ())
(397 #f 396 48 ())
(398 #f 396 70 ())
(399 make-cell-for-generic 373 337 ())
(400 #f 399 7 ())
(401 #f 399 10 ())
(402 #f 399 13 ())
(403 add-to-method-table! 373 345 ())
(404 set-final-method! 373 353 ())
(405 apply-generic 373 361 ())
(406 methods->perform 373 370 ())
(407 recur 406 9 ())
(408 last-action 373 378 ())
(409 #f 408 5 ())
(410 one-action 373 386 ())
(411 #f 410 5 ())
(412 #f 411 19 ())
(413 argument-sequence-predicate 373 394 ())
(414 recur 413 9 ())
(415 check-for-next 373 402 ())
(416 #f 415 5 ())
(417 check-next 373 410 ())
(418 #f 417 5 ())
(419 add-method! 373 468 ())
(421 add-method! 420 57 ())
(422 type-predicate 420 130 ())
(423 &type-predicate 420 207 ())
(424 &type-predicate 420 269 ())
(425 type-priority 420 334 ())
(426 &type-priority 420 411 ())
(427 &type-priority 420 473 ())
(429 type-superiors 428 47 ())
(430 &type-superiors 428 124 ())
(431 &type-superiors 428 186 ())
(432 same-type? 428 254 ())
(433 &same-type? 428 334 ())
(434 &same-type? 428 399 ())
(436 singleton-value 435 4 ())
(438 compare-to 435 27 ())
(439 #f 438 5 ())
(440 &type-predicate 435 75 ())
(441 &type-priority 435 137 ())
(442 &same-type? 435 202 ())
(443 disclose 435 267 ())
(444 &disclose 435 344 ())
(445 &disclose 435 406 ())
(446 &add-method! 435 480 ())
(447 proc->discloser 435 502 ())
(448 #f 447 5 ())
(449 #f 448 5 ())
(452 &number->string 451 44 ())
(453 &number->string 451 109 ())
(454 &number->string 451 174 ())
(455 integer->digit 451 226 ())
(456 integer->string 451 231 ())
(457 recur 456 36 ())
(458 string->number 451 245 ())
(459 loop 458 159 ())
(460 radix-is 459 69 ())
(461 exactness-is 459 72 ())
(462 loop 459 233 ())
(463 &really-string->number 451 329 ())
(465 loop 464 16 ())
(466 &really-string->number 451 429 ())
(467 set-exactness 451 451 ())
(468 digit->integer 451 491 ())
(469 do-it 451 496 ())
(470 loop 469 35 ())
(471 string->integer 451 501 ())
(473 thread-dynamic-env 472 44 ())
(474 current-thread 472 52 ())
(475 set-current-thread! 472 60 ())
(476 get-dynamic-env 472 68 ())
(477 set-dynamic-env! 472 76 ())
(478 initialize-dynamic-state! 472 84 ())
(479 with-dynamic-env 472 92 ())
(480 #f 479 27 ())
(481 empty-dynamic-env 472 100 ())
(482 fluid-top-level-value 472 148 ())
(483 set-fluid-top-level-value! 472 156 ())
(484 fluid 472 164 ())
(485 set-fluid! 472 172 ())
(486 let-fluid 472 180 ())
(487 let-fluids 472 188 ())
(488 loop 487 10 ())
(489 fluid-lookup 472 196 ())
(491 dynamic-wind 490 4 ())
(492 #f 491 85 ())
(493 call-with-current-continuation 490 12 ())
(494 #f 493 5 ())
(495 continuation->procedure 490 20 ())
(496 #f 495 5 ())
(497 #f 496 54 ())
(498 point-parent 490 68 ())
(499 point-dynamic-env 490 76 ())
(500 point-out 490 84 ())
(501 point-in 490 92 ())
(502 point-depth 490 100 ())
(505 get-dynamic-point 490 153 ())
(506 env-dynamic-point 490 161 ())
(507 let-dynamic-point 490 169 ())
(508 travel-to-point! 490 177 ())
(510 current-input-port 509 52 ())
(511 current-output-port 509 60 ())
(512 error-output-port 509 68 ())
(513 with-initial-ports 509 76 ())
(514 call-with-mumble-file 509 84 ())
(515 #f 514 5 ())
(516 #f 515 9 ())
(517 #f 515 12 ())
(518 #f 515 15 ())
(519 with-input-from-file 509 132 ())
(520 #f 519 8 ())
(521 with-output-to-file 509 140 ())
(522 #f 521 8 ())
(523 newline 509 148 ())
(524 output-port-option 509 156 ())
(525 input-port-option 509 164 ())
(527 write 526 4 ())
(528 recur 527 26 ())
(529 recurring-write 526 12 ())
(530 write-boolean 526 20 ())
(531 write-number 526 28 ())
(532 write-char-literal 526 36 ())
(533 character-name 526 44 ())
(534 write-string-literal 526 52 ())
(535 loop##8 534 21 ())
(536 write-list 526 60 ())
(537 loop 536 67 ())
(538 quotation? 526 68 ())
(539 write-vector 526 76 ())
(540 loop 539 52 ())
(541 write-other 526 84 ())
(542 #f 541 57 ())
(543 display-type-name 526 92 ())
(544 loop##9 543 80 ())
(545 display 526 100 ())
(546 recur 545 26 ())
(548 condition-supertypes 547 12 ())
(549 define-condition-type 547 20 ())
(550 #f 549 19 ())
(551 condition-predicate 547 28 ())
(552 #f 551 5 ())
(553 condition? 547 36 ())
(554 make-exception 547 204 ())
(556 read 555 4 ())
(557 loop 556 24 ())
(558 sub-read-carefully 555 12 ())
(559 make-reader-token 555 37 ())
(560 reader-token? 555 45 ())
(561 sub-read 555 81 ())
(563 set-standard-syntax! 555 115 ())
(564 sub-read-whitespace 555 124 ())
(566 sub-read-constituent 555 144 ())
(568 set-standard-read-macro! 555 184 ())
(569 sub-read-list 555 192 ())
(575 loop 574 11 ())
(577 gobble-line 555 326 ())
(578 loop 577 9 ())
(579 define-sharp-macro 555 342 ())
(585 number-sharp-macro 555 432 ())
(587 sub-read-token 555 451 ())
(588 loop 587 9 ())
(589 parse-token 555 459 ())
(590 reading-error 555 504 ())
(592 script-skip 591 4 ())
(593 lp 592 12 ())
(594 advance-if 593 5 ())
(595 preferred-case 591 28 ())
(596 parse-token 591 36 ())
(599 readc 598 7 ())
(600 read-digit 598 12 ())
(601 loop 598 21 ())
(603 table-set!-procedure 602 44 ())
(604 set-table-set!-procedure! 602 52 ())
(605 table-ref-procedure 602 60 ())
(606 set-table-ref-procedure! 602 68 ())
(607 table-data 602 76 ())
(608 set-table-data! 602 84 ())
(609 table-size 602 92 ())
(610 set-table-size! 602 100 ())
(611 table-ref 602 125 ())
(612 table-set! 602 133 ())
(613 next-table-size 602 157 ())
(614 make-table-maker 602 165 ())
(615 #f 614 67 ())
(616 new-entry 602 180 ())
(617 make-assoc 602 188 ())
(618 #f 617 17 ())
(619 loop 618 9 ())
(620 eq?-assoc 602 196 ())
(621 loop 620 9 ())
(622 make-linear-table-ref 602 204 ())
(623 #f 622 5 ())
(624 make-linear-table-set! 602 212 ())
(625 #f 624 5 ())
(626 make->hash-table 602 220 ())
(627 #f 626 37 ())
(628 make-hash-table-ref 602 228 ())
(629 #f 628 5 ())
(630 make-hash-table-set! 602 236 ())
(631 #f 630 5 ())
(632 expand-hash-table! 602 244 ())
(633 loop##10 632 43 ())
(634 table-enter-alist! 602 252 ())
(635 loop##11 634 19 ())
(636 table-expand-table! 602 260 ())
(637 table-walk 602 268 ())
(638 #f 637 5 ())
(639 really-table-walk 602 276 ())
(640 loop##12 639 62 ())
(641 alist-walk 602 284 ())
(642 loop##13 641 9 ())
(643 make-table-immutable! 602 292 ())
(644 table->entry-list 602 300 ())
(645 #f 644 14 ())
(646 default-table-hash-function 602 308 ())
(647 symbol-hash 602 316 ())
(648 make-table 602 345 ())
(651 type-info 650 44 ())
(652 type-more 650 52 ())
(653 type-mask 650 60 ())
(655 make-type 650 100 ())
(656 name->type 650 136 ())
(657 set-type-name! 650 144 ())
(658 new-type-bit 650 160 ())
(659 mask->type 650 168 ())
(660 bottom-type? 650 205 ())
(662 new-atomic-type 661 19 ())
(663 named-atomic-type 661 27 ())
(664 rail-type 661 80 ())
(665 make-optional-type 661 88 ())
(666 make-rest-type 661 96 ())
(667 head-type 661 104 ())
(668 head-type-really 661 112 ())
(669 tail-type 661 120 ())
(670 empty-rail-type? 661 128 ())
(671 rest-type? 661 136 ())
(672 optional-type? 661 144 ())
(673 value-type? 661 268 ())
(674 same-type? 661 328 ())
(675 subtype? 661 336 ())
(676 meet-type 661 344 ())
(677 other-type-info 661 352 ())
(678 p 661 360 ())
(679 meet-rail 661 368 ())
(680 meet-procedure 661 376 ())
(681 meet? 661 384 ())
(682 meet-procedure? 661 392 ())
(683 join-type 661 400 ())
(684 join-rail 661 408 ())
(685 join-procedure 661 416 ())
(686 loop 661 437 ())
(688 make-other-type 687 222 ())
(689 procedure-type 687 362 ())
(690 make-procedure-type 687 370 ())
(691 procedure-type-domain 687 378 ())
(692 procedure-type-codomain 687 386 ())
(693 restrictive? 687 394 ())
(694 sexp->type 687 402 ())
(695 #f 694 234 ())
(696 #f 694 282 ())
(697 sexp->values-type 687 410 ())
(698 type->sexp 687 418 ())
(699 #f 698 122 ())
(700 atomic-type->sexp 687 426 ())
(701 rail-type->sexp 687 434 ())
(702 recur 701 9 ())
(703 disjoin-type 687 442 ())
(704 loop##14 703 228 ())
(705 disjoin-rest 687 450 ())
(706 make-some-values-type 687 471 ())
(707 procedure-type? 687 481 ())
(708 fixed-arity-procedure-type? 687 489 ())
(709 loop 708 23 ())
(710 procedure-type-arity 687 497 ())
(711 loop##15 710 9 ())
(712 procedure-type-argument-types 687 505 ())
(713 recur 712 9 ())
(716 operator-name 715 4 ())
(717 operator-uid 715 12 ())
(718 operator-nargs 715 20 ())
(719 operator-type 715 28 ())
(720 set-operator-type! 715 36 ())
(722 get-operator 715 76 ())
(723 make-operator-table 715 126 ())
(724 operator-lookup 715 142 ())
(725 operator-define! 715 150 ())
(726 node-plist 715 198 ())
(727 set-node-plist! 715 206 ())
(728 node-form 715 214 ())
(729 node-operator-id 715 222 ())
(731 make-node 715 262 ())
(732 node-ref 715 270 ())
(733 node-set! 715 278 ())
(734 loop 733 78 ())
(735 node-operator 715 286 ())
(736 node-predicate 715 294 ())
(737 #f 736 30 ())
(738 make-similar-node 715 302 ())
(739 generated-parent-name 715 350 ())
(740 generated-env 715 358 ())
(741 generated-token 715 366 ())
(742 generated-symbol 715 374 ())
(744 generate-name 715 414 ())
(745 generated-uid 715 422 ())
(746 name->symbol 715 438 ())
(747 name-hash 715 446 ())
(748 desyntaxify 715 454 ())
(749 loop 748 237 ())
(751 transform-id 750 4 ())
(752 transform-source 750 12 ())
(753 transform-aux-names 750 20 ())
(754 transform-type 750 28 ())
(755 transform-env 750 36 ())
(756 transform-procedure 750 44 ())
(757 make-transform 750 69 ())
(759 maybe-transform 750 92 ())
(760 compare 759 67 ())
(761 bind-aliases 750 100 ())
(762 #f 761 22 ())
(763 make-name-generator 750 108 ())
(764 #f 763 10 ())
(765 same-denotation? 750 116 ())
(766 binding-type 750 132 ())
(767 binding-place 750 140 ())
(768 binding-static 750 148 ())
(769 set-binding-place! 750 156 ())
(770 make-binding 750 164 ())
(771 clobber-binding! 750 172 ())
(772 impose-type 750 180 ())
(773 forget-integration 750 188 ())
(774 classify 750 196 ())
(775 classify-literal 750 265 ())
(776 classify-call 750 295 ())
(777 classify-name 750 304 ())
(778 classify-macro-application 750 332 ())
(779 #f 778 14 ())
(780 classify-transform-application 750 361 ())
(781 #f 780 5 ())
(782 maybe-transform-call 750 370 ())
(783 #f 782 108 ())
(784 classify-operator-form 750 378 ())
(786 define-classifier 750 403 ())
(789 unspecific-node 750 492 ())
(793 lose 792 26 ())
(795 bind-source-file-name 790 198 ())
(796 lookup 790 206 ())
(797 bind1 790 214 ())
(798 #f 797 5 ())
(799 bind 790 222 ())
(800 bindrec 790 230 ())
(801 #f 800 16 ())
(802 literal? 790 238 ())
(803 number-of-required-args 790 246 ())
(804 loop##16 803 9 ())
(805 n-ary? 790 254 ())
(806 normalize-formals 790 262 ())
(807 syntax? 790 270 ())
(808 name? 790 278 ())
(809 define-usual-suspects 790 294 ())
(810 #f 809 22 ())
(811 #f 810 61 ())
(812 #f 809 52 ())
(813 #f 812 57 ())
(814 #f 813 5 ())
(815 #f 809 78 ())
(816 process-syntax 790 302 ())
(817 get-funny 790 310 ())
(818 reflective-tower 790 335 ())
(819 scan-body 790 343 ())
(820 #f 819 58 ())
(821 scan-body-forms 790 351 ())
(822 #f 821 171 ())
(823 body-lossage 790 359 ())
(824 variable-type 790 387 ())
(825 variable-type? 790 395 ())
(826 compatible-types? 790 411 ())
(827 environment-reader 790 464 ())
(829 schemify 828 4 ())
(830 schemify1 828 12 ())
(833 define-schemifier 828 37 ())
(836 name->qualified 828 87 ())
(837 recur 836 83 ())
(841 schemify-sexp 828 116 ())
(842 loop 841 136 ())
(843 make-qualified 828 124 ())
(844 qualified? 828 132 ())
(845 qualified-parent-name 828 140 ())
(846 qualified-symbol 828 148 ())
(848 make-population 847 4 ())
(849 add-to-population! 847 12 ())
(850 weak-memq 847 20 ())
(851 population-reduce 847 28 ())
(852 loop##17 851 9 ())
(853 population->list 847 36 ())
(854 walk-population 847 44 ())
(855 #f 854 5 ())
(857 interface-name 856 44 ())
(858 set-interface-name! 856 52 ())
(859 interface-clients 856 60 ())
(860 walk-method 856 68 ())
(861 ref-method 856 76 ())
(863 interface-ref 856 116 ())
(864 for-each-declaration 856 124 ())
(865 note-reference-to-interface! 856 132 ())
(866 make-interface 856 140 ())
(867 make-simple-interface 856 148 ())
(868 #f 867 23 ())
(869 #f 868 58 ())
(870 really-make-simple-interface 856 156 ())
(871 #f 870 5 ())
(872 #f 870 8 ())
(873 make-compound-interface 856 164 ())
(874 #f 873 12 ())
(875 loop 874 9 ())
(876 #f 873 15 ())
(877 #f 876 5 ())
(878 #f 873 32 ())
(879 note-interface-name! 856 172 ())
(881 structure-name 880 44 ())
(882 set-structure-name! 880 52 ())
(883 structure-clients 880 60 ())
(884 structure-package 880 68 ())
(885 structure-interface-really 880 76 ())
(886 set-structure-interface! 880 84 ())
(887 structure-interface-thunk 880 92 ())
(889 structure-interface 880 132 ())
(890 initialize-structure! 880 140 ())
(891 make-structure 880 148 ())
(892 #f 891 75 ())
(893 structure-unstable? 880 156 ())
(894 for-each-export 880 164 ())
(895 #f 894 19 ())
(896 note-structure-name! 880 172 ())
(897 package-cached 880 220 ())
(899 package-clients 898 4 ())
(900 package-plist 898 12 ())
(901 set-package-plist! 898 20 ())
(902 package-accesses-thunk 898 28 ())
(903 package-opens-thunk 898 36 ())
(904 set-package-opens-thunk! 898 44 ())
(905 package->environment 898 52 ())
(906 set-package->environment! 898 60 ())
(907 package-loaded? 898 68 ())
(908 set-package-loaded?! 898 76 ())
(909 package-clauses 898 84 ())
(910 package-file-name 898 92 ())
(911 package-get-location 898 100 ())
(912 set-package-get-location! 898 108 ())
(913 package-integrate? 898 116 ())
(914 set-package-integrate?! 898 124 ())
(915 package-unstable? 898 132 ())
(916 package-definitions 898 140 ())
(917 package-opens-really 898 148 ())
(918 set-package-opens! 898 156 ())
(919 package-uid 898 164 ())
(921 make-package 898 204 ())
(922 really-package->environment 898 212 ())
(923 #f 922 5 ())
(924 new-package-uid 898 220 ())
(925 package-name 898 250 ())
(926 note-package-name! 898 258 ())
(927 package-opens 898 266 ())
(928 initialize-package-if-necessary! 898 274 ())
(929 package-accesses 898 282 ())
(930 make-simple-package 898 290 ())
(931 #f 930 60 ())
(932 #f 930 63 ())
(933 package-definition 898 298 ())
(934 package-define! 898 306 ())
(935 really-package-define! 898 314 ())
(936 package-lookup 898 322 ())
(937 really-package-lookup 898 330 ())
(938 loop 937 80 ())
(939 structure-lookup 898 338 ())
(940 generic-lookup 898 346 ())
(941 initialize-package! 898 354 ())
(942 #f 941 35 ())
(943 #f 941 46 ())
(944 define-funny-names! 898 362 ())
(945 package-define-funny! 898 370 ())
(946 extract-package-from-environment 898 395 ())
(947 for-each-definition 898 403 ())
(948 #f 947 5 ())
(949 get-new-location 898 411 ())
(950 make-new-location 898 419 ())
(951 flush-location-names 898 466 ())
(952 package-get 898 474 ())
(953 package-put! 898 482 ())
(954 package-note-caching 898 490 ())
(955 loop 954 54 ())
(956 maybe-fix-place 898 498 ())
(957 follow-forwarding-pointers 898 506 ())
(959 environment-ref 958 4 ())
(960 environment-set! 958 12 ())
(961 #f 960 98 ())
(962 environment-define! 958 20 ())
(963 *structure-ref 958 28 ())
(964 carefully 958 36 ())
(965 interaction-environment 958 60 ())
(966 set-interaction-environment! 958 68 ())
(967 with-interaction-environment 958 76 ())
(968 scheme-report-environment 958 84 ())
(969 set-scheme-report-environment! 958 107 ())
(970 make-reflective-tower 958 115 ())
(971 recur 970 9 ())
(972 #f 971 5 ())
(973 set-reflective-tower-maker! 958 141 ())
(975 define-usual-macro 974 18 ())
(976 #f 975 11 ())
(977 usual-transform 974 26 ())
(978 long-enough? 974 34 ())
(981 recur 980 16 ())
(990 interesting-to-quasiquote? 989 33 ())
(991 descend-quasiquote-vector 989 38 ())
(992 #f 991 20 ())
(993 descend-quasiquote-pair 989 43 ())
(994 #f 993 14 ())
(995 #f 994 14 ())
(996 descend-quasiquote 989 48 ())
(997 finalize-quasiquote 989 53 ())
(998 expand-quasiquote 989 58 ())
(1001 process-rules 999 25 ())
(1002 free-meta-variables 1001 63 ())
(1003 meta-variables 1001 68 ())
(1004 process-template 1001 73 ())
(1005 process-pattern 1001 78 ())
(1006 #f 1005 90 ())
(1007 process-segment-match 1001 83 ())
(1008 process-match 1001 88 ())
(1009 process-rule 1001 93 ())
(1010 #f 1009 99 ())
(1011 make-transformer 1001 98 ())
(1012 segment-pattern? 999 33 ())
(1013 segment-template? 999 41 ())
(1014 find-free-names-in-syntax-rules 999 75 ())
(1015 free-names 1014 11 ())
(1016 meta-variables 1014 16 ())
(1017 loop##18 1014 25 ())
(1019 namestring 1018 4 ())
(1020 #f 1019 173 ())
(1021 namestring-component 1018 28 ())
(1022 file-name-directory 1018 60 ())
(1023 file-name-nondirectory 1018 68 ())
(1024 file-nondirectory-position 1018 76 ())
(1025 loop 1024 9 ())
(1026 string-posq 1018 84 ())
(1027 loop 1026 9 ())
(1028 translations 1018 100 ())
(1029 set-translation! 1018 108 ())
(1030 translate 1018 116 ())
(1031 loop 1030 15 ())
(1033 scan-forms 1032 21 ())
(1034 scan-file 1032 29 ())
(1035 really-scan-port 1032 37 ())
(1036 recur 1035 53 ())
(1037 really-scan-file 1032 45 ())
(1038 #f 1037 71 ())
(1039 recur 1038 108 ())
(1040 scan-form-list 1032 53 ())
(1041 loop 1040 9 ())
(1042 scan-form 1032 82 ())
(1043 process-define-syntax 1032 91 ())
(1044 scan-structures 1032 99 ())
(1045 really-scan-structures 1032 107 ())
(1046 recur 1045 17 ())
(1047 #f 1046 198 ())
(1048 #f 1046 249 ())
(1049 scan-package 1032 115 ())
(1050 really-scan-package 1032 123 ())
(1051 #f 1050 77 ())
(1052 #f 1051 22 ())
(1053 optimize 1032 131 ())
(1054 #f 1053 33 ())
(1055 #f 1053 124 ())
(1056 #f 1053 137 ())
(1057 check-structure 1032 139 ())
(1058 #f 1057 14 ())
(1059 initialize-usual-transforms! 1032 147 ())
(1060 #f 1059 5 ())
(1061 define-all-operators 1032 155 ())
(1062 #f 1061 14 ())
(1063 #f 1061 60 ())
(1064 make-define-primitive-node 1032 199 ())
(1065 get-optimizer 1032 222 ())
(1066 set-optimizer! 1032 230 ())
(1068 note-undefined! 1067 20 ())
(1069 noting-undefined-variables 1067 28 ())
(1070 really-noting-undefined-variables 1067 36 ())
(1071 foo 1070 10 ())
(1072 #f 1070 18 ())
(1073 #f 1070 34 ())
(1074 #f 1073 3 ())
(1075 #f 1073 9 ())
(1076 #f 1075 3 ())
(1077 #f 1076 17 ())
(1078 #f 1076 169 ())
(1080 lookup-enumerand 1079 9 ())
(1081 loop 1080 16 ())
(1084 node-type 1083 4 ())
(1085 reconstruct-type 1083 12 ())
(1086 reconstruct 1083 20 ())
(1088 define-reconstructor 1083 45 ())
(1092 careful-codomain 1083 71 ())
(1093 reconstruct-body 1083 79 ())
(1096 reconstruct-name 1094 22 ())
(1097 reconstruct-call 1094 30 ())
(1098 lose 1097 63 ())
(1099 #f 1098 3 ())
(1100 loop 1097 104 ())
(1105 fork-constraints 1094 92 ())
(1106 #f 1105 12 ())
(1108 loop##19 1107 9 ())
(1109 examine 1094 118 ())
(1115 node->type 1094 198 ())
(1121 reconstruct-apply 1094 376 ())
(1122 #f 1121 45 ())
(1123 declare-operator-type 1094 494 ())
(1124 #f 1123 19 ())
(1127 constant-type 1126 463 ())
(1129 template-code 1128 12 ())
(1130 template-info 1128 20 ())
(1131 set-template-code! 1128 28 ())
(1132 set-template-info! 1128 36 ())
(1134 segment->template 1133 28 ())
(1135 #f 1134 169 ())
(1136 segment-data->template 1133 36 ())
(1137 loop##20 1136 52 ())
(1138 astate-literals 1133 84 ())
(1139 set-astate-literals! 1133 92 ())
(1140 astate-count 1133 100 ())
(1141 set-astate-count! 1133 108 ())
(1142 astate-pc 1133 116 ())
(1143 set-astate-pc! 1133 124 ())
(1144 astate-code-vector 1133 132 ())
(1145 make-astate 1133 140 ())
(1146 emit-byte! 1133 148 ())
(1147 emit-literal! 1133 156 ())
(1148 emit-segment! 1133 164 ())
(1150 instruction 1133 186 ())
(1151 #f 1150 24 ())
(1152 #f 1151 20 ())
(1153 sequentially 1133 194 ())
(1154 sequentially-2 1133 202 ())
(1155 #f 1154 42 ())
(1156 instruction-with-literal 1133 210 ())
(1157 #f 1156 8 ())
(1158 instruction-with-location 1133 218 ())
(1159 #f 1158 8 ())
(1160 instruction-with-template 1133 226 ())
(1161 #f 1160 8 ())
(1162 make-label 1133 234 ())
(1163 instruction-using-label 1133 242 ())
(1164 #f 1163 37 ())
(1165 attach-label 1133 250 ())
(1166 #f 1165 11 ())
(1167 #f 1166 27 ())
(1168 note-source-code 1133 294 ())
(1169 #f 1168 22 ())
(1170 note-environment 1133 302 ())
(1171 #f 1170 22 ())
(1172 emit-with-environment-maps! 1133 310 ())
(1173 #f 1172 24 ())
(1175 new-template-uid 1174 4 ())
(1176 template-uid 1174 20 ())
(1177 set-template-uid! 1174 28 ())
(1178 debug-flag-accessor 1174 127 ())
(1179 #f 1178 22 ())
(1180 debug-flag-modifier 1174 135 ())
(1181 #f 1180 22 ())
(1182 with-fresh-compiler-state 1174 245 ())
(1183 #f 1182 51 ())
(1184 #f 1183 3 ())
(1185 #f 1183 6 ())
(1186 saving-and-restoring 1174 253 ())
(1187 swap 1186 5 ())
(1189 debug-data-source 1188 44 ())
(1190 set-debug-data-source! 1188 52 ())
(1191 debug-data-env-maps 1188 60 ())
(1192 set-debug-data-env-maps! 1188 68 ())
(1193 debug-data-pc-in-parent 1188 76 ())
(1194 debug-data-parent 1188 84 ())
(1195 debug-data-name 1188 92 ())
(1196 debug-data-uid 1188 100 ())
(1197 new-debug-data 1188 125 ())
(1199 debug-data->info 1188 148 ())
(1200 get-debug-data 1188 156 ())
(1201 note-debug-data! 1188 164 ())
(1202 interesting-debug-data? 1188 172 ())
(1203 debug-data-names 1188 180 ())
(1204 template-debug-data 1188 188 ())
(1205 template-id 1188 196 ())
(1206 template-name 1188 204 ())
(1207 template-names 1188 212 ())
(1209 compile-top 1208 4 ())
(1210 compile 1208 12 ())
(1215 define-compilator 1208 40 ())
(1218 compile-constant 1208 89 ())
(1223 compile-begin 1208 198 ())
(1224 loop 1223 59 ())
(1226 compile-call 1225 4 ())
(1227 compile-redex 1225 49 ())
(1228 compile-unknown-call 1225 57 ())
(1229 maybe-push-continuation 1225 65 ())
(1230 push-arguments 1225 73 ())
(1231 recur 1230 9 ())
(1232 push-all-with-names 1225 81 ())
(1234 compile-lambda 1225 110 ())
(1235 compile-lambda-code 1225 118 ())
(1236 compile-letrec 1225 186 ())
(1237 #f 1236 76 ())
(1238 #f 1236 179 ())
(1239 compile-body 1225 216 ())
(1240 #f 1239 11 ())
(1241 #f 1240 49 ())
(1242 make-cont 1225 241 ())
(1243 return-cont 1225 282 ())
(1244 return-cont? 1225 290 ())
(1245 fall-through-cont 1225 298 ())
(1246 fall-through-cont? 1225 306 ())
(1247 ignore-values-cont 1225 331 ())
(1248 ignore-values-cont? 1225 339 ())
(1249 deliver-value 1225 347 ())
(1250 named-cont 1225 355 ())
(1251 cont-name 1225 363 ())
(1252 bind-vars 1225 371 ())
(1253 #f 1252 23 ())
(1254 loop 1253 21 ())
(1255 initial-cenv 1225 379 ())
(1256 environment-level 1225 387 ())
(1257 name-node-binding 1225 412 ())
(1258 generate-trap 1225 420 ())
(1259 careful-sequentially 1225 428 ())
(1260 shrink-segment 1225 448 ())
(1261 type-check 1225 456 ())
(1262 #f 1261 107 ())
(1263 #f 1261 139 ())
(1264 set-type-check?! 1225 464 ())
(1265 diagnose-call-error 1225 480 ())
(1266 #f 1265 151 ())
(1269 define-compiler-primitive 1268 4 ())
(1271 define-closed-compilator 1268 29 ())
(1273 get-closed-compilator 1268 58 ())
(1274 direct-compilator 1268 66 ())
(1275 #f 1274 5 ())
(1276 direct-closed-compilator 1268 74 ())
(1277 #f 1276 5 ())
(1278 nargs->domain 1268 82 ())
(1279 loop##21 1278 9 ())
(1280 loop##22 1268 95 ())
(1281 define-simple-primitive 1268 111 ())
(1282 simple-compilator 1268 119 ())
(1283 #f 1282 5 ())
(1284 simple-closed-compilator 1268 127 ())
(1285 #f 1284 5 ())
(1286 symbol-append 1268 135 ())
(1287 define-stob-predicate 1268 143 ())
(1288 define-data-struct-primitives 1268 181 ())
(1289 def-prim 1288 8 ())
(1290 loop##23 1288 175 ())
(1292 define-vector-primitives 1268 204 ())
(1293 def-prim 1292 22 ())
(1299 define-n-ary-compiler-primitive 1268 312 ())
(1300 n-ary-primitive-compilator 1268 320 ())
(1301 #f 1300 5 ())
(1310 push-all-but-last 1268 441 ())
(1311 recur 1310 9 ())
(1313 compile-form 1312 4 ())
(1314 compile-file 1312 12 ())
(1315 compile-and-run-forms 1312 20 ())
(1316 compile-and-run-file 1312 28 ())
(1317 compile-and-run-port 1312 36 ())
(1318 compile-and-run-scanned-forms 1312 44 ())
(1319 do-it 1318 5 ())
(1320 do-them 1318 10 ())
(1321 loop##24 1320 34 ())
(1322 #f 1318 20 ())
(1323 compile-scanned-forms 1312 52 ())
(1324 recur 1323 95 ())
(1325 compile-scanned-form 1312 60 ())
(1326 compile-definition 1312 77 ())
(1327 #f 1326 52 ())
(1328 get-location 1312 86 ())
(1329 win 1328 12 ())
(1330 get-location-for-undefined 1312 94 ())
(1331 #f 1330 82 ())
(1332 #f 1330 85 ())
(1333 get-location-for-unassignable 1312 102 ())
(1334 #f 1333 82 ())
(1335 #f 1333 85 ())
(1336 package-accessor-on-demand 1312 110 ())
(1337 #f 1336 5 ())
(1338 location-on-demand 1312 118 ())
(1339 #f 1338 5 ())
(1341 location-for-reference 1312 164 ())
(1342 loop 1341 9 ())
(1344 note-caching 1312 210 ())
(1345 grumble 1312 218 ())
(1346 make-startup-procedure 1312 226 ())
(1347 #f 1346 14 ())
(1349 eval 1348 4 ())
(1350 #f 1349 22 ())
(1351 load-into 1348 12 ())
(1352 #f 1351 11 ())
(1353 load-quietly 1348 20 ())
(1354 #f 1353 11 ())
(1355 eval-from-file 1348 28 ())
(1356 #f 1355 14 ())
(1357 eval-scanned-forms 1348 36 ())
(1358 really-eval-scanned-forms 1348 44 ())
(1359 #f 1358 14 ())
(1360 invoke-template 1348 52 ())
(1361 load 1348 60 ())
(1362 #f 1361 39 ())
(1365 continuation-cont 1364 4 ())
(1366 continuation-pc 1364 12 ())
(1367 continuation-template 1364 20 ())
(1368 continuation-env 1364 28 ())
(1369 continuation-arg 1364 44 ())
(1370 continuation-arg-count 1364 52 ())
(1371 continuation-parent 1364 60 ())
(1372 loop 1371 68 ())
(1373 &disclose 1364 136 ())
(1375 usual-exception-handler 1374 4 ())
(1376 define-exception-handler 1374 12 ())
(1377 signal-exception 1374 20 ())
(1379 except 1374 60 ())
(1380 #f 1379 5 ())
(1381 handler 1374 63 ())
(1382 #f 1381 5 ())
(1383 make-opcode-generic! 1374 68 ())
(1384 really-signal-condition 1374 77 ())
(1385 loop 1384 9 ())
(1386 #f 1385 8 ())
(1387 with-handler 1374 85 ())
(1388 initialize-exceptions! 1374 109 ())
(1389 #f 1388 5 ())
(1390 last-resort-condition-handler 1374 117 ())
(1391 #f 1390 12 ())
(1392 #f 1391 21 ())
(1393 report-utter-lossage 1374 125 ())
(1394 #f 1393 76 ())
(1395 continuation-preview 1374 133 ())
(1396 ignore-errors 1374 141 ())
(1397 #f 1396 5 ())
(1398 #f 1397 5 ())
(1399 &disclose 1374 189 ())
(1400 &disclose 1374 247 ())
(1403 define-wna-handler 1401 27 ())
(1404 wna-lose 1401 43 ())
(1412 recur 1411 47 ())
(1418 comparison-wna 1401 231 ())
(1419 #f 1418 5 ())
(1420 loop 1419 52 ())
(1422 display-condition 1421 16 ())
(1423 #f 1422 9 ())
(1424 really-display-condition 1421 25 ())
(1425 #f 1424 220 ())
(1426 &disclose-condition 1421 119 ())
(1427 limited-write 1421 141 ())
(1428 recur 1427 9 ())
(1429 #f 1428 134 ())
(1430 #f 1429 21 ())
(1432 command-processor 1431 4 ())
(1433 loop 1432 50 ())
(1434 #f 1433 7 ())
(1435 #f 1434 5 ())
(1436 #f 1435 63 ())
(1437 #f 1434 8 ())
(1438 #f 1437 69 ())
(1439 #f 1437 164 ())
(1440 #f 1437 200 ())
(1441 #f 1440 10 ())
(1442 mini-load 1431 12 ())
(1443 read-string 1431 20 ())
(1444 loop 1443 9 ())
(1446 loop##25 1445 22 ())
(1447 #f 1446 28 ())
(1448 initialize-interrupts! 1445 38 ())
(1449 with-interrupts-inhibited 1445 85 ())
(1450 with-interrupts-allowed 1445 93 ())
(1451 with-interrupts 1445 101 ())
(1452 #f 1451 11 ())
(1453 enabled-interrupts 1445 109 ())
(1454 interrupt-before-heap-overflow! 1445 117 ())
(1455 #f 1454 42 ())
(1457 usual-resumer 1456 4 ())
(1458 #f 1457 5 ())
(1459 #f 1458 20 ())
(1460 #f 1459 3 ())
(1462 start 1461 4 ())
(1463 #f 1462 5 ())
(1464 #f 1463 5 ())
(1465 #f 1464 58 ())
(1466 make-built-in-structures 1461 12 ())
(1467 #f 1466 33 ())
(1468 #f 1466 50 ())
(1469 initialize-interaction-environment! 1461 20 ())
(1470 make-initial-package 1461 28 ())
(1471 #f 1470 16 ())
(1472 make-tower 1461 36 ())
(1474 inline-transform 1473 4 ())
(1475 #f 1474 55 ())
(1476 #f 1474 61 ())
(1477 make-substitution 1473 12 ())
(1478 #f 1477 25 ())
(1479 substitute 1473 20 ())
(1480 #f 1479 186 ())
(1481 #f 1479 270 ())
(1482 qualified->name 1473 45 ())
(1483 recur 1482 9 ())
(1484 get-qualified-env 1473 53 ())
(1486 operator 1485 4 ())
(1487 simple-interface 1485 12 ())
(1488 #f 1487 11 ())
(1489 package 1485 20 ())
(1490 loop##26 1489 60 ())
(1491 transform 1485 28 ())
(1493 procedure 1492 36 ())
(1496 make-a-package 1495 4 ())
(1497 loser 1495 12 ())
(1498 *verify-later!* 1495 28 ())
(1499 verify-later! 1495 36 ())
(1500 set-verify-later! 1495 44 ())
(1501 note-name! 1495 52 ())
(1503 ensure-loaded 1502 4 ())
(1504 really-ensure-loaded 1502 12 ())
(1505 #f 1504 14 ())
(1506 #f 1504 17 ())
(1507 #f 1506 11 ())
(1508 #f 1507 6 ())
(1509 #f 1508 7 ())
(1512 get-location 1511 3 ())
(1561 conc 1560 35 ())
(1562 #f 1561 17 ())
(1565 loop 1564 97 ())
(1571 loop 1570 48 ())
(1575 loop##27 1574 53 ())
(1579 loop 1578 75 ())
(1581 loop 1580 75 ())
(1583 loop 1582 75 ())
(1585 loop 1584 75 ())
(1588 loop 1587 75 ())
(1617 parse-package-clauses 1613 220 ())
(1618 loop 1617 47 ())
(1625 loop 1624 17 ())
(1629 loop 1628 37 ())
-