21 lines
762 B
Plaintext
21 lines
762 B
Plaintext
;; -*- mode: common-lisp; -*-
|
|
|
|
(setf *print-case* :downcase)
|
|
|
|
;;; The following lines added by ql:add-to-init-file:
|
|
#-quicklisp
|
|
(let ((quicklisp-init (merge-pathnames ".quicklisp/setup.lisp"
|
|
(user-homedir-pathname))))
|
|
(when (probe-file quicklisp-init)
|
|
(load quicklisp-init)))
|
|
|
|
;; Some OSes package Lisp compilers in a way that ASDF is not automatically loaded.
|
|
(require "asdf")
|
|
|
|
(let ((guix-profile (format nil "~a/.guix-profile/lib/" (uiop:getenv "HOME"))))
|
|
(when (and (probe-file guix-profile)
|
|
(ignore-errors (asdf:load-system "cffi")))
|
|
(push guix-profile
|
|
(symbol-value (find-symbol (string '*foreign-library-directories*)
|
|
(find-package 'cffi))))))
|