From edbba484918f6de83680a5b29e561fba981e05e9 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 29 May 2021 15:12:54 -0700 Subject: factor out ENSURE-HOST & call it in hostattrs accessors Signed-off-by: Sean Whitton --- src/propspec.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/propspec.lisp') diff --git a/src/propspec.lisp b/src/propspec.lisp index e4e8832..92a73e8 100644 --- a/src/propspec.lisp +++ b/src/propspec.lisp @@ -207,7 +207,7 @@ PRINT-OBJECT.")) "Convert a property application specification expression into a property application specification proper by associating it with a list of ASDF systems." - (if systems-supplied-p + (if (or systems-supplied-p (not propspec)) (make-instance 'unpreprocessed-propspec :systems systems :propspec propspec) (make-instance 'unpreprocessed-propspec :propspec propspec))) -- cgit v1.2.3