From fe9117e0bcaf65db50930e6320ff7012cee541e3 Mon Sep 17 00:00:00 2001
From: Sean Whitton <spwhitton@spwhitton.name>
Date: Sun, 28 Feb 2021 16:38:37 -0700
Subject: add some accessors

Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
---
 src/host.lisp | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/host.lisp')

diff --git a/src/host.lisp b/src/host.lisp
index a8c3b72..e55f601 100644
--- a/src/host.lisp
+++ b/src/host.lisp
@@ -22,9 +22,11 @@
 (defclass host ()
   ((hostattrs
     :initarg :attrs
+    :reader hostattrs
     :documentation "Plist of the host's static informational attributes.")
    (propspec
     :initarg :props
+    :reader host-propspec
     :documentation "Property application specification of the properties to
 be applied to the host.")))
 
-- 
cgit v1.2.3