diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-02-22 12:14:51 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-02-22 12:14:51 -0700 |
| commit | 41495a9b3396158be3af63a86441d8adbea84955 (patch) | |
| tree | 6743c981dceb51aa30925503ebec75461a799fcc | |
| parent | fa2ba4e996ba075e1ae2cdc2e0647a27f47b8731 (diff) | |
| download | consfigurator-41495a9b3396158be3af63a86441d8adbea84955.tar.gz | |
eval a DEFUN form to avoid warnings about undefined functions
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
| -rw-r--r-- | src/property.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/property.lisp b/src/property.lisp index 750d677..2ba108a 100644 --- a/src/property.lisp +++ b/src/property.lisp @@ -40,6 +40,7 @@ (setf (get sym 'check) check)) (when apply (setf (get sym 'apply) apply) + (eval `(defun ,sym ())) (setf (symbol-function sym) (if check (lambda (&rest args) |