( scratchpad ) :c [ call -> stop ] listener-thread listener (listener) with-datastack [ [ ~quotation~ dip call datastack ] dip -> continue-with ] [ [ ~array~ like set-datastack ] dip call -> datastack ] run M\ vocab (load-vocab) load-source parse-file parse-stream parse-fresh (parse-lines) (parse-until) parse-step POSTPONE: USING: use-vocab M\ vocab (load-vocab) load-source parse-file parse-stream finish-compilation-unit M\ optimizing-compiler recompile compile-loop compile-word backend build-mr (linear-scan) compute-live-intervals compute-live-intervals-step M\ vreg-insn compute-live-intervals* handle-input [ 63 getenv error-thread set-global continuation -> error-continuation set-global rethrow ] ( scratchpad )