diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-10-14 23:18:45 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-10-23 12:47:28 -0700 |
| commit | 399e65035866f7c48ad0829a82833614f9e5b3c3 (patch) | |
| tree | bde8a39703c8e089a7be9cde5a0dc3a767333bf8 | |
| parent | 614f79f7c6550de6802dad1d61f37eb5c8f6f11f (diff) | |
| download | consfigurator-399e65035866f7c48ad0829a82833614f9e5b3c3.tar.gz | |
note about PROGRAMMATIC-APPLY-HOSTATTRS for DEFPROPLIST/DEFPROPSPEC
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
| -rw-r--r-- | src/property.lisp | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/property.lisp b/src/property.lisp index 245c440..23c1780 100644 --- a/src/property.lisp +++ b/src/property.lisp @@ -310,6 +310,12 @@ function cell, instead of constructing a propapp, within DEFPROPSPEC.")) ;; Properties with :HOSTATTRS subroutines which set ;; new hostattrs should not be used programmatically ;; in this way, so issue a warning. + ;; + ;; TODO If this property is defined using + ;; DEFPROPLIST/DEFPROPSPEC and has no user-supplied + ;; :HOSTATTRS subroutine of its own, but one of the + ;; properties in the returned propspec does, then we + ;; won't issue the warning, but we should. ,@(and programmatic-warning (getf ,slotsv :hostattrs) `((warn 'programmatic-apply-hostattrs |