summaryrefslogtreecommitdiff
path: root/dev-lisp/gcl/files/bootstrap-gcl
blob: cf964c4b5bea63a7f8f32e0dbb8da403f5f45883 (plain)
1
2
3
4
5
6
7
(compiler::emit-fn t)
(compiler::link nil "bootstrapped_ansi_gcl"
		(format nil "(progn (let ((*load-path* (cons ~S *load-path*)) 
		(si::*load-types* ~S))  (compiler::emit-fn t))  (when (fboundp (quote
		si::sgc-on))  (si::sgc-on t))  (setq compiler::*default-system-p* t))"
		si::*system-directory* (quote (list ".lsp")))
		"-lutil")