(in-package "COMMON-LISP-USER")

(setf cl::*enable-package-locked-errors* nil)


;;; Assuming we start from src/lisp/.
(setf (ext:search-list "crabuild:")
      '("../../crabuild/"))

;;; All expressions that kernel.core is capable of executing go to
;;; env-simple.lisp.  Since it's a pure subset, we just read it.
(load "crabuild:env-simple")

;;;
;;; Everything else comes here
;;;

(setf cl:*compile-print* nil)
(setf cl:*compile-verbose* nil)
(load "crabuild:boot.lisp")