From fe9117e0bcaf65db50930e6320ff7012cee541e3 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sun, 28 Feb 2021 16:38:37 -0700 Subject: add some accessors Signed-off-by: Sean Whitton --- src/propspec.lisp | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/propspec.lisp') diff --git a/src/propspec.lisp b/src/propspec.lisp index 1275d40..f2ca2e9 100644 --- a/src/propspec.lisp +++ b/src/propspec.lisp @@ -44,10 +44,12 @@ Consfigurator properties code in this symbol's package applies to hosts.")))) (defclass propspec () ((systems :initarg :systems + :reader propspec-systems :documentation "List of names of systems, the loading of all of which is sufficient to deploy this propspec.") (applications :initarg :props + :reader propspec-props :documentation "Ordered list of property applications. The base case valid entry is of the form (PROPERTY . ARGS) where PROPERTY is a symbol naming a property (typically as defined by DEFPROP) and ARGS is a -- cgit v1.2.3