Commit 22af72f6 authored by Antoine Martin's avatar Antoine Martin
Browse files

Don't fail when not a quicklisp release

parent e98fb528
......@@ -15,7 +15,8 @@
(quickref:get-primary-system-name cl-user::*qrmapper-object-name*)))
;; #### TODO: encapsulate this into an error catching form.
(format t "STARTED BUILDING PACKAGE ~A~%" primary-system)
(ql:quickload primary-system)
(when primary-system
(ql:quickload primary-system))
;; #### TODO: See about providing more information to the DECLT call.
(declt:declt (or primary-system cl-user::*qrmapper-object-name*)
:library cl-user::*qrmapper-object-name*
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment