;; to debug cross-compilation if it isn't.)
(when (find :sb-test *shebang-features*)
(load "tests/type.before-xc.lisp")
- (load "tests/info.before-xc.lisp"))
+ (load "tests/info.before-xc.lisp")
+ (load "tests/vm.before-xc.lisp"))
+ (load "tools-for-build/ucd.lisp")
+ (sb-cold::slurp-ucd)
+ (sb-cold::output)
(host-cload-stem "src/compiler/generic/genesis")
(sb!vm:genesis :c-header-dir-name "src/runtime/genesis")
#+cmu (ext:quit)