Loading build.lisp +10 −1 Original line number Diff line number Diff line (in-package :cl-user) (unless (find-package :quicklisp) (load "/home/dcooper/quicklisp/setup.lisp")) ;; ;; load and/or install quicklisp in dcooper ;; (cond ((find-package :quicklisp)) ((probe-file "/home/dcooper/quicklisp/setup.lisp") (load "/home/dcooper/quicklisp/setup.lisp")) (t (sb-ext:run-program "/usr/bin/curl" (list "-O" "https://beta.quicklisp.org/quicklisp.lisp")) (load "quicklisp.lisp") (funcall (read-from-string "quicklisp-quickstart:install")) (probe-file "./quicklisp/setup.lisp"))) (pushnew (make-pathname :defaults *load-truename* :name nil :type nil) quicklisp:*local-project-directories* :test #'equalp) Loading Loading
build.lisp +10 −1 Original line number Diff line number Diff line (in-package :cl-user) (unless (find-package :quicklisp) (load "/home/dcooper/quicklisp/setup.lisp")) ;; ;; load and/or install quicklisp in dcooper ;; (cond ((find-package :quicklisp)) ((probe-file "/home/dcooper/quicklisp/setup.lisp") (load "/home/dcooper/quicklisp/setup.lisp")) (t (sb-ext:run-program "/usr/bin/curl" (list "-O" "https://beta.quicklisp.org/quicklisp.lisp")) (load "quicklisp.lisp") (funcall (read-from-string "quicklisp-quickstart:install")) (probe-file "./quicklisp/setup.lisp"))) (pushnew (make-pathname :defaults *load-truename* :name nil :type nil) quicklisp:*local-project-directories* :test #'equalp) Loading