-
Notifications
You must be signed in to change notification settings - Fork 0
/
load-xc.lisp
17 lines (14 loc) · 645 Bytes
/
load-xc.lisp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
;;; This can be loaded into Slime, xc-compile-file will produce trace output
(load "src/cold/shared.lisp")
(in-package "SB-COLD")
(setf *host-obj-prefix* "obj/from-host/")
(pushnew :sb-xc-host *features*)
(pushnew :sb-xc-host-interactive *features*)
(load "src/cold/set-up-cold-packages.lisp")
(load "src/cold/defun-load-or-cload-xcompiler.lisp")
(load-or-cload-xcompiler #'host-cload-stem)
;; (load-or-cload-xcompiler #'host-load-stem) ;; if the FASLs are already compiled
(defun xc-compile-file (file)
(sb!xc:with-compilation-unit ()
(sb!xc:compile-file file :trace-file *standard-output*)
(setf sb!c::*undefined-warnings* nil)))