aboutsummaryrefslogtreecommitdiff
path: root/src/host.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/host.lisp')
-rw-r--r--src/host.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/host.lisp b/src/host.lisp
index b58c023..e31cdf3 100644
--- a/src/host.lisp
+++ b/src/host.lisp
@@ -75,7 +75,7 @@ values higher up the call stack."))
(propappattrs (eval-propspec (host-propspec *host*)))
*host*))
-(defun make-host (&key hostattrs propspec)
+(defun make-host (&key hostattrs (propspec (make-propspec)))
(make-instance 'unpreprocessed-host
:hostattrs hostattrs :propspec propspec))