diff options
Diffstat (limited to 'infra/libkookie/nixpkgs/pkgs/development/lisp-modules/quicklisp-to-nix/system-info.lisp')
| -rw-r--r-- | infra/libkookie/nixpkgs/pkgs/development/lisp-modules/quicklisp-to-nix/system-info.lisp | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/infra/libkookie/nixpkgs/pkgs/development/lisp-modules/quicklisp-to-nix/system-info.lisp b/infra/libkookie/nixpkgs/pkgs/development/lisp-modules/quicklisp-to-nix/system-info.lisp index 0f7941a01157..fecae710247d 100644 --- a/infra/libkookie/nixpkgs/pkgs/development/lisp-modules/quicklisp-to-nix/system-info.lisp +++ b/infra/libkookie/nixpkgs/pkgs/development/lisp-modules/quicklisp-to-nix/system-info.lisp @@ -7,11 +7,20 @@ (:export #:dump-image)) (in-package :ql-to-nix-system-info) +(eval-when (:compile-toplevel :load-toplevel :execute) + (defparameter *implementation-systems* + (append + #+sbcl(list :sb-posix :sb-bsd-sockets :sb-rotate-byte :sb-cltl2 + :sb-introspect :sb-rt :sb-concurrency))) + (mapcar (function require) *implementation-systems*)) + (declaim (optimize (debug 3) (speed 0) (space 0) (compilation-speed 0) (safety 3))) ;; This file cannot have any dependencies beyond quicklisp and asdf. ;; Otherwise, we'll miss some dependencies! +;; (Implementation-provided dependencies are special, though) + ;; We can't load quicklisp until runtime (at which point we'll create ;; an isolated quicklisp installation). These wrapper functions are ;; nicer than funcalling intern'd symbols every time we want to talk @@ -441,6 +450,8 @@ Run with --debug and/or --verbose for more info. (when cache-dir (setf cache-dir (pathname-as-directory (parse-namestring cache-dir)))) + (mapcar (function require) *implementation-systems*) + (with-quicklisp (dir) (:cache-dir (or cache-dir :temp)) (declare (ignore dir)) |